bind pub - !istek istek 
bind pub - !var var 
bind pub - !yok yok 
proc istek {n u h c a} {  
global gnick gchan
set gchan $c
set gnick $n  
set kanal [lindex $a ]  
putserv "PRIVMSG #DJ :\[Radyo İstek Paneli\] 2 İstekte Bulunan Kullanıcı: 4 $gnick $gchan  2 Kanalında İsteği: $kanal"  
putserv "privmsg $gchan  :2 İsteğiniz DJ'lerimize İletilmiştir 4 $gnick."  
} 
proc var {n u h c a} {
set kanal [lindex $a 0] 
if {![string match -nocase "#DJ" $c]} {return 0} 
putserv "privmsg $kanal : 2 İ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 $kanal : 2 Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz." 
}

bind pub - !istek istekoff
proc istekoff {n u h c a} {
  setudef flag radyocmd
  if {[string match -nocase "#Dj" $c]} {
   set kanal [lindex $a 0]
    if {$kanal == ""} { putquick "PRIVMSG #Dj :Kullanımı !istek on veya !istek off şeklindedir."; return 0 }
    if {[string match -nocase "on" $kanal]} { channel set $cc +radyocmd; putquick "PRIVMSG #Dj Radyo İstekleri Kabul Edilecek."; return 0 }
    if {[string match -nocase "off" $kanal]} { channel set $c -radyocmd; putquick "PRIVMSG #Dj Radyo İstekleri Reddedilecek."; return 0 }
    }
    if {[lsearch -exact [channel info #Dj] +radyocmd] == -1} { 
    putserv "privmsg $kanal : 2 Üzgünüz Dj'imiz İstekleri Kabul Etmemektedir $nick."
  }
}