Home » Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF » GAMES1/SPACECITY

GAMES1/SPACECITY

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF
Filename: GAMES1/SPACECITY
Read OK:
File size: 08CC bytes
Load address: FFFF0E00
Exec address: FFFF8023
Duplicates

There are 3 duplicate copies of this file in the archive:

File contents
   10REM SPACE CITY
   20REM ORBIT
   30REM PROGRAM SUBJECT TO COPYRIGHT
   40ONERRORRUN
   50MODE6
   60VDU19,0,1,0,0,0
   70PRINTTAB(12,2)"SAVE SPACE CITY"''"AND STOP THE INVADERS FROM LANDING."''"Z AND X KEYS MOVE MISSILE LEFT AND RIGHT"'"      BEFORE AND AFTER LAUNCHING."''"   PRESS RETURN KEY TO LAUNCH MISSILE."
   80PRINTTAB(8,16)"THE HIGHER YOU HIT THEM"''"          THE MORE YOU SCORE"'''"       PRESS SPACE BAR TO START"
   90REPEATUNTILGET=32
  100MODE5
  110VDU23;8202;0;0;0;
  120DIMX%(19),Y%(19)
  130VDU23,224,255,165,255,165,255,165,255,165
  140VDU23,225,0,36,126,90,36,66,129,0
  150VDU23,226,36,102,255,231,255,189,153,165
  160VDU19,2,6,0,0,0,19,1,3,0,0,0,19,3,5,0,0,0
  170H%=640:SC%=0:C%=0:MX%=608:MY%=32:FL%=0:E%=2:CLG
  180FORS%=1TO40:VDU18,0,2,25,69,RND(1279);RND(1023);:NEXT
  190PRINTTAB(0,1)"SCORE"
  200PROCCITY
  210FORZ=0TOPISTEPPI/50:VDU25,69,640+(512*COS(Z));60+(512*SIN(Z));:NEXT
  220VDU25,4,960;896;25,4,800;1010;25,85,640;768;25,85,480;1010;25,85,320;896;18,0,0,25,4,480;1006;25,4,800;1006;25,85,640;890;
  230IFH%<352H%=352
  240FORI%=10TO19:X%(I%)=640:Y%(I%)=992:NEXT
  250FORI%=0TO9:X%(I%)=I%*128:Y%(I%)=H%:SOUND0,-15,4,1:VDU18,3,1,25,4,640;890;25,5,X%(I%);Y%(I%);225,25,4,640;890;25,5,X%(I%);Y%(I%);:DELAY=TIME+20:REPEATUNTILTIME>DELAY:NEXT
  260REPEAT
  270PROCBASE
  280PROCINV
  290PROCBASE
  300VDU4:PRINTTAB(14,1);SC%:VDU5
  310UNTILE%=1ORC%=20
  320IFC%=20C%=0:H%=H%-64:GOTO230
  330VDU4:PRINTTAB(3,8)"PRESS SPACE BAR"'"      TO START"
  340PRINTTAB(3,12)"OR F TO FINISH"
  350ONINSTR(" F",GET$)GOTO170,360ELSE350
  360MODE6:PRINTTAB(16,16)"GOODBYE":END
  370DEFPROCCITY
  380VDU25,4,128;60;25,5,1152;60;25,4,600;60;25,5,600;0;25,4,680;60;25,5,680;0;
  390FORB%=3TO16:READT%:FORHT%=1TOT%:VDU5,25,4,B%*64;64+HT%*32;224:NEXT:NEXT
  400RESTORE
  410ENDPROC
  420DATA1,2,3,1,4,2,3,6,5,2,1,3,2,1
  430DEFPROCINV
  440R%=RND(20)-1:M%=RND(3)-2
  450IFR%>9A%=226ELSEA%=225
  460VDU18,2,2,25,4,X%(R%);Y%(R%);A%
  470X%(R%)=X%(R%)+M%*64
  480Y%(R%)=Y%(R%)-32
  490IFX%(R%)>1216X%(R%)=1216
  500IFX%(R%)<0X%(R%)=0
  510IFY%(R%)=32C%=C%+1
  520SOUND1,-10,50,1
  530VDU18,1,1,25,4,X%(R%);Y%(R%);A%
  540IFPOINT(X%(R%)+16,Y%(R%)-36)=2ANDY%(R%)<320THENE%=1:PROCCITY
  550ENDPROC
  560DEFPROCBASE
  570VDU18,2,2,25,4,MX%;MY%;33
  580*FX15,0
  590IFINKEY(-67)ANDMX%<1200MX%=MX%+32
  600IFINKEY(-98)ANDMX%>32MX%=MX%-32
  610IFINKEY(-74)ORFL%=1PROCMSL
  620VDU18,1,1,25,4,MX%;MY%;33
  630ENDPROC
  640DEFPROCMSL
  650MY%=MY%+32:FL%=1
  660IFMY%>960MY%=32:FL%=0
  670P%=POINT(MX%+16,MY%-16)
  680IFP%=1ORP%=3PROCHIT
  690ENDPROC
  700DEFPROCHIT
  710FORJ%=0TO19
  720IFMX%<>X%(J%)ORMY%<>Y%(J%)THEN790
  730IFJ%>9U%=226ELSEU%=225
  740VDU25,4,X%(J%);Y%(J%);U%
  750SOUND0,-15,2,2
  760SC%=SC%+Y%(J%):C%=C%+1
  770Y%(J%)=-32
  780MY%=32:FL%=0
  790NEXT
  800ENDPROC

� SPACE CITY
� ORBIT
"� PROGRAM SUBJECT TO COPYRIGHT
(�
2�6
<�19,0,1,0,0,0
F��12,2)"SAVE SPACE CITY"''"AND STOP THE INVADERS FROM LANDING."''"Z AND X KEYS MOVE MISSILE LEFT AND RIGHT"'"      BEFORE AND AFTER LAUNCHING."''"   PRESS RETURN KEY TO LAUNCH MISSILE."
Ph�8,16)"THE HIGHER YOU HIT THEM"''"          THE MORE YOU SCORE"'''"       PRESS SPACE BAR TO START"
Z
���=32
d�5
n�23;8202;0;0;0;
x�X%(19),Y%(19)
�+�23,224,255,165,255,165,255,165,255,165
�#�23,225,0,36,126,90,36,66,129,0
�*�23,226,36,102,255,231,255,189,153,165
�+�19,2,6,0,0,0,19,1,3,0,0,0,19,3,5,0,0,0
�1H%=640:SC%=0:C%=0:MX%=608:MY%=32:FL%=0:E%=2:�
�-�S%=1�40:�18,0,2,25,69,�(1279);�(1023);:�
��0,1)"SCORE"
�	�CITY
�6�Z=0����/50:�25,69,640+(512*�(Z));60+(512*�(Z));:�
�|�25,4,960;896;25,4,800;1010;25,85,640;768;25,85,480;1010;25,85,320;896;18,0,0,25,4,480;1006;25,4,800;1006;25,85,640;890;
��H%<352H%=352
�%�I%=10�19:X%(I%)=640:Y%(I%)=992:�
���I%=0�9:X%(I%)=I%*128:Y%(I%)=H%:�0,-15,4,1:�18,3,1,25,4,640;890;25,5,X%(I%);Y%(I%);225,25,4,640;890;25,5,X%(I%);Y%(I%);:DELAY=�+20:���>DELAY:�
�
	�BASE
