alias floodcheck { var %fl.time = 10, %fl.lines = 3, %fl.ignore = 5 inc $iif(!$($+(%,flood,.,$1,.,$2),2),$+(-eu,%fl.time)) $+(%,flood,.,$1,.,$2) if ( $($+(%,flood,.,$1,.,$2),2) >= %fl.lines ) set $+(-eu,$calc(%fl.ignore * 60)) %flood.var 1 }
On *:TEXT:@test:#: { floodcheck $cid $chan if ( %flood.var ) halt }