Away

away { 
  if ($away == $false) {
    if ($1- != $null) { 
      set %h-motivo $1-
      set %h-tempo $time(HH:nn:ss)
      raw -q away : $1-
      ame estou away, motivo: %h-motivo
    }
  }
  else { 
    raw -q away : 
    ame voltei do away, motivo: %h-motivo - desde: %h-tempo - duração: $duration($calc($duration($time) - $duration(%h-tempo)))
    unset %h-motivo
    unset %h-tempo
  }
}
 
 
/away motivo
/away