Public feed
#530997
on *:START:{
unset %resumeT.*
resume
}
on *:DISCONNECT:{ resume.tstore }
on *:CONNECT:{ resume.tclear }
on *:EXIT:{
unset %resume.*
scon -a resume.save
}
alias resume {
var %i = 1,%l = $var(%resume.*,0)
while ( %i <= %l ) {
tokenize 32 $var(%resume.*,%i).value
if ( $1 ) { server $iif(%i > 1,-m) $2- }
elseif ( %i > 1 ) { server -n $2- }
inc %i
}
}
alias -l resume.save {
if ( $eval($+(%,resumeT.,$cid,),2) ) {
set %resume. $+ $cid $v1
}
else {
set %resume. $+ $cid 0 $iif($network,$v1,$serverip) $port $&
-i $nick $anick $emailaddr $fullname
}
}
alias -l resume.tstore {
set %resumeT. $+ $cid 1 $serverip $port $&
-j $regsubex($str(x $+ $chr(44),$chan(0)),/x/g,$chan(\n)) $regsubex($str(x $+ $chr(44),$chan(0)),/x/g,$chan(\n).key) $&
-i $nick $anick $emailaddr $fullname
.timer 1 1 set %resumeT. $+ $cid $!puttok($eval($+(%,resumeT.,$cid),2),0,1,32)
}
alias -l resume.tclear { unset $+(%,resumeT.,$cid) }