;Written by Free of #mirc Undernet sometime in  1998
;Have all your custom kick and ban messages handy
;This Script all goes in your Remotes files. 
;It always bans the person before kicking them
;So you don't have to worry about a re-join before the ban takes effect
;to load use /load -rs kicker.mrc  ...OR... if you are lazy
;load using //load -rs $findfile($mircdir,kicker.mrc,1)
menu channel,nicklist {
  Kicker
  .X,W Bans
  ..Ban using X with frills:/msg X ban # $snicks 3 $?="Duration (hours) max 336" $?="Level" $?="Reason" | .timer 1 5 .msg x kick # $snicks $?="Reason"
  ..Ban using W with frills:/msg W ban # $snicks 3 $?="Duration (hours) max 336" $?="Level" $?="Reason" | .timer 1 5 .msg w kick # $snicks $?="Reason"
  .BANS a whole bunch
  ..1 hrs Kick, Ban /w reason : onehourban  
  ..20 hrs Kick, Ban /w reason :longban
  ..Reason Kick:/kick # $$* $$?="Enter Reason"
  ..Swear Kick/Ban:/swearkick
  ..Bad Mask Kick/Ban:/baduserhostkick
  ..Repeat Kick/Ban:/repeatban.
  ..1-10 min bans
  ...1 min  kick/ban:/oneminban
  ...2 min kick/ban:/twominban
  ...3:/threeminban
  ...4:/fourminban
  ...5:/fiveminban
  ...10:/tenminban
  ..Timed Ban: timedban
  ..Sweetkick:sweetkick
  ..Sweetkickban:Sweetkickban
  ..SweetERrkickban:Sweeterkickban
  ..SweetESTkickban:Sweetestkickban
}
alias timedban set %ban $?="Seconds For Ban" | ban -u $+ %ban $snicks 3 | kick # $snicks ((Banned For %ban Seconds)) | unset %ban
alias /swearkick /ban -u1800 $snicks 3 | .timer 1 5 /kick # $snicks Mind your language - you're mom's listening
alias /baduserhostkick -u1800 $snicks 3 |  .timer 1 5 /kick $snicks Grow up and change your user@host
alias /repeatban /ban -u1800 $snicks 3 | .timer 1 5 /kick $snicks Quit repeating repeating repeating repeating ...
alias /oneminban set -u30 %bannick $snicks | set -u30 %minban 1 | set %banchan # | minban
alias /twominban set -u30 %bannick $snicks | set -u30 %minban 2 | set %banchan # | minban
alias /threeminban set -u30 %bannick $snicks | set -u30 %minban 3 | set %banchan # | minban
alias /fourminban set -u30 %bannick $snicks | set -u30 %minban 4 | set %banchan # | minban
alias /fiveminban set -u30 %bannick $snicks | set -u30 %minban 5 | set %banchan # | minban
alias /tenminban set -u30 %bannick $snicks | set -u30 %minban 10 | set %banchan # | minban
alias /onehourban set -u30 %bannick $snicks | set -u30 %minban 60 | set %banchan # | hourban
alias /longban set -u30 %bannick $snicks | set -u30 %minban 1200 | set %banchan # | hourban
alias /minban set %kickreason  $+ %bannick $+  : $?="Reason for %minban minutes ban" | set -u30 %kickreason %kickreason : Enjoy your %minban minute ban | set -u30 %secban $calc(%minban * 60) | ban -u $+ %secban %bannick 3 | .timer 1 5 /kick %banchan %bannick %kickreason | unset %kickreason %minban %secban %bannick %banchan
alias /hourban set %kickreason  $+ %bannick $+  : $?="Reason for $calc(%minban / 60) hour ban" | set -u30 %kickreason %kickreason : Enjoy your $calc(%minban /60) hour ban | set -u30 %secban $calc(%minban * 60) | ban -u $+ %secban %bannick 3 | .timer 1 5 /kick %banchan %bannick %kickreason | unset %kickreason %minban %secban %bannick %banchan
alias /Sweetkick /me looks over and notices $snicks | .timer 1 3 /me smiles and beckons $snicks over and whispers in $snicks $+ 's ear | .timer 1 7 /say  you're out of here, lamer. | .timer 1 9 kick # $snicks Bya Baby
alias /Sweetkickban /.timer 1 6 /ban -u3600 $snicks 3 | /me looks over and notices $snicks | .timer 1 2 /me smiles and beckons $snicks over and whispers in $snicks $+ 's ear | .timer 1 5 /say  you're out of here, lamer. | .timer 1 10 kick # $snicks  Bya Baby
alias /SweetERkickban /.timer 1 6 /ban -u3600 $snicks 3 | /me sighs and wonders why people like $snicks exist in this world | .timer 1 2 /me points his finger at $snicks | .timer 1 5 /me removes $snicks totally from his thoughts and his mind | .timer 1 10 kick # $snicks  ** poof** and removes $snicks from the channel just as easily
alias /SweetESTkickban /.timer 1 6 /ban -u3600 $snicks 3 | /me throws his hands up in exasperation | .timer 1 2 /me wonders why people abuse our hospitality in the channel to such an extent they need to be ejected | .timer 1 5 /me grabs $snicks by the hair and swings him out da door | .timer 1 10 kick # $snicks  $me looks in his hand and see's $snicks $+ 's toupee still there! | .timer 1 13 me tosses $snicks $+ 's hairpiece out da door too :) | .timer 1 13 .notice $snicks tosses $snicks $+ 's hairpiece out da door too :)