Help to fix this script - mIRC Discussion Forums

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
}

Change $hget(SeenNames,0).data to $hget(SeenNames,0).item

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
 }