DJ Gösteren addon
 

DJ Gösteren addon lazım yardımcı olursanız çok sevinirim, Forumda bitane buldum arkadaşın ellerine sağlık yalnız onda djin kim oldugunu göstermiyor ona dj gösterme komutu ekleyebilirmiyiz?
yardımcı olursanız cok sevinirim.


alias -l sc_result {
; $1 = Dinleyici Sayisi, $2 = status,
$3 = dinleyici rekoru
; $4 = dinleyici kapasitesi,
$5 = bilinmeyen dinleyiciler, $6 = kbps orani
; $7- = calan sarki ismi
; Yazar Altug gülel
echo -a 4 Dinleyen : $1
echo -a 5 Calan: $7-
echo -a 4 Sarki Kalitesi: $6
echo -a 5 MaX. Dinleyici Sayisi: $4
echo -a 4 Dinleyici Rekoru: $3 ve $2
}
alias radyo {
if (: isin $1) {
var %dst = $gettok($remove($1,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
tokenize 32 $gettok(%dst,1,58) $gettok(%dst,2,58) $2-
}
if ((. !isin $1) || ($$2 !isnum)) return
var %i = $rand(0,999)
while ($sock(shoutcast- $+ %i)) inc %i
sockopen shoutcast- $+ %i $1-2
sockmark shoutcast- $+ %i $iif($3 != $null,$3-,sc_result)
}
on *:SOCKOPEN:shoutcast-*:{
if ($sockerr > 0) return
sockwrite -n $sockname GET /7.html HTTP/1.0
sockwrite -n $sockname User-Agent: Mozilla
sockwrite -n $sockname
}
on *:SOCKREAD:shoutcast-*:{
if ($sockerr > 0) return
var %line
sockread %line
while ($sockbr) sockread %line
}
on *:SOCKCLOSE:shoutcast-*:{
var %line
sockread -f %line
if ($regex(%line,(?:<.*?>)+([^<]+))) {
tokenize 44 $gettok($regml(1),1-6,44)
tokenize 32 $1-6 $gettok($regml(1),7-,44)
$sock($sockname).mark $1-
}
}
on 1:load:{
echo -a 4 Kullanmak için Sadece 5/radyo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 4 yazabilirsiniz..
echo -a 4 Örnek 5/radyo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
echo -a 6 Bu Addon insureL Web Staff sitelerinden bulunabilir. ve yazari sadece insureL'dir.
echo -a 4 Basarilar.
}

Böyle emir verme gibi olmuş ama inş. elinde olan paylaşır.

alias djoku {
sockopen oku server port
}
on 1:sockopen:oku:{
sockwrite -n oku GET / HTTP/1.0
sockwrite -n oku $crlf
}
on 1:sockread:oku:{
sockread %cry
if ( icy-name: isin %cry ) { set %name $remove(%cry,icy-name:) }
if ( icy-genre: isin %cry ) { set %genre $remove(%cry,icy-genre:) }
if ( icy-url: isin %cry ) { set %url $remove(%cry,icy-url:) }
if ( icy-br: isin %cry ) {
set %bitrate $remove(%cry,icy-br:)
sockclose oku | patlat
}
}
alias patlat {
echo -a Radyo Adı : %name
echo -a Calan : %genre
echo -a Radyo Url : %url
echo -a Bitrate : %bitrate
}

çalıştıramadım server ve port yazan yerde problem var diyor yazıyorum serverle portu olmuyor neyse biraz kurcalıyım bakıyım belki çözerim

Radyo Adı : Radio Free Colorado - Classic + Modern Rock Mix, 60's to today. Best Hi-Fi Sound on the Net!
Calan : Classic Rock 60s 70s 80s
Radyo Url : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Bitrate : 192

çalışıor ...

Kullanmak için oku.

peki Buna djin kim oldugunu göstertemezmiyiz.?

genelde icy-genre dj bilmemne techno gibi geçer orası dj bölümü olarak kullanılabilir.

abi !radyo gibi komutla çalıştırabilirmiyiz??
birde dj yi gostersin istiyorum lutfen

on *:TEXT:*:#Kanal:{
if ($nick == $nick) && ($1 == !radyo) { Radyo'nun linki } eğer bunu kullanmak istiyorsan baska bir kisinin veya botunuz varsa ozeline ekleyin.


Sonuc : <viruS> !radyo
<NonLoser> Dinleyen : 10
<NonLoser> Su anda calan sarki: KULUNMUYUM
<NonLoser> Sarki Kalitesi: 24
<NonLoser> Maximum Dinleyici Sayisi: 32
<NonLoser> Dinleyici Rekoru: 14 ve 1

on *:TEXT:*:#Kanal:{
if ($nick == $nick) && ($1 == !radyo) { Radyo'nun linki } eğer bunu kullanmak istiyorsan baska bir kisinin veya botunuz varsa ozeline ekleyin.


buradaki if ($nick == $nick) bu ne anlama geliyor anlamadim ben

Biraz saçma olmuş :) Kanal kanalında herhangi bi nick !radyo yazarsa vs vs ($nick == $nick) şimdi yazan zaten mecburen bi nick olucak , başkası yazamaz . Sonucta botda olsa nicki olmak zorunda. Kısacası ($nick == $nick) bu hiç bi işe yaramıyor. Sanırım 1az karışık oldu :D

Aslında kodda çalışmazki :)

{ Radyo'nun linki } kısmına linki yazsak nolcak onu kanala mesajmı göndercek amemi atıcak felan filan.

Tam olarak birşey bilmeden bir konuda cevap yazmayalım lütfen.Öğrenmek isteyen onlarca insan icin yanlış örneğe ne gerek var.

Neticeye bak calisiyormu calismiyormu ??

Bizde onu söylüyoruzya , çalışmaz.

Ben kullanıyorum calisiyor ?

kod calisir belki denemedim ama $nick == $nick olmadanda calisir eger calisiyorsa ben onu merak ettim hic gormemistim $nick mehmet olsun mehmet == mehmet ise devam et olmus ahmet == ahmet ise devam et anlamsiz geldi bana

bu addona radyo da bulunan genre kismini nasil ekliyebiliriz ?

on *:TEXT:*:#Radyo:{
if ($nick == $nick) && ($1 == !radyo) { [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }

arkadaşlar linki ekliyorum !radyo komut verilince [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Unknown command soyle bir hata veriyor ?

on *:text:*:#radyo:{
if (viruS == Botnick) && ($1 == !radyo) { radyo http://irc.lobi.net:3535/listen.pls } bu şekil dene

viruS yazan yere kendi nickini yaz , Botnick yazan yere botun nicki..

malesef calışmıyor arkadaşım yinede cok teşekkur diğer kod calışıyor ama kanala yansıt mıyor. yani kac kişi dinlediğini sadece sen goruyorsun. ayrıca. sarkı yenilenince otomatik bir değer goster miyor ama diğeri uzerinde bir calışma yaparsanız sevinirim saygılar.

Arkadaşım oradaki echo -a olan tarafları , msg #radyo yap kanala yansıtır..

valla cok sağol arkadaşım.

abi kod guzel ama birde dj yazan yeri yapamadik forumda bitane daha buldum oda istedigi zaman calisiyor :) gunde bir iki defa yani :D

yukardaki kodda dj gormen icin yayin yaptigin programda genre yazan yere dj ismini yazmaniz gerekiyor
birkac sefer calisipda sonra calismama gibi bir sey nasil oluyor motor degilki bu birkac sefer calisinca bozulsun mircinde vardir bisey ben aylardir kullaniyorum bozuldugu yok