Dj Kick TCL indir

Jade

New Member
Katılım
23 Kas 2012
Mesajlar
20,625
Tepkime puanı
0
Puanları
0
Bu indirdiginiz TCL dosyasını radyo.conf dosyasını açıyorsunuz. En alta source scripts/djkick.tcl olarak eklediginizde radyo botunuzu sunucudan cıkartıp tekrar aldınız mı aktif olacaktir.
Dj Kick TcL indir
 

aLoNe

New Member
Katılım
9 Nis 2013
Mesajlar
952
Tepkime puanı
0
Puanları
0
Web sitesi
www.netforumlari.com
Cevap: Dj Kick TCL indir

Eywallah da, kodu verseydin daha iyiydi. Çalışan bitane paylaşıyorum altta. Bunu #DJ kanalında !djat komutuyla kullanıcaksınız. Radyo bilgilerini girin ama yayın şifresini değil adminpass girin, bu da sc_serv.conf içinde belirtilmiştir zaten..

Kod:
set kickkanal "#DJ"

bind pub - !djat kick

proc kick {nick host handle chan arg} {
global ip port adminpass kickkanal
if {$chan != $kickkanal} {return 0}

set ip "46.45.178.144"
set port "8181"
set adminpass "mcktik1"

set sock [socket [duzelt $ip] [duzelt $port]]
puts $sock "GET /admin.cgi?pass=[duzelt $adminpass]&mode=kicksrc 
HTTP/1.0"
puts $sock "User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; 
rv:0.9.9)"
puts $sock "Host: $ip"
puts $sock "Connection: close"
puts $sock ""
flush $sock
close $sock
putserv "PRIVMSG #DJ :Yayindaki DJ dusuruldu, lutfen yayini aliniz. Komutu gereksiz kullanmanizin tespit edilmesi halinde yetkilerinizin alinabilecegini unutmayiniz..."
}

proc duzelt { a } {
regsub -all {\}} $a "" a
regsub -all {\{} $a "" a
regsub -all {\;} $a "" a
regsub -all {\*} $a "" a
regsub -all " " $a "" a
return $a
}
 
Üst Alt