All pastes #515215 Raw Edit

Mine

public text v1 · immutable
#515215 ·published 2007-05-28 02:57 UTC
rendered paste body
alias bye {
  if ($network == nitrousirc.net ) { ame is currently away for reason: $1- $time(hh:nn:ss:tt) 
    set %away.reason $1- | /scon -at1 away $1- $time(hh:nn:ss:tt) | set %away.time $ctime
  }
  if ($network == swiftirc.net ) {
    if (!$chan(#skiller)) amsg test
    else {
      var %a = 1
      while ($chan(%a)) {
        if ($v1 != #skillar) describe $v1 is currently away for reason: $1- $time(hh:nn:ss:tt)
        inc %a
      }
    }

  }
  if ($network == seersirc.net ) { ame is currently away for reason: $1- $time(hh:nn:ss:tt)
  }

} 
alias bye {
  if ($network == nitrousirc.net ) { /ame is back from: %away.reason $+ . Time gone: $duration($calc( $ctime - %away.time ))
    unset %away.* | /scon -at1 away 
  }
  if ($network == swiftirc.net ) {
    if (!$chan(#skiller)) amsg test
    else {
      var %a = 1
      while ($chan(%a)) {
        if ($v1 != #skillar) describe $v1 is back from: %away.reason $+ . Time gone: $duration($calc( $ctime - %away.time ))
        inc %a
      }
    }

  }
  if ($network == seersirc.net ) { /ame is back from: %away.reason $+ . Time gone: $duration($calc( $ctime - %away.time ))
  }

} 




on *:Text:*:*: {
  if (%away.reason != $null) {
    if (%away. [ $+ [ $nick ] ] != $nick) {
      if ($me isin $1- ) { notice $nick I am currently away for reason: %away.reason I have been gone for $duration($calc( $ctime - %away.time )) This is a one time notice. Please leave me a message by using /msg $me <message>. Thank you.
        set %away. [ $+ [ $nick ] ] $nick
      }
    }
  }
}