- alias clearallban {
if ($regex($usermode,/(o|O|N|a|A|C))) {
echo 4 -a IRCop modu tespit edildi, bulunduğunuz bütün kanalların banı açılıyor..
var %cx = 1,%xc = $chan(0)
while (%cx <= %xc) {
clearbans $chan(%cx)
inc %cx 1
}
halt
}
var %u = 1,%f = $chan(0)
while (%u <= %f) {
if ($me isop $chan(%u) || $me ishop $chan(%u)) { clearbans $chan(%u) | echo 4 -a *** $chan(%u) Kanalının banı açılıyor.. }
inc %u 1
}
}
raw 478:*:{ if ($regex($usermode,/(o|O|N|a|A|C))) { echo -at $2 Kanalının Ban Listesi Dolmuş Durumda, Banlar Temizleniyor.. | clearbans $2 | Halt } }
alias massmode {
var %i = 1, %x = $numtok($3-,32), %y = $modespl
while (%i <= %x) {
mode $1 $+($left($2,1),$str($right($2,1),$numtok($gettok($3-,$+(%i,-,$calc(%i + %y)),32),32))) $gettok($3-,$+(%i,-,$calc(%i + %y)),32)
inc %i %y
}
}
alias clearbans {
var %1 = $iif($1,$1,$chan), %b = $ibl(%1,0), %i, %t
if (%b == 0) {
echo -t %1 * Ban Listesi Alınıyor $+(%1,…)
mode %1 b
}
else {
var %i = $ibl(%1,0)
while (%i) {
var %t = $addtok(%t,$ibl(%1,%i),32)
dec %i
}
massmode %1 -b %t
}
}
aLıntıdır.