2090 IF ISP=0 THEN KZ=1 : GOTO 2100