/ScriptServ

; Flood Kicker v1.0a
; Remember to load it in so the initialization commands can be run (fatal for the script
; to work correctly).
; Made by Xerath (xerath@post.tele.dk)

on 1:load:{
  set %fl.lines 10
  set %fl.time 5
}


#floodprot on
ON @1:TEXT:*:#:{
  inc %flood. [ $+ [ $nick ] ]
  .timer 1 %fl.time unset %flood. [ $+ [ $nick ] ]
  if (%flood. [ $+ [ $nick ] ] >= %fl.lines) { goto kill }
  else { goto end }
  :kill
  if ($me isop $chan) {
    kick $chan $nick 4Bah! FlOdErS NeVeR WiN aNd WiNNerS NeVeR fLoOd!! %version 
  }
  :end
}
ON @1:ACTION:*:#:{
  inc %flood. [ $+ [ $nick ] ]
  .timer 1 %fl.time unset %flood. [ $+ [ $nick ] ]
  if (%flood. [ $+ [ $nick ] ] >= %fl.lines) { goto kill }
  else { goto end }
  :kill
  if ($me isop $chan) {
    kick $chan $nick 4Bah! FlOdErS NeVeR WiN aNd WiNNerS NeVeR fLoOd!! %version 
  }
  :end
}
ON @1:NOTICE:*:#:{
  inc %flood. [ $+ [ $nick ] ]
  .timer 1 %fl.time unset %flood. [ $+ [ $nick ] ]
  if (%flood. [ $+ [ $nick ] ] >= %fl.lines) { goto kill }
  else { goto end }
  :kill
  if ($me isop $chan) {
    kick $chan $nick 4Bah! FlOdErS NeVeR WiN aNd WiNNerS NeVeR fLoOd!! %version 
  }
  :end
}
#floodprot end