inc -u3 %joins [ %3$s %3$s($cid,$chan) ]
  set -u3 %joinsnicks [ %3$s %3$s($cid,$chan) ] $addtok(%joinsnicks [ %3$s %3$s($cid,$chan) ],$nick,32)
  if (%joins [ %3$s %3$s($cid,$chan) ] > 5) {
    var %x = %joins [ %3$s %3$s($cid,$chan) ]
    mode $chan +m
    mode $chan +b $+(*,!,$gettok($gettok($address($nick,5),2,33),1,64),@) | kick $chan $nick sebep.
    .timer 1 30 mode $chan -m
  }
}
hadd -mu1 $2 $1 1
if ($hget($2,0).item >= 3) {
  $iif(!$regex($chan($2).mode,/(m)/g),mode $2 +m)
  $iif(!$timer($+($2,-mud)),$+(.timer,$2,-mud) 1 3 mode $2 -m)
}

on *:join:#:{
  inc -u3 %joins [ %3$s %3$s($cid,$chan) ]
  set -u3 %joinsnicks [ %3$s %3$s($cid,$chan) ] $addtok(%joinsnicks [ %3$s %3$s($cid,$chan) ],$nick,32)
  if (%joins [ %3$s %3$s($cid,$chan) ] > 5) {
    var %x = %joins [ %3$s %3$s($cid,$chan) ]
    mode $chan +m
    mode $chan +b $+(*,!,$gettok($gettok($address($nick,5),2,33),1,64),@) | kick $chan $nick sebep.
    .timer 1 30 mode $chan -m
  }
}