mIRC Home    About    Download    Register    News    Help

Print Thread
#53713 11/10/03 03:27 PM
Joined: Dec 2002
Posts: 14
IL_Pizu Offline OP
Pikka bird
OP Offline
Pikka bird
Joined: Dec 2002
Posts: 14
on *:connect: {
.timer(lag-o-meter) 0 1 /lag-o-meter
}

alias lag-o-meter { .ctcp $me lag-o-meter $ticks }

ctcp ^*:*: {
if ((lag-o-meter* iswm $$1-) && ($nick == $me)) {
titlebar Lag: $lag-o-meter
haltdef
}
}
alias lag-o-meter return $round($calc(($ticks / 1000) - ($2 / 1000)),3)


Watch Your Back.
#53714 11/10/03 03:51 PM
Joined: Sep 2003
Posts: 98
N
Babel fish
Offline
Babel fish
N
Joined: Sep 2003
Posts: 98
yes ?


www.stwar.us.to
IRCnet - #stwar
#53715 11/10/03 06:27 PM
Joined: Mar 2003
Posts: 1,271
L
Hoopy frood
Offline
Hoopy frood
L
Joined: Mar 2003
Posts: 1,271
I assume you're asking or intended to) why this doesn't work? Type /help ctcp events and get the event syntax straight. Try again, and if it still doesn't work, ask again and be somewhat more specific then.


DALnet #Helpdesk
I hear and I forget. I see and I remember. I do and I understand. -Confucius
#53716 11/10/03 06:29 PM
Joined: Jan 2003
Posts: 3,012
Hoopy frood
Offline
Hoopy frood
Joined: Jan 2003
Posts: 3,012
I would look into your ^ prefix on the ctcp...

(From the help:)
The ^ event prefix currently works only on the following types of events: ACTION, BAN, CHAT, DEHELP, DEOP, DEVOICE, HELP, INVITE, JOIN, KICK, MODE, NICK, NOTICE, OP, OPEN, PART, PING, TEXT, UNBAN, USERMODE, VOICE, QUIT, SERV, SERVERMODE, SNOTICE, TOPIC, WALLOPS.

CTCP doesn't allow the ^ prefix to my knowledge.


