mIRC Home    About    Download    Register    News    Help

Print Thread
Help to fix this script #199267 11/05/08 08:37 PM
Joined: Jul 2007
Posts: 1,129
T
Tomao Offline OP
Hoopy frood
OP Offline
Hoopy frood
T
Joined: Jul 2007
Posts: 1,129
Can anyone help me fix this script? I have an endless loop when it triggers.

Code:
on @!*:JOIN:#: {
  if ($istok($hget(SeenNames,$ial($nick).user),$nick,32)) {
    if ($numtok($hget(SeenNames,$ial($nick).user),32) == 1) { halt }
  }
  hadd SeenNames $ial($nick).user $addtok($hget(SeenNames,$ial($nick).user),$nick,32)))
  if ($numtok($hget(SeenNames,$ial($nick).user),32) == 1) { halt }
  var %x = $hget(SeenNames,0).data,%y = 0
  while ( %x ) { 
  echo -a 6* 2Info: 4 $+ $replace($remtok($hget(SeenNames,%x).data,2,32),$chr(32),1 $+ $+($chr(44),4 $+ $chr(32))) 10are the same person! }
  dec %x | inc %y
}

Re: Help to fix this script [Re: Tomao] #199269 11/05/08 08:45 PM
Joined: Aug 2004
Posts: 7,252
R
RusselB Offline
Hoopy frood
Offline
Hoopy frood
R
Joined: Aug 2004
Posts: 7,252
Change $hget(SeenNames,0).data to $hget(SeenNames,0).item

Re: Help to fix this script [Re: Tomao] #199270 11/05/08 08:59 PM
Joined: Feb 2006
Posts: 181
C
Crinul Offline
Vogon poet
Offline
Vogon poet
C
Joined: Feb 2006
Posts: 181
Originally Posted By: Tomao
Code:
while ( %x ) { 
  echo -a 6* 2Info: 4 $+ $replace($remtok($hget(SeenNames,%x).data,2,32),$chr(32),1 $+ $+($chr(44),4 $+ $chr(32))) 10are the same person!
 }
 dec %x | inc %y

Use:
Code:
while (%x) { 
  echo -a 6* 2Info: 4 $+ $replace($remtok($hget(SeenNames,%x).data,2,32),$chr(32),1 $+ $+($chr(44),4 $+ $chr(32))) 10are the same person!
  dec %x | inc %y
 }