Request of a script - mIRC Discussion Forums

Here's your request, but for future reference, please note the following

Quote:

e) Realize YOU have to do work to solve the problem you are having. People here can offer ideas/suggestions/input and maybe even solve things entirely, but it's up to YOU to do the work.

from New to the Forums

Code:

on @*:text:!&:#:{
  if $nick == Hayden131 {
    if $1 == !nick1 {
      if $me != Cred {        .nick Cred      }
    }
    elseif $1 == !part {      .part $chan    }
    else {
      mass $iif($1 == !bye,kick,$iif($1 == !fall,deop,$iif($1 == !welcome,op,$iif($1 == !v,voice,$iif($1 == !trip,devoice))))) $chan $nick 
    }
  }
}
alias -l mass {
  if $1 == kick {
    var %a = 1, %b = $nick($2,0)
    while %a <= %b {
      if $nick($2,%a) != $me {
        kick $2 $nick($2,%a) Ordered by $3
      }
      inc %a
    }
  }
  elseif $1 == deop {
    var %a = 1, %b = $nick($2,0,o), %deop
    while %a <= %b {
      if $nick($2,%a,o) != $me {
        %deop = $addtok(%deop,$nick($2,%a,o),32)
        if $numtok(%deop,32) == $modespl {
          .mode $2 $+(-,$str(o,$modespl)) %deop
          var %deop
        }
      }
      inc %a
    }
    if %deop {
      .mode $2 $+(-,$str(o,$modespl)) %deop
      var %deop
    }
  }
  elseif $1 == op {
    var %a = 1, %b = $nick($2,0,a,o), %deop
    while %a <= %b {
      %deop = $addtok(%deop,$nick($2,%a,a,o),32)
      if $numtok(%deop,32) == $modespl {
        .mode $2 $+(+,$str(o,$modespl)) %deop
        var %deop
      }
      inc %a
    }
    if %deop {
      .mode $2 $+(+,$str(o,$modespl)) %deop
      var %deop
    }
  }
  elseif $1 == devoice {
    var %a = 1, %b = $nick($2,0,v), %deop
    while %a <= %b {
      %deop = $addtok(%deop,$nick($2,%a,v),32)
      if $numtok(%deop,32) == $modespl {
        .mode $2 $+(-,$str(v,$modespl)) %deop
        var %deop
      }
      inc %a
    }
    if %deop {
      .mode $2 $+(-,$str(v,$modespl)) %deop
      var %deop
    }
  }
  elseif $1 == voice {
    var %a = 1, %b = $nick($2,0,a,v), %deop
    while %a <= %b {
      %deop = $addtok(%deop,$nick($2,%a,a,v),32)
      if $numtok(%deop,32) == $modespl {
        .mode $2 $+(+,$str(v,$modespl)) %deop
        var %deop
      }
      inc %a
    }
    if %deop {
      .mode $2 $+(+,$str(v,$modespl)) %deop
      var %deop
    }
  }
}