2800 IF ISP=0 THEN KS=1 : GOTO 2815