�INV
"	�BASE
,�4:�14,1);SC%:�5
6�E%=1�C%=20
@�C%=20C%=0:H%=H%-64:�df@
J/�4:�3,8)"PRESS SPACE BAR"'"      TO START"
T�3,12)"OR F TO FINISH"
^�" F",�)�tj@,�DhA��D^A
h�6:�16,16)"GOODBYE":�
r
��CITY
|L�25,4,128;60;25,5,1152;60;25,4,600;60;25,5,600;0;25,4,680;60;25,5,680;0;
�:�B%=3�16:�T%:�HT%=1�T%:�5,25,4,B%*64;64+HT%*32;224:�:�
��
��
� �1,2,3,1,4,2,3,6,5,2,1,3,2,1
�	��INV
�R%=�(20)-1:M%=�(3)-2
��R%>9A%=226�A%=225
�!�18,2,2,25,4,X%(R%);Y%(R%);A%
�X%(R%)=X%(R%)+M%*64
�Y%(R%)=Y%(R%)-32
��X%(R%)>1216X%(R%)=1216
��X%(R%)<0X%(R%)=0
��Y%(R%)=32C%=C%+1
�1,-10,50,1
!�18,1,1,25,4,X%(R%);Y%(R%);A%
2�X%(R%)+16,Y%(R%)-36)=2�Y%(R%)<320�E%=1:�CITY
&�
0
��BASE
:�18,2,2,25,4,MX%;MY%;33
D*FX15,0
N�(-67)�MX%<1200MX%=MX%+32
X�(-98)�MX%>32MX%=MX%-32
b�(-74)�FL%=1�MSL
l�18,1,1,25,4,MX%;MY%;33
v�
�	��MSL
�MY%=MY%+32:FL%=1
��MY%>960MY%=32:FL%=0
�P%=�MX%+16,MY%-16)
��P%=1�P%=3�HIT
��
�	��HIT
��J%=0�19
�!�MX%<>X%(J%)�MY%<>Y%(J%)��TVC
��J%>9U%=226�U%=225
��25,4,X%(J%);Y%(J%);U%
��0,-15,2,2
�SC%=SC%+Y%(J%):C%=C%+1
Y%(J%)=-32
MY%=32:FL%=0
�
 �
