PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind pub - !istek istekoff
proc istekoff {nick uhost hand chan text} {
setudef flag radyocmd
if {[string match -nocase "#DJ" $chan]} {
set komut [lindex $text 0]
if {$komut == ""} { putquick "PRIVMSG #DJ :Kullanımı !istek aç/kapat şeklindedir."; return 0 }
if {[string match -nocase "ac" $komut]} { channel set $chan +radyocmd; putquick "PRIVMSG #DJ Radyo İstekleri Kabul Edilecek."; return 0 }
if {[string match -nocase "kapat" $komut]} { channel set $chan -radyocmd; putquick "PRIVMSG #DJ Radyo İstekleri Reddedilecek."; return 0 }
}
if {[string match -nocase "#Radyo" $chan]} {
if {[lsearch -exact [channel info #DJ] +radyocmd] != -1} {
set nickdosyasi [open "nickler.txt" r]
set nicks [split [read -nonewline $nickdosyasi] \n]
close $nickdosyasi
set uyari "Nickiniz istek gönderimi için engellenmiştir.."
if {[lsearch -exact $nicks $nick] ne -1]} { putquick "notice $nick : $uyari"; return }
putquick "PRIVMSG #Radyo :2İsteğiniz DJ'lerimize İletilmiştir 4$nick ,2teşekkürler."
putquick "PRIVMSG #DJ 6G E L E N İ S T E K"
putquick "PRIVMSG #DJ 4----------------------------------------------------"
putquick "PRIVMSG #DJ 2İstek:1 $text "
putquick "PRIVMSG #DJ 4----------------------------------------------------"
putquick "PRIVMSG #DJ 2İstekte Bulunan Kullanıcı: 1 $nick"
putquick "PRIVMSG #DJ 4----------------------------------------------------"
}
if {[lsearch -exact [channel info #DJ] +radyocmd] == -1} {
putquick "PRIVMSG #Radyo Üzgünüz Dj'imiz İstekleri Kabul Etmemektedir $nick."
}
}
}