rendered paste bodyon *: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)
}
}
}