Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape31a_acorn_eu_1992_january.wav » Arena3

Arena3

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 tapes » Electron_User » Electron_User_tape31a_acorn_eu_1992_january.wav
Filename: Arena3
Read OK: ✔
File size: 1229 bytes
Load address: FFFF1900
Exec address: FFFF8023
Duplicates

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

File contents
   10REM The Arena
   20REM
   30REM By Rob Walmsley
   40REM
   50REM (c) 8-6-90.
   60
   70MODE2:VDU23;8202;0;0;0;
   80HIMEM=&2E00
   90PROCInit
  100PROCInitScreen
  110REPEAT
  120PROCInitGame
  130REPEAT
  140PROCInitLife
  150SOUND1,3,200,10
  160REPEAT
  170TIME=0
  180l=?&1101
  190*FX19
  200IF?&126E PROCEnter ELSECALLA%
  210CALLB%
  220IFEven% CALLD% ELSECALLC%
  230CALLE%
  240l1=?&1101
  250IFl<>l1 Score%=Score%+(l-l1)*5:PROCStatus
  260IFTIME<4-Even%*3 GOTO260
  270UNTIL ?&1100 OR ?&1101=0
  275IF?&1100 SOUND0,-8,2,13:FORI%=70TO0STEP-5:SOUND1,-10,I%,1:NEXT
  280TIME=0:REPEATUNTILTIME>100
  290IF?&1100 PROCDead ELSELevel%=Level%+1:Score%=Score%+500
  300UNTILLive%=0
  310PROCGameOver
  320UNTIL0
  330END
  340
  350DEFPROCInit
  360HiScore%=0
  370!&1245=RND(-TIME)
  380?&1104=4:?&1105=0
  385Q%=&1140
  390ENDPROC
  400
  410DEFPROCGen
  420FORI%=0TO255STEP8:I%?&1147=&FF:NEXT
  430IF NOT Even% GOTO580
  440Num%=16
  450q=Num%+Level%:IFq>31 q=31
  460?&1101=q
  470FORI%=0TO q*8-1 STEP8
  480?(Q%+I%+0)=22+Type
  490?(Q%+I%+1)=RND(75)
  500?(Q%+I%+2)=22+3*RND(52)
  510?(Q%+I%+3)=RND(3)-2
  520?(Q%+I%+4)=(RND(3)-2)*3
  530S=2+RND(4)
  540?(Q%+I%+5)=S
  550?(Q%+I%+6)=S
  560?(Q%+I%+7)=Level%/2
  570NEXT:ENDPROC
  580IFType=1 RESTORE 740 ELSE IFType=3 RESTORE840 ELSE IFType=5 RESTORE 920 ELSEIFType=7 RESTORE 1020 ELSE IFType=9 RESTORE 1120 ELSE IFType=11 RESTORE 1220 ELSE IFType=13 RESTORE 1320
  590READ Num%:?&1101=Num%:BX2=RND(47):BY2=19+3*RND(33)
  600FORI%=0TO 255STEP8
  610IFI%<Num%*8 READ S,X,Y
  620?(Q%+I%+0)=S
  630?(Q%+I%+1)=BX2+X*4
  640?(Q%+I%+2)=BY2+Y*8
  650S=2+RND(4)
  660?(Q%+I%+5)=S
  670?(Q%+I%+6)=S
  680IFI%<Num%*8 ?(Q%+I%+7)=1 ELSE?(Q%+I%+7)=255
  690NEXT
  700?&1241=BX2:?&1242=BY2:?&1243=RND(3)-2:?&1244=(RND(3)-2)*3
  710ENDPROC
  720
  740DATA 29
  750DATA 14,4,0,14,5,0
  760DATA 14,3,1,14,4,1,14,6,1
  770DATA 14,2,2,14,3,2,14,4,2,14,5,2,14,6,2,14,7,2
  780DATA 14,2,3,14,3,3,14,4,3
  790DATA 14,1,4,14,2,4,14,3,4,14,4,4,14,5,4,14,6,4,14,7,4
  800DATA 15,0,5,14,1,5,14,2,5,14,5,5,14,6,5
  810DATA 15,0,6,15,4,6,15,5,6
  820
  840DATA 22
  850DATA 15,2,1,15,3,1,15,4,1,15,5,1
  860DATA 15,1,2,15,2,2,15,3,2,15,4,2,15,5,2,15,6,2
  870DATA 14,2,3,14,5,3
  880DATA 15,1,5,15,2,5,15,3,5,15,4,5,15,5,5,15,6,5
  890DATA 15,2,6,15,3,6,15,4,6,15,5,6
  900
  920DATA 32
  930DATA 16,3,1,16,4,1,16,5,1
  940DATA 20,1,2,16,2,2,16,3,2,20,4,2,16,5,2,16,6,2
  950DATA 16,0,3,16,1,3,16,2,3,16,3,3,16,4,3,16,5,3,16,6,3
  960DATA 16,0,4,16,1,4,20,2,4,16,3,4,16,4,4,20,5,4,16,6,4
  970DATA 16,1,5,16,2,5,16,3,5,16,4,5,16,5,5
  980DATA 16,2,6,20,3,6,16,4,6
  990DATA 16,3,7
 1000
 1020DATA 30
 1030DATA 17,2,0,17,5,0
 1040DATA 17,1,1,17,2,1,19,3,1,19,4,1,17,5,1,17,6,1
 1050DATA 17,0,2,17,1,2,17,2,2,17,5,2,17,6,2,17,7,2
 1060DATA 14,1,3,14,6,3
 1070DATA 17,0,5,17,1,5,17,2,5,17,5,5,17,6,5,17,7,5
 1080DATA 17,1,6,17,2,6,19,3,6,19,4,6,17,5,6,17,6,6
 1090DATA 17,2,7,17,5,7
 1100
 1120DATA 32
 1130DATA 18,2,1,18,3,1,18,4,1,18,5,1
 1140DATA 18,1,2,14,2,2,18,3,2,18,4,2,14,5,2,18,6,2
 1150DATA 18,1,3,18,2,3,16,3,3,16,4,3,18,5,3,18,6,3
 1160DATA 18,1,4,18,6,4
 1170DATA 18,1,5,16,2,5,16,5,5,18,6,5
 1180DATA 18,1,6,18,2,6,18,3,6,18,4,6,18,5,6,18,6,6
 1190DATA 18,1,7,18,3,7,18,4,7,18,6,7
 1200
 1220DATA 30
 1230DATA 19,2,1,19,3,1,19,4,1
 1240DATA 19,1,2,19,5,2
 1250DATA 19,1,3,19,6,3
 1260DATA 19,0,4,19,1,4,19,2,4,19,3,4,19,4,4,19,5,4,19,5,4,19,6,4,19,7,4
 1270DATA 14,0,5,16,7,5
 1280DATA 19,0,6,20,1,6,20,2,6,19,3,6,19,4,6,20,5,6,20,6,6,19,7,6
 1290DATA 20,1,7,20,2,7,20,5,7,20,6,7
 1300
 1320DATA 30
 1330DATA 18,3,0,18,4,0,18,5,0
 1340DATA 18,3,1,18,4,1,18,5,1
 1350DATA 14,0,2,18,4,2
 1360DATA 14,0,3,20,2,3,20,3,3,20,4,3,20,5,3,20,6,3
 1370DATA 14,0,4,16,1,4,20,3,4,20,4,4,20,5,4,16,7,4
 1380DATA 14,0,5,20,3,5,20,5,5
 1390DATA 14,0,6,20,2,6,20,3,6,20,5,6
 1400DATA 14,0,7,20,5,7,20,6,7
 1410
 1420DEFPROCWindow(Y,H,C)
 1430VDU24,0;Y;1272;H;
 1440GCOL0,128+C
 1450CLG
 1460VDU24,16;Y+12;1256;H-12;
 1470GCOL0,128
 1480CLG
 1490VDU26
 1500ENDPROC
 1510
 1520DEFPROCInitScreen
 1530LOCAL A%:COLOUR128:COLOUR3
 1540PROCWindow(0,252,1)
 1550GCOL0,3:VDU5:MOVE 96,1020:PRINT"Arena":MOVE 128,984:PRINT"6502":MOVE 856,1020:PRINT"Arena":MOVE 888,984:PRINT"6502":VDU4
 1560PRINTTAB(3,25);"Lives"
 1570PRINTTAB(12,25);"Score"
 1580PRINTTAB(12,28);"Level"
 1590A%=12:X%=4:Y%=223:CALL&2E00
 1600A%=13:X%=4:Y%=239:CALL&2E00
 1610ENDPROC
 1620
 1630DEFPROCStatusDead
 1640LOCAL A%:COLOUR128:COLOUR7
 1650PRINTTAB(2,30);SPC(8)
 1660PRINTTAB(2,28);SPC(8)
 1670MOVE 480,184:GCOL0,128:VDU5,127,127,127,127,4
 1680A%=0:X%=15:Y%=209
 1690FORI%=1 TOLive%
 1700CALL&2E00:X%=X%+5
 1710NEXT
 1720ENDPROC
 1730
 1740DEFPROCStatus
 1750COLOUR128:COLOUR7
 1760PRINTTAB(12,26);RIGHT$("00000"+STR$Score%,5)
 1770PRINTTAB(13,29);RIGHT$("000"+STR$Level%,3)
 1780ENDPROC
 1790
 1800DEFPROCInitGame
 1810Live%=3:Score%=0
 1820Level%=1
 1830PROCStatusDead
 1840?&110A=FALSE:?&110D=FALSE
 1850ENDPROC
 1860
 1870DEFPROCInitLife
 1880Type=(Level%-1) MOD 14
 1890?&1100=FALSE
 1900?&1106=FALSE:?&1107=FALSE
 1910Even%=((Type AND1)=0)
 1920GCOL0,2:FORX%=0TO15STEP8:MOVE512+X%,948:DRAW512+X%,1024:MOVE760-X%,948:DRAW760-X%,1024:NEXT
 1930PROCWindow(268,948,2)
 1940GCOL0,0
 1950FORY%=0TO11STEP4:MOVE528,948-Y%:DRAW744,948-Y%:NEXT
 1960PROCGen
 1970?&126F=0:?&126E=TRUE
 1980?&1102=38:?&1103=1
 1990?&1108=TRUE
 2000?&1109=0
 2010?&110B=-3:?&110C=0
 2020IF?&110D<7 ?&110E=RND(250)
 2030IF?&110A<7 ?&110F=RND(250)
 2040FORI%=0TO34:I%?&1249=0:NEXT
 2050PROCStatus
 2060ENDPROC
 2070
 2080DEFPROCDead
 2130?&110A=0:?&110D=0
 2140Live%=Live%-1
 2150PROCStatusDead
 2160ENDPROC
 2170
 2180DEFPROCEnter
 2190IFINKEY-99 ?&126F=255
 2200IF?&1103>19 ?&126E=FALSE:?&126F=0:GCOL0,2:FORY%=0TO11STEP4:MOVE528,948-Y%:DRAW744,948-Y%:NEXT
 2210ENDPROC
 2220
 2230DEFPROCGameOver
 2240PROCStatusDead
 2250IFScore%>HiScore% HiScore%=Score%
 2260COLOUR5
 2270PRINTTAB(5,12);"High Score"
 2280COLOUR6
 2290PRINTTAB(7,14);RIGHT$("000000"+STR$HiScore%,6)
 2300COLOUR8
 2310PRINTTAB(1,22);"Hit Space  to play"
 2320*FX15
 2330REPEATUNTILGET=32
 2340ENDPROC


