alias away {
  set %away.msg $$?"What is your away reason?"
  set %starttime $ctime
  set %away.time $asctime(dddd h:nn:ss TT)
  set %nick $me
  amsg I am now away! Reason: %away.msg $+ . Left at: %away.time $+ . 
  nick $me $+ |Away
}
alias back {
  nick %nick
  amsg I am now back from: %away.msg $+ . I was gone For:  ( $+ $duration($calc($ctime - %starttime)) $+ ).
  unset %starttime %away %away.time %nick
}