alias brb { 
  if ($away == $false) {
    var %away.reason = $input(Away Reason,e,CT Away) 
    set %timeleft $time(hh:nn:ss)
    amsg 4[14Away4]14 Reason:4 %away.reason 14Left at:4 $time(hh:nn:ss) 4[14TerrorScript4]
    /tnick Ab`Away
    /away %away.reason
  }
}
 
alias back {
  if ($away == $true) {
    /nick $mnick
    amsg 4[14Back4]14 From:4 $awaymsg 14Left at:4 %timeleft 14Gone for:4 $duration($awaytime) 4[14TerrorScript4]
    /away
  }
}
on $*:TEXT:/^(Ab|Abretw|abret|Ab`Away)/si:# {
  if ($away == $true) { /notice $nick 14Currently Away:4 $awaymsg 14Left:4 %timeleft 14Gone For:4 $duration($awaytime) 4[14TerrorScript4]
  }