on *:JOIN:#: { 

if ($nick(#,$me,@&~%)) { 

var %Clone.join.flood2 = $+(*!*@*.,$gettok($address($nick,2),-2,46),.,$gettok($address($nick,2),-1,46)) 

if (%clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood2 ] ] == $null) { 

set -u3 %clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood2 ] ] 1 

} 

else { inc %clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood2 ] ] } 

if (%clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood2 ] ] >= 2) { 

if (%modechanx7 != $true) { 

.raw mode $chan +b %Clone.join.flood2 

set -u3 %modechanx7 $true 

} 

} 

var %Clone.join.flood = $+(*!*@,$remove($gettok($address($nick,2),1-2,46),*!*@),.*) 

if (%clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood ] ] == $null) { 

set -u3 %clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood ] ] 1 

} 

else { inc %clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood ] ] } 

if (%clone-join. [ $+ [ # ] $+ . $+ [ %Clone.join.flood ] ] >= 2) { 

if (%modechan1MR76567 != $true) { 

.raw mode $chan +b %Clone.join.flood 

set -u3 %modechan1MR76567 $true 

} 

} 

var %join.flood.ident = $left($remove($gettok($address($nick,3),1,$asc(@)),*!*),4) 

if (%join. [ $+ [ # ] $+ . $+ [ %join.flood.ident ] ] == $null) { 

set -u3 %join. [ $+ [ # ] $+ . $+ [ %join.flood.ident ] ] 1 

} 

else { inc %join. [ $+ [ # ] $+ . $+ [ %join.flood.ident ] ] } 

if (%join. [ $+ [ # ] $+ . $+ [ %join.flood.ident ] ] >= 2) { 

if (%modechan1MR541 != $true) { 

.raw mode $chan +b $+(*!,$left($gettok($gettok($address($nick,5),1,64),2,33),5),*@*) 

set -u3 %modechan1MR541 $true 

} 

} 

var %join.flood = $+($left($nick,4),*!*@*) 

if (%join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] == $null) { 

set -u3 %join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] 1 

} 

else { inc %join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] } 

if (%join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] >= 2) { 

if (%modechan1MR != $true) { 

set -u3 %clnicks2 1 

.raw mode $chan +b %join.flood 

set -u3 %modechan1MR $true 

} 

} 

} 

}