IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - DJ Gösteren addon (https://www.ircforumlari.net/mirc-scripting-sorunlari/8083-dj-gosteren-addon.html)

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 ...

Alıntı:

alias djoku {
sockopen oku radyo ipsi port'u
}
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
}

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