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:
- AEW website » elbug » elbug_5_25_discs_Elbug-Introductory-Disc_D-EID.ssd » SPACECI
- AEW website » elbug » elbug_tapes_Electron_Introductory_Cassette_ElbugIntroductoryCassette_E.uef » SPACECITY
- AEW website » elbug » elbug_tapes_Electron_Introductory_Disc_ElbugIntroductoryCassette_E.uef » SPACECITY
- Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF » GAMES1/SPACECITY
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