Username:
Password:
  Home About Us Articles Rules Script Library FAQ Help
Not logged in (register
Precision Ping for mIRC v6
By: arcane

Last Modified: Oct 15 11:25am (r4)

This fairly simple script replaces mIRC's default ping with a precision ping, making it so that ping response times are shown with three decimal places.

For example:

[arcane PING reply]: 0.172secs

Just drop it into your remotes (preferably in its own file), and as long as you don't have certain 3rd party scripts, it should work.
alias ctcp {
  if ( $2 == ping ) {
    .hadd -mu120 pingtick $network $+ . $+ $$1 $ticks
    !ctcp $$1 ping
  }
  else {
    !ctcp $1-
  }
}

on *:CTCPREPLY:ping*:{
  if ( $hget( pingtick, $network $+ . $+ $nick ) != $null ) {
    var %ms = $calc( ( $ticks - $hget( pingtick, $network $+ . $+ $nick ) ) / 1000 )
    echo $color(CTCP) -set $chr(91) $+ $nick PING reply $+ $chr(93) $+ : %ms $+ secs
    .hdel pingtick $nick
    haltdef
  }
}

Comments
Fradam
Oct 12 5:47pm
Works nicely, thanks arcane, very nifty :)
arcane
Oct 15 11:27am
Made a few revisions just now.

1) It should handle channel pings correctly now. You won't get the precision, but you will still get the correct ping time in seconds.

2) Made it so that it uses the network as part of the variable. I can't imagine when this would be useful, but hey, why not?

3) Also, as per request of Elly, I switched from using global variables to using a hash table.
shanamaj
Feb 08 10:41am
If you have 3rd party scripts then just move this to the top in order in the script editor and it should work fine.
 
All content Copyright © 2004 - 2008 UtoNet IRC Network
UtoNet is sponsored and hosted by Datinix Systems