� The Arena
�
� By Rob Walmsley
(�
2� (c) 8-6-90.
<
F�2:�23;8202;0;0;0;
P�=&2E00
Z	�Init
d�InitScreen
n�
x
�InitGame
��
�
�InitLife
��1,3,200,10
��
��=0
�l=?&1101
�	*FX19
��?&126E �Enter ��A%
��B%
��Even% �D% ��C%
��E%
�
l1=?&1101
�)�l<>l1 Score%=Score%+(l-l1)*5:�Status
�<4-Even%*3 �TDA
� ?&1100 � ?&1101=0
0�?&1100 �0,-8,2,13:�I%=70�0�-5:�1,-10,I%,1:�
�=0:���>100
"4�?&1100 �Dead �Level%=Level%+1:Score%=Score%+500
,�Live%=0
6
�GameOver
@�0
J�
T
^
��Init
hHiScore%=0
r!&1245=�(-�)
|?&1104=4:?&1105=0
�Q%=&1140
��
�
�	��Gen
��I%=0�255�8:I%?&1147=&FF:�
�� � Even% �DDB
�Num%=16
�q=Num%+Level%:�q>31 q=31
�?&1101=q
��I%=0� q*8-1 �8
�?(Q%+I%+0)=22+Type
�?(Q%+I%+1)=�(75)
�?(Q%+I%+2)=22+3*�(52)
�?(Q%+I%+3)=�(3)-2
?(Q%+I%+4)=(�(3)-2)*3
S=2+�(4)
?(Q%+I%+5)=S
&?(Q%+I%+6)=S
0?(Q%+I%+7)=Level%/2
:�:�
Dx�Type=1 � �ddB � �Type=3 ��DHC � �Type=5 � �tXC ��Type=7 � �d|C � �Type=9 � �D`D � �Type=11 � �dDD � �Type=13 � �ThE
N/� Num%:?&1101=Num%:BX2=�(47):BY2=19+3*�(33)
X�I%=0� 255�8
b�I%<Num%*8 � S,X,Y
l?(Q%+I%+0)=S
v?(Q%+I%+1)=BX2+X*4
�?(Q%+I%+2)=BY2+Y*8
�S=2+�(4)
�?(Q%+I%+5)=S
�?(Q%+I%+6)=S
�+�I%<Num%*8 ?(Q%+I%+7)=1 �?(Q%+I%+7)=255
��
�9?&1241=BX2:?&1242=BY2:?&1243=�(3)-2:?&1244=(�(3)-2)*3
��
�
�� 29
�� 14,4,0,14,5,0
�� 14,3,1,14,4,1,14,6,1
/� 14,2,2,14,3,2,14,4,2,14,5,2,14,6,2,14,7,2
� 14,2,3,14,3,3,14,4,3
6� 14,1,4,14,2,4,14,3,4,14,4,4,14,5,4,14,6,4,14,7,4
 (� 15,0,5,14,1,5,14,2,5,14,5,5,14,6,5
*� 15,0,6,15,4,6,15,5,6
4
H� 22
R!� 15,2,1,15,3,1,15,4,1,15,5,1
\/� 15,1,2,15,2,2,15,3,2,15,4,2,15,5,2,15,6,2
f� 14,2,3,14,5,3
p/� 15,1,5,15,2,5,15,3,5,15,4,5,15,5,5,15,6,5
z!� 15,2,6,15,3,6,15,4,6,15,5,6
�
�� 32
�� 16,3,1,16,4,1,16,5,1
�/� 20,1,2,16,2,2,16,3,2,20,4,2,16,5,2,16,6,2
�6� 16,0,3,16,1,3,16,2,3,16,3,3,16,4,3,16,5,3,16,6,3
�6� 16,0,4,16,1,4,20,2,4,16,3,4,16,4,4,20,5,4,16,6,4
�(� 16,1,5,16,2,5,16,3,5,16,4,5,16,5,5
�� 16,2,6,20,3,6,16,4,6
�� 16,3,7
�
�� 30
� 17,2,0,17,5,0
/� 17,1,1,17,2,1,19,3,1,19,4,1,17,5,1,17,6,1
/� 17,0,2,17,1,2,17,2,2,17,5,2,17,6,2,17,7,2
$� 14,1,3,14,6,3
./� 17,0,5,17,1,5,17,2,5,17,5,5,17,6,5,17,7,5
8/� 17,1,6,17,2,6,19,3,6,19,4,6,17,5,6,17,6,6
B� 17,2,7,17,5,7
L
`� 32
j!� 18,2,1,18,3,1,18,4,1,18,5,1
t/� 18,1,2,14,2,2,18,3,2,18,4,2,14,5,2,18,6,2
~/� 18,1,3,18,2,3,16,3,3,16,4,3,18,5,3,18,6,3
�� 18,1,4,18,6,4
�!� 18,1,5,16,2,5,16,5,5,18,6,5
�/� 18,1,6,18,2,6,18,3,6,18,4,6,18,5,6,18,6,6
�!� 18,1,7,18,3,7,18,4,7,18,6,7
�
�� 30
�� 19,2,1,19,3,1,19,4,1
�� 19,1,2,19,5,2
�� 19,1,3,19,6,3
�D� 19,0,4,19,1,4,19,2,4,19,3,4,19,4,4,19,5,4,19,5,4,19,6,4,19,7,4
�� 14,0,5,16,7,5
=� 19,0,6,20,1,6,20,2,6,19,3,6,19,4,6,20,5,6,20,6,6,19,7,6

