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