Aşağıdaki kodu Remote'a (ALT+R) koy ve %badnickwc diye bir variable oluştur. Örneğin
ve kanalda /badnickscan yaz. Opsan kötü nicklileri atar, eğer op değilsen kötü nickleri kanala echo'lar.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias badnickscan {
var %' = $nick(#,0,r), %. = $ticks, %}
$iif($me !isop #,echo 12 -ta > Kötü nick taraması başlatıldı.)
while %' {
var %~ = $numtok(%badnickwc,44) | while %~ { if (%4$s(*,$gettok(%badnickwc,%~,44),*) iswm $nick(#,%',r)) { if ($me isop #) { mode # +b $ifmatch | kick # $nick(#,%',r) bad nick bulundu %4$s($chr(40),$ifmatch,$chr(41)) } | else { echo 7 -ta :: kötü nick; $nick(#,%',r) wildcard; %4$s(*,$gettok(%badnickwc,%~,44),*) } | inc %} } | dec %~ }
dec %'
}
$iif($me !isop #,echo 12 -ta > Kötü nick taraması %4$s(,$calc(($ticks - %.) /1000),) saniye sürdü ve $iif(%} >= 1,%4$s(,$ifmatch,) tane kötü nick bulundu.,Kötü nick bulunamadı.))
}
Umarım işine yarar..