it's for banlock an unban ...in a raw
on @*:unban:#: {
if ($banmask iswm $address($me,5)) { return }
if ($nick != $me) && ($banmask != *!*@*) && ($banmask != *!*@*.*) { banlocklist $banmask $chan | .timerbanlockon $+ $chan 1 3 banlockon $chan }
}
banlocklist { %banmasklist. [ $+ [ $2 ] ] = $addtok(%banmasklist. [ $+ [ $2 ] ],$1,32) }
banlockon {
scid $cid
var %banmasklist.tmp = %banmasklist. [ $+ [ $1 ] ]
if (!%banmasklist.tmp) return
var %x = $numtok(%banmasklist.tmp,32)
while (%x) {
%banmask.tmplist = $addtok(%banmask.tmplist,$gettok(%banmasklist.tmp,%x,32),32)
inc %banmask.lmt
if (%banmask.lmt == $modespl) { raw -q mode $1 + [ $+ [ $str(b,$modespl) ] ] %banmask.tmplist | unset %banmask.* }
dec %x
}
if (%banmask.tmplist) { raw -q mode $1 + [ $+ [ $str(b,$numtok(%banmask.tmplist,32)) ] ] %banmask.tmplist | unset %banmask.* }
.timer(banlock) 1 2 describe $1 Those masks are under banlocking...sorry
scid -r
}
modified the code so it would 'work' but it still doesn't work properly ...using my modified code I've found it adds a line to my custom aliases file, something like the following: banlocklist {%banmasklist.nick!*nick@host.mask.goes.here.org = -b
Now if I'm not mistaken the error is it marks the ban as = -b (which would mean unban if I'm reading that right) ..anyway if I figure something out with this code I'll update this thread ...anyway here's a look at my modded code.
on @:unban:#: {
if ($banmask iswm $address($me,5)) { return }
if ($nick != $me) && ($banmask != !@) && ($banmask != !@.) { banlocklist $banmask $chan | .timerbanlockon $+ $chan 1 3 banlockon $chan }
alias banlocklist {%banmasklist. [ $+ [ $2 ] ] = $addtok(%banmasklist. [ $+ [ $2 ] ],$1,32) }
alias banlockon {
scid $cid
var %banmasklist.tmp = %banmasklist. [ $+ [ $1 ] ]
if (!%banmasklist.tmp) return
var %x = $numtok(%banmasklist.tmp,32)
while (%x) {
%banmask.tmplist = $addtok(%banmask.tmplist,$gettok(%banmasklist.tmp,%x,32),32)
inc %banmask.lmt
if (%banmask.lmt == $modespl) { raw -q mode $1 + [ $+ [ $str(b,$modespl) ] ] %banmask.tmplist | unset %banmask. }
dec %x
}
if (%banmask.tmplist) { raw -q mode $1 + [ $+ [ $str(b,$numtok(%banmask.tmplist,32)) ] ] %banmask.tmplist | unset %banmask. }
.timer(banlock) 1 2 describe $1 Those masks are under banlocking...sorry
scid -r
}