on *:START:{ ms.timestampfmt }
alias ms.timestampfmt {
  var %ctime = $calc($ctime + 1)
  while (%ctime >= $ctime) { }
  set $iif(($version < 6.17),-u1000000000,-e) %ms.timestampfmt.fix $calc($ticks % 1000)
  .timer.ms.timestampfmt.fix -imo 0 15 ms.timestampfmt.fix
}
alias ms.timestampfmt.fix {
  var %timestampfmt = $timestampfmt , %re = /s\.\d{3,3}/g
  if ($regsub(%timestampfmt,%re,$+(s.,$mstime),%timestampfmt)) { .timestamp -f %timestampfmt }
}
;
;* you must add ".000" to any s in the time stamp, to enable this timer to know where to insert the ms
;* example [HH:nn:ss.000]
;
alias mstime { return $right($calc($ticks - %ms.timestampfmt.fix),3) }


;Irc server of german-pre : Ba.chaoz-irc.net or irc.chaoz-irc.net