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