ALIAS away {
  amsg [Away] Reason ( $+ $1- $+ ) - Left At ( $+ $fulldate $+ )
  set %away.time $ctime
  set %away.reason $1-
  set %away.date $fulldate
  set %away on
}
ALIAS back {
  if (%away == on) {
    amsg [Back] Reason ( $+ %away.reason $+ ) - Left ( $+ %away.date $+ ) - Gone For ( $+ $duration($calc($ctime - %away.time)) $+ )
set %away off
}
}