Public feed #530993

Something

public text v1 · immutable
Raw Edit
·published 2007-06-02 09:45 UTC
rendered paste body
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 ) { echo -a server $iif(%i > 1,-m) $2- }
    elseif ( %i > 1 ) { echo -a 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) }