All pastes #398823 Raw Edit

Unnamed

public text v1 · immutable
·published 2007-03-17 15:50 UTC
rendered paste body
alias massban { 
  echo -a Beginning Mass Ban in $chan 
  /set %mb 1 
  :jump1 
  /set %mnick $nick(#,%mb) 
  if (%mnick != $me) {  mode # +b $address(%mnick,2) | kick # %mnick Mass Ban Activated. } 
  if (%mnick == $null) goto end 
  if (%mnick == $me) { /inc %mb | goto jump1 } 
  inc %mb 
  goto jump1 
  :end 
} 
alias mass { 
  if ($regex($1,/[vhoaqebI]$/)) { 
    var %a = 1, %m, %nick 
    $iif($1 isalpha, %m = + $+ $1, %m = $1) 
    while (%a <= $nick(#,0)) { 
      if ($nick(#,%a) != $me) { 
        %nick = %nick $nick(#,%a) 
        if ($numtok(%nick,32) == $modespl) { 
          mode # $str(%m,$modespl) %nick 
          %nick = "" 
        } 
      } 
      inc %a 
    } 
    if (%nick) { mode # $str(%m,$modespl) %nick } 
    halt 
  } 
  echo -a ERROR: I cannot process $1- $+ . 
}