�
00000000  0d 00 0a 10 f4 20 53 50  41 43 45 20 43 49 54 59  |..... SPACE CITY|
00000010  0d 00 14 0b f4 20 4f 52  42 49 54 0d 00 1e 22 f4  |..... ORBIT...".|
00000020  20 50 52 4f 47 52 41 4d  20 53 55 42 4a 45 43 54  | PROGRAM SUBJECT|
00000030  20 54 4f 20 43 4f 50 59  52 49 47 48 54 0d 00 28  | TO COPYRIGHT..(|
00000040  07 ee 85 f9 0d 00 32 06  eb 36 0d 00 3c 11 ef 31  |......2..6..<..1|
00000050  39 2c 30 2c 31 2c 30 2c  30 2c 30 0d 00 46 bd f1  |9,0,1,0,0,0..F..|
00000060  8a 31 32 2c 32 29 22 53  41 56 45 20 53 50 41 43  |.12,2)"SAVE SPAC|
00000070  45 20 43 49 54 59 22 27  27 22 41 4e 44 20 53 54  |E CITY"''"AND ST|
00000080  4f 50 20 54 48 45 20 49  4e 56 41 44 45 52 53 20  |OP THE INVADERS |
00000090  46 52 4f 4d 20 4c 41 4e  44 49 4e 47 2e 22 27 27  |FROM LANDING."''|
000000a0  22 5a 20 41 4e 44 20 58  20 4b 45 59 53 20 4d 4f  |"Z AND X KEYS MO|
000000b0  56 45 20 4d 49 53 53 49  4c 45 20 4c 45 46 54 20  |VE MISSILE LEFT |
000000c0  41 4e 44 20 52 49 47 48  54 22 27 22 20 20 20 20  |AND RIGHT"'"    |
000000d0  20 20 42 45 46 4f 52 45  20 41 4e 44 20 41 46 54  |  BEFORE AND AFT|
000000e0  45 52 20 4c 41 55 4e 43  48 49 4e 47 2e 22 27 27  |ER LAUNCHING."''|
000000f0  22 20 20 20 50 52 45 53  53 20 52 45 54 55 52 4e  |"   PRESS RETURN|
00000100  20 4b 45 59 20 54 4f 20  4c 41 55 4e 43 48 20 4d  | KEY TO LAUNCH M|
00000110  49 53 53 49 4c 45 2e 22  0d 00 50 68 f1 8a 38 2c  |ISSILE."..Ph..8,|
00000120  31 36 29 22 54 48 45 20  48 49 47 48 45 52 20 59  |16)"THE HIGHER Y|
00000130  4f 55 20 48 49 54 20 54  48 45 4d 22 27 27 22 20  |OU HIT THEM"''" |
00000140  20 20 20 20 20 20 20 20  20 54 48 45 20 4d 4f 52  |         THE MOR|
00000150  45 20 59 4f 55 20 53 43  4f 52 45 22 27 27 27 22  |E YOU SCORE"'''"|
00000160  20 20 20 20 20 20 20 50  52 45 53 53 20 53 50 41  |       PRESS SPA|
00000170  43 45 20 42 41 52 20 54  4f 20 53 54 41 52 54 22  |CE BAR TO START"|
00000180  0d 00 5a 0a f5 fd a5 3d  33 32 0d 00 64 06 eb 35  |..Z....=32..d..5|
00000190  0d 00 6e 13 ef 32 33 3b  38 32 30 32 3b 30 3b 30  |..n..23;8202;0;0|
000001a0  3b 30 3b 0d 00 78 12 de  58 25 28 31 39 29 2c 59  |;0;..x..X%(19),Y|
000001b0  25 28 31 39 29 0d 00 82  2b ef 32 33 2c 32 32 34  |%(19)...+.23,224|
000001c0  2c 32 35 35 2c 31 36 35  2c 32 35 35 2c 31 36 35  |,255,165,255,165|
*
000001e0  0d 00 8c 23 ef 32 33 2c  32 32 35 2c 30 2c 33 36  |...#.23,225,0,36|
000001f0  2c 31 32 36 2c 39 30 2c  33 36 2c 36 36 2c 31 32  |,126,90,36,66,12|
00000200  39 2c 30 0d 00 96 2a ef  32 33 2c 32 32 36 2c 33  |9,0...*.23,226,3|
00000210  36 2c 31 30 32 2c 32 35  35 2c 32 33 31 2c 32 35  |6,102,255,231,25|
00000220  35 2c 31 38 39 2c 31 35  33 2c 31 36 35 0d 00 a0  |5,189,153,165...|
00000230  2b ef 31 39 2c 32 2c 36  2c 30 2c 30 2c 30 2c 31  |+.19,2,6,0,0,0,1|
00000240  39 2c 31 2c 33 2c 30 2c  30 2c 30 2c 31 39 2c 33  |9,1,3,0,0,0,19,3|
00000250  2c 35 2c 30 2c 30 2c 30  0d 00 aa 31 48 25 3d 36  |,5,0,0,0...1H%=6|
00000260  34 30 3a 53 43 25 3d 30  3a 43 25 3d 30 3a 4d 58  |40:SC%=0:C%=0:MX|
00000270  25 3d 36 30 38 3a 4d 59  25 3d 33 32 3a 46 4c 25  |%=608:MY%=32:FL%|
00000280  3d 30 3a 45 25 3d 32 3a  da 0d 00 b4 2d e3 53 25  |=0:E%=2:....-.S%|
00000290  3d 31 b8 34 30 3a ef 31  38 2c 30 2c 32 2c 32 35  |=1.40:.18,0,2,25|
000002a0  2c 36 39 2c b3 28 31 32  37 39 29 3b b3 28 31 30  |,69,.(1279);.(10|
000002b0  32 33 29 3b 3a ed 0d 00  be 11 f1 8a 30 2c 31 29  |23);:.......0,1)|
000002c0  22 53 43 4f 52 45 22 0d  00 c8 09 f2 43 49 54 59  |"SCORE".....CITY|
000002d0  0d 00 d2 36 e3 5a 3d 30  b8 af 88 af 2f 35 30 3a  |...6.Z=0..../50:|
000002e0  ef 32 35 2c 36 39 2c 36  34 30 2b 28 35 31 32 2a  |.25,69,640+(512*|
000002f0  9b 28 5a 29 29 3b 36 30  2b 28 35 31 32 2a b5 28  |.(Z));60+(512*.(|
00000300  5a 29 29 3b 3a ed 0d 00  dc 7c ef 32 35 2c 34 2c  |Z));:....|.25,4,|
00000310  39 36 30 3b 38 39 36 3b  32 35 2c 34 2c 38 30 30  |960;896;25,4,800|
00000320  3b 31 30 31 30 3b 32 35  2c 38 35 2c 36 34 30 3b  |;1010;25,85,640;|
00000330  37 36 38 3b 32 35 2c 38  35 2c 34 38 30 3b 31 30  |768;25,85,480;10|
00000340  31 30 3b 32 35 2c 38 35  2c 33 32 30 3b 38 39 36  |10;25,85,320;896|
00000350  3b 31 38 2c 30 2c 30 2c  32 35 2c 34 2c 34 38 30  |;18,0,0,25,4,480|
00000360  3b 31 30 30 36 3b 32 35  2c 34 2c 38 30 30 3b 31  |;1006;25,4,800;1|
00000370  30 30 36 3b 32 35 2c 38  35 2c 36 34 30 3b 38 39  |006;25,85,640;89|
00000380  30 3b 0d 00 e6 11 e7 48  25 3c 33 35 32 48 25 3d  |0;.....H%<352H%=|
00000390  33 35 32 0d 00 f0 25 e3  49 25 3d 31 30 b8 31 39  |352...%.I%=10.19|
000003a0  3a 58 25 28 49 25 29 3d  36 34 30 3a 59 25 28 49  |:X%(I%)=640:Y%(I|
000003b0  25 29 3d 39 39 32 3a ed  0d 00 fa 92 e3 49 25 3d  |%)=992:......I%=|
000003c0  30 b8 39 3a 58 25 28 49  25 29 3d 49 25 2a 31 32  |0.9:X%(I%)=I%*12|
000003d0  38 3a 59 25 28 49 25 29  3d 48 25 3a d4 30 2c 2d  |8:Y%(I%)=H%:.0,-|
000003e0  31 35 2c 34 2c 31 3a ef  31 38 2c 33 2c 31 2c 32  |15,4,1:.18,3,1,2|
000003f0  35 2c 34 2c 36 34 30 3b  38 39 30 3b 32 35 2c 35  |5,4,640;890;25,5|
00000400  2c 58 25 28 49 25 29 3b  59 25 28 49 25 29 3b 32  |,X%(I%);Y%(I%);2|
00000410  32 35 2c 32 35 2c 34 2c  36 34 30 3b 38 39 30 3b  |25,25,4,640;890;|
00000420  32 35 2c 35 2c 58 25 28  49 25 29 3b 59 25 28 49  |25,5,X%(I%);Y%(I|
00000430  25 29 3b 3a 44 45 4c 41  59 3d 91 2b 32 30 3a f5  |%);:DELAY=.+20:.|
00000440  fd 91 3e 44 45 4c 41 59  3a ed 0d 01 04 05 f5 0d  |..>DELAY:.......|
00000450  01 0e 09 f2 42 41 53 45  0d 01 18 08 f2 49 4e 56  |....BASE.....INV|
00000460  0d 01 22 09 f2 42 41 53  45 0d 01 2c 15 ef 34 3a  |.."..BASE..,..4:|
00000470  f1 8a 31 34 2c 31 29 3b  53 43 25 3a ef 35 0d 01  |..14,1);SC%:.5..|
00000480  36 0f fd 45 25 3d 31 84  43 25 3d 32 30 0d 01 40  |6..E%=1.C%=20..@|
00000490  1d e7 43 25 3d 32 30 43  25 3d 30 3a 48 25 3d 48  |..C%=20C%=0:H%=H|
000004a0  25 2d 36 34 3a e5 8d 64  66 40 0d 01 4a 2f ef 34  |%-64:..df@..J/.4|
000004b0  3a f1 8a 33 2c 38 29 22  50 52 45 53 53 20 53 50  |:..3,8)"PRESS SP|
000004c0  41 43 45 20 42 41 52 22  27 22 20 20 20 20 20 20  |ACE BAR"'"      |
000004d0  54 4f 20 53 54 41 52 54  22 0d 01 54 1b f1 8a 33  |TO START"..T...3|
000004e0  2c 31 32 29 22 4f 52 20  46 20 54 4f 20 46 49 4e  |,12)"OR F TO FIN|
000004f0  49 53 48 22 0d 01 5e 1c  ee a7 22 20 46 22 2c be  |ISH"..^..." F",.|
00000500  29 e5 8d 74 6a 40 2c 8d  44 68 41 8b 8d 44 5e 41  |)..tj@,.DhA..D^A|
00000510  0d 01 68 1a eb 36 3a f1  8a 31 36 2c 31 36 29 22  |..h..6:..16,16)"|
00000520  47 4f 4f 44 42 59 45 22  3a e0 0d 01 72 0a dd f2  |GOODBYE":...r...|
00000530  43 49 54 59 0d 01 7c 4c  ef 32 35 2c 34 2c 31 32  |CITY..|L.25,4,12|
00000540  38 3b 36 30 3b 32 35 2c  35 2c 31 31 35 32 3b 36  |8;60;25,5,1152;6|
00000550  30 3b 32 35 2c 34 2c 36  30 30 3b 36 30 3b 32 35  |0;25,4,600;60;25|
00000560  2c 35 2c 36 30 30 3b 30  3b 32 35 2c 34 2c 36 38  |,5,600;0;25,4,68|
00000570  30 3b 36 30 3b 32 35 2c  35 2c 36 38 30 3b 30 3b  |0;60;25,5,680;0;|
00000580  0d 01 86 3a e3 42 25 3d  33 b8 31 36 3a f3 54 25  |...:.B%=3.16:.T%|
00000590  3a e3 48 54 25 3d 31 b8  54 25 3a ef 35 2c 32 35  |:.HT%=1.T%:.5,25|
000005a0  2c 34 2c 42 25 2a 36 34  3b 36 34 2b 48 54 25 2a  |,4,B%*64;64+HT%*|
000005b0  33 32 3b 32 32 34 3a ed  3a ed 0d 01 90 05 f7 0d  |32;224:.:.......|
000005c0  01 9a 05 e1 0d 01 a4 20  dc 31 2c 32 2c 33 2c 31  |....... .1,2,3,1|
000005d0  2c 34 2c 32 2c 33 2c 36  2c 35 2c 32 2c 31 2c 33  |,4,2,3,6,5,2,1,3|
000005e0  2c 32 2c 31 0d 01 ae 09  dd f2 49 4e 56 0d 01 b8  |,2,1......INV...|
000005f0  18 52 25 3d b3 28 32 30  29 2d 31 3a 4d 25 3d b3  |.R%=.(20)-1:M%=.|
00000600  28 33 29 2d 32 0d 01 c2  16 e7 52 25 3e 39 41 25  |(3)-2.....R%>9A%|
00000610  3d 32 32 36 8b 41 25 3d  32 32 35 0d 01 cc 21 ef  |=226.A%=225...!.|
00000620  31 38 2c 32 2c 32 2c 32  35 2c 34 2c 58 25 28 52  |18,2,2,25,4,X%(R|
00000630  25 29 3b 59 25 28 52 25  29 3b 41 25 0d 01 d6 17  |%);Y%(R%);A%....|
00000640  58 25 28 52 25 29 3d 58  25 28 52 25 29 2b 4d 25  |X%(R%)=X%(R%)+M%|
00000650  2a 36 34 0d 01 e0 14 59  25 28 52 25 29 3d 59 25  |*64....Y%(R%)=Y%|
00000660  28 52 25 29 2d 33 32 0d  01 ea 1b e7 58 25 28 52  |(R%)-32.....X%(R|
00000670  25 29 3e 31 32 31 36 58  25 28 52 25 29 3d 31 32  |%)>1216X%(R%)=12|
00000680  31 36 0d 01 f4 15 e7 58  25 28 52 25 29 3c 30 58  |16.....X%(R%)<0X|
00000690  25 28 52 25 29 3d 30 0d  01 fe 15 e7 59 25 28 52  |%(R%)=0.....Y%(R|
000006a0  25 29 3d 33 32 43 25 3d  43 25 2b 31 0d 02 08 0f  |%)=32C%=C%+1....|
000006b0  d4 31 2c 2d 31 30 2c 35  30 2c 31 0d 02 12 21 ef  |.1,-10,50,1...!.|
000006c0  31 38 2c 31 2c 31 2c 32  35 2c 34 2c 58 25 28 52  |18,1,1,25,4,X%(R|
000006d0  25 29 3b 59 25 28 52 25  29 3b 41 25 0d 02 1c 32  |%);Y%(R%);A%...2|
000006e0  e7 b0 58 25 28 52 25 29  2b 31 36 2c 59 25 28 52  |..X%(R%)+16,Y%(R|
000006f0  25 29 2d 33 36 29 3d 32  80 59 25 28 52 25 29 3c  |%)-36)=2.Y%(R%)<|
00000700  33 32 30 8c 45 25 3d 31  3a f2 43 49 54 59 0d 02  |320.E%=1:.CITY..|
00000710  26 05 e1 0d 02 30 0a dd  f2 42 41 53 45 0d 02 3a  |&....0...BASE..:|
00000720  1b ef 31 38 2c 32 2c 32  2c 32 35 2c 34 2c 4d 58  |..18,2,2,25,4,MX|
00000730  25 3b 4d 59 25 3b 33 33  0d 02 44 0b 2a 46 58 31  |%;MY%;33..D.*FX1|
00000740  35 2c 30 0d 02 4e 1e e7  a6 28 2d 36 37 29 80 4d  |5,0..N...(-67).M|
00000750  58 25 3c 31 32 30 30 4d  58 25 3d 4d 58 25 2b 33  |X%<1200MX%=MX%+3|
00000760  32 0d 02 58 1c e7 a6 28  2d 39 38 29 80 4d 58 25  |2..X...(-98).MX%|
00000770  3e 33 32 4d 58 25 3d 4d  58 25 2d 33 32 0d 02 62  |>32MX%=MX%-32..b|
00000780  15 e7 a6 28 2d 37 34 29  84 46 4c 25 3d 31 f2 4d  |...(-74).FL%=1.M|
00000790  53 4c 0d 02 6c 1b ef 31  38 2c 31 2c 31 2c 32 35  |SL..l..18,1,1,25|
000007a0  2c 34 2c 4d 58 25 3b 4d  59 25 3b 33 33 0d 02 76  |,4,MX%;MY%;33..v|
000007b0  05 e1 0d 02 80 09 dd f2  4d 53 4c 0d 02 8a 14 4d  |........MSL....M|
000007c0  59 25 3d 4d 59 25 2b 33  32 3a 46 4c 25 3d 31 0d  |Y%=MY%+32:FL%=1.|
000007d0  02 94 18 e7 4d 59 25 3e  39 36 30 4d 59 25 3d 33  |....MY%>960MY%=3|
000007e0  32 3a 46 4c 25 3d 30 0d  02 9e 16 50 25 3d b0 4d  |2:FL%=0....P%=.M|
000007f0  58 25 2b 31 36 2c 4d 59  25 2d 31 36 29 0d 02 a8  |X%+16,MY%-16)...|
00000800  12 e7 50 25 3d 31 84 50  25 3d 33 f2 48 49 54 0d  |..P%=1.P%=3.HIT.|
00000810  02 b2 05 e1 0d 02 bc 09  dd f2 48 49 54 0d 02 c6  |..........HIT...|
00000820  0c e3 4a 25 3d 30 b8 31  39 0d 02 d0 21 e7 4d 58  |..J%=0.19...!.MX|
00000830  25 3c 3e 58 25 28 4a 25  29 84 4d 59 25 3c 3e 59  |%<>X%(J%).MY%<>Y|
00000840  25 28 4a 25 29 8c 8d 54  56 43 0d 02 da 16 e7 4a  |%(J%)..TVC.....J|
00000850  25 3e 39 55 25 3d 32 32  36 8b 55 25 3d 32 32 35  |%>9U%=226.U%=225|
00000860  0d 02 e4 1a ef 32 35 2c  34 2c 58 25 28 4a 25 29  |.....25,4,X%(J%)|
00000870  3b 59 25 28 4a 25 29 3b  55 25 0d 02 ee 0e d4 30  |;Y%(J%);U%.....0|
00000880  2c 2d 31 35 2c 32 2c 32  0d 02 f8 1a 53 43 25 3d  |,-15,2,2....SC%=|
00000890  53 43 25 2b 59 25 28 4a  25 29 3a 43 25 3d 43 25  |SC%+Y%(J%):C%=C%|
000008a0  2b 31 0d 03 02 0e 59 25  28 4a 25 29 3d 2d 33 32  |+1....Y%(J%)=-32|
000008b0  0d 03 0c 10 4d 59 25 3d  33 32 3a 46 4c 25 3d 30  |....MY%=32:FL%=0|
000008c0  0d 03 16 05 ed 0d 03 20  05 e1 0d ff              |....... ....|
000008cc
GAMES1/SPACECITY.m0
GAMES1/SPACECITY.m1
GAMES1/SPACECITY.m2
GAMES1/SPACECITY.m4
GAMES1/SPACECITY.m5