on *:part:#:{
if *.MindForge.org !iswm $site {
set -eu3600 %Previous $+ $nick $site
}
}
on *:QUIT:{
if *.MindForge.org !iswm $site {
set -eu3600 %Previous $+ $nick $site
}
}
on *:KICK:#:{
if *.MindForge.org !iswm $gettok($address($knick,1),2,64) {
set -eu3600 %Previous $+ $knick $gettok($address($knick,1),2,64)
}
}
;========================================================
ON ^*:JOIN:#:{
If $nick == $me { echo $chan $timestamp * Join on $chan | haltdef | halt }
else {
var %i = 0
while (%i <= $var($eval(% $+ Previous $+ *),0)) {
inc %i
if ($site == $var($eval(% $+ Previous $+ *),%i).value) {
if ($nick != $remove($var($eval(% $+ Previous $+ *),%i),$chr(37),Previous)) {
echo $chan $timestamp * $nick ( $replace( $+ $address $+ ,@,12@) 12) has joined (14joined previously as $remove($var($eval(% $+ Previous $+ *),%i),$chr(37),Previous) $+ )
splay Notify
goto end
}
}
}
echo $chan $timestamp * $nick ( $replace( $+ $address $+ ,@,12@) ) has joined
}
:end
haltdef
}
;========================================================
on *:DISCONNECT:{
unset %Previous*
}