Çevrimdışı

on *:join:#: {
if ($nick == $me) {
if ($chan == #kanal) {

{ enable #whoisreply | /timer 0 150 /who #kanal}

}
}
}



raw 352:*:if (G isin $7) /whois $6


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,%?)
_queue ban $comchan($1,%?) $1 2
_queue kick $comchan($1,%?) $1 12 Away'de kufur
dec %?
}
}
}
}
---------------
#whoisreply on
;-=[ /who ]=-
raw 352:*: inc %a 1 | echo -s %a $6 ( $+ $3 $+ @ $+ $4 $+ ) on $2 using $5 - $7 | halt
raw 315:*:{ echo 12End of WHO list 12,8 $time 8,12 ( $+ $2 $+ ) | set %who.sw 0 | unset %a
if (%hm.cmd != $null) { %hm.cmd }
halt
}
#whoisreply end
kod bu mephisto ilgilendigin icin saol