                            ->     Information ..     <-
                            -> Server Irc.WeArab.Net  <-
                            -> Join #             <-
                            -> By - ThrB , Fahed      <-
                            -> E-mail; xFahed@mSn.cOm <-
#Massjoin on
On @*:Join:#:{ 
  if ($hget(split,$nick) == $nick) { goto out }
  if ($wildsite isin %mj. [ $+ [ $chan ] ]) { halt }
  set -u2 %mj. [ $+ [ $chan ] ] %mj. [ $+ [ $chan ] ] $wildsite
  if ($gettok(%mj. [ $+ [ $chan ] ],0,32) > 3) { 
    set -u30 %stop stop
    if (%stop != stop) { mode # +RMim }
    raw -q mode # +bbbbbbRm %mj. [ $+ [ $chan ] ]
    xkick # %mj. [ $+ [ $chan ] ]
    unset %mj. [ $+ [ $chan ] ] 
  } 
  :out
}

On ^*:Quit:if (*.* iswm $1) && (*.* iswm $2) { .hadd -mu750 split $nick $nick }
alias xKickx { 
  raw -q kick $1 $+($ialchan($2,$1,1).nick,$chr(44),$ialchan($3,$1,1).nick,$chr(44),$ialchan($4,$1,1).nick) :Mass join
}
On @1:Join:#:{ hinc -mu1 Join # | if ($hget(Join,#) > 3) && (!$hget(stop,#)) { Mode # +MRi | .hadd -mu10 Stop # Stop } }

On @*:Join:#:{
  var %m $mask($fulladdress,4),%h # $+ %m 
  hadd -mu7 c.flood %h $hget(c.flood,%h) $nick
  tokenize 32 $hget(c.flood,%h)
  if $numtok($1-,32) = 4 {
    mode # +b %m
    kick # $* Mass Join by ( $+ %m $+ )
  }
}

On @*:Join:#:{ 
  if ($hget(split,$nick) == $nick) { goto out }
  if ($wildsite isin %mj. [ $+ [ $chan ] ]) { halt }
  set -u2 %mj. [ $+ [ $chan ] ] %mj. [ $+ [ $chan ] ] $wildsite
  if ($gettok(%mj. [ $+ [ $chan ] ],0,32) > 5) { 
    set -u30 %stop stop
    if (%stop != stop) { mode # +RMim }
    raw -q mode # +bbbbbb %mj. [ $+ [ $chan ] ]
    $iif($hget(off,off) != off,mode # +miRc
    xkick # %mj. [ $+ [ $chan ] ] | .hadd -mu8 off off off
    unset %mj. [ $+ [ $chan ] ] 
  } 
  :out
}

On ^*:quit:if (*.* iswm $1) && (*.* iswm $2) { .hadd -mu750 Split $nick $nick }

#Massjoin End

menu channel,status {
-
Mass join kick
.ON:/enable #massjoin
.OFF:/disable #massjoin
-
}