0 REM HUMMER.FLY
5 IFX=0THENX=1:LOAD"HUMMERS.LNK" ,8,1
6 IFX=1THENX=2:LOAD"UNPACKER",8,1
7 IFX=2THENX=3:LOAD"MOVE.COLOR.O",8,1
8 POKE53281,0:POKE53281,0
10 PRINTCHR$(142)"[147]  [208]RESS ANY KEY TO RETURN TO THE MENU."
12 FORDL=1TO3000:NEXT:PRINT"[147]"
40 SC=224:CO=204:X=0:Y=0:SH=0:GOSUB1000:SYS32768
42 SC=32:CO=12:X=0:Y=0:SH=0:GOSUB1000
82 SC=32:CO=12:X=3:Y=0:SH=1:GOSUB1000:SYS32768:SYS51459:POKE53280,3
85 POKE56333,127:SYS32771:POKE56333,129:FORX=1TO18:NEXT:IFPEEK(198)=0THEN85
98 :
900 REM  TIME TO END
905 POKE56576,151:SYS51459:PRINT"[147]   [210]ETURNING TO [206]ATURE [209]UEST MENU..."
910 F$="NATURE.MENU":PRINT"[159]LOAD F$,8":PRINT"RUN"
920 POKE631,13:POKE632,13:POKE198,2:END
990 END
999 REM
1000 POKE249,SC:POKE250,CO:                   REM SCREEN/COLOR
1010 POKE251,0:POKE252,64:                    REM SHP BUFFER
1020 POKE253,X:POKE254,Y:                     REM   X-POS,Y-POS
1030 POKE255,SH:SYS51462:RETURN