}
alias brb { set %awaylength1 $ctime | nick $me $+ |Brb | set %away on | set %awaymsg $$?="Reason for being on a brb..." }
alias back {
  if (%away == off) || (%away == $null) {
    echo You were not away? =\
    set %away off
    unset %awaymsg
    unset %awaylength1
    /nick $remove($me, |Brb)
    { Halt }
  }
/nick $remove($me, |Brb)
  /set %away off
  amsg 11I'm back from a 3'brb' 10[Gone for0: $duration($calc($ctime - %awaylength1)) $+ ] 0[11Reason for my 3'brb'0: %awaymsg $+ ]
  /unset %awaymsg
  /unset %awaylength1
}