Here you go. Try this. Added a "if isreg" statement to the script to hopefully help avoid kicking on a net split.
;MASS JOIN KICKER II
;By Neo Nemesis
;Contributors: Jethro_
;Thanks to: Hawkee Forums
on *:START: { massjoin }
on *:LOAD: { massjoin }
on *:CONNECT: { massjoin }
alias -l massjoin { if ($hget(massjoin) == $null) { hmake massjoin 750 } }
alias -l abmj {
echo -a 12,1*!14 MASS JOIN KICKER II 12!*
echo -a 12,1*!14 By Neo Nemesis 12!*
echo -a 12,1*!14 http://mirc-deluxe.webs.com 12!*
}
on @*:JOIN:#: {
if (%massjoin == $true) {
set -u15 %mj1 $addtok(%mj1,$nick,44)
hinc -mu5 massjoin JOIN 1
if ($hget(massjoin,JOIN) >= 7) {
if (%modechan != $true) {
mode $chan +im
set -u15 %modechan $true
set -u15 %mj2 1
notice $chan 12*! 4MASS JOIN DETECTED12 !* 2- 12channel locked down for4 5-7 minuets.12 Sorry for any inconvenience this may cause.
.timermjs 1 300 mode $chan -im
}
while (%mj2 <= $numtok(%mj1,44)) {
if ($gettok(%mj1,%mj2,44) ison $chan) && ($gettok(%mj1,%mj2,44) !isreg $chan) {
if (%mj2 <= 8) { .timermj $+ %mj2 -m 1 $calc(780 * %mj2 kick $chan $gettok(%mj1,%mj2,44) 2MASS JOIN KICKER II - By Neo Nemesis }
elseif (%mj2 > 8) { .timermj $+ %mj2 -m 1 $calc(897 * %mj2) kick $chan $gettok(%mj1,%mj2,44) 2MASS JOIN KICKER II - By Neo Nemesis }
}
inc %mj2
}
}
}
}
menu status,query,nicklist,channel {
MASS JOIN KICKER II - $iif(%massjoin = $true,ON,OFF)
.ON:/set %massjoin $true
.OFF:/set %massjoin $false
.About:/abmj
}