1990 IF KX=1 THEN VX(I)=XVF : VY(I)=XVF