1415 IF X6 THEN GOSUB 900 : RETURN