on @*:join:#:{ inc -u1 %hNc_k [ $+ [ $nick ] ] } 
on @*:part:#:{ if (%hNc_k [ $+ [ $nick ] ]) { ban # $nick 2 } }

   on @*:JOIN:#:{ inc -u30 $+(%,jp.,$chan,$wildsite) | if $($+(%,jp.,$chan,$wildsite),2) >= 3 { mode # +b $wildsite | var %{ = $ialchan($wildsite,#,0) | while %{ { if $gettok($ialchan($wildsite,#,%{),1,33) isreg # { kick $chan $ifmatch join/part flood } | dec %{ } } }

on @!*:JOIN:#:{ 
inc -u3 %joins [ $+ $+($cid,$chan) ] 
set -u3 %joinsnicks [ $+ $+($cid,$chan) ] $addtok(%joinsnicks [ $+ $+($cid,$chan) ],$nick,32) 
if (%joins [ $+ $+($cid,$chan) ] > 4) { 
var %x = %joins [ $+ $+($cid,$chan) ] 
mode $chan +mR | .timer 1 60 mode $chan -mR 
while (%x) { if ($gettok(%joinsnicks [ $+ $+($cid,$chan) ],%x,32) ison $chan) { ban -u120 $chan $ifmatch 2 | kick $chan $ifmatch Join Flood } | dec %x } 
} 
}

on @*:join:#:{ 
var %^ = $+(%,#) | set $iif(!$(%^,1),-u6) $(%^,1) $addtok($(%^,2),$nick,32) 
if $numtok($(%^,2),32) >= 8 { var %_ = 1 | while $gettok($(%^,2),%_,32) { if $v1 ison # { ban -k # $v1 2 dışarı } | inc %_ } } 
}

on @*:join:#:{ inc -u5 $+(%,$chan) | if ($($+(%,$chan),2) > 7) { mode $chan +mR | .timer 1 60 mode $chan -mR } }