2850 IF LEN(A$)=0 THEN RETURN