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