alias gone {
  if (!%gone) {
    set %gone $ctime $1-
    ame Is away $+($chr(91),$1-,$chr(93))
    nick $+($me,|away)
  }
  else echo -a Youre already away!
}
alias back {
  if (%gone) {
    ame Is back from $+($chr(91),$gettok(%gone,2-,32),$chr(93)) I was gone for $duration($calc($ctime - $gettok(%gone,1,32)))
    nick $remove($me,|away)
    unset %gone
  }
  else echo -a Youre not away!
}