3415 IF LEN(A$)=0 THEN M=PAR1 : GOTO 3495