!� 20,1,7,20,2,7,20,5,7,20,6,7

(� 30
2� 18,3,0,18,4,0,18,5,0
<� 18,3,1,18,4,1,18,5,1
F� 14,0,2,18,4,2
P/� 14,0,3,20,2,3,20,3,3,20,4,3,20,5,3,20,6,3
Z/� 14,0,4,16,1,4,20,3,4,20,4,4,20,5,4,16,7,4
d� 14,0,5,20,3,5,20,5,5
n!� 14,0,6,20,2,6,20,3,6,20,5,6
x� 14,0,7,20,5,7,20,6,7
�
���Window(Y,H,C)
��24,0;Y;1272;H;
��0,128+C
��
��24,16;Y+12;1256;H-12;
�
�0,128
��
��26
��
�
���InitScreen
�� A%:�128:�3
�Window(0,252,1)
Y�0,3:�5:� 96,1020:�"Arena":� 128,984:�"6502":� 856,1020:�"Arena":� 888,984:�"6502":�4
�3,25);"Lives"
"�12,25);"Score"
,�12,28);"Level"
6A%=12:X%=4:Y%=223:�&2E00
@A%=13:X%=4:Y%=239:�&2E00
J�
T
^��StatusDead
h� A%:�128:�7
r�2,30);�(8)
|�2,28);�(8)
�)� 480,184:�0,128:�5,127,127,127,127,4
�A%=0:X%=15:Y%=209
��I%=1 �Live%
��&2E00:X%=X%+5
��
��
�
���Status
��128:�7
� �12,26);�"00000"+�Score%,5)
��13,29);�"000"+�Level%,3)
��
�
��InitGame
Live%=3:Score%=0
Level%=1
&�StatusDead
0?&110A=�:?&110D=�
:�
D
N��InitLife
XType=(Level%-1) � 14
b?&1100=�
l?&1106=�:?&1107=�
vEven%=((Type �1)=0)
�G�0,2:�X%=0�15�8:�512+X%,948:�512+X%,1024:�760-X%,948:�760-X%,1024:�
��Window(268,948,2)
��0,0
�(�Y%=0�11�4:�528,948-Y%:�744,948-Y%:�
��Gen
�?&126F=0:?&126E=�
�?&1102=38:?&1103=1
�?&1108=�
�?&1109=0
�?&110B=-3:?&110C=0
��?&110D<7 ?&110E=�(250)
��?&110A<7 ?&110F=�(250)
��I%=0�34:I%?&1249=0:�
�Status
�

 
��Dead
R?&110A=0:?&110D=0
\Live%=Live%-1
f�StatusDead
p�
z
���Enter
��-99 ?&126F=255
�J�?&1103>19 ?&126E=�:?&126F=0:�0,2:�Y%=0�11�4:�528,948-Y%:�744,948-Y%:�
��
�
���GameOver
��StatusDead
�$�Score%>HiScore% HiScore%=Score%
��5
��5,12);"High Score"
��6
�"�7,14);�"000000"+�HiScore%,6)
��8
	 �1,22);"Hit Space  to play"
		*FX15
	
���=32
	$�
