3480 IF X=0" : GOSUB 900 : PRINT : GOTO 3465