10 REM Easter Bomber Game 100 REM start playing the game 1000 REM start playing the game 10000 REM set up screen and colours 1001 REM ********************** 10010 REM ************************* 10020 KEY 10030 VARNAME 10040 FOR 10050 RETURN 1010 WHILE 1020 SPRITE 1030 MOVE X 1040 MOVE 1050 WHILE 1055 IF 1060 WEND 1070 VARNAME 1999 RETURN 20 REM by Phil Lawson / Atari ST User 2000 REM drop an easter egg 2001 REM ****************** 2010 IF 2020 SPRITE 2030 WAIT VBL 2040 MOVE 30 GOSUB 40 GOSUB 50 GOSUB 500 REM Initialisation 501 REM ************** 510 DIM 520 VARNAME 530 RESERVE 540 VARNAME 550 FOR 590 RETURN 60 GOSUB 90 GOTO 9000 REM draw the screen 9001 REM *************** 9005 SCREEN COPY 9010 FOR 9020 SPRITE 9030 NEXT