Miscellany

on *:input:#: {
  if ($1 == ~Away ) {
    .set %away. $+ $address($nick,2) $ctime 
    /timer 1 1 /amsg 7I am now away. Reason:4 $2- $+ 7.
    /timer 1 2 /nick [-Capo-][-Away-]
  }
}
on *:input:#: {
  if ($1 == ~Back) { 
    /timer 1 0 /amsg 7I am now back from 4(set ifmatch)7. I was gone for4 $duration($calc($ctime - $ifmatch)) $+ 7.
    /timer 1 2 /nick [-Capo-]
    unset %away. $+ $address($nick,2) 
  }
}