raw banlock on unban

By [|Red-X|] on Aug 05, 2004

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
}

Comments

Sign in to comment.
cj42057   -  Jun 01, 2013

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
}

 Respond  
Annia   -  Dec 01, 2012

I have it, but I get this error. 01:17 (not in the IRC. Referring whowas information ..

 Respond  
Lindrian   -  Dec 09, 2006

Can\'t get this to work at all. And If i do, i get some weird error.

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.