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