just copy and paste put your remote
on *:connect:{
timerpingx 0 75 /ping $me
}
on *:text:*:#:{ if (ping me isin $1-) || (!ping isin $1-) { ctcp $nick ping } }
ON *:CTCPREPLY:*ping*: {
var %pingme = $ctime - $2
if (ping isin $1-) { set %lagme 0 }
if (%pingme < 1) { /amsg $chan 11,1c10u11r10r11e10n11t 11l10a11g 9: 4,12 $str($chr(150),%pingme) $+ 15,12 $+ $str($chr(150),$calc(10-%pingme)) 4,1 %pingme $+ 11s10e11c10s 11h10e11a10v11y 11c10o11o10l | return }
if (%pingme < 2) { /amsg $chan 9,1c3u9r3r9e3n9t 9l3a9g 11: 4,12 $str($chr(150),%pingme) $+ 15,12 $+ $str($chr(150),$calc(10-%pingme)) 4,1 %pingme $+ 9s3e9c3s 9s3t9a3n9d3a9r3t 9c3o9o3l | return }
if (%pingme < 10) { /amsg $chan 8,1c7u8r7r8e7n8t 8l7a8g 11: 4,12 $str($chr(150),%pingme) $+ 15,12 $+ $str($chr(150),$calc(10-%pingme)) 11,1 %pingme $+ 8s7e8c7s 8s7t8a7n8d7a8r7t 8c7r8i7t8i7c8a7l | return }
if (%pingme < 20) { /amsg $chan 4,1c5u4r5r4e5n4t 4l5a4g 11: 4,12 $str($chr(150),%pingme) $+ 15,12 $+ $str($chr(150),$calc(30-%pingme)) 11,1 %pingme $+ 4s5e4c5s 4h5e4a5v4y 4c5r4i5t4i5c4a5l | return }
if (%pingme < 30) { /amsg $chan 4,1c5u4r5r4e5n4t 4l5a4g 11: 4,12 $str($chr(150),%pingme) $+ 15,12 $+ $str($chr(150),$calc(30-%pingme)) 11,1 %pingme $+ 4s5e4c5s 4o5v4e5r4d5o4s5e 4c5r4i5t4i5c4a5l | return }
if (%pingme < 60) { /amsg $chan 4,1c5u4r5r4e5n4t 4l5a4g 11: 4,12 $str($chr(150),%pingme) $+ 15,12 $+ $str($chr(150),$calc(60-%pingme)) 11,1 %pingme $+ 4s5e4c5s 4o5v4e5r4d5o4s5e 4c5r4i5t4i5c4a5l | return }
.unset %pingme
.halt
}