[SIR-Busy]

Merhaba Arkadaşlar istek karşılama bölümünde bir yardıma ihtiyacım var uğraştım baya ama çözemedim Alta paylaştığım TCL'de User #radyo kanalinda isteğini istedi zaman djler dj kanalinda !var yada !yok diyerek kanala mesajla bilgilendiriyorlar bu mesajlari kanala değilde istek isteyen kullacının özeline gitmesini istiyorum yardimci olursaniz sevinirim.


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 :4İ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 :4Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz."
}