Miscellany

alias aw {
  set %away-nick $nick
  away $?="Enter away message:" 
  amsg 2 $me 1 is now away: 7 $! -  1 $time
  nick $+($me,|Away|)
  set %away-time $time
}

alias ba {
  amsg 2 $me 1 is back: 7 $! - $duration($calc($time - %away),2)
  nick %away-nick
}