UpDated 5/11/11
just an ez lag check dialog..copy/paste into a new remote and click in a channel to open. it will message the active channel when you use msg..Enjoy..

dialog 2lag {
  title "Lag Check"
  size -1 -1 91 35
  option dbu
  box "Lag Check", 1, 2 2 87 32
  text "", 2, 4 13 83 8, center
  button "Check", 3, 4 22 20 10, flat
  button "Auto", 4, 24 22 21 10, flat
  button "Clear", 5, 45 22 21 10, flat
  button "Msg", 6, 66 22 21 10, flat
}
on *:load: { 
  echo 12 -a You Have Just Loaded Napa182's Lag Check 
  echo 12 -a A Irc.EzzyChat.Com Production 
}
menu menubar,channel {
  .Lag Checker { dialog $iif($dialog(2lag),-v,-m 2lag) 2lag }  
}
on *:dialog:2lag:close:0:{ if ($timer(.autolag)) { .timer.autolag off } }
on *:dialog:2lag:init:0:{ 1lag }
on *:DIALOG:2lag:sclick:*:{
  if ($did = 3) { did -r $dname 2 | 1lag }
  if ($did = 4) { 
    if (!$timer(.autolag)) { .timer.autolag  0 1 1lag | did -ra $dname 4 Stop  }
    else { did -ra $dname 4 Auto | .timer.autolag off }
  }
  if ($did = 5) { did -r $dname 2 }
  if ($did = 6) { msg $active My Lag Is $did(2) }
}
alias -l 1lag { .raw ping $ticks }
on ^*:PONG:{ 
  if ($dialog(2lag)) { 
    haltdef 
    var %LAG $calc(($ticks - $2) / 1000)
    did -a 2lag 2 %LAG $iif($left(%LAG,1) = 0,millisecs,secs)
  }
}