mIRC Lag Meter

on *:CONNECT:{
  .timerlagmeter -i 0 45 pingme
}
alias pingme .ctcpreply $me LAG $ticks
on *:CTCPREPLY:LAG*:{
  if ($nick != $me) halt
  titlebar Lag for $server $+ : $calc(($ticks - $2) / 1000) $+ s
  halt
}