menu Channel { 
  Away System
  .Away:/gaway $$?="Reason?"
  .Back:/eaway 
}
alias gaway { 
  set %away.reason $1-
  set %away.ctime $ctime
  amsg 5,0:::: 14[ 1I'm now away, REASON: %away.reason 14] 5:::: 
  nick Key`Away
}
alias eaway {
  amsg 5,0:::: 14[ 1I'm now back from: %away.reason 14] 5:::: was gone $duration($calc($ctime - %away.ctime))
  Nick Keyblade5  
  unset %away
}