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 } }