bind pub - !istek istek 
proc istek {n u h c a} { 
global gnick 
set gnick $n 
set kanal [lindex $a ] 
putserv "PRIVMSG #DJ :\[Radyo İstek Paneli\] İstekte Bulunan Kullanıcı: $gnick İsteği: $kanal" 
putserv "PRIVMSG #Radyo :İsteğiniz DJ'lerimize İletilmiştir $gnick." 
}

set opkanal "#DJ"
channel add $opkanal
bind mode - "*+o*" op:yonlendir
proc op:yonlendir {nick uhost hand chan mc kimdir} {
global opkanal
if {![string match -nocase "#Radyo" $chan]} {return 0}
putquick "sajoin $kimdir $opkanal"
putquick "CHGIDENT $kimdir DJ"
putquick "CHGHOST $kimdir DJ.Site-İsmi.Net"
putquick "CHGNAME $kimdir 4,1\[ 0Site-İsmi.Net DJ4 \]"
}
bind time - "* * * * *" time:optara
proc time:optara {min hour day month year} {
global opkanal botnick
foreach kanallar [channels] {
if {$kanallar == $opkanal} { continue }
foreach opcuk [chanlist $kanallar] { 
if {[onchan $opcuk $opkanal]} { continue }
if {[isop $opcuk $kanallar] && $opcuk != $botnick} {
putquick "sajoin $opcuk $opkanal"
}
}
}
}

bind pub - !var var
bind pub - !yok yok
proc var {n u h c a} {
set kanal [lindex $a 0]
if {![string match -nocase "#DJ" $c]} {return 0}
putserv "PRIVMSG #Radyo :İsteğiniz Arşivimizde Mevcut. Kısa Süre İçinde İsteginiz yayınlanacaktır."
}
proc yok {n u h c a} {
set kanal [lindex $a 0]
if {![string match -nocase "#DJ" $c]} {return 0}
putserv "PRIVMSG #Radyo :Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz."
}

bind pub - !sifre sifre
proc sifre {nick uhand host chan text} {
if {![string match -nocase "#DJ" $chan]} {return 0}
putquick "privmsg $chan :4» NarSohbet DJ Panel Şifreleri"
putquick "privmsg $chan :4»2 IP: IP adresiniz"
putquick "privmsg $chan :4»2 Port: Portunuz"
putquick "privmsg $chan :4»2 Şifre: Şifreniz"
putquick "privmsg $chan :4»2 Maximum Dinleyici: 520"
}

bind pub - !Reklam reklam
proc reklam {nick uhand host chan text} {
if {![string match -nocase "#DJ" $chan]} {return 0}
putquick "PRIVMSG $*site-adi.com 4,4 0,1 Radyomuzu Winamp'tan Dinlemek için 4,1»0 4,1Radyo Linki"
}