on *:load:{
  echo -a 6Away 6Script 6v1.0 6loaded!
}
on *:Text:*~status*:#:{
  if ($nick = $Me) halt
  if (%aways == 1) .ame I'm Away! Reason: %reason 
  else .ame I'm Online... :) Just Msg me! 
}
on master:text:*~back*:#:{
  if (%aways == 0) { .ame [ I'm not away ] | halt }
  .away
  .ame [ Back ][ Reason: %reason ][ Gone since: %back ]
  .timer332 off
  .timer333 off
  .set %aways 0
}
on master:text:*~away *:#:{
  if (%aways == 1) { .set %reason $2- | .ame [ Away ][ Reason: %reason ][ Gone since: %back ] | .set %back $asctime(hh:nn:ss) | .away %reason |  .timer332 999996 250 /ame [ Away ][ Reason: %reason ][ Gone since: %back ] | halt }
  .set %reason $2-
  .set %aways 1
  .away %reason 
  .set %back $asctime(hh:nn:ss)
  .amsg [ Away ][ Reason: %reason ][ Gone since: %back ]
  .timer332 999996 250 .ame 
}
alias gone {
  .set %reason $$?="away Reason:"
  if (%aways == 1) { .ame [ Away ][ Reason: %reason ][ Gone since: %back ] | .set %back $asctime(hh:nn:ss) | .away %reason |  .timer332 999996 250 /ame [ Away ][ Reason: %reason ][ Gone since: %back ] | halt }
  .set %aways 1
  .away %reason
  .set %back $asctime(hh:nn:ss) 
  .ame [ Away ][ Reason: %reason ][ Gone since: %back ]
  .timer332 999996 250 /ame [ Away ][ Reason: %reason ][ Gone since: %back ]
}
alias back {
  if (%aways == 0) { .echo I'm not away | halt }
  .away
  .ame [ Back ][ Reason: %reason ][ Gone since: %back ]
  .timer332 off
  .timer333 off
  .set %aways 0
}
