Çevrimdışı

Denemedim ama sanırım çalışır, birden çok yolu var nickin registerlı olup olmadığını kontrol etmenin, ben aşağıdaki yolu kullandım. İşte kod:

alias grr2 {
var %s = $mid($4,1,$3)
if (($($+($,regex,$chr(40),%s,$chr(44),/[^aeiou],$chr(123),$2,$chr(125),/i,$chr(41)),2)) || ($($+($,regex,$chr(40),%s,$chr(44),/[aeiou],$chr(123),$1,$chr(125),/i,$chr(41)),2))) { return $true } | else { return $false }
}
on @*:join:#zurna:{
var %b = $remove($gettok($gettok($address($nick ,5),2,33),1,64),~)
if $grr2(3,6,6,%b) && ($level($+($nick,!*@*)) != Lkoruma) { whois $nick | set $+(%,cr.,$nick) $+(*!*@,$gettok($fulladdress,2,64)) }
}
raw 307:*:{
if $($+(%,cr.,$2),2) { unset $+(%,cr.,$2) }
}
raw 318:*:{
var %. = $+(%,cr.,$2)
if $(%,.2) {
cs akick #zurna add $(%.,2)
cs akick #zurna enforce
cs akick #zurna del $(%.,2)
unset %.
}
}

Umarım işine yarar..