3227 IF ITM0" : GOSUB 900 : GOTO 3220