on *:TEXT:-away-:#:{  
  if ($nick == Kirbster)
  set %away.time $ctime
  set %reason $2-  
  amsg 6Kirbster is now 4away 6- Reason: 6  " 4 %reason 6" - Kirbster left at 7 $time 6.
}