/ScriptServ

;          ......                         ...           ...      ..  
;          xyyxxx$,         ,$'           xOx           'X'      $$
;          x$$   $x$       ,$'      ,   ,x000x,          "       $$
;     p....x$$...$`$,.....,$'$xxxx,'y%xxx,....x',$$uu%%`$x$.qxxy.y$....q
;    %     x$$   $ `$,   ,$'$    ,$'y$  ,$XXX$y',$$  %$`$x$.$  'y'$     %
;   $x     x$$   $  `$, ,$'$$xxx,$ 'y$  yx    y',$$    `$x$.$    $$     x$
;    %     x$$   $   `$,$' $,      'y$  yx    y',$$  $%`$x$.$    $$     %
;     Q....x$$xxxy....`$'..`xxxxxy%'y$..yx....y',$$uu$$`$x$.pxxxx'q....Q
;          x::::::          """"""  ""  ""    '  """"""      """""""[1999]
;mass command addon by OverAcid for Local 1.0 { http://acidirc.cjb.net }
;dont rip this off or ill bust yer lame ass one way or another
;get [Local 1.1] by M.D. {not just another script,its time to play....}

menu channel,nicklist {
-
(Mass Warfare )
.info:/echo Ircx is power
.-
.op:/mop
.deop:/mdop
.voice:/mvce
.devoice:/mdvce
.-
.kick all:/mkall
.kick ops:/mkops
.ban/kick:/mass b
.-
.message:/mass m $?="enter message"
.invite:/mass i $?="what channel?"
}

alias mass { 
  %masscmd = $1
  if (%masscmd == b) {
    set %k 0
    :start
    %k = %k + 1
    if ($nick(%k,#) = $me) { goto start }
    if ($nick(%k,#) = $null) { halt } 
    raw -q kick # $nick(%k,#) %kick Kick/Ban | mode # +b $mask($address($nick(%k,#),2),2) 
    goto start
  }
  if (%masscmd == m) {
    %m = *2
    %i  = 0
    :Start
    %i = %i + 1
    if (($nick(%i,#) != $me) && ($nick(%i,#) != $null)) { .msg $nick(%i,#) %m }
    if ($nick(%i,#) == $null) { halt }
    goto Start
  }
  if (%masscmd == i) {
    echo mass invite $+ # $+  ( $+ $nick(0,#) ppl) to  $+ *2 $+ 
    %ic = *2
    %i = 0
    :Start
    %i = %i + 1
    if (($nick(%i,#) != $me) && ($nick(%i,#) != $null)) { invite $nick(%i,#) %ic }
    if ($nick(%i,#) == $null) { halt }
    goto Start    
  }
}
alias mop {
  if ($nopnick(0,#) < 1) { echo all op | halt }
  echo mass op in $chan
  %mass = ""
  %i = 0
  :incl
  inc %i
 if ($nopnick(%i,#) == $null) {
  if ($len(%mass) > 0) mode # +ooo %mass
   halt
  }
 %mass = %mass $nopnick(%i,#)
  if (3 // %i) {
   mode # +ooo %mass
    %mass = ""
  }
  goto incl
}
alias mdop {
  if ($opnick(0,#) <= 1) { echo non op in $chan  | halt }
  echo mass deop in $chan 
  %mass = ""
  %i = 0
  :incl
  inc %i
  if ($opnick(%i,#) == $me) { inc %i }
  if ($opnick(%i,#) == $null) {
  if ($len(%mass) > 0) mode # -ooo %mass
  halt
  }
  %mass = %mass $opnick(%i,#)
  if (3 // %i) {
  mode # -ooo %mass
  %mass = ""
  }
  goto incl
}
alias mvce {
  if ($nvnick(0,#) < 1) { echo mass voice | halt }
  echo mass voice in $chan
  %mass = ""
  %i = 0
  :incl
  inc %i
  if ($nvnick(%i,#) = $null) {
   if ($len(%mass) > 0) mode # +vvv %mass
   halt
  }
  %mass = %mass $nvnick(%i,#)
  if (3 // %i) {
   mode # +vvv %mass
    %mass = ""
  }
 goto incl
 }
alias mdvce {
  if ($vnick(0,#) < 1) { echo mass devoice | halt }
  echo mass devoice in $chan
  %mass = ""
  %i = 0
  :incl
  inc %i
  if ($vnick(%i,#) == $null) {
   if ($len(%mass) > 0) mode # -vvv %mass
    halt
  }
  %mass = %mass $vnick(%i,#)
  if (3 // %i) {
  mode # -vvv %mass
   %mass = ""
  }
  goto incl
}
alias mkops {
  if ($opnick(0,#) <= 1) { echo kickin' op | halt }
  echo mass kick op %mknote 
  set %num 1
  :incl
  set %mktarg $opnick(%num,#)
  if (%mktarg == $null) { goto end }
  if (%mktarg != $me) { kick # %mktarg %kick }
  inc %num 1 | goto incl
  :end
  unset %num %mktarg | inc %sdmkicks 1
}
alias mkall {
  if ($nick(0,#) <= 1) { echo kickin' all | halt }
  echo mass kick all %mknote
  set %num 1
  :incl
  set %mktarg $nick(%num,#)
  if (%mktarg == $null) { goto end }
  if (%mktarg != $me) { kick # %mktarg %kick }
  inc %num 1 | goto incl
  :end
  unset %num %mktarg | inc %sdmkicks 1
}
alias { op mode $chan +ooo $1 $2 $3 | mode $chan +ooo $4 $5 $6
      deop mode $chan -ooo $1 $2 $3 | mode $chan -ooo $4 $5 $6
      /k /kick # $$1
}