alias cya {
  set %away.time $ctime
  set %away.reason $$1-
  ame Is Now 4Away Reason6 -4 %away.reason 6- Left At4 $time 
}
alias hi {
  ame Is Now 4Back6 From -4 %away.reason 6- Been 4Away 6For $duration($calc($ctime - %away.time))
  timer unset %away*
}