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