Just paste in aliases
blacklist.add {
if ( ($1) && ($2) ) {
set -u2 %black 1
userhost $1
writeini bin\ini\blacklist.ini blacklist $address($1,3) $2-
blacklist.scan $1 $2-
}
elseif (!$2) { echo -a $init_lang(Blacklist_Alias,1) /blacklist.add NICK REASON }
}
blacklist.add.button {
.timer 1 2 unset %black.nick
.timer 1 2 unset %black.reason
writeini bin\ini\blacklist.ini blacklist $address(%black.nick,3) %black.reason
blacklist.update
blacklist.scan %black.nick %black.reason
unset %black.nick
unset %black.reason
}
blacklist.rem {
remini bin\ini\blacklist.ini blacklist $address($1,3)
}
black.scancheck {
who $gettok(%black.scan,1,32)
}
blacklist.scan {
var %i 1
:start
if ( ($1 ison $chan(%i)) && ($me isop $chan(%i)) ) {
mode $chan(%i) $iif($1 isop $chan(%i),-o+b $1 $address($1,3),+b $address($1,3))
kick $chan(%i) $1 $2- $+ , blacklist
}
while (%i < $chan(0)) { inc %i | goto start }
}
blacklist.update {
if ($server == $null) { did -b blacklist 2 }
elseif ($server != $null) { did -e blacklist 2 }
did -r blacklist 1
did -r blacklist 6
var %i 1
:start
if (%i <= $ini(bin\ini\blacklist.ini,blacklist,0)) {
did -a blacklist 1 $ini(bin\ini\blacklist.ini,blacklist,%i) ( $+ $readini(bin\ini\blacklist.ini,blacklist,$ini(bin\ini\blacklist.ini,blacklist,%i)) $+ )
inc %i
goto start
}
did -a blacklist 6 $ini(bin\ini\blacklist.ini,blacklist,0)
}