2310 IF ISP=1 THEN PRINT#1,TC$(VX(J))