Project

General

Profile

Download (489 Bytes)

[Script] CTCP Ping reply in milliseconds v0.1 » CTCP Ping reply in milliseconds v0.1.ini

Mr. BS, 04/11/2016 11:41 PM

 
; CTCP Ping reply in milliseconds
; http://dev.adiirc.com/boards/5/topics/594
; v0.1 by pereba

on ^*:ctcpreply:ping *:{
if ($($+(%,ping,$nick),2)) {
haltdef
echo -atc ctcp $replacex($prefixctcp,$chr(32),$chr(160)) $replacex($adilang(CTCPReply0From1),{0},$chr(2) $+ PING $calc(($ticks - $v1)/1000) $+ ms $+ $chr(2),{1},$chr(2) $+ $nick $+ $chr(2))
unset %ping [ $+ [ $nick ] ]
}
}

alias ctcp {
if ($2 == ping) set -u100 %ping $+ $1 $ticks
!ctcp $1-
}
(2-2/2)