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