Lag Detector

By SaNCaKx on Nov 08, 2016

on *:load: {
.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: Funny Popups $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 17/10/2016 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Thank you for using this Addon,igo,Addon: Funny Popups $chr(40) $+ v5.4 $+ $chr(41))
.echo -sa _____
.echo -sa 0,1 Loading 9,1Funny Popups0,1 Add-On...
.echo -sa 0,1 You are running mIRC $version on Windows $+ $os
.echo -sa 0,1 Web: 9,1 http://0,1www.lidersohbet.com
.echo -sa ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}

ON :START:{
lagstart
}
alias lagstart {
.timerlag 0 $$?="Check For Lag Every _ Seconds" lagdetector
}
ON ^
:PONG:{
haltdef
var %x = $calc($ctime - $2)
titlebar %x $+ s lag
if (%x >= 4) {
echoall Lag Alert: You are %x seconds lagged to the server!
}
}
alias lagdetector {
.quote ping $ctime
}
alias echoall {
var %x = $$1-
echo -st %x
var %y = 1
while (%y <= $query(0)) {
echo -t $query(%y) %x
inc %y
}
var %z = 1
while (%z <= $chan(0)) {
echo -t $chan(%z) %x
inc %z
}
}

Comments

Sign in to comment.
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.