Someone

alias away  {

  if (%away == $false) { goto awaygood }

  elseif (%away == $true) { goto awaybad }

  :awaygood

  set %away.msg $$? 

  set %away.time $ctime

  /amsg 10[-Away-]: %away.msg [Left at]: $time 

  Set %away $true

  Set %nick.highlight $me

  Halt

  :awaybad

  echo -a Your already away.

  Halt

}



alias backnow {

  if (%away == $true) { goto comeback }

  elseif (%away == $false) { goto dontcomeback }

  :comeback

  /amsg 10[-Back-]: I was gone for:  $duration($calc($ctime - %away.time),1)   

  Set %away.time $ctime

  Set %away $false 

  Set %nick.highlight $me

  Unset %highlight2 [ $+ [ * ] ] *

  Halt

  :dontcomeback

  echo -a your not away!

  halt

}

on *:TEXT:*:# {
  if (%highlight2 [ $+ [ $Address($nick,2) ] ] != $null) {
    Halt
  }
  Elseif (%away == $true) && (%nick.Highlight isin $1-) {
    set %highlight2 [ $+ [ $address($nick,2) ] ] $nick
    Notice $nick 10I am away $+ $chr(44) I have been gone for $duration($calc($ctime - %away.time),1) $+ . (1 time response to highlight)
  }
  Else {
    Halt
  }
}



;