Kick-Ban Alias

;Kick-Ban Alias, Created by The`God
;©2008 The`God
;To Timeban use /kb NAME TIME REASON
;Commands: /kb NAME REASON (or) /kb NAME TIME REASON | /b NAME | /k NAME REASON | /ub NAME | /gag NAME | /ungag NAME
;Uses: /kb = Kick-Ban/Time-Ban | /b = Ban(Without Kick) | /k = Kick | /ub = Unban | /gag = Mute User | /ungag = Unmute User

;This is the Color Alias, You can manually change the colors yourself.
;To change the color $+($chr(3),COLOR NUMBER GOES HERE,$1,$chr(3),)
;The default colors i have set are Teal and Orange.

alias cb1 { return $+($chr(3),10,$1,$chr(3),) } 
alias cb2 { return $+($chr(3),07,$1,$chr(3),) }

alias Kb {
  inc %kbc 1
  if (($chr(42) isin $1) || ($chr(63) isin $1)) { 
    /var %i 1 
    while (%i <= $nick($chan, 0)) { 
      if (($$1 iswm $nick($chan, %i)) && ($nick($chan, %i) != $me)) { 
        if ($2 isnum) { 
          /ban -u $+ $calc($2 * 60) $chan $nick($chan, %i) 2 
          /kick $chan $nick($chan, %i) $cb1($3-) $chr(124) $cb1(Idiots Kick-Banned:) $cb2(%kbc) $chr(124) $cb2($2) $cb1(minute ban)
        } 
        else { 
          /ban $chan $nick($chan, %i) 2 
          //kick $chan $nick($chan, %i) $cb1($2-) $chr(124) $cb2(Idiots Kick-Banned:) $cb1(%kbc) 
        } 
      } 
      /inc %i 1 
    } 
  } 
  else { 
    if ($2 isnum) { 
      /ban -u $+ $calc($2 * 60) $chan $$1 2 
      //kick $chan $$1 $cb1($3-) $chr(124) $cb1(Idiots Kick-Banned:) $cb2(%kbc) $chr(124) $cb2($2) $cb1(minute ban)
    } 
    else { 
      /ban $chan $$1 2
      //kick $chan $$1 $cb1($2-) $chr(124) $cb2(Idiots Kick-Banned:) $cb1(%kbc) 
    } 
  } 
}

alias k { 
  inc %kc 1
  if (($chr(42) isin $1) || ($chr(63) isin $1)) { 
    /var %i 1 
    while (%i <= $nick($chan, 0)) { 
      if (($$1 iswm $nick($chan, %i)) && ($nick($chan, %i) != $me)) {     
        //kick $chan $nick($chan, %i) $2- $cb1(Idiots Kicked:) $cb2(%kc) 
      } 
      /inc %i 1 
    } 
  } 
  else {   
    //kick $chan $$1- $cb1(Idiots Kicked:) $cb2(%kc)
  } 
} 

alias b { 
  if (($chr(42) isin $1) || ($chr(63) isin $1)) { 
    /var %i 1 
    while (%i <= $nick($chan, 0)) { 
      if (($$1 iswm $nick($chan, %i)) && ($nick($chan, %i) != $me)) { 
        if ($2 isnum) { 
          /ban -u $+ $calc($2 * 60) $chan $nick($chan, %i) 2 
        } 
        else { 
          /ban $chan $nick($chan, %i) 2 
        } 
      } 
      /inc %i 1 
    } 
  } 
  else { 
    if ($2 isnum) { 
      /ban -u $+ $calc($2 * 60) $chan $$1 2 
    } 
    else { 
      /ban $chan $$1 2 
    } 
  } 
} 

alias ub { 
  if (($chr(42) isin $1) || ($chr(63) isin $1)) { 
    /var %i 1 
    while (%i <= $nick($chan, 0)) { 
      if ($$1 iswm $nick($chan, %i)) { 
        /ban -r $chan $nick($chan, %i) 2 
      } 
      /inc %i 1 
    } 
  } 
  else { 
    /ban -r $chan $$1 2 
  } 
} 

alias gag { 
  //mode $chan -qaohv+bN $$1 $$1 $$1 $$1 $$1 ~q: $+ $address($$1, 2)
}


alias ungag { 
  //mode $chan -bN ~q: $+ $address($$1, 2)
}