Kod: Kodu kopyalamak için üzerine çift tıklayın!
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\] İstekte Bulunan Kullanıcı: $gnick kanali $gchan İsteği: $kanal"
putserv "privmsg $gchan :İsteğiniz DJ'lerimize İletilmiştir $gnick."
}
proc var {n u h c a} {
set kanal [lindex $a 0]
if {![string match -nocase "#DJ" $c]} {return 0}
putserv "privmsg $kanal :İ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 :Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz."
}
buyrun bunu deneyin...bunda istek iletilmiştir. şu kanaldan şu nick şunu istemiştir diyor.isteyen kişiyede isteğiniz iletilmiştir diyor. var yok nick cevabı o kişinin özeline iletiliyor.