-KingTomato
#53717 11/10/03 06:38 PM
Joined: Dec 2002
Posts: 14
IL_Pizu Offline OP
Pikka bird
OP Offline
Pikka bird
Joined: Dec 2002
Posts: 14
on *:connect: {
.timer(lag-o-meter) 0 120 /lag-o-meter
}
alias lag-o-meter { .ctcp $me lag-o-meter $ticks }
ctcp *:*:*: {
if ((lag-o-meter* iswm $$1-) && ($nick == $me)) {
titlebar -
titlebar --
titlebar -->
titlebar -->>
titlebar -->>[
titlebar $+(-->>,$chr(160),L)
titlebar $+(-->>[,$chr(160),La)
titlebar $+(-->>[,$chr(160),Lag)
titlebar $+(-->>[,$chr(160),Lag:)
titlebar $+(-->>[,$chr(160),Lag: $_lag-o-meter)
titlebar $+(-->>[,$chr(160),Lag: $_lag-o-meter,$chr(160),])
titlebar $+(-->>[ $chr(160),Lag: $_lag-o-meter,$chr(160),]<)
titlebar $+(-->>[ $chr(160),Lag: $_lag-o-meter,$chr(160),]<<)
titlebar $+(-->>[ $chr(160),Lag: $_lag-o-meter,$chr(160),]<<-)
titlebar $+(-->>[,Lag: $_lag-o-meter,]<<--)
haltdef
}
}
alias _lag-o-meter return $duration($calc(($ticks - $2) / 1000))

This Part: $duration($calc(($ticks - $2) / 1000))
has somethin wrong for sure! it's not working well!


Watch Your Back.
#53718 11/10/03 06:49 PM
Joined: Jan 2003
Posts: 3,012
Hoopy frood
Offline
Hoopy frood
Joined: Jan 2003
Posts: 3,012
Extra parameter:

ctcp *:*:*: {

ctcp <level>:<event>: {


-KingTomato
#53719 11/10/03 06:57 PM
Joined: Dec 2002
Posts: 14
IL_Pizu Offline OP
Pikka bird
OP Offline
Pikka bird
Joined: Dec 2002
Posts: 14
Check This Print Screen: http://ascmalta.sytes.net/lag.bmp

also, i removed that thing that you told me! but still the lag time is being like always, the wrong 1:(


Watch Your Back.
#53720 11/10/03 07:03 PM
Joined: Jan 2003
Posts: 3,012
Hoopy frood
Offline
Hoopy frood
Joined: Jan 2003
Posts: 3,012
Here is a working example you perhaps can learn from, or even use for yourself (no worries, you can 'rip' it as the term may be) See if this helps you:

Code:
on *:CONNECT: {
  if (!$timer(lag $+ $network)) .timerlag [ $+ [ $network ] ] 0 120 /lag
}

on *:DISCONNECT: {
  if ($timer(lag $+ $network)) .timerlag [ $+ [ $network ] ] off
}

alias lag {
  .ctcp $me lag $ticks
}

ctcp *:lag: {
  if ($nick == $me) {
    var %ticks = $2, %lag = $calc(($ticks - %ticks) / 1000)
    /echo -s Lag Time: $round(%lag, 2) $+ sec
  }
  /halt
}


-KingTomato
#53721 11/10/03 08:12 PM
Joined: Dec 2002
Posts: 24
M
Ameglian cow
Offline
Ameglian cow
M
Joined: Dec 2002
Posts: 24
you have two alias with the same name

#53722 11/10/03 09:10 PM
Joined: Jan 2003
Posts: 3,012
Hoopy frood
Offline
Hoopy frood
Joined: Jan 2003
Posts: 3,012
You may want to double check that--i dont


-KingTomato
#53723 11/10/03 11:02 PM
Joined: Jul 2003
Posts: 742
Hoopy frood
Offline
Hoopy frood
Joined: Jul 2003
Posts: 742
what convinced you to use bmp? they are huge and take forever to load... use jpg or even better png


http://MTec89Net.com
irc.freenode.net #MTec89Net
#53724 11/10/03 11:05 PM
Joined: Dec 2002
Posts: 1,527
_
Hoopy frood
Offline
Hoopy frood
_
Joined: Dec 2002
Posts: 1,527
lol true i clicked to look and got tired of waiting so i said screw it and closed it out ..... i dont ned to wait a week to help someone. granted i do enjoy a screenshot every now and then.


D3m0nnet.com
#53725 11/10/03 11:08 PM
Joined: Jul 2003
Posts: 742
Hoopy frood
Offline
Hoopy frood
Joined: Jul 2003
Posts: 742
btw his lag said like 5 days...

edit Here is a png version
http://www.mtec89.com/misc/lag.png

Last edited by MTec89; 11/10/03 11:12 PM.

http://MTec89Net.com
irc.freenode.net #MTec89Net
#53726 11/10/03 11:13 PM
Joined: Dec 2002
Posts: 1,527
_
Hoopy frood
Offline
Hoopy frood
_
Joined: Dec 2002
Posts: 1,527
lmao yes thats quite a lag ..... i wasnt gonna wait 5 days to see it either ha.


D3m0nnet.com
#53727 12/10/03 01:15 AM
Joined: Aug 2003
Posts: 1,831
I
Hoopy frood
Offline
Hoopy frood
I
Joined: Aug 2003
Posts: 1,831
on *:connect:.timer(lag-o-meter) 0 30 ctcp $!me Lag $!ticks
ctcp me:*:lag:?:titlebar [Lag: $calc($ticks - $2)*.001) secs] | halt

#53728 12/10/03 08:02 AM
Joined: Dec 2002
Posts: 14
IL_Pizu Offline OP
Pikka bird
OP Offline
Pikka bird
Joined: Dec 2002
Posts: 14
yeah right! but i was going to work and i didn't had time! :>


Watch Your Back.
#53729 12/10/03 08:07 AM
Joined: Dec 2002
Posts: 14
IL_Pizu Offline OP
Pikka bird
OP Offline
Pikka bird
Joined: Dec 2002
Posts: 14
Here It Is All The Code:

on *:CONNECT: {
if (!$timer(lag $+ $network)) .timerlag-o-meter@ [ $+ [ $network ] ] 0 120 /lag
}
on *:DISCONNECT: {
if ($timer(lag $+ $network)) .timerlag-o-meter@ [ $+ [ $network ] ] off
}
alias lag {
.ctcp $me lag-o-meter $ticks
}
ctcp *:lag-o-meter: {
if ($nick == $me) {
var %ticks = $2, %lag = $calc(($ticks - %ticks) / 1000)
titlebar -
titlebar --
titlebar -->
titlebar -->>
titlebar -->>[
titlebar $+(-->>,$chr(160),L)
titlebar $+(-->>[,$chr(160),La)
titlebar $+(-->>[,$chr(160),Lag)
titlebar $+(-->>[,$chr(160),Lag:)
titlebar $+(-->>[,$chr(160),Lag: $round(%lag, 2),sec)
titlebar $+(-->>[,$chr(160),Lag: $round(%lag, 2),sec,$chr(160),])
titlebar $+(-->>[,$chr(160),Lag: $round(%lag, 2),sec,$chr(160),]<)
titlebar $+(-->>[,$chr(160),Lag: $round(%lag, 2),sec,$chr(160),]<<)
titlebar $+(-->>[,$chr(160),Lag: $round(%lag, 2),sec,$chr(160),]<<-)
titlebar $+(-->>[,$chr(160),Lag: $round(%lag, 2),sec,$chr(160),]<<--) Network: $+([,$network,]) Server: $+([,$server,]) Nick: $+([,$me,])
if ($round(%lag, 2) == 8) {
echo -a **Alert** You Are $round(%lag, 2) $+ sec Laged! **Alert**
}
if ($round(%lag, 2) > 20) {
echo -a **Alert** You Are $round(%lag, 2) $+ sec Laged! **Alert**
}
}
halt
}

10x ppl for the help :>


Watch Your Back.
#53730 12/10/03 06:24 PM
Joined: Mar 2003
Posts: 160
Vogon poet
Offline
Vogon poet
Joined: Mar 2003
Posts: 160
You'd be better off just using the on on ^1:PONG:{ event to get your lag crazy

#53731 12/10/03 09:34 PM
Joined: Dec 2002
Posts: 14
IL_Pizu Offline OP
Pikka bird
OP Offline
Pikka bird
Joined: Dec 2002
Posts: 14
nice idea :>


Watch Your Back.

Link Copied to Clipboard