Kod: Kodu kopyalamak için üzerine çift tıklayın!
if $xisop(%::chan,%::nick) && $gettok(%::text,2,32) != NoMercy && Admin_* !iswm $gettok(%::text,2,32) && Csop_* !iswm $gettok(%::text,2,32) && *swatbot* !iswm $gettok(%::text,2,32) {
if $gettok(%::text,1,32) == !clear || $gettok(%::text,1,32) == !temizle {
if $read(txt/Globl.txt,w,%::chan) || *Fener* iswm %::chan {
if !%clearkont. [ $+ [ %::nick ] ] {
inc -u5 %clearkont. [ $+ [ %::nick ] ] 2
if $cle(get,%::Nick) == FB {
.timer 50 00 sockwrite -nt $sockname privmsg %::chan 2,2w.W.w.Geveze.ORG w.W.w.Geveze.ORG 8,8w.W.w.Geveze.ORG w.W.w.Geveze.ORG
}
if $cle(get,%::Nick) == GS {
.timer 50 00 sockwrite -nt $sockname privmsg %::chan 4,4w.W.w.Geveze.ORG w.W.w.Geveze.ORG 8,8w.W.w.Geveze.ORG w.W.w.Geveze.ORG
}
if $cle(get,%::Nick) == Bjk {
.timer 50 00 sockwrite -nt $sockname privmsg %::chan 1,1w.W.w.Geveze.ORG w.W.w.Geveze.ORG 0,0w.W.w.Geveze.ORG w.W.w.Geveze.ORG
}
if $cle(get,%::Nick) == Trb {
.timer 50 00 sockwrite -nt $sockname privmsg %::chan 5,5w.W.w.Geveze.ORG w.W.w.Geveze.ORG 11,11w.W.w.Geveze.ORG w.W.w.Geveze.ORG
}
if $cle(get,%::Nick) == normal {
.timer 50 00 sockwrite -nt $sockname privmsg %::chan
}
.timer 1 2 sockwrite -nt $sockname privmsg %::chan Kanal temizlenmistir, w.W.w.Geveze.ORG $qlogo
}
else {
;sw $sockname kick %::chan %::nick !clear flood yapmayiniz!
}
}
}