#kicksource ver0.2
#by #@homer ( 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 )
#for my friend besserwuerzel
#this script lets you kicks source's from shoutcast radio's (if you have the admin passwd
#easy to use: just set the variable's server port and login
#for the login you need mirc because i didn't know how to
#create a encoding like mirc but it is simple: //echo $encode(admin:YOURADMINPASSHERE,m) and you have it
 
bind pub n .kicksource kicksource
proc kicksource {nick host handle chan text} {
#ip:
set server ""
#port:
set port "8000"
#login: (wird erzeugt aus (ab ins mirc) //echo $encode(admin:PASS,m) bei
#pass auch das pass angeben ^^ und dann eintragen sonst tut das nicht
#login (get it in mirc with //echo $encode(admin:PASS,m)
set login ""
#ab hier nixmehr ändern / don't change anything under this
 
set sock [socket $server $port]
puts $sock "GET /admin.cgi?mode=kicksrc HTTP/1.1"
puts $sock "User-Agent:Mozilla"
puts $sock "Host: $server"
puts $sock "Authorization: Basic $login"
puts $sock ""
flush $sock
}
putlog "sourcekick by #@homer (quakenet) loadet"