on *:text:!flood*:#:{ if ($me == stupidbot) noop elseif (%dchan [ $+ [ $chan ] ] == yes) { halt } if (($nick isvoice #) || ($nick isreg #) && ($2 == on)) { halt } elseif (($nick isvoice #) || ($nick isreg #) && ($2 == off)) { halt } elseif (($nick isop #) || ($nick isvoice #) && ($2 == on) && (%controlFlood. [ $+ [ $chan ] ] == on)) { notice $nick 12My Flood Protection Is Already On For4 $chan $+12! } elseif (($nick isop #) || ($nick ishop #) && ($2 == on)) { set %controlFlood. [ $+ [ $chan ] ] on set %protecchan $addtok(%protecchan,$chan,44) msg $chan 12My Flood Protection Is Now4 ON 12In4 $chan $+12! } elseif (($nick isop #) || ($nick ishop #) && ($2 == off) && (%controlFlood. [ $+ [ $chan ] ] == $null)) { notice $nick 12My Flood Protection Is Already4 OFF 12For4 $chan $+12! } elseif (($nick isop #) || ($nick ishop #) && ($2 == off)) { unset %controlflood. [ $+ [ $chan ] ] set %protecchan $remtok(%protecchan,$chan,1,44) msg $chan 12My Flood Protection Is Now4 OFF12!! In4 $chan $+! } elseif (($nick isop #) || ($nick ishop #) && ($2 == help)) { notice $nick 12To Turn4 On 12Type4 !Flood On notice $nick 12To Turn4 Off 12Type4 !Flood Off } } on !*:text:*:%protecchan: { if ($me == stupidbot) noop elseif (%dchan [ $+ [ $chan ] ] == yes) { halt } if (($nick isop #) || ($nick ishop #)) { halt } inc -u2 $+(%,flood,.,$chan,.,text,.,$nick) if $($+(%,flood,.,$chan,.,text,.,$nick),2) >= 5 { inc %floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] if (%floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] = 2 ) { kick $chan $nick 12Do Not Flood This Room! Do It Again And I'll Ban You! } if (%floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] = 5 ) { msg $chan 12Damn4 $nick 12You Were Warned Not To Flood This Room. mode $chan +b $address($nick,5) kick $chan $nick 12Out With You! Banned For 10 Minutes! unset %floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] .timer 1 600 mode $chan -b $address($nick,5) } } } on !*:action:*:%protecchan: { if ($me == stupidbot) noop elseif (%dchan [ $+ [ $chan ] ] == yes) { halt } if (($nick isop #) || ($nick ishop #)) { halt } inc -u2 $+(%,flood,.,$chan,.,text,.,$nick) if $($+(%,flood,.,$chan,.,text,.,$nick),2) >= 5 { inc %floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] if (%floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] = 2 ) { kick $chan $nick 12Do Not Flood This Room! Do It Again And I'll Ban You! } if (%floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] = 5 ) { msg $chan 12Damn4 $nick 12You Were Warned Not To Flood This Room. mode $chan +b $address($nick,5) kick $chan $nick 12Out With You! Banned For 10 Minutes! unset %floodd. [ $+ [ $chan ] ] [ $+ . [ $+ [ $nick ] ] ] .timer 1 600 mode $chan -b $address($nick,5) } } }