4940 KT=0 : IF LEN(A$)=0 THEN KT=1 : GOTO 4960