|
CooLAspavA Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
set admin_chan "#opers"
bind pub - !bansil ban:kaldirma
proc ban:kaldirma { n u h c a } {
global admin_chan
if {[onchan $n $admin_chan]==1} {
set komut "[string tolower [lindex $a 0]]"
if {$komut==""} {
putquick "PRIVMSG $c : __________________________________________________ ______"
putquick "PRIVMSG $c :| \00305 Banları kaldırmak için kullanabileceğiniz komutlar By AspavA EditioN.\003 |"
putquick "PRIVMSG $c :|________________________________________________ ______|"
putquick "PRIVMSG $c :\002\00302!bansil g :\002\00307 Bütün gline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil gz:\002\00307 Bütün gzline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil k :\002\00307 Bütün kline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil z :\002\00307 Bütün zline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil s :\002\00307 Bütün shun'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil banlar :\002\00307 Bütün banları açar."
putquick "PRIVMSG $c : --------Her Bişe SizLer İçin By AspavA----------"
return 0
} elseif {$komut=="g"} {
putquick "PRIVMSG $c :\00312Bütün glinelar açılıyor."
putquick "STATS g"
return 0
} elseif {$komut=="k"} {
putquick "PRIVMSG $c :\00312Bütün klinelar açılıyor."
putquick "STATS k"
return 0
} elseif {$komut=="gz"} {
putquick "PRIVMSG $c :\00312Bütün gzlinelar açılıyor."
putquick "STATS g"
return 0
} elseif {$komut=="s"} {
putquick "PRIVMSG $c :\00312Bütün shunlar açılıyor."
putquick "STATS s"
return 0
} elseif {$komut=="z"} {
putquick "PRIVMSG $c :\00312Bütün zlinelar açılıyor."
putquick "STATS k"
return 0
} elseif {$komut=="banlar"} {
putquick "PRIVMSG $c :\00312Bütün banlar açılıyor."
putquick "STATS g"
putquick "STATS k"
putquick "STATS s"
return 0
} else {
putquick "PRIVMSG $c :\00304Bilinmeyen komut! \00301Ban silme komutlarını görmek için \002!Bansil \002yazınız."
}
return 0
}
if {[onchan $n $admin_chan]==0} {
putquick "NOTICE $n
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
u komutu kullanmaya yetkiniz yok!"
}
}
bind raw - 223 serverban_listesi
proc serverban_listesi {from keyword arg} {
set bz [lindex [split $arg] 1]
set ip [lindex [split $arg] 2]
if {$bz == "Z"} {
putquick "GZLINE -$ip"
}
if {$bz == "z"} {
putquick "ZLINE -$ip"
}
if {$bz == "G"} {
putquick "GLINE -$ip"
}
if {$bz == "s"} {
putquick "SHUN -$ip"
}
if {$bz == "K"} {
putquick "KLINE -$ip"
} else {
return 0
}
} |
Basitçe
Not: ScanX Botundan alıntıdır yazsan daha etik bir hareket olurdu.