�
00000000  0d 00 0a 0f f4 20 54 68  65 20 41 72 65 6e 61 0d  |..... The Arena.|
00000010  00 14 05 f4 0d 00 1e 15  f4 20 42 79 20 52 6f 62  |......... By Rob|
00000020  20 57 61 6c 6d 73 6c 65  79 0d 00 28 05 f4 0d 00  | Walmsley..(....|
00000030  32 11 f4 20 28 63 29 20  38 2d 36 2d 39 30 2e 0d  |2.. (c) 8-6-90..|
00000040  00 3c 04 0d 00 46 16 eb  32 3a ef 32 33 3b 38 32  |.<...F..2:.23;82|
00000050  30 32 3b 30 3b 30 3b 30  3b 0d 00 50 0b d3 3d 26  |02;0;0;0;..P..=&|
00000060  32 45 30 30 0d 00 5a 09  f2 49 6e 69 74 0d 00 64  |2E00..Z..Init..d|
00000070  0f f2 49 6e 69 74 53 63  72 65 65 6e 0d 00 6e 05  |..InitScreen..n.|
00000080  f5 0d 00 78 0d f2 49 6e  69 74 47 61 6d 65 0d 00  |...x..InitGame..|
00000090  82 05 f5 0d 00 8c 0d f2  49 6e 69 74 4c 69 66 65  |........InitLife|
000000a0  0d 00 96 0f d4 31 2c 33  2c 32 30 30 2c 31 30 0d  |.....1,3,200,10.|
000000b0  00 a0 05 f5 0d 00 aa 07  d1 3d 30 0d 00 b4 0c 6c  |.........=0....l|
000000c0  3d 3f 26 31 31 30 31 0d  00 be 09 2a 46 58 31 39  |=?&1101....*FX19|
000000d0  0d 00 c8 17 e7 3f 26 31  32 36 45 20 f2 45 6e 74  |.....?&126E .Ent|
000000e0  65 72 20 8b d6 41 25 0d  00 d2 07 d6 42 25 0d 00  |er ..A%.....B%..|
000000f0  dc 13 e7 45 76 65 6e 25  20 d6 44 25 20 8b d6 43  |...Even% .D% ..C|
00000100  25 0d 00 e6 07 d6 45 25  0d 00 f0 0d 6c 31 3d 3f  |%.....E%....l1=?|
00000110  26 31 31 30 31 0d 00 fa  29 e7 6c 3c 3e 6c 31 20  |&1101...).l<>l1 |
00000120  53 63 6f 72 65 25 3d 53  63 6f 72 65 25 2b 28 6c  |Score%=Score%+(l|
00000130  2d 6c 31 29 2a 35 3a f2  53 74 61 74 75 73 0d 01  |-l1)*5:.Status..|
00000140  04 16 e7 91 3c 34 2d 45  76 65 6e 25 2a 33 20 e5  |....<4-Even%*3 .|
00000150  8d 54 44 41 0d 01 0e 17  fd 20 3f 26 31 31 30 30  |.TDA..... ?&1100|
00000160  20 84 20 3f 26 31 31 30  31 3d 30 0d 01 13 30 e7  | . ?&1101=0...0.|
00000170  3f 26 31 31 30 30 20 d4  30 2c 2d 38 2c 32 2c 31  |?&1100 .0,-8,2,1|
00000180  33 3a e3 49 25 3d 37 30  b8 30 88 2d 35 3a d4 31  |3:.I%=70.0.-5:.1|
00000190  2c 2d 31 30 2c 49 25 2c  31 3a ed 0d 01 18 0f d1  |,-10,I%,1:......|
000001a0  3d 30 3a f5 fd 91 3e 31  30 30 0d 01 22 34 e7 3f  |=0:...>100.."4.?|
000001b0  26 31 31 30 30 20 f2 44  65 61 64 20 8b 4c 65 76  |&1100 .Dead .Lev|
000001c0  65 6c 25 3d 4c 65 76 65  6c 25 2b 31 3a 53 63 6f  |el%=Level%+1:Sco|
000001d0  72 65 25 3d 53 63 6f 72  65 25 2b 35 30 30 0d 01  |re%=Score%+500..|
000001e0  2c 0c fd 4c 69 76 65 25  3d 30 0d 01 36 0d f2 47  |,..Live%=0..6..G|
000001f0  61 6d 65 4f 76 65 72 0d  01 40 06 fd 30 0d 01 4a  |ameOver..@..0..J|
00000200  05 e0 0d 01 54 04 0d 01  5e 0a dd f2 49 6e 69 74  |....T...^...Init|
00000210  0d 01 68 0e 48 69 53 63  6f 72 65 25 3d 30 0d 01  |..h.HiScore%=0..|
00000220  72 10 21 26 31 32 34 35  3d b3 28 2d 91 29 0d 01  |r.!&1245=.(-.)..|
00000230  7c 15 3f 26 31 31 30 34  3d 34 3a 3f 26 31 31 30  ||.?&1104=4:?&110|
00000240  35 3d 30 0d 01 81 0c 51  25 3d 26 31 31 34 30 0d  |5=0....Q%=&1140.|
00000250  01 86 05 e1 0d 01 90 04  0d 01 9a 09 dd f2 47 65  |..............Ge|
00000260  6e 0d 01 a4 1e e3 49 25  3d 30 b8 32 35 35 88 38  |n.....I%=0.255.8|
00000270  3a 49 25 3f 26 31 31 34  37 3d 26 46 46 3a ed 0d  |:I%?&1147=&FF:..|
00000280  01 ae 13 e7 20 ac 20 45  76 65 6e 25 20 e5 8d 44  |.... . Even% ..D|
00000290  44 42 0d 01 b8 0b 4e 75  6d 25 3d 31 36 0d 01 c2  |DB....Num%=16...|
000002a0  1c 71 3d 4e 75 6d 25 2b  4c 65 76 65 6c 25 3a e7  |.q=Num%+Level%:.|
000002b0  71 3e 33 31 20 71 3d 33  31 0d 01 cc 0c 3f 26 31  |q>31 q=31....?&1|
000002c0  31 30 31 3d 71 0d 01 d6  13 e3 49 25 3d 30 b8 20  |101=q.....I%=0. |
000002d0  71 2a 38 2d 31 20 88 38  0d 01 e0 16 3f 28 51 25  |q*8-1 .8....?(Q%|
000002e0  2b 49 25 2b 30 29 3d 32  32 2b 54 79 70 65 0d 01  |+I%+0)=22+Type..|
000002f0  ea 14 3f 28 51 25 2b 49  25 2b 31 29 3d b3 28 37  |..?(Q%+I%+1)=.(7|
00000300  35 29 0d 01 f4 19 3f 28  51 25 2b 49 25 2b 32 29  |5)....?(Q%+I%+2)|
00000310  3d 32 32 2b 33 2a b3 28  35 32 29 0d 01 fe 15 3f  |=22+3*.(52)....?|
00000320  28 51 25 2b 49 25 2b 33  29 3d b3 28 33 29 2d 32  |(Q%+I%+3)=.(3)-2|
00000330  0d 02 08 19 3f 28 51 25  2b 49 25 2b 34 29 3d 28  |....?(Q%+I%+4)=(|
00000340  b3 28 33 29 2d 32 29 2a  33 0d 02 12 0c 53 3d 32  |.(3)-2)*3....S=2|
00000350  2b b3 28 34 29 0d 02 1c  10 3f 28 51 25 2b 49 25  |+.(4)....?(Q%+I%|
00000360  2b 35 29 3d 53 0d 02 26  10 3f 28 51 25 2b 49 25  |+5)=S..&.?(Q%+I%|
00000370  2b 36 29 3d 53 0d 02 30  17 3f 28 51 25 2b 49 25  |+6)=S..0.?(Q%+I%|
00000380  2b 37 29 3d 4c 65 76 65  6c 25 2f 32 0d 02 3a 07  |+7)=Level%/2..:.|
00000390  ed 3a e1 0d 02 44 78 e7  54 79 70 65 3d 31 20 f7  |.:...Dx.Type=1 .|
000003a0  20 8d 64 64 42 20 8b 20  e7 54 79 70 65 3d 33 20  | .ddB . .Type=3 |
000003b0  f7 8d 44 48 43 20 8b 20  e7 54 79 70 65 3d 35 20  |..DHC . .Type=5 |
000003c0  f7 20 8d 74 58 43 20 8b  e7 54 79 70 65 3d 37 20  |. .tXC ..Type=7 |
000003d0  f7 20 8d 64 7c 43 20 8b  20 e7 54 79 70 65 3d 39  |. .d|C . .Type=9|
000003e0  20 f7 20 8d 44 60 44 20  8b 20 e7 54 79 70 65 3d  | . .D`D . .Type=|
000003f0  31 31 20 f7 20 8d 64 44  44 20 8b 20 e7 54 79 70  |11 . .dDD . .Typ|
00000400  65 3d 31 33 20 f7 20 8d  54 68 45 0d 02 4e 2f f3  |e=13 . .ThE..N/.|
00000410  20 4e 75 6d 25 3a 3f 26  31 31 30 31 3d 4e 75 6d  | Num%:?&1101=Num|
00000420  25 3a 42 58 32 3d b3 28  34 37 29 3a 42 59 32 3d  |%:BX2=.(47):BY2=|
00000430  31 39 2b 33 2a b3 28 33  33 29 0d 02 58 10 e3 49  |19+3*.(33)..X..I|
00000440  25 3d 30 b8 20 32 35 35  88 38 0d 02 62 16 e7 49  |%=0. 255.8..b..I|
00000450  25 3c 4e 75 6d 25 2a 38  20 f3 20 53 2c 58 2c 59  |%<Num%*8 . S,X,Y|
00000460  0d 02 6c 10 3f 28 51 25  2b 49 25 2b 30 29 3d 53  |..l.?(Q%+I%+0)=S|
00000470  0d 02 76 16 3f 28 51 25  2b 49 25 2b 31 29 3d 42  |..v.?(Q%+I%+1)=B|
00000480  58 32 2b 58 2a 34 0d 02  80 16 3f 28 51 25 2b 49  |X2+X*4....?(Q%+I|
00000490  25 2b 32 29 3d 42 59 32  2b 59 2a 38 0d 02 8a 0c  |%+2)=BY2+Y*8....|
000004a0  53 3d 32 2b b3 28 34 29  0d 02 94 10 3f 28 51 25  |S=2+.(4)....?(Q%|
000004b0  2b 49 25 2b 35 29 3d 53  0d 02 9e 10 3f 28 51 25  |+I%+5)=S....?(Q%|
000004c0  2b 49 25 2b 36 29 3d 53  0d 02 a8 2b e7 49 25 3c  |+I%+6)=S...+.I%<|
000004d0  4e 75 6d 25 2a 38 20 3f  28 51 25 2b 49 25 2b 37  |Num%*8 ?(Q%+I%+7|
000004e0  29 3d 31 20 8b 3f 28 51  25 2b 49 25 2b 37 29 3d  |)=1 .?(Q%+I%+7)=|
000004f0  32 35 35 0d 02 b2 05 ed  0d 02 bc 39 3f 26 31 32  |255........9?&12|
00000500  34 31 3d 42 58 32 3a 3f  26 31 32 34 32 3d 42 59  |41=BX2:?&1242=BY|
00000510  32 3a 3f 26 31 32 34 33  3d b3 28 33 29 2d 32 3a  |2:?&1243=.(3)-2:|
00000520  3f 26 31 32 34 34 3d 28  b3 28 33 29 2d 32 29 2a  |?&1244=(.(3)-2)*|
00000530  33 0d 02 c6 05 e1 0d 02  d0 04 0d 02 e4 08 dc 20  |3.............. |
00000540  32 39 0d 02 ee 13 dc 20  31 34 2c 34 2c 30 2c 31  |29..... 14,4,0,1|
00000550  34 2c 35 2c 30 0d 02 f8  1a dc 20 31 34 2c 33 2c  |4,5,0..... 14,3,|
00000560  31 2c 31 34 2c 34 2c 31  2c 31 34 2c 36 2c 31 0d  |1,14,4,1,14,6,1.|
00000570  03 02 2f dc 20 31 34 2c  32 2c 32 2c 31 34 2c 33  |../. 14,2,2,14,3|
00000580  2c 32 2c 31 34 2c 34 2c  32 2c 31 34 2c 35 2c 32  |,2,14,4,2,14,5,2|
00000590  2c 31 34 2c 36 2c 32 2c  31 34 2c 37 2c 32 0d 03  |,14,6,2,14,7,2..|
000005a0  0c 1a dc 20 31 34 2c 32  2c 33 2c 31 34 2c 33 2c  |... 14,2,3,14,3,|
000005b0  33 2c 31 34 2c 34 2c 33  0d 03 16 36 dc 20 31 34  |3,14,4,3...6. 14|
000005c0  2c 31 2c 34 2c 31 34 2c  32 2c 34 2c 31 34 2c 33  |,1,4,14,2,4,14,3|
000005d0  2c 34 2c 31 34 2c 34 2c  34 2c 31 34 2c 35 2c 34  |,4,14,4,4,14,5,4|
000005e0  2c 31 34 2c 36 2c 34 2c  31 34 2c 37 2c 34 0d 03  |,14,6,4,14,7,4..|
000005f0  20 28 dc 20 31 35 2c 30  2c 35 2c 31 34 2c 31 2c  | (. 15,0,5,14,1,|
00000600  35 2c 31 34 2c 32 2c 35  2c 31 34 2c 35 2c 35 2c  |5,14,2,5,14,5,5,|
00000610  31 34 2c 36 2c 35 0d 03  2a 1a dc 20 31 35 2c 30  |14,6,5..*.. 15,0|
00000620  2c 36 2c 31 35 2c 34 2c  36 2c 31 35 2c 35 2c 36  |,6,15,4,6,15,5,6|
00000630  0d 03 34 04 0d 03 48 08  dc 20 32 32 0d 03 52 21  |..4...H.. 22..R!|
00000640  dc 20 31 35 2c 32 2c 31  2c 31 35 2c 33 2c 31 2c  |. 15,2,1,15,3,1,|
00000650  31 35 2c 34 2c 31 2c 31  35 2c 35 2c 31 0d 03 5c  |15,4,1,15,5,1..\|
00000660  2f dc 20 31 35 2c 31 2c  32 2c 31 35 2c 32 2c 32  |/. 15,1,2,15,2,2|
00000670  2c 31 35 2c 33 2c 32 2c  31 35 2c 34 2c 32 2c 31  |,15,3,2,15,4,2,1|
00000680  35 2c 35 2c 32 2c 31 35  2c 36 2c 32 0d 03 66 13  |5,5,2,15,6,2..f.|
00000690  dc 20 31 34 2c 32 2c 33  2c 31 34 2c 35 2c 33 0d  |. 14,2,3,14,5,3.|
000006a0  03 70 2f dc 20 31 35 2c  31 2c 35 2c 31 35 2c 32  |.p/. 15,1,5,15,2|
000006b0  2c 35 2c 31 35 2c 33 2c  35 2c 31 35 2c 34 2c 35  |,5,15,3,5,15,4,5|
000006c0  2c 31 35 2c 35 2c 35 2c  31 35 2c 36 2c 35 0d 03  |,15,5,5,15,6,5..|
000006d0  7a 21 dc 20 31 35 2c 32  2c 36 2c 31 35 2c 33 2c  |z!. 15,2,6,15,3,|
000006e0  36 2c 31 35 2c 34 2c 36  2c 31 35 2c 35 2c 36 0d  |6,15,4,6,15,5,6.|
000006f0  03 84 04 0d 03 98 08 dc  20 33 32 0d 03 a2 1a dc  |........ 32.....|
00000700  20 31 36 2c 33 2c 31 2c  31 36 2c 34 2c 31 2c 31  | 16,3,1,16,4,1,1|
00000710  36 2c 35 2c 31 0d 03 ac  2f dc 20 32 30 2c 31 2c  |6,5,1.../. 20,1,|
00000720  32 2c 31 36 2c 32 2c 32  2c 31 36 2c 33 2c 32 2c  |2,16,2,2,16,3,2,|
00000730  32 30 2c 34 2c 32 2c 31  36 2c 35 2c 32 2c 31 36  |20,4,2,16,5,2,16|
00000740  2c 36 2c 32 0d 03 b6 36  dc 20 31 36 2c 30 2c 33  |,6,2...6. 16,0,3|
00000750  2c 31 36 2c 31 2c 33 2c  31 36 2c 32 2c 33 2c 31  |,16,1,3,16,2,3,1|
00000760  36 2c 33 2c 33 2c 31 36  2c 34 2c 33 2c 31 36 2c  |6,3,3,16,4,3,16,|
00000770  35 2c 33 2c 31 36 2c 36  2c 33 0d 03 c0 36 dc 20  |5,3,16,6,3...6. |
00000780  31 36 2c 30 2c 34 2c 31  36 2c 31 2c 34 2c 32 30  |16,0,4,16,1,4,20|
00000790  2c 32 2c 34 2c 31 36 2c  33 2c 34 2c 31 36 2c 34  |,2,4,16,3,4,16,4|
000007a0  2c 34 2c 32 30 2c 35 2c  34 2c 31 36 2c 36 2c 34  |,4,20,5,4,16,6,4|
000007b0  0d 03 ca 28 dc 20 31 36  2c 31 2c 35 2c 31 36 2c  |...(. 16,1,5,16,|
000007c0  32 2c 35 2c 31 36 2c 33  2c 35 2c 31 36 2c 34 2c  |2,5,16,3,5,16,4,|
000007d0  35 2c 31 36 2c 35 2c 35  0d 03 d4 1a dc 20 31 36  |5,16,5,5..... 16|
000007e0  2c 32 2c 36 2c 32 30 2c  33 2c 36 2c 31 36 2c 34  |,2,6,20,3,6,16,4|
000007f0  2c 36 0d 03 de 0c dc 20  31 36 2c 33 2c 37 0d 03  |,6..... 16,3,7..|
00000800  e8 04 0d 03 fc 08 dc 20  33 30 0d 04 06 13 dc 20  |....... 30..... |
00000810  31 37 2c 32 2c 30 2c 31  37 2c 35 2c 30 0d 04 10  |17,2,0,17,5,0...|
00000820  2f dc 20 31 37 2c 31 2c  31 2c 31 37 2c 32 2c 31  |/. 17,1,1,17,2,1|
00000830  2c 31 39 2c 33 2c 31 2c  31 39 2c 34 2c 31 2c 31  |,19,3,1,19,4,1,1|
00000840  37 2c 35 2c 31 2c 31 37  2c 36 2c 31 0d 04 1a 2f  |7,5,1,17,6,1.../|
00000850  dc 20 31 37 2c 30 2c 32  2c 31 37 2c 31 2c 32 2c  |. 17,0,2,17,1,2,|
00000860  31 37 2c 32 2c 32 2c 31  37 2c 35 2c 32 2c 31 37  |17,2,2,17,5,2,17|
00000870  2c 36 2c 32 2c 31 37 2c  37 2c 32 0d 04 24 13 dc  |,6,2,17,7,2..$..|
00000880  20 31 34 2c 31 2c 33 2c  31 34 2c 36 2c 33 0d 04  | 14,1,3,14,6,3..|
00000890  2e 2f dc 20 31 37 2c 30  2c 35 2c 31 37 2c 31 2c  |./. 17,0,5,17,1,|
000008a0  35 2c 31 37 2c 32 2c 35  2c 31 37 2c 35 2c 35 2c  |5,17,2,5,17,5,5,|
000008b0  31 37 2c 36 2c 35 2c 31  37 2c 37 2c 35 0d 04 38  |17,6,5,17,7,5..8|
000008c0  2f dc 20 31 37 2c 31 2c  36 2c 31 37 2c 32 2c 36  |/. 17,1,6,17,2,6|
000008d0  2c 31 39 2c 33 2c 36 2c  31 39 2c 34 2c 36 2c 31  |,19,3,6,19,4,6,1|
000008e0  37 2c 35 2c 36 2c 31 37  2c 36 2c 36 0d 04 42 13  |7,5,6,17,6,6..B.|
000008f0  dc 20 31 37 2c 32 2c 37  2c 31 37 2c 35 2c 37 0d  |. 17,2,7,17,5,7.|
00000900  04 4c 04 0d 04 60 08 dc  20 33 32 0d 04 6a 21 dc  |.L...`.. 32..j!.|
00000910  20 31 38 2c 32 2c 31 2c  31 38 2c 33 2c 31 2c 31  | 18,2,1,18,3,1,1|
00000920  38 2c 34 2c 31 2c 31 38  2c 35 2c 31 0d 04 74 2f  |8,4,1,18,5,1..t/|
00000930  dc 20 31 38 2c 31 2c 32  2c 31 34 2c 32 2c 32 2c  |. 18,1,2,14,2,2,|
00000940  31 38 2c 33 2c 32 2c 31  38 2c 34 2c 32 2c 31 34  |18,3,2,18,4,2,14|
00000950  2c 35 2c 32 2c 31 38 2c  36 2c 32 0d 04 7e 2f dc  |,5,2,18,6,2..~/.|
00000960  20 31 38 2c 31 2c 33 2c  31 38 2c 32 2c 33 2c 31  | 18,1,3,18,2,3,1|
00000970  36 2c 33 2c 33 2c 31 36  2c 34 2c 33 2c 31 38 2c  |6,3,3,16,4,3,18,|
00000980  35 2c 33 2c 31 38 2c 36  2c 33 0d 04 88 13 dc 20  |5,3,18,6,3..... |
00000990  31 38 2c 31 2c 34 2c 31  38 2c 36 2c 34 0d 04 92  |18,1,4,18,6,4...|
000009a0  21 dc 20 31 38 2c 31 2c  35 2c 31 36 2c 32 2c 35  |!. 18,1,5,16,2,5|
000009b0  2c 31 36 2c 35 2c 35 2c  31 38 2c 36 2c 35 0d 04  |,16,5,5,18,6,5..|
000009c0  9c 2f dc 20 31 38 2c 31  2c 36 2c 31 38 2c 32 2c  |./. 18,1,6,18,2,|
000009d0  36 2c 31 38 2c 33 2c 36  2c 31 38 2c 34 2c 36 2c  |6,18,3,6,18,4,6,|
000009e0  31 38 2c 35 2c 36 2c 31  38 2c 36 2c 36 0d 04 a6  |18,5,6,18,6,6...|
000009f0  21 dc 20 31 38 2c 31 2c  37 2c 31 38 2c 33 2c 37  |!. 18,1,7,18,3,7|
00000a00  2c 31 38 2c 34 2c 37 2c  31 38 2c 36 2c 37 0d 04  |,18,4,7,18,6,7..|
00000a10  b0 04 0d 04 c4 08 dc 20  33 30 0d 04 ce 1a dc 20  |....... 30..... |
00000a20  31 39 2c 32 2c 31 2c 31  39 2c 33 2c 31 2c 31 39  |19,2,1,19,3,1,19|
00000a30  2c 34 2c 31 0d 04 d8 13  dc 20 31 39 2c 31 2c 32  |,4,1..... 19,1,2|
00000a40  2c 31 39 2c 35 2c 32 0d  04 e2 13 dc 20 31 39 2c  |,19,5,2..... 19,|
00000a50  31 2c 33 2c 31 39 2c 36  2c 33 0d 04 ec 44 dc 20  |1,3,19,6,3...D. |
00000a60  31 39 2c 30 2c 34 2c 31  39 2c 31 2c 34 2c 31 39  |19,0,4,19,1,4,19|
00000a70  2c 32 2c 34 2c 31 39 2c  33 2c 34 2c 31 39 2c 34  |,2,4,19,3,4,19,4|
00000a80  2c 34 2c 31 39 2c 35 2c  34 2c 31 39 2c 35 2c 34  |,4,19,5,4,19,5,4|
00000a90  2c 31 39 2c 36 2c 34 2c  31 39 2c 37 2c 34 0d 04  |,19,6,4,19,7,4..|
00000aa0  f6 13 dc 20 31 34 2c 30  2c 35 2c 31 36 2c 37 2c  |... 14,0,5,16,7,|
00000ab0  35 0d 05 00 3d dc 20 31  39 2c 30 2c 36 2c 32 30  |5...=. 19,0,6,20|
00000ac0  2c 31 2c 36 2c 32 30 2c  32 2c 36 2c 31 39 2c 33  |,1,6,20,2,6,19,3|
00000ad0  2c 36 2c 31 39 2c 34 2c  36 2c 32 30 2c 35 2c 36  |,6,19,4,6,20,5,6|
00000ae0  2c 32 30 2c 36 2c 36 2c  31 39 2c 37 2c 36 0d 05  |,20,6,6,19,7,6..|
00000af0  0a 21 dc 20 32 30 2c 31  2c 37 2c 32 30 2c 32 2c  |.!. 20,1,7,20,2,|
00000b00  37 2c 32 30 2c 35 2c 37  2c 32 30 2c 36 2c 37 0d  |7,20,5,7,20,6,7.|
00000b10  05 14 04 0d 05 28 08 dc  20 33 30 0d 05 32 1a dc  |.....(.. 30..2..|
00000b20  20 31 38 2c 33 2c 30 2c  31 38 2c 34 2c 30 2c 31  | 18,3,0,18,4,0,1|
00000b30  38 2c 35 2c 30 0d 05 3c  1a dc 20 31 38 2c 33 2c  |8,5,0..<.. 18,3,|
00000b40  31 2c 31 38 2c 34 2c 31  2c 31 38 2c 35 2c 31 0d  |1,18,4,1,18,5,1.|
00000b50  05 46 13 dc 20 31 34 2c  30 2c 32 2c 31 38 2c 34  |.F.. 14,0,2,18,4|
00000b60  2c 32 0d 05 50 2f dc 20  31 34 2c 30 2c 33 2c 32  |,2..P/. 14,0,3,2|
00000b70  30 2c 32 2c 33 2c 32 30  2c 33 2c 33 2c 32 30 2c  |0,2,3,20,3,3,20,|
00000b80  34 2c 33 2c 32 30 2c 35  2c 33 2c 32 30 2c 36 2c  |4,3,20,5,3,20,6,|
00000b90  33 0d 05 5a 2f dc 20 31  34 2c 30 2c 34 2c 31 36  |3..Z/. 14,0,4,16|
00000ba0  2c 31 2c 34 2c 32 30 2c  33 2c 34 2c 32 30 2c 34  |,1,4,20,3,4,20,4|
00000bb0  2c 34 2c 32 30 2c 35 2c  34 2c 31 36 2c 37 2c 34  |,4,20,5,4,16,7,4|
00000bc0  0d 05 64 1a dc 20 31 34  2c 30 2c 35 2c 32 30 2c  |..d.. 14,0,5,20,|
00000bd0  33 2c 35 2c 32 30 2c 35  2c 35 0d 05 6e 21 dc 20  |3,5,20,5,5..n!. |
00000be0  31 34 2c 30 2c 36 2c 32  30 2c 32 2c 36 2c 32 30  |14,0,6,20,2,6,20|
00000bf0  2c 33 2c 36 2c 32 30 2c  35 2c 36 0d 05 78 1a dc  |,3,6,20,5,6..x..|
00000c00  20 31 34 2c 30 2c 37 2c  32 30 2c 35 2c 37 2c 32  | 14,0,7,20,5,7,2|
00000c10  30 2c 36 2c 37 0d 05 82  04 0d 05 8c 13 dd f2 57  |0,6,7..........W|
00000c20  69 6e 64 6f 77 28 59 2c  48 2c 43 29 0d 05 96 13  |indow(Y,H,C)....|
00000c30  ef 32 34 2c 30 3b 59 3b  31 32 37 32 3b 48 3b 0d  |.24,0;Y;1272;H;.|
00000c40  05 a0 0c e6 30 2c 31 32  38 2b 43 0d 05 aa 05 da  |....0,128+C.....|
00000c50  0d 05 b4 1a ef 32 34 2c  31 36 3b 59 2b 31 32 3b  |.....24,16;Y+12;|
00000c60  31 32 35 36 3b 48 2d 31  32 3b 0d 05 be 0a e6 30  |1256;H-12;.....0|
00000c70  2c 31 32 38 0d 05 c8 05  da 0d 05 d2 07 ef 32 36  |,128..........26|
00000c80  0d 05 dc 05 e1 0d 05 e6  04 0d 05 f0 10 dd f2 49  |...............I|
00000c90  6e 69 74 53 63 72 65 65  6e 0d 05 fa 10 ea 20 41  |nitScreen..... A|
00000ca0  25 3a fb 31 32 38 3a fb  33 0d 06 04 14 f2 57 69  |%:.128:.3.....Wi|
00000cb0  6e 64 6f 77 28 30 2c 32  35 32 2c 31 29 0d 06 0e  |ndow(0,252,1)...|
00000cc0  59 e6 30 2c 33 3a ef 35  3a ec 20 39 36 2c 31 30  |Y.0,3:.5:. 96,10|
00000cd0  32 30 3a f1 22 41 72 65  6e 61 22 3a ec 20 31 32  |20:."Arena":. 12|
00000ce0  38 2c 39 38 34 3a f1 22  36 35 30 32 22 3a ec 20  |8,984:."6502":. |
00000cf0  38 35 36 2c 31 30 32 30  3a f1 22 41 72 65 6e 61  |856,1020:."Arena|
00000d00  22 3a ec 20 38 38 38 2c  39 38 34 3a f1 22 36 35  |":. 888,984:."65|
00000d10  30 32 22 3a ef 34 0d 06  18 13 f1 8a 33 2c 32 35  |02":.4......3,25|
00000d20  29 3b 22 4c 69 76 65 73  22 0d 06 22 14 f1 8a 31  |);"Lives".."...1|
00000d30  32 2c 32 35 29 3b 22 53  63 6f 72 65 22 0d 06 2c  |2,25);"Score"..,|
00000d40  14 f1 8a 31 32 2c 32 38  29 3b 22 4c 65 76 65 6c  |...12,28);"Level|
00000d50  22 0d 06 36 1c 41 25 3d  31 32 3a 58 25 3d 34 3a  |"..6.A%=12:X%=4:|
00000d60  59 25 3d 32 32 33 3a d6  26 32 45 30 30 0d 06 40  |Y%=223:.&2E00..@|
00000d70  1c 41 25 3d 31 33 3a 58  25 3d 34 3a 59 25 3d 32  |.A%=13:X%=4:Y%=2|
00000d80  33 39 3a d6 26 32 45 30  30 0d 06 4a 05 e1 0d 06  |39:.&2E00..J....|
00000d90  54 04 0d 06 5e 10 dd f2  53 74 61 74 75 73 44 65  |T...^...StatusDe|
00000da0  61 64 0d 06 68 10 ea 20  41 25 3a fb 31 32 38 3a  |ad..h.. A%:.128:|
00000db0  fb 37 0d 06 72 10 f1 8a  32 2c 33 30 29 3b 89 28  |.7..r...2,30);.(|
00000dc0  38 29 0d 06 7c 10 f1 8a  32 2c 32 38 29 3b 89 28  |8)..|...2,28);.(|
00000dd0  38 29 0d 06 86 29 ec 20  34 38 30 2c 31 38 34 3a  |8)...). 480,184:|
00000de0  e6 30 2c 31 32 38 3a ef  35 2c 31 32 37 2c 31 32  |.0,128:.5,127,12|
00000df0  37 2c 31 32 37 2c 31 32  37 2c 34 0d 06 90 15 41  |7,127,127,4....A|
00000e00  25 3d 30 3a 58 25 3d 31  35 3a 59 25 3d 32 30 39  |%=0:X%=15:Y%=209|
00000e10  0d 06 9a 10 e3 49 25 3d  31 20 b8 4c 69 76 65 25  |.....I%=1 .Live%|
00000e20  0d 06 a4 12 d6 26 32 45  30 30 3a 58 25 3d 58 25  |.....&2E00:X%=X%|
00000e30  2b 35 0d 06 ae 05 ed 0d  06 b8 05 e1 0d 06 c2 04  |+5..............|
00000e40  0d 06 cc 0c dd f2 53 74  61 74 75 73 0d 06 d6 0b  |......Status....|
00000e50  fb 31 32 38 3a fb 37 0d  06 e0 20 f1 8a 31 32 2c  |.128:.7... ..12,|
00000e60  32 36 29 3b c2 22 30 30  30 30 30 22 2b c3 53 63  |26);."00000"+.Sc|
00000e70  6f 72 65 25 2c 35 29 0d  06 ea 1e f1 8a 31 33 2c  |ore%,5)......13,|
00000e80  32 39 29 3b c2 22 30 30  30 22 2b c3 4c 65 76 65  |29);."000"+.Leve|
00000e90  6c 25 2c 33 29 0d 06 f4  05 e1 0d 06 fe 04 0d 07  |l%,3)...........|
00000ea0  08 0e dd f2 49 6e 69 74  47 61 6d 65 0d 07 12 14  |....InitGame....|
00000eb0  4c 69 76 65 25 3d 33 3a  53 63 6f 72 65 25 3d 30  |Live%=3:Score%=0|
00000ec0  0d 07 1c 0c 4c 65 76 65  6c 25 3d 31 0d 07 26 0f  |....Level%=1..&.|
00000ed0  f2 53 74 61 74 75 73 44  65 61 64 0d 07 30 15 3f  |.StatusDead..0.?|
00000ee0  26 31 31 30 41 3d a3 3a  3f 26 31 31 30 44 3d a3  |&110A=.:?&110D=.|
00000ef0  0d 07 3a 05 e1 0d 07 44  04 0d 07 4e 0e dd f2 49  |..:....D...N...I|
00000f00  6e 69 74 4c 69 66 65 0d  07 58 18 54 79 70 65 3d  |nitLife..X.Type=|
00000f10  28 4c 65 76 65 6c 25 2d  31 29 20 83 20 31 34 0d  |(Level%-1) . 14.|
00000f20  07 62 0c 3f 26 31 31 30  30 3d a3 0d 07 6c 15 3f  |.b.?&1100=...l.?|
00000f30  26 31 31 30 36 3d a3 3a  3f 26 31 31 30 37 3d a3  |&1106=.:?&1107=.|
00000f40  0d 07 76 17 45 76 65 6e  25 3d 28 28 54 79 70 65  |..v.Even%=((Type|
00000f50  20 80 31 29 3d 30 29 0d  07 80 47 e6 30 2c 32 3a  | .1)=0)...G.0,2:|
00000f60  e3 58 25 3d 30 b8 31 35  88 38 3a ec 35 31 32 2b  |.X%=0.15.8:.512+|
00000f70  58 25 2c 39 34 38 3a df  35 31 32 2b 58 25 2c 31  |X%,948:.512+X%,1|
00000f80  30 32 34 3a ec 37 36 30  2d 58 25 2c 39 34 38 3a  |024:.760-X%,948:|
00000f90  df 37 36 30 2d 58 25 2c  31 30 32 34 3a ed 0d 07  |.760-X%,1024:...|
00000fa0  8a 16 f2 57 69 6e 64 6f  77 28 32 36 38 2c 39 34  |...Window(268,94|
00000fb0  38 2c 32 29 0d 07 94 08  e6 30 2c 30 0d 07 9e 28  |8,2).....0,0...(|
00000fc0  e3 59 25 3d 30 b8 31 31  88 34 3a ec 35 32 38 2c  |.Y%=0.11.4:.528,|
00000fd0  39 34 38 2d 59 25 3a df  37 34 34 2c 39 34 38 2d  |948-Y%:.744,948-|
00000fe0  59 25 3a ed 0d 07 a8 08  f2 47 65 6e 0d 07 b2 15  |Y%:......Gen....|
00000ff0  3f 26 31 32 36 46 3d 30  3a 3f 26 31 32 36 45 3d  |?&126F=0:?&126E=|
00001000  b9 0d 07 bc 16 3f 26 31  31 30 32 3d 33 38 3a 3f  |.....?&1102=38:?|
00001010  26 31 31 30 33 3d 31 0d  07 c6 0c 3f 26 31 31 30  |&1103=1....?&110|
00001020  38 3d b9 0d 07 d0 0c 3f  26 31 31 30 39 3d 30 0d  |8=.....?&1109=0.|
00001030  07 da 16 3f 26 31 31 30  42 3d 2d 33 3a 3f 26 31  |...?&110B=-3:?&1|
00001040  31 30 43 3d 30 0d 07 e4  1b e7 3f 26 31 31 30 44  |10C=0.....?&110D|
00001050  3c 37 20 3f 26 31 31 30  45 3d b3 28 32 35 30 29  |<7 ?&110E=.(250)|
00001060  0d 07 ee 1b e7 3f 26 31  31 30 41 3c 37 20 3f 26  |.....?&110A<7 ?&|
00001070  31 31 30 46 3d b3 28 32  35 30 29 0d 07 f8 19 e3  |110F=.(250).....|
00001080  49 25 3d 30 b8 33 34 3a  49 25 3f 26 31 32 34 39  |I%=0.34:I%?&1249|
00001090  3d 30 3a ed 0d 08 02 0b  f2 53 74 61 74 75 73 0d  |=0:......Status.|
000010a0  08 0c 05 e1 0d 08 16 04  0d 08 20 0a dd f2 44 65  |.......... ...De|
000010b0  61 64 0d 08 52 15 3f 26  31 31 30 41 3d 30 3a 3f  |ad..R.?&110A=0:?|
000010c0  26 31 31 30 44 3d 30 0d  08 5c 11 4c 69 76 65 25  |&110D=0..\.Live%|
000010d0  3d 4c 69 76 65 25 2d 31  0d 08 66 0f f2 53 74 61  |=Live%-1..f..Sta|
000010e0  74 75 73 44 65 61 64 0d  08 70 05 e1 0d 08 7a 04  |tusDead..p....z.|
000010f0  0d 08 84 0b dd f2 45 6e  74 65 72 0d 08 8e 14 e7  |......Enter.....|
00001100  a6 2d 39 39 20 3f 26 31  32 36 46 3d 32 35 35 0d  |.-99 ?&126F=255.|
00001110  08 98 4a e7 3f 26 31 31  30 33 3e 31 39 20 3f 26  |..J.?&1103>19 ?&|
00001120  31 32 36 45 3d a3 3a 3f  26 31 32 36 46 3d 30 3a  |126E=.:?&126F=0:|
00001130  e6 30 2c 32 3a e3 59 25  3d 30 b8 31 31 88 34 3a  |.0,2:.Y%=0.11.4:|
00001140  ec 35 32 38 2c 39 34 38  2d 59 25 3a df 37 34 34  |.528,948-Y%:.744|
00001150  2c 39 34 38 2d 59 25 3a  ed 0d 08 a2 05 e1 0d 08  |,948-Y%:........|
00001160  ac 04 0d 08 b6 0e dd f2  47 61 6d 65 4f 76 65 72  |........GameOver|
00001170  0d 08 c0 0f f2 53 74 61  74 75 73 44 65 61 64 0d  |.....StatusDead.|
00001180  08 ca 24 e7 53 63 6f 72  65 25 3e 48 69 53 63 6f  |..$.Score%>HiSco|
00001190  72 65 25 20 48 69 53 63  6f 72 65 25 3d 53 63 6f  |re% HiScore%=Sco|
000011a0  72 65 25 0d 08 d4 06 fb  35 0d 08 de 18 f1 8a 35  |re%.....5......5|
000011b0  2c 31 32 29 3b 22 48 69  67 68 20 53 63 6f 72 65  |,12);"High Score|
000011c0  22 0d 08 e8 06 fb 36 0d  08 f2 22 f1 8a 37 2c 31  |".....6..."..7,1|
000011d0  34 29 3b c2 22 30 30 30  30 30 30 22 2b c3 48 69  |4);."000000"+.Hi|
000011e0  53 63 6f 72 65 25 2c 36  29 0d 08 fc 06 fb 38 0d  |Score%,6).....8.|
000011f0  09 06 20 f1 8a 31 2c 32  32 29 3b 22 48 69 74 20  |.. ..1,22);"Hit |
00001200  53 70 61 63 65 20 20 74  6f 20 70 6c 61 79 22 0d  |Space  to play".|
00001210  09 10 09 2a 46 58 31 35  0d 09 1a 0a f5 fd a5 3d  |...*FX15.......=|
00001220  33 32 0d 09 24 05 e1 0d  ff                       |32..$....|
00001229
Arena3.m0
Arena3.m1
Arena3.m2
Arena3.m4
Arena3.m5

© Dominic Ford 2021–2024.

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .