alias gone {
  /set %time $asctime
  /set %hughlightaway True  
  /write away.txt $1-
  /amsg $+ $nick is now away

on :TEXT:*Nick*:#: {
  if (%hughlightaway == True) {
  Notice $nick $me Is Currently Away Reason: $read(away.txt) Gone For: $duration($calc(($ctime - $ctime(%time))))  }
  else { HALT }
}
}
}