alias afk {
  if (%away) echo You are already away!
  else {
    set %away $iif($1,$1-,AFK)
    set %awaytimer $ctime
    away $iif($1,$1-,AFK)
    amsg I am now away. Reason: %away
  }
}

alias return {
  if (!%away) echo You are not away!
  else {
  amsg I have returned from being away. I was away for $duration($calc($ctime - %awaytimer)) $+ . I was gone for: %away
    unset %away*  
  }
}