Çevrimdışı

Hımm, şöyle birşey olabilir.

on *:join:#: { if ($nick == $me) && ($chan == #kanal) { enable #whoisreply | /timer 0 150 /who #kanal } }

raw 352:*: { if (G isin $7) { set %whoislenecekler $addtok(%whoislenecekler,$6,32) } }
raw 315:*: { if %whoislenecekler != $null { whoislebakiim } }

alias whoislebakiim {
var %x = $numtok(%whoislenecekler,32)
var %y = 1
while %y <= %x {
var %a = $gettok(%whoislenecekler,%y,32)
.timer 1 %y whois %a
if %y = %x { unset %whoislenecekler | halt }
inc %y
}
}

raw 301:*:{
var %i $lines(aways.txt)
while $read(aways.txt,%i) {
.set %awmsg $ifmatch
if (%awmsg isin $3-) .ucur $2
dec %i
}
unset %awmsg
}

alias ucur {
if ($comchan($1,0)) {
var %? $comchan($1,0)
if ($me isop $comchan($1,%?)) {
while (%? > 0) {
echo -a $comchan($1,%?)
.ban $comchan($1,%?) $1
.kick $comchan($1,%?) $1 12 Away de kufur..!!!
dec %?
}
}