alias aw {
  window $+(@,highlights)
  set %away.msg $1-
  if ( $away == $true ) { echo -a You are already AWAY! | HALT }
  ame is now away: %away.msg Left at $+($time(h:nn:ss TT),.)
  away %away.msg
  set %orig.nick $me
  set %away.time $ctime
  nick Gregory|Away
  echo @highlights Left at $+($time(h:nn:ss TT),.) with reason: %away.msg
}

alias bk {
  if ( $away == $false ) return
  ame is back at $time GMT from: %away.msg (Gone for $duration($calc(($ctime - %away.time))) $+ )
  away
  unset %away.msg
  nick %orig.nick
  unset %orig.nick
  unset %away.time
}

On *:TEXT:*greg*:*:{ 
  if ($away == $true) { notice $nick I have been away since $duration($calc($ctime - %away.time)) $+([,%away.msg,]) | echo @highlights ( $+ $time $+ ) —› $nick highlighted you in $chan $+ : $1- }
  else { echo $active ( $+ $time $+ ) —› $nick highlighted you in $chan $+ : $1-  | beep }
}