Kod: Kodu kopyalamak için üzerine çift tıklayın!
## Buraya Komutun Geçerli Olacağı Kanalı Yazın..
set chan "#DJ"
## Başkada Birşeye Dokunmuyoruz. Gerisini Ben Hallederim
bind pub - !dj djim
proc djim {nick host handle chan arg} {
if {![string match -nocase "#Dj" $chan]} {return 0}
putquick "os raw :ChanServ mode #Radyo +q $nick"
putquick "os raw :ChanServ mode #Dj +q $nick"
putquick "operserv raw svsmode $nick +Wq :1"
putquick "privmsg $chan $nick 2Başarıyla 4DJ 2Statüsüne Giriş Yaptınız."
putquick "privmsg $nick 4»2 Radyo DJ Panel Şifreleri"
putquick "privmsg $nick 4»2 Radyo IP:"
putquick "privmsg $nick 4»2 Radyo Port:"
putquick "privmsg $nick 4»2 Radyo Şifre:"
putquick "privmsg $nick 4»2 Maximum Dinleyici: 520"
}
putlog "dj.tcl byCLubber loaded."
CLubber Arkadaşımıza Teşekkür ederiz. Vermiş olduğu tcl de her kanalda çalışmaktadır. Bu ise düzenlenmiş Sadece Dj kanalında geçerli olucaktır.