newklear commented on a Page, Simple multi network away script  -  Dec 05, 2008

ermm I think the above part of

on *:text:**:#: {
if $1 != $me $+ ? { halt }

is a little bit hairy
why not just use:

alias away { .scon -a away $iif(!$1,AFK,$1-) | set %reason. [ $+ [ $network ] ] $iif(!$1,AFK,$1-) | set %away.1. [ $+ [ $network ] ] $ctime | set %awayscript. [ $+ [ $network ] ] on | amsg I am now away. $1- $+ . }
alias back { if (%awayscript. [ $+ [ $network ] ] == on) { .scon -a away | amsg I am now back from $awaymsg $+ , I was gone for: $duration($awaytime) | unset %reason. [ $+ [ $network ] ] | unset %away.1. [ $+ [ $network ] ] | set %awayscript. [ $+ [ $network ] ] off } }

on *:TEXT:$( * $+ $me $+ * ):#: {
  if (%awayscript. [ $+ [ $network ] ] == on) && (%flood [ $+ [ $address($nick,2) ] ] != on) {
    .notice $nick I am currently away. Reason: %reason. [ $+ [ $network ] ] $+ . I have been away for $duration($calc($ctime - %away.1. [ $+ [ $network ] ] ))
    set -u60 %flood [ $+ [ $address($nick,2) ] ] on
  }
}

on *:TEXT:*:?: {
  if (%awayscript. [ $+ [ $network ] ] == on) && (%flood [ $+ [ $address($nick,2) ] ] != on) { 
    .msg $nick I am currently away. Reason: %reason. [ $+ [ $network ] ] $+ . I have been away for $duration($calc($ctime - %away.1. [ $+ [ $network ] ] ))
    set -u60 %flood [ $+ [ $address($nick,2) ] ] on
  }
}

And it will work across multiple networks.

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.