Untitled

on *:TEXT:*:?: { if ( %Away.Message == Active ) { if ( $active != $nick ) { /beep 2 1 } }
  else { 
    /closemsg
    /msg $nick 12<15AUTO-MSG12>1 Sorry 4 $+ $nick $+ 1 but I am currently away. 
    /timer 1 1 /msg $nick 15[4REASON AWAY7:12 %Away.Message $+ 15]
    /timer 1 2 /msg $nick  15[4TIME AWAY7:12 $duration($calc( $ctime - %Away.Time )) $+ 15]
    /silence + $+ $address($nick,3)
    /timer 1 10 /silence - $+ $address($nick,3)
  }
}