alias afk {
  away %away.reason
  nick Jt|Away
  $iif($1,set %away.reason $1- ,set %away.reason No Reason)
  amsg 7«12 $me 14is away 4¤14 Reason:12 %away.reason 4¤14 Left at:12 $time $+ 14(GMT +8) 7» 
  set %away.time $ctime 
  set %away on
}
alias back {
  if (%away == on) {
    away
    nick [-EvoIX-]
    amsg 7«12 $me 14is now back(away for12 %away.reason $+ 14) 4¤14 Gone for12 $duration($calc($ctime - %away.time)) 7»
    unset %away.reason
    unset %away.time
    unset %away
  }
  else { /echo -a You are not marked as away }
}