FoxPro/Visual FoxPro - Ayuda con el timer de fox

Necesito que me ayuden con el siguiente código:

IF THISFORM.line1.WIDTH<600
THISFORM.line1.WIDTH=THISFORM.LINE1.WIDTH+1
ELSE
THISFORM.timer1.INTERVAL=0
DO FORM c:\proyecto_videotienda\Formularios\Videotienda.scx
ENDIF

esto avanza una linea de carga y cuando llega a la posición 600 para el contador y me abre otro formulario, pero me lo abre muchas veces.
Quisiera abrirlo una sola vez.
De antemano muchas gracias

Me parece que en tu codigo lo mas seguro esta incompleto, es decir lo mas seguro es que esta dentro de un DO wHILE para que te suceda lo que te esta pasando. Segundo, para que ocupas el timer? no le veo la funcion. La solucion es que despues del ELSE pongas la condicion
que termine el WHILE, si no existe el WHILE por RETURN despues del
comando que abre la forma.