Mine

on *:text:~away *:#: {
  if (%scriptstop == on) {
    if ($nick == oliver) { 
      { enable away }
      set %reason $2-
      set %time $ctime
      msg $chan 3,1 _-=[ $+ oliver is now Away]=-_  -- $2- --  { $asctime(HH:nn:ss) }
    }
  }
}

on *:text:~back *:#: {
  if (%scriptstop == on) {
    if ($nick == oliver) { 
      { disable away }
      msg $chan 3,1 _-=[ $+ oliver is now Back]=-_  -- %reason --  Away For. $duration($calc($ctime - %time. [ $+ [ $nick ] ] )))
      unset %time
      unset %reason 
    }
  }
}