2985 PRINT : GOSUB 650