; Millisecond Pinger snippet by eXonyte ; Type /mping <nickname> to ping someone in milliseconds instead of seconds. ; Also attempts to maintain compatibility with normal /ctcp <nick> PING replies, ; and will display the text normally if someone replies with text instead of a number. ; Alias to send a millisecond ping alias mping { ; Sends the actual ping as a raw .raw PRIVMSG $$1 : $+ $chr(1) $+ PING $ticks $+ $chr(1) ; Echoes a CTCP PING lookalike to the active window echo $colour(ctcp) -t $+ $iif($active == Status Window,se,a) -> [[ $+ $$1 $+ ]] PING } ; Handles CTCP PING replies on *:CTCPREPLY:PING*: { ; If the reply isn't a number, let mIRC handle it if ($2 !isnum) { return } ; If the current $ticks minus the reply is greater than 0 if ($calc($ticks - $2) > 0) { ; Echo the ping reply to the active window echo $colour(ctcp) -at $+ $iif($active == Status Window,e) [[ $+ $nick PING reply]: $calc(($ticks - $2)/1000) $+ secs ; And halt so that mIRC doesn't show its own ping reply halt } }Использовать командой /mping ник, можно также вписать его в привычный попапс, заместо стандартного.
CTCP
.Ping:/mping $$1
Выгдядет примерно так:
[02:32:42] -> [ChanServ] PING
[02:32:42] [ChanServ PING reply]: 0.094secs
Автор © Yardiff