� The Gate
� By D.Hopkins
� (c) The Micro User
(��dpJ
24�M$(4,1),S%(19,19),MX%(68),MY%(68),M%(68),l$(26)
d	�init
n	�inst
x2�LEV%=1�13:�LEV%=5 � LEV%=8 � LEV%>9 LI%=LI%+1
��26
�!�fade:�6,22)�(2);�14,22)�(2)
�6�1:�6,22);LI%;�14,22);LEV%;�0,24)"Souls left"�(6)
� �z=0�19:�y=0�19:S%(z,y)=0:�,
�pDEATH%=0:F%=1:F$="":DD%=0:DEM%=�:DX%=0:DY%=0:E%=1280:FI%=�:TT%=1:FD%=1:FX%=0:FY%=0:MN%=68:M%=0:C%=120:DED%=0
��28,0,19,19,0:�:�1
���A=1�18:M%(A)=1:MX%(A)=A:MY%(A)=1:�:�A=19�34:M%(A)=1:MX%(A)=18:MY%(A)=A-17:�:�A=35�52:M%(A)=1:MX%(A)=(-A+53):MY%(A)=18:�:�A=53�68:M%(A)=1:MX%(A)=1:MY%(A)=(-A+70):�
�V�5:�M%=1�68:�26:�MX%(M%)*64,1023-32*MY%(M%):�M$:S%(MX%(M%),MY%(M%))=M%+1:�:M%=1:�4
�z�3:�B=0�8�2:�A=B �19-B:S%(A,B)=1:S%(A,19-B)=1:S%(B,A)=1:S%(19-B,A)=1:�A,B)�255;�B,A)�255;�19-B,A)�255;�A,19-B)�255:�,
�l�A=2�6 �4:S%(19-A,9)=0:S%(19-A,10)=0:S%(A,9)=0:S%(A,10)=0:�19-A,9)" ";�19-A,10)" ";�A,9)" ";�A,10)" ":�
�m�A=4�8 �4:S%(9,19-A)=0:S%(10,19-A)=0:S%(9,A)=0:S%(10,A)=0:�9,19-A);" ";�10,19-A)" ";�9,A)" ";�10,A)" ":�
�7�A=9�10:S%(A,2)=0:�A,2)" ":S%(A,17)=0:�A,17)" ":�
��LEV%>3 �erode

RS%(9,9)=1:S%(10,9)=1:S%(9,10)=1:S%(10,10)=1:�9,9)G$:D%=0:M%=0:X%=9:Y%=8:�P(2)

$DEATH%=LEV%-3:�DEATH%>3 DEATH%=3

��DEATH%>0 M%(8)=-1:S%(MX%(8),MY%(8))=-1:MN%=MN%-1:�DEATH%>1 M%(43)=-1:S%(MX%(43),MY%(43))=-1:MN%=MN%-1:�DEATH%>2 M%(26)=-1:S%(MX%(26),MY%(26))=0:MN%=MN%-1

"l�LEV%>7 DEM%=LEV%-3:S%(MX%(54),MY%(54))=-2:M%(54)=0:MN%=MN%-1:DX%=MX%(54):DY%=MY%(54):�3:�DX%,DY%);�240

,�LEV%<3 �wipesome

6
�raise

@�

J�-74�fi

T�MN%>0 �1:�11,24);MN%;" "

^�LEV%>9 � �(4)=1 �stomp

h�TT%=3 TT%=0 �TT%=TT%+1

rT%=T%+1

|�DED%=4 DED%=1:�DED%=DED%+1

�OX%=X%:OY%=Y%

�E%=E%+10:�E%>1280 E%=1280

��DEATH%>=DED% �death

��DEM%>0 � TT%=0 �dem

�!�T%=100:T%=0:�P(0):D%=0:�P(2)

�L�MN%<1�9,9)"  ";�9,10)"  ";:S%(9,9)=0:S%(10,9)=0:S%(9,10)=0:S%(10,10)=0

��energy

��E%<400 �TRB

�4�-73�S%(X%,Y%-1)<>1:D%=1:�P(0):�F:Y%=Y%-1:�P(2)

�5�-105�S%(X%,Y%+1)<>1:D%=3:�P(0):�F:Y%=Y%+1:�P(2)

�4�-67�S%(X%+1,Y%)<>1:D%=2:�P(0):�F:X%=X%+1:�P(2)

�4�-98�S%(X%-1,Y%)<>1:D%=4:�P(0):�F:X%=X%-1:�P(2)

��spirits
�S%(X%,Y%)>1:E%=0
'�E%<1 � X%<11 � X%>8 � Y%>8 � Y%<11
�E%<1 �dead
&	*FX15
0V�LI%<1 �28,0,19,19,0:�:�2:�5,10)"GAME OVER";�4,13)"PRESS A KEY":A=�:LEV%=13:�DDB
:� E%<1 E%=1280:�tB@
D�
N�LI%<1 LI%=5:�Dx@
X�win
b	�Dx@
l+��P(c%):�c%:�X%,Y%)M$(D%,F%):E%=E%-4:�
v��F
��F%=0 F%=1:�F%=0
�T%=0
��
� ��spirits:M%=M%+1:�M%=69M%=1
��M%(M%)<>1 �
�S%(MX%(M%),MY%(M%))=0
�D�X%>MX%(M%) � S%(MX%(M%)+1,MY%(M%))=0 �OFF:MX%(M%)=MX%(M%)+1:�ON
�D�X%<MX%(M%) � S%(MX%(M%)-1,MY%(M%))=0 �OFF:MX%(M%)=MX%(M%)-1:�ON
�D�Y%>MY%(M%) � S%(MX%(M%),MY%(M%)+1)=0 �OFF:MY%(M%)=MY%(M%)+1:�ON
�D�Y%<MY%(M%) � S%(MX%(M%),MY%(M%)-1)=0 �OFF:MY%(M%)=MY%(M%)-1:�ON
�S%(MX%(M%),MY%(M%))=M%+1
��
�K��MD:M%((S%(FX%,FY%))-1)=0:MN%=MN%-1:�MN%=0 �1:�0,24)"Go to the gate!"
�
�
!��OFF:�MX%(M%),MY%(M%))" ":�
 0��ON:�5:�MX%(M%)*64,1023-MY%(M%)*32:�M$:�4:�
*��fi:FX%=X%:FY%=Y%:H%=0
4
E%=E%-100
>�D%=0�DRC
H
FD%=D%
R"�FD%=1 �FD%=3 F$=�233:�F$=�234
\�1
f�FD%=1 FY%=FY%-1
p�FD%=2 FX%=FX%+1
z�FD%=3 FY%=FY%+1
��FD%=4 FX%=FX%-1
��S%(FX%,FY%)=1 �
�.�S%(FX%,FY%)>1 �MD:S%(FX%,FY%)=0:�1,1,50,2
��FX%,FY%)F$:�2,-15,200,0
�"�:H%=H%+1:�2,-15,200-(H%*10),0
��FD%=1 FY%=FY%-1
��FD%=2 FX%=FX%+1
��FD%=3 FY%=FY%+1
��FD%=4 FX%=FX%-1
�/� S%(FX%,FY%)>1 �MD:S%(FX%,FY%)=0:�1,1,50,2
�!� S%(FX%,FY%)=1 SPLAT=�:�d|C
��FX%,FY%)F$
�
�SPLAT
SPLAT=�
"�:H%=H%-1:�2,-15,200-(H%*10),0
Q� FX%=DX% � FY%=DY% �DEM%>0 DEM%=DEM%-1:�3:�DX%,DY%)�241:�1:�DEM%=0 �demdead
$�FD%=1 FY%=FY%+1
.�FD%=2 FX%=FX%-1
8�FD%=3 FY%=FY%-1
B�FD%=4 FX%=FX%+1
L�FX%,FY%)" "
V�FX%=X% � FY%=Y%:�P(2):�
`��energy
j�0,356:�0,1:�E%,356
t$� E%<400 �0,0:�400,356:�0,-8,6,1
~�0,2:�1280,356:�0,3
��
���erode
��Z=1�((LEV%-3)*5)
�A=�(16)+1:B=�(16)+1
��S%(A,B)<>1 �tfD
�S%(A,B)=0:�A,B)" "
��
��
�
��dead
� �4:�2:�3,10)"YOU ARE DEAD!"
�	Z=-15
�:�A=255�64�-8:Z=Z+.1:�1,Z,A,1:�2,Z,A-32,1:�3,Z,A-64,1:�

LI%=LI%-1

�
��death

Z=DED%
($�Z=1 DD%=8 � �Z=2 DD%=43 �DD%=26
2S%(MX%(DD%),MY%(DD%))=0
<�MX%(DD%),MY%(DD%))" "
F@�X%<MX%(DD%) � S%(MX%(DD%)-1,MY%(DD%))=0 MX%(DD%)=MX%(DD%)-1
P@�X%>MX%(DD%) � S%(MX%(DD%)+1,MY%(DD%))=0 MX%(DD%)=MX%(DD%)+1
Z@�Y%>MY%(DD%) � S%(MX%(DD%),MY%(DD%)+1)=0 MY%(DD%)=MY%(DD%)+1
d@�Y%<MY%(DD%) � S%(MX%(DD%),MY%(DD%)-1)=0 MY%(DD%)=MY%(DD%)-1
n'�MX%(DD%)=X% �MY%(DD%)=Y% E%=E%-100
x�1:�MX%(DD%),MY%(DD%))�239
�S%(MX%(DD%),MY%(DD%))=-1
��
�	��dem
�S%(DX%,DY%)=0
��DX%,DY%)" "
�C�X%<DX% � S%(DX%-1,DY%)<=0 � X%<DX% � S%(DX%-1,DY%)>1 DX%=DX%-1
�B�X%>DX% � S%(DX%+1,DY%)=0 � X%>DX% � S%(DX%+1,DY%)>1 DX%=DX%+1
�B�Y%>DY% � S%(DX%,DY%+1)=0 � Y%>DY% � S%(DX%,DY%+1)>1 DY%=DY%+1
�A�Y%<DY% � S%(DX%,DY%-1)=0 � Y%<DY% �S%(DX%,DY%-1)>1 DY%=DY%-1
�0�S%(DX%,DY%)>1 M%(S%(DX%,DY%)-1)=0:MN%=MN%-1
�-�DX%<11 � DX%>8 � DY%<11 � DY%>9 DEM%=0:�
��3:�DX%,DY%)�240
�S%(DX%,DY%)=-2
� DX%=X% � DY%=Y% E%=0
�

��demdead
"�J%=3�0 �-1
,�0,-12,19+J%,5
6;�J%:�DX%,DY%)�240:�Z=1�300:�:�DX%,DY%)�241:�Z=1�300:�
@�
JS%(DX%,DY%)=0
T�
^��stomp
hz%=�(18):y%=�(18)
r�S%(z%,y%)<>1�
|"�z%>8 � z%<11 � y%>8 � y%<11 �
��2
��t%=1�4
��z%,y%);�242
��0,-15,4,1
��z%,y%);�243
��0,-15,5,1
��
�S%(z%,y%)=0
��z%,y%);" ";
��
���wipesome
��w=1�3-LEV%
��t=1�20
m=�(68)
?�S%(MX%(m),MY%(m))<>0 MN%=MN%-1:S%(MX%(m),MY%(m))=0:M%(m)=0
�MX%(m),MY%(m));" ";
&�,
0�
:-��p(b$,y%,Tp%,Mp%,Bp%,Tx%,Mx%,Bx%,ly%,s%)
D�a=1��(b$)
N�Tx%,y%
Xz=�(�b$,a,1))-64
b�z=-32 z=0
l�b=1� �l$(z)
vs$=�l$(z),b,1)
��s$="1":�Tx%,y%
��s$="2":�Mx%,y%-ly%
��s$="3":�Bx%,y%-(ly%*2)
��s$="4":�Tx%+Tp%,y%
��s$="5":�Mx%+Mp%,y%-ly%
��s$="6":�Bx%+Bp%,y%-(ly%*2)
��s$="7":�Tx%+(2*Tp%),y%
��s$="8":�Mx%+(2*Mp%),y%-ly%
�#�s$="9":�Bx%+(2*Bp%),y%-(ly%*2)
�@�:Tx%=Tx%+(Tp%*2)+s%:Mx%=Mx%+(Mp%*2)+s%:Bx%=Bx%+(Bp%*2)+s%:�
��
��328971,4828631,7139,36841,39325217,325217,713985,32879,74639,7463,32729,39,31579,3197,7931,32871,7931795,32595871,712893,746,397,67,3597,9537,5657,739
�
��inst
2�p("BY D HOPKINS",150,8,8,8,670,670,670,12,16)
5�p("GUIDE YOUR ANGEL",110,8,8,8,600,600,600,8,16)
6�p("ROUND THE THIRTEEN",80,8,8,8,600,600,600,8,16)
 i�p("LAYERS OF HELL AND",54,8,8,8,600,600,600,8,16):�p("PURIFY ALL SPIRITS",24,8,8,8,600,600,600,8,16)
*��5:�0,200:�M$:�p("SPIRIT",196,8,8,8,100,100,100,8,16):�300,200:�0,1:�239:�0,2:�p("DEATH",196,8,8,8,400,400,400,8,16):�600,200:�0,3:�240:�0,2:�p("DEMON",196,8,8,8,700,700,700,8,16)
4=�900,200:�242:�p("STOMPER",196,8,8,8,1000,1000,1000,8,16)
>�4
H
�v=1�0�-1
R�0,v
\?�p("YOU ARE ENTERING THE GATE",850,16,16,16,50,50,50,16,16)
f9�p("PREPARE YOURSELF",650,16,16,16,270,270,270,16,16)
p6�p("FOR ADVENTURE",450,16,16,16,320,320,320,16,16)
z�v=1 �p=1�1000:�
��
��
�6��fade:�W:�19,2,0;0;:�W:�19,3,0;0;:�W:�19,1,0;0;:�
�7��raise:�W:�19,1,4;0;:�W:�19,3,1;0;:�W:�19,2,2;0;:�
���W:�p=1�700:�:�
�
��init
�;a$="":x%=0:y%=0:lx%=0:ly%=0:s%=0:��dnG:�a=1�26:�l$(a):�
�CLI%=5:E%=1280:SPLAT=�:�1,4,-1,-3,-9,8,4,1,127,127,-3,-3,126,126
���23,235,7,24,39,74,74,191,170,170,23,236,192,48,200,164,164,250,170,170,23,237,255,170,170,254,170,170,170,255,23,238,254,170,170,254,170,170,170,254,23,244,0,0,18,0,0,0,0,0,23,245,62,73,73,73,62,20,20,8,23,239,0,60,90,90,126,36,60,0
�OM$=�18+�0+�1+�245+�8+�18+�0+�2+�244:G$=�17+�2+�235+�236+�10+�8+�8+�237+�238
���23,224,28,42,28,0,62,73,20,20,23,225,12,30,12,2,28,2,2,6,23,226,12,30,12,2,28,0,20,18,23,227,28,42,28,34,73,20,20,16,23,228,28,42,28,34,73,20,20,4,23,229,28,62,28,34,73,20,20,4,23,230,28,62,28,34,73,20,20,16
���23,240,66,66,102,90,60,36,60,24,23,241,66,66,102,90,126,36,36,24,23,242,0,4,36,32,6,103,231,224,23,243,0,32,36,4,96,230,231,7,23,231,12,30,12,16,14,16,16,24,23,232,48,120,48,64,56,0,40,72,23,233,24,24,24,24,24,24,24,24
�i�23,234,0,0,0,255,255,0,0,0,23,255,0,251,251,251,0,191,191,191,23,253,255,255,255,255,255,255,255,255
	�M$(0,0)=�224:M$(0,1)=�224:M$(1,0)=�229:M$(1,1)=�230:M$(2,0)=�231:M$(2,1)=�232:M$(3,0)=�227:M$(3,1)=�228:M$(4,0)=�225:M$(4,1)=�226
	�
x��win:�28,0,19,19,0:�
��0,1
�<�p("YOU HAVE DONE WELL",1000,20,20,20,100,100,100,40,16)
��0,3
�;�p("THE ANGELS WELCOME",800,20,20,20,100,100,100,24,16)
�5�p("YOU TO THEIR",725,20,20,20,200,200,200,24,16)
�4�p("BROTHERHOOD",650,20,20,20,225,225,225,24,16)
�	�W:�W
�4�p("IMMORTALITY",575,20,20,20,225,225,225,24,16)
�7�p("IS YOUR REWARD",500,20,20,20,175,175,175,24,16)
�A=�
��
��7:�:�" at line ";�:�
�

00000000  0d 00 0a 0e f4 20 54 68  65 20 47 61 74 65 0d 00  |..... The Gate..|
00000010  14 12 f4 20 42 79 20 44  2e 48 6f 70 6b 69 6e 73  |... By D.Hopkins|
00000020  0d 00 1e 18 f4 20 28 63  29 20 54 68 65 20 4d 69  |..... (c) The Mi|
00000030  63 72 6f 20 55 73 65 72  0d 00 28 0b ee 85 e5 8d  |cro User..(.....|
00000040  64 70 4a 0d 00 32 34 de  4d 24 28 34 2c 31 29 2c  |dpJ..24.M$(4,1),|
00000050  53 25 28 31 39 2c 31 39  29 2c 4d 58 25 28 36 38  |S%(19,19),MX%(68|
00000060  29 2c 4d 59 25 28 36 38  29 2c 4d 25 28 36 38 29  |),MY%(68),M%(68)|
00000070  2c 6c 24 28 32 36 29 0d  00 64 09 f2 69 6e 69 74  |,l$(26)..d..init|
00000080  0d 00 6e 09 f2 69 6e 73  74 0d 00 78 32 e3 4c 45  |..n..inst..x2.LE|
00000090  56 25 3d 31 b8 31 33 3a  e7 4c 45 56 25 3d 35 20  |V%=1.13:.LEV%=5 |
000000a0  84 20 4c 45 56 25 3d 38  20 84 20 4c 45 56 25 3e  |. LEV%=8 . LEV%>|
000000b0  39 20 4c 49 25 3d 4c 49  25 2b 31 0d 00 82 07 ef  |9 LI%=LI%+1.....|
000000c0  32 36 0d 00 8c 21 f2 66  61 64 65 3a f1 8a 36 2c  |26...!.fade:..6,|
000000d0  32 32 29 89 28 32 29 3b  8a 31 34 2c 32 32 29 89  |22).(2);.14,22).|
000000e0  28 32 29 0d 00 96 36 fb  31 3a f1 8a 36 2c 32 32  |(2)...6.1:..6,22|
000000f0  29 3b 4c 49 25 3b 8a 31  34 2c 32 32 29 3b 4c 45  |);LI%;.14,22);LE|
00000100  56 25 3b 8a 30 2c 32 34  29 22 53 6f 75 6c 73 20  |V%;.0,24)"Souls |
00000110  6c 65 66 74 22 89 28 36  29 0d 00 a0 20 e3 7a 3d  |left".(6)... .z=|
00000120  30 b8 31 39 3a e3 79 3d  30 b8 31 39 3a 53 25 28  |0.19:.y=0.19:S%(|
00000130  7a 2c 79 29 3d 30 3a ed  2c 0d 00 aa 70 44 45 41  |z,y)=0:.,...pDEA|
00000140  54 48 25 3d 30 3a 46 25  3d 31 3a 46 24 3d 22 22  |TH%=0:F%=1:F$=""|
00000150  3a 44 44 25 3d 30 3a 44  45 4d 25 3d a3 3a 44 58  |:DD%=0:DEM%=.:DX|
00000160  25 3d 30 3a 44 59 25 3d  30 3a 45 25 3d 31 32 38  |%=0:DY%=0:E%=128|
00000170  30 3a 46 49 25 3d a3 3a  54 54 25 3d 31 3a 46 44  |0:FI%=.:TT%=1:FD|
00000180  25 3d 31 3a 46 58 25 3d  30 3a 46 59 25 3d 30 3a  |%=1:FX%=0:FY%=0:|
00000190  4d 4e 25 3d 36 38 3a 4d  25 3d 30 3a 43 25 3d 31  |MN%=68:M%=0:C%=1|
000001a0  32 30 3a 44 45 44 25 3d  30 0d 00 b4 16 ef 32 38  |20:DED%=0.....28|
000001b0  2c 30 2c 31 39 2c 31 39  2c 30 3a db 3a fb 31 0d  |,0,19,19,0:.:.1.|
000001c0  00 be a7 e3 41 3d 31 b8  31 38 3a 4d 25 28 41 29  |....A=1.18:M%(A)|
000001d0  3d 31 3a 4d 58 25 28 41  29 3d 41 3a 4d 59 25 28  |=1:MX%(A)=A:MY%(|
000001e0  41 29 3d 31 3a ed 3a e3  41 3d 31 39 b8 33 34 3a  |A)=1:.:.A=19.34:|
000001f0  4d 25 28 41 29 3d 31 3a  4d 58 25 28 41 29 3d 31  |M%(A)=1:MX%(A)=1|
00000200  38 3a 4d 59 25 28 41 29  3d 41 2d 31 37 3a ed 3a  |8:MY%(A)=A-17:.:|
00000210  e3 41 3d 33 35 b8 35 32  3a 4d 25 28 41 29 3d 31  |.A=35.52:M%(A)=1|
00000220  3a 4d 58 25 28 41 29 3d  28 2d 41 2b 35 33 29 3a  |:MX%(A)=(-A+53):|
00000230  4d 59 25 28 41 29 3d 31  38 3a ed 3a e3 41 3d 35  |MY%(A)=18:.:.A=5|
00000240  33 b8 36 38 3a 4d 25 28  41 29 3d 31 3a 4d 58 25  |3.68:M%(A)=1:MX%|
00000250  28 41 29 3d 31 3a 4d 59  25 28 41 29 3d 28 2d 41  |(A)=1:MY%(A)=(-A|
00000260  2b 37 30 29 3a ed 0d 00  c8 56 ef 35 3a e3 4d 25  |+70):....V.5:.M%|
00000270  3d 31 b8 36 38 3a ef 32  36 3a ec 4d 58 25 28 4d  |=1.68:.26:.MX%(M|
00000280  25 29 2a 36 34 2c 31 30  32 33 2d 33 32 2a 4d 59  |%)*64,1023-32*MY|
00000290  25 28 4d 25 29 3a f1 4d  24 3a 53 25 28 4d 58 25  |%(M%):.M$:S%(MX%|
000002a0  28 4d 25 29 2c 4d 59 25  28 4d 25 29 29 3d 4d 25  |(M%),MY%(M%))=M%|
000002b0  2b 31 3a ed 3a 4d 25 3d  31 3a ef 34 0d 00 d2 7a  |+1:.:M%=1:.4...z|
000002c0  fb 33 3a e3 42 3d 30 b8  38 88 32 3a e3 41 3d 42  |.3:.B=0.8.2:.A=B|
000002d0  20 b8 31 39 2d 42 3a 53  25 28 41 2c 42 29 3d 31  | .19-B:S%(A,B)=1|
000002e0  3a 53 25 28 41 2c 31 39  2d 42 29 3d 31 3a 53 25  |:S%(A,19-B)=1:S%|
000002f0  28 42 2c 41 29 3d 31 3a  53 25 28 31 39 2d 42 2c  |(B,A)=1:S%(19-B,|
00000300  41 29 3d 31 3a f1 8a 41  2c 42 29 bd 32 35 35 3b  |A)=1:..A,B).255;|
00000310  8a 42 2c 41 29 bd 32 35  35 3b 8a 31 39 2d 42 2c  |.B,A).255;.19-B,|
00000320  41 29 bd 32 35 35 3b 8a  41 2c 31 39 2d 42 29 bd  |A).255;.A,19-B).|
00000330  32 35 35 3a ed 2c 0d 00  dc 6c e3 41 3d 32 b8 36  |255:.,...l.A=2.6|
00000340  20 88 34 3a 53 25 28 31  39 2d 41 2c 39 29 3d 30  | .4:S%(19-A,9)=0|
00000350  3a 53 25 28 31 39 2d 41  2c 31 30 29 3d 30 3a 53  |:S%(19-A,10)=0:S|
00000360  25 28 41 2c 39 29 3d 30  3a 53 25 28 41 2c 31 30  |%(A,9)=0:S%(A,10|
00000370  29 3d 30 3a f1 8a 31 39  2d 41 2c 39 29 22 20 22  |)=0:..19-A,9)" "|
00000380  3b 8a 31 39 2d 41 2c 31  30 29 22 20 22 3b 8a 41  |;.19-A,10)" ";.A|
00000390  2c 39 29 22 20 22 3b 8a  41 2c 31 30 29 22 20 22  |,9)" ";.A,10)" "|
000003a0  3a ed 0d 00 e6 6d e3 41  3d 34 b8 38 20 88 34 3a  |:....m.A=4.8 .4:|
000003b0  53 25 28 39 2c 31 39 2d  41 29 3d 30 3a 53 25 28  |S%(9,19-A)=0:S%(|
000003c0  31 30 2c 31 39 2d 41 29  3d 30 3a 53 25 28 39 2c  |10,19-A)=0:S%(9,|
000003d0  41 29 3d 30 3a 53 25 28  31 30 2c 41 29 3d 30 3a  |A)=0:S%(10,A)=0:|
000003e0  f1 8a 39 2c 31 39 2d 41  29 3b 22 20 22 3b 8a 31  |..9,19-A);" ";.1|
000003f0  30 2c 31 39 2d 41 29 22  20 22 3b 8a 39 2c 41 29  |0,19-A)" ";.9,A)|
00000400  22 20 22 3b 8a 31 30 2c  41 29 22 20 22 3a ed 0d  |" ";.10,A)" ":..|
00000410  00 f0 37 e3 41 3d 39 b8  31 30 3a 53 25 28 41 2c  |..7.A=9.10:S%(A,|
00000420  32 29 3d 30 3a f1 8a 41  2c 32 29 22 20 22 3a 53  |2)=0:..A,2)" ":S|
00000430  25 28 41 2c 31 37 29 3d  30 3a f1 8a 41 2c 31 37  |%(A,17)=0:..A,17|
00000440  29 22 20 22 3a ed 0d 00  fa 12 e7 4c 45 56 25 3e  |)" ":......LEV%>|
00000450  33 20 f2 65 72 6f 64 65  0d 01 04 52 53 25 28 39  |3 .erode...RS%(9|
00000460  2c 39 29 3d 31 3a 53 25  28 31 30 2c 39 29 3d 31  |,9)=1:S%(10,9)=1|
00000470  3a 53 25 28 39 2c 31 30  29 3d 31 3a 53 25 28 31  |:S%(9,10)=1:S%(1|
00000480  30 2c 31 30 29 3d 31 3a  f1 8a 39 2c 39 29 47 24  |0,10)=1:..9,9)G$|
00000490  3a 44 25 3d 30 3a 4d 25  3d 30 3a 58 25 3d 39 3a  |:D%=0:M%=0:X%=9:|
000004a0  59 25 3d 38 3a f2 50 28  32 29 0d 01 0e 24 44 45  |Y%=8:.P(2)...$DE|
000004b0  41 54 48 25 3d 4c 45 56  25 2d 33 3a e7 44 45 41  |ATH%=LEV%-3:.DEA|
000004c0  54 48 25 3e 33 20 44 45  41 54 48 25 3d 33 0d 01  |TH%>3 DEATH%=3..|
000004d0  18 9e e7 44 45 41 54 48  25 3e 30 20 4d 25 28 38  |...DEATH%>0 M%(8|
000004e0  29 3d 2d 31 3a 53 25 28  4d 58 25 28 38 29 2c 4d  |)=-1:S%(MX%(8),M|
000004f0  59 25 28 38 29 29 3d 2d  31 3a 4d 4e 25 3d 4d 4e  |Y%(8))=-1:MN%=MN|
00000500  25 2d 31 3a e7 44 45 41  54 48 25 3e 31 20 4d 25  |%-1:.DEATH%>1 M%|
00000510  28 34 33 29 3d 2d 31 3a  53 25 28 4d 58 25 28 34  |(43)=-1:S%(MX%(4|
00000520  33 29 2c 4d 59 25 28 34  33 29 29 3d 2d 31 3a 4d  |3),MY%(43))=-1:M|
00000530  4e 25 3d 4d 4e 25 2d 31  3a e7 44 45 41 54 48 25  |N%=MN%-1:.DEATH%|
00000540  3e 32 20 4d 25 28 32 36  29 3d 2d 31 3a 53 25 28  |>2 M%(26)=-1:S%(|
00000550  4d 58 25 28 32 36 29 2c  4d 59 25 28 32 36 29 29  |MX%(26),MY%(26))|
00000560  3d 30 3a 4d 4e 25 3d 4d  4e 25 2d 31 0d 01 22 6c  |=0:MN%=MN%-1.."l|
00000570  e7 4c 45 56 25 3e 37 20  44 45 4d 25 3d 4c 45 56  |.LEV%>7 DEM%=LEV|
00000580  25 2d 33 3a 53 25 28 4d  58 25 28 35 34 29 2c 4d  |%-3:S%(MX%(54),M|
00000590  59 25 28 35 34 29 29 3d  2d 32 3a 4d 25 28 35 34  |Y%(54))=-2:M%(54|
000005a0  29 3d 30 3a 4d 4e 25 3d  4d 4e 25 2d 31 3a 44 58  |)=0:MN%=MN%-1:DX|
000005b0  25 3d 4d 58 25 28 35 34  29 3a 44 59 25 3d 4d 59  |%=MX%(54):DY%=MY|
000005c0  25 28 35 34 29 3a fb 33  3a f1 8a 44 58 25 2c 44  |%(54):.3:..DX%,D|
000005d0  59 25 29 3b bd 32 34 30  0d 01 2c 15 e7 4c 45 56  |Y%);.240..,..LEV|
000005e0  25 3c 33 20 f2 77 69 70  65 73 6f 6d 65 0d 01 36  |%<3 .wipesome..6|
000005f0  0a f2 72 61 69 73 65 0d  01 40 05 f5 0d 01 4a 0c  |..raise..@....J.|
00000600  e7 a6 2d 37 34 f2 66 69  0d 01 54 1e e7 4d 4e 25  |..-74.fi..T..MN%|
00000610  3e 30 20 fb 31 3a f1 8a  31 31 2c 32 34 29 3b 4d  |>0 .1:..11,24);M|
00000620  4e 25 3b 22 20 22 0d 01  5e 1b e7 4c 45 56 25 3e  |N%;" "..^..LEV%>|
00000630  39 20 80 20 b3 28 34 29  3d 31 20 f2 73 74 6f 6d  |9 . .(4)=1 .stom|
00000640  70 0d 01 68 1b e7 54 54  25 3d 33 20 54 54 25 3d  |p..h..TT%=3 TT%=|
00000650  30 20 8b 54 54 25 3d 54  54 25 2b 31 0d 01 72 0b  |0 .TT%=TT%+1..r.|
00000660  54 25 3d 54 25 2b 31 0d  01 7c 1f e7 44 45 44 25  |T%=T%+1..|..DED%|
00000670  3d 34 20 44 45 44 25 3d  31 3a 8b 44 45 44 25 3d  |=4 DED%=1:.DED%=|
00000680  44 45 44 25 2b 31 0d 01  86 11 4f 58 25 3d 58 25  |DED%+1....OX%=X%|
00000690  3a 4f 59 25 3d 59 25 0d  01 90 1d 45 25 3d 45 25  |:OY%=Y%....E%=E%|
000006a0  2b 31 30 3a e7 45 25 3e  31 32 38 30 20 45 25 3d  |+10:.E%>1280 E%=|
000006b0  31 32 38 30 0d 01 9a 18  e7 44 45 41 54 48 25 3e  |1280.....DEATH%>|
000006c0  3d 44 45 44 25 20 f2 64  65 61 74 68 0d 01 a4 18  |=DED% .death....|
000006d0  e7 44 45 4d 25 3e 30 20  80 20 54 54 25 3d 30 20  |.DEM%>0 . TT%=0 |
000006e0  f2 64 65 6d 0d 01 ae 21  e7 54 25 3d 31 30 30 3a  |.dem...!.T%=100:|
000006f0  54 25 3d 30 3a f2 50 28  30 29 3a 44 25 3d 30 3a  |T%=0:.P(0):D%=0:|
00000700  f2 50 28 32 29 0d 01 b8  4c e7 4d 4e 25 3c 31 f1  |.P(2)...L.MN%<1.|
00000710  8a 39 2c 39 29 22 20 20  22 3b 8a 39 2c 31 30 29  |.9,9)"  ";.9,10)|
00000720  22 20 20 22 3b 3a 53 25  28 39 2c 39 29 3d 30 3a  |"  ";:S%(9,9)=0:|
00000730  53 25 28 31 30 2c 39 29  3d 30 3a 53 25 28 39 2c  |S%(10,9)=0:S%(9,|
00000740  31 30 29 3d 30 3a 53 25  28 31 30 2c 31 30 29 3d  |10)=0:S%(10,10)=|
00000750  30 0d 01 c2 0b f2 65 6e  65 72 67 79 0d 01 cc 11  |0.....energy....|
00000760  e7 45 25 3c 34 30 30 20  e5 8d 54 52 42 0d 01 d6  |.E%<400 ..TRB...|
00000770  34 e7 a6 2d 37 33 80 53  25 28 58 25 2c 59 25 2d  |4..-73.S%(X%,Y%-|
00000780  31 29 3c 3e 31 3a 44 25  3d 31 3a f2 50 28 30 29  |1)<>1:D%=1:.P(0)|
00000790  3a f2 46 3a 59 25 3d 59  25 2d 31 3a f2 50 28 32  |:.F:Y%=Y%-1:.P(2|
000007a0  29 0d 01 e0 35 e7 a6 2d  31 30 35 80 53 25 28 58  |)...5..-105.S%(X|
000007b0  25 2c 59 25 2b 31 29 3c  3e 31 3a 44 25 3d 33 3a  |%,Y%+1)<>1:D%=3:|
000007c0  f2 50 28 30 29 3a f2 46  3a 59 25 3d 59 25 2b 31  |.P(0):.F:Y%=Y%+1|
000007d0  3a f2 50 28 32 29 0d 01  ea 34 e7 a6 2d 36 37 80  |:.P(2)...4..-67.|
000007e0  53 25 28 58 25 2b 31 2c  59 25 29 3c 3e 31 3a 44  |S%(X%+1,Y%)<>1:D|
000007f0  25 3d 32 3a f2 50 28 30  29 3a f2 46 3a 58 25 3d  |%=2:.P(0):.F:X%=|
00000800  58 25 2b 31 3a f2 50 28  32 29 0d 01 f4 34 e7 a6  |X%+1:.P(2)...4..|
00000810  2d 39 38 80 53 25 28 58  25 2d 31 2c 59 25 29 3c  |-98.S%(X%-1,Y%)<|
00000820  3e 31 3a 44 25 3d 34 3a  f2 50 28 30 29 3a f2 46  |>1:D%=4:.P(0):.F|
00000830  3a 58 25 3d 58 25 2d 31  3a f2 50 28 32 29 0d 01  |:X%=X%-1:.P(2)..|
00000840  fe 0c f2 73 70 69 72 69  74 73 0d 02 08 15 e7 53  |...spirits.....S|
00000850  25 28 58 25 2c 59 25 29  3e 31 3a 45 25 3d 30 0d  |%(X%,Y%)>1:E%=0.|
00000860  02 12 27 fd 45 25 3c 31  20 84 20 58 25 3c 31 31  |..'.E%<1 . X%<11|
00000870  20 80 20 58 25 3e 38 20  80 20 59 25 3e 38 20 80  | . X%>8 . Y%>8 .|
00000880  20 59 25 3c 31 31 0d 02  1c 0f e7 45 25 3c 31 20  | Y%<11.....E%<1 |
00000890  f2 64 65 61 64 0d 02 26  09 2a 46 58 31 35 0d 02  |.dead..&.*FX15..|
000008a0  30 56 e7 4c 49 25 3c 31  20 ef 32 38 2c 30 2c 31  |0V.LI%<1 .28,0,1|
000008b0  39 2c 31 39 2c 30 3a db  3a fb 32 3a f1 8a 35 2c  |9,19,0:.:.2:..5,|
000008c0  31 30 29 22 47 41 4d 45  20 4f 56 45 52 22 3b 8a  |10)"GAME OVER";.|
000008d0  34 2c 31 33 29 22 50 52  45 53 53 20 41 20 4b 45  |4,13)"PRESS A KE|
000008e0  59 22 3a 41 3d a5 3a 4c  45 56 25 3d 31 33 3a e5  |Y":A=.:LEV%=13:.|
000008f0  8d 44 44 42 0d 02 3a 18  e7 20 45 25 3c 31 20 45  |.DDB..:.. E%<1 E|
00000900  25 3d 31 32 38 30 3a e5  8d 74 42 40 0d 02 44 05  |%=1280:..tB@..D.|
00000910  ed 0d 02 4e 16 e7 4c 49  25 3c 31 20 4c 49 25 3d  |...N..LI%<1 LI%=|
00000920  35 3a e5 8d 44 78 40 0d  02 58 08 f2 77 69 6e 0d  |5:..Dx@..X..win.|
00000930  02 62 09 e5 8d 44 78 40  0d 02 6c 2b dd f2 50 28  |.b...Dx@..l+..P(|
00000940  63 25 29 3a fb 63 25 3a  f1 8a 58 25 2c 59 25 29  |c%):.c%:..X%,Y%)|
00000950  4d 24 28 44 25 2c 46 25  29 3a 45 25 3d 45 25 2d  |M$(D%,F%):E%=E%-|
00000960  34 3a e1 0d 02 76 07 dd  f2 46 0d 02 80 14 e7 46  |4:...v...F.....F|
00000970  25 3d 30 20 46 25 3d 31  3a 8b 46 25 3d 30 0d 02  |%=0 F%=1:.F%=0..|
00000980  8a 08 54 25 3d 30 0d 02  94 05 e1 0d 02 9e 20 dd  |..T%=0........ .|
00000990  f2 73 70 69 72 69 74 73  3a 4d 25 3d 4d 25 2b 31  |.spirits:M%=M%+1|
000009a0  3a e7 4d 25 3d 36 39 4d  25 3d 31 0d 02 a8 10 e7  |:.M%=69M%=1.....|
000009b0  4d 25 28 4d 25 29 3c 3e  31 20 e1 0d 02 b2 19 53  |M%(M%)<>1 .....S|
000009c0  25 28 4d 58 25 28 4d 25  29 2c 4d 59 25 28 4d 25  |%(MX%(M%),MY%(M%|
000009d0  29 29 3d 30 0d 02 bc 44  e7 58 25 3e 4d 58 25 28  |))=0...D.X%>MX%(|
000009e0  4d 25 29 20 80 20 53 25  28 4d 58 25 28 4d 25 29  |M%) . S%(MX%(M%)|
000009f0  2b 31 2c 4d 59 25 28 4d  25 29 29 3d 30 20 f2 4f  |+1,MY%(M%))=0 .O|
00000a00  46 46 3a 4d 58 25 28 4d  25 29 3d 4d 58 25 28 4d  |FF:MX%(M%)=MX%(M|
00000a10  25 29 2b 31 3a f2 4f 4e  0d 02 c6 44 e7 58 25 3c  |%)+1:.ON...D.X%<|
00000a20  4d 58 25 28 4d 25 29 20  80 20 53 25 28 4d 58 25  |MX%(M%) . S%(MX%|
00000a30  28 4d 25 29 2d 31 2c 4d  59 25 28 4d 25 29 29 3d  |(M%)-1,MY%(M%))=|
00000a40  30 20 f2 4f 46 46 3a 4d  58 25 28 4d 25 29 3d 4d  |0 .OFF:MX%(M%)=M|
00000a50  58 25 28 4d 25 29 2d 31  3a f2 4f 4e 0d 02 d0 44  |X%(M%)-1:.ON...D|
00000a60  e7 59 25 3e 4d 59 25 28  4d 25 29 20 80 20 53 25  |.Y%>MY%(M%) . S%|
00000a70  28 4d 58 25 28 4d 25 29  2c 4d 59 25 28 4d 25 29  |(MX%(M%),MY%(M%)|
00000a80  2b 31 29 3d 30 20 f2 4f  46 46 3a 4d 59 25 28 4d  |+1)=0 .OFF:MY%(M|
00000a90  25 29 3d 4d 59 25 28 4d  25 29 2b 31 3a f2 4f 4e  |%)=MY%(M%)+1:.ON|
00000aa0  0d 02 da 44 e7 59 25 3c  4d 59 25 28 4d 25 29 20  |...D.Y%<MY%(M%) |
00000ab0  80 20 53 25 28 4d 58 25  28 4d 25 29 2c 4d 59 25  |. S%(MX%(M%),MY%|
00000ac0  28 4d 25 29 2d 31 29 3d  30 20 f2 4f 46 46 3a 4d  |(M%)-1)=0 .OFF:M|
00000ad0  59 25 28 4d 25 29 3d 4d  59 25 28 4d 25 29 2d 31  |Y%(M%)=MY%(M%)-1|
00000ae0  3a f2 4f 4e 0d 02 e4 1c  53 25 28 4d 58 25 28 4d  |:.ON....S%(MX%(M|
00000af0  25 29 2c 4d 59 25 28 4d  25 29 29 3d 4d 25 2b 31  |%),MY%(M%))=M%+1|
00000b00  0d 02 ee 05 e1 0d 02 f8  4b dd f2 4d 44 3a 4d 25  |........K..MD:M%|
00000b10  28 28 53 25 28 46 58 25  2c 46 59 25 29 29 2d 31  |((S%(FX%,FY%))-1|
00000b20  29 3d 30 3a 4d 4e 25 3d  4d 4e 25 2d 31 3a e7 4d  |)=0:MN%=MN%-1:.M|
00000b30  4e 25 3d 30 20 fb 31 3a  f1 8a 30 2c 32 34 29 22  |N%=0 .1:..0,24)"|
00000b40  47 6f 20 74 6f 20 74 68  65 20 67 61 74 65 21 22  |Go to the gate!"|
00000b50  0d 03 02 05 e1 0d 03 0c  05 e1 0d 03 16 21 dd f2  |.............!..|
00000b60  4f 46 46 3a f1 8a 4d 58  25 28 4d 25 29 2c 4d 59  |OFF:..MX%(M%),MY|
00000b70  25 28 4d 25 29 29 22 20  22 3a e1 0d 03 20 30 dd  |%(M%))" ":... 0.|
00000b80  f2 4f 4e 3a ef 35 3a ec  4d 58 25 28 4d 25 29 2a  |.ON:.5:.MX%(M%)*|
00000b90  36 34 2c 31 30 32 33 2d  4d 59 25 28 4d 25 29 2a  |64,1023-MY%(M%)*|
00000ba0  33 32 3a f1 4d 24 3a ef  34 3a e1 0d 03 2a 1b dd  |32:.M$:.4:...*..|
00000bb0  f2 66 69 3a 46 58 25 3d  58 25 3a 46 59 25 3d 59  |.fi:FX%=X%:FY%=Y|
00000bc0  25 3a 48 25 3d 30 0d 03  34 0d 45 25 3d 45 25 2d  |%:H%=0..4.E%=E%-|
00000bd0  31 30 30 0d 03 3e 0e e7  44 25 3d 30 e5 8d 44 52  |100..>..D%=0..DR|
00000be0  43 0d 03 48 0a 46 44 25  3d 44 25 0d 03 52 22 e7  |C..H.FD%=D%..R".|
00000bf0  46 44 25 3d 31 20 84 46  44 25 3d 33 20 46 24 3d  |FD%=1 .FD%=3 F$=|
00000c00  bd 32 33 33 3a 8b 46 24  3d bd 32 33 34 0d 03 5c  |.233:.F$=.234..\|
00000c10  06 fb 31 0d 03 66 14 e7  46 44 25 3d 31 20 46 59  |..1..f..FD%=1 FY|
00000c20  25 3d 46 59 25 2d 31 0d  03 70 14 e7 46 44 25 3d  |%=FY%-1..p..FD%=|
00000c30  32 20 46 58 25 3d 46 58  25 2b 31 0d 03 7a 14 e7  |2 FX%=FX%+1..z..|
00000c40  46 44 25 3d 33 20 46 59  25 3d 46 59 25 2b 31 0d  |FD%=3 FY%=FY%+1.|
00000c50  03 84 14 e7 46 44 25 3d  34 20 46 58 25 3d 46 58  |....FD%=4 FX%=FX|
00000c60  25 2d 31 0d 03 8e 14 e7  53 25 28 46 58 25 2c 46  |%-1.....S%(FX%,F|
00000c70  59 25 29 3d 31 20 e1 0d  03 98 2e e7 53 25 28 46  |Y%)=1 ......S%(F|
00000c80  58 25 2c 46 59 25 29 3e  31 20 f2 4d 44 3a 53 25  |X%,FY%)>1 .MD:S%|
00000c90  28 46 58 25 2c 46 59 25  29 3d 30 3a d4 31 2c 31  |(FX%,FY%)=0:.1,1|
00000ca0  2c 35 30 2c 32 0d 03 a2  1d f1 8a 46 58 25 2c 46  |,50,2......FX%,F|
00000cb0  59 25 29 46 24 3a d4 32  2c 2d 31 35 2c 32 30 30  |Y%)F$:.2,-15,200|
00000cc0  2c 30 0d 03 ac 22 f5 3a  48 25 3d 48 25 2b 31 3a  |,0...".:H%=H%+1:|
00000cd0  d4 32 2c 2d 31 35 2c 32  30 30 2d 28 48 25 2a 31  |.2,-15,200-(H%*1|
00000ce0  30 29 2c 30 0d 03 b6 14  e7 46 44 25 3d 31 20 46  |0),0.....FD%=1 F|
00000cf0  59 25 3d 46 59 25 2d 31  0d 03 c0 14 e7 46 44 25  |Y%=FY%-1.....FD%|
00000d00  3d 32 20 46 58 25 3d 46  58 25 2b 31 0d 03 ca 14  |=2 FX%=FX%+1....|
00000d10  e7 46 44 25 3d 33 20 46  59 25 3d 46 59 25 2b 31  |.FD%=3 FY%=FY%+1|
00000d20  0d 03 d4 14 e7 46 44 25  3d 34 20 46 58 25 3d 46  |.....FD%=4 FX%=F|
00000d30  58 25 2d 31 0d 03 de 2f  e7 20 53 25 28 46 58 25  |X%-1.../. S%(FX%|
00000d40  2c 46 59 25 29 3e 31 20  f2 4d 44 3a 53 25 28 46  |,FY%)>1 .MD:S%(F|
00000d50  58 25 2c 46 59 25 29 3d  30 3a d4 31 2c 31 2c 35  |X%,FY%)=0:.1,1,5|
00000d60  30 2c 32 0d 03 e8 21 e7  20 53 25 28 46 58 25 2c  |0,2...!. S%(FX%,|
00000d70  46 59 25 29 3d 31 20 53  50 4c 41 54 3d b9 3a e5  |FY%)=1 SPLAT=.:.|
00000d80  8d 64 7c 43 0d 03 f2 10  f1 8a 46 58 25 2c 46 59  |.d|C......FX%,FY|
00000d90  25 29 46 24 0d 03 fc 0a  fd 53 50 4c 41 54 0d 04  |%)F$.....SPLAT..|
00000da0  06 0b 53 50 4c 41 54 3d  a3 0d 04 10 22 f5 3a 48  |..SPLAT=....".:H|
00000db0  25 3d 48 25 2d 31 3a d4  32 2c 2d 31 35 2c 32 30  |%=H%-1:.2,-15,20|
00000dc0  30 2d 28 48 25 2a 31 30  29 2c 30 0d 04 1a 51 e7  |0-(H%*10),0...Q.|
00000dd0  20 46 58 25 3d 44 58 25  20 80 20 46 59 25 3d 44  | FX%=DX% . FY%=D|
00000de0  59 25 20 80 44 45 4d 25  3e 30 20 44 45 4d 25 3d  |Y% .DEM%>0 DEM%=|
00000df0  44 45 4d 25 2d 31 3a fb  33 3a f1 8a 44 58 25 2c  |DEM%-1:.3:..DX%,|
00000e00  44 59 25 29 bd 32 34 31  3a fb 31 3a e7 44 45 4d  |DY%).241:.1:.DEM|
00000e10  25 3d 30 20 f2 64 65 6d  64 65 61 64 0d 04 24 14  |%=0 .demdead..$.|
00000e20  e7 46 44 25 3d 31 20 46  59 25 3d 46 59 25 2b 31  |.FD%=1 FY%=FY%+1|
00000e30  0d 04 2e 14 e7 46 44 25  3d 32 20 46 58 25 3d 46  |.....FD%=2 FX%=F|
00000e40  58 25 2d 31 0d 04 38 14  e7 46 44 25 3d 33 20 46  |X%-1..8..FD%=3 F|
00000e50  59 25 3d 46 59 25 2d 31  0d 04 42 14 e7 46 44 25  |Y%=FY%-1..B..FD%|
00000e60  3d 34 20 46 58 25 3d 46  58 25 2b 31 0d 04 4c 11  |=4 FX%=FX%+1..L.|
00000e70  f1 8a 46 58 25 2c 46 59  25 29 22 20 22 0d 04 56  |..FX%,FY%)" "..V|
00000e80  1c fd 46 58 25 3d 58 25  20 80 20 46 59 25 3d 59  |..FX%=X% . FY%=Y|
00000e90  25 3a f2 50 28 32 29 3a  e1 0d 04 60 0c dd f2 65  |%:.P(2):...`...e|
00000ea0  6e 65 72 67 79 0d 04 6a  17 ec 30 2c 33 35 36 3a  |nergy..j..0,356:|
00000eb0  e6 30 2c 31 3a df 45 25  2c 33 35 36 0d 04 74 24  |.0,1:.E%,356..t$|
00000ec0  e7 20 45 25 3c 34 30 30  20 e6 30 2c 30 3a df 34  |. E%<400 .0,0:.4|
00000ed0  30 30 2c 33 35 36 3a d4  30 2c 2d 38 2c 36 2c 31  |00,356:.0,-8,6,1|
00000ee0  0d 04 7e 17 e6 30 2c 32  3a df 31 32 38 30 2c 33  |..~..0,2:.1280,3|
00000ef0  35 36 3a e6 30 2c 33 0d  04 88 05 e1 0d 04 92 0b  |56:.0,3.........|
00000f00  dd f2 65 72 6f 64 65 0d  04 9c 15 e3 5a 3d 31 b8  |..erode.....Z=1.|
00000f10  28 28 4c 45 56 25 2d 33  29 2a 35 29 0d 04 a6 17  |((LEV%-3)*5)....|
00000f20  41 3d b3 28 31 36 29 2b  31 3a 42 3d b3 28 31 36  |A=.(16)+1:B=.(16|
00000f30  29 2b 31 0d 04 b0 15 e7  53 25 28 41 2c 42 29 3c  |)+1.....S%(A,B)<|
00000f40  3e 31 20 e5 8d 74 66 44  0d 04 ba 17 53 25 28 41  |>1 ..tfD....S%(A|
00000f50  2c 42 29 3d 30 3a f1 8a  41 2c 42 29 22 20 22 0d  |,B)=0:..A,B)" ".|
00000f60  04 c4 05 ed 0d 04 ce 05  e1 0d 04 d8 0a dd f2 64  |...............d|
00000f70  65 61 64 0d 04 e2 20 ef  34 3a fb 32 3a f1 8a 33  |ead... .4:.2:..3|
00000f80  2c 31 30 29 22 59 4f 55  20 41 52 45 20 44 45 41  |,10)"YOU ARE DEA|
00000f90  44 21 22 0d 04 ec 09 5a  3d 2d 31 35 0d 04 f6 3a  |D!"....Z=-15...:|
00000fa0  e3 41 3d 32 35 35 b8 36  34 88 2d 38 3a 5a 3d 5a  |.A=255.64.-8:Z=Z|
00000fb0  2b 2e 31 3a d4 31 2c 5a  2c 41 2c 31 3a d4 32 2c  |+.1:.1,Z,A,1:.2,|
00000fc0  5a 2c 41 2d 33 32 2c 31  3a d4 33 2c 5a 2c 41 2d  |Z,A-32,1:.3,Z,A-|
00000fd0  36 34 2c 31 3a ed 0d 05  00 0d 4c 49 25 3d 4c 49  |64,1:.....LI%=LI|
00000fe0  25 2d 31 0d 05 0a 05 e1  0d 05 14 0b dd f2 64 65  |%-1...........de|
00000ff0  61 74 68 0d 05 1e 0a 5a  3d 44 45 44 25 0d 05 28  |ath....Z=DED%..(|
00001000  24 e7 5a 3d 31 20 44 44  25 3d 38 20 8b 20 e7 5a  |$.Z=1 DD%=8 . .Z|
00001010  3d 32 20 44 44 25 3d 34  33 20 8b 44 44 25 3d 32  |=2 DD%=43 .DD%=2|
00001020  36 0d 05 32 1b 53 25 28  4d 58 25 28 44 44 25 29  |6..2.S%(MX%(DD%)|
00001030  2c 4d 59 25 28 44 44 25  29 29 3d 30 0d 05 3c 1b  |,MY%(DD%))=0..<.|
00001040  f1 8a 4d 58 25 28 44 44  25 29 2c 4d 59 25 28 44  |..MX%(DD%),MY%(D|
00001050  44 25 29 29 22 20 22 0d  05 46 40 e7 58 25 3c 4d  |D%))" "..F@.X%<M|
00001060  58 25 28 44 44 25 29 20  80 20 53 25 28 4d 58 25  |X%(DD%) . S%(MX%|
00001070  28 44 44 25 29 2d 31 2c  4d 59 25 28 44 44 25 29  |(DD%)-1,MY%(DD%)|
00001080  29 3d 30 20 4d 58 25 28  44 44 25 29 3d 4d 58 25  |)=0 MX%(DD%)=MX%|
00001090  28 44 44 25 29 2d 31 0d  05 50 40 e7 58 25 3e 4d  |(DD%)-1..P@.X%>M|
000010a0  58 25 28 44 44 25 29 20  80 20 53 25 28 4d 58 25  |X%(DD%) . S%(MX%|
000010b0  28 44 44 25 29 2b 31 2c  4d 59 25 28 44 44 25 29  |(DD%)+1,MY%(DD%)|
000010c0  29 3d 30 20 4d 58 25 28  44 44 25 29 3d 4d 58 25  |)=0 MX%(DD%)=MX%|
000010d0  28 44 44 25 29 2b 31 0d  05 5a 40 e7 59 25 3e 4d  |(DD%)+1..Z@.Y%>M|
000010e0  59 25 28 44 44 25 29 20  80 20 53 25 28 4d 58 25  |Y%(DD%) . S%(MX%|
000010f0  28 44 44 25 29 2c 4d 59  25 28 44 44 25 29 2b 31  |(DD%),MY%(DD%)+1|
00001100  29 3d 30 20 4d 59 25 28  44 44 25 29 3d 4d 59 25  |)=0 MY%(DD%)=MY%|
00001110  28 44 44 25 29 2b 31 0d  05 64 40 e7 59 25 3c 4d  |(DD%)+1..d@.Y%<M|
00001120  59 25 28 44 44 25 29 20  80 20 53 25 28 4d 58 25  |Y%(DD%) . S%(MX%|
00001130  28 44 44 25 29 2c 4d 59  25 28 44 44 25 29 2d 31  |(DD%),MY%(DD%)-1|
00001140  29 3d 30 20 4d 59 25 28  44 44 25 29 3d 4d 59 25  |)=0 MY%(DD%)=MY%|
00001150  28 44 44 25 29 2d 31 0d  05 6e 27 e7 4d 58 25 28  |(DD%)-1..n'.MX%(|
00001160  44 44 25 29 3d 58 25 20  80 4d 59 25 28 44 44 25  |DD%)=X% .MY%(DD%|
00001170  29 3d 59 25 20 45 25 3d  45 25 2d 31 30 30 0d 05  |)=Y% E%=E%-100..|
00001180  78 1f fb 31 3a f1 8a 4d  58 25 28 44 44 25 29 2c  |x..1:..MX%(DD%),|
00001190  4d 59 25 28 44 44 25 29  29 bd 32 33 39 0d 05 82  |MY%(DD%)).239...|
000011a0  1c 53 25 28 4d 58 25 28  44 44 25 29 2c 4d 59 25  |.S%(MX%(DD%),MY%|
000011b0  28 44 44 25 29 29 3d 2d  31 0d 05 8c 05 e1 0d 05  |(DD%))=-1.......|
000011c0  96 09 dd f2 64 65 6d 0d  05 a0 11 53 25 28 44 58  |....dem....S%(DX|
000011d0  25 2c 44 59 25 29 3d 30  0d 05 aa 11 f1 8a 44 58  |%,DY%)=0......DX|
000011e0  25 2c 44 59 25 29 22 20  22 0d 05 b4 43 e7 58 25  |%,DY%)" "...C.X%|
000011f0  3c 44 58 25 20 80 20 53  25 28 44 58 25 2d 31 2c  |<DX% . S%(DX%-1,|
00001200  44 59 25 29 3c 3d 30 20  84 20 58 25 3c 44 58 25  |DY%)<=0 . X%<DX%|
00001210  20 80 20 53 25 28 44 58  25 2d 31 2c 44 59 25 29  | . S%(DX%-1,DY%)|
00001220  3e 31 20 44 58 25 3d 44  58 25 2d 31 0d 05 be 42  |>1 DX%=DX%-1...B|
00001230  e7 58 25 3e 44 58 25 20  80 20 53 25 28 44 58 25  |.X%>DX% . S%(DX%|
00001240  2b 31 2c 44 59 25 29 3d  30 20 84 20 58 25 3e 44  |+1,DY%)=0 . X%>D|
00001250  58 25 20 80 20 53 25 28  44 58 25 2b 31 2c 44 59  |X% . S%(DX%+1,DY|
00001260  25 29 3e 31 20 44 58 25  3d 44 58 25 2b 31 0d 05  |%)>1 DX%=DX%+1..|
00001270  c8 42 e7 59 25 3e 44 59  25 20 80 20 53 25 28 44  |.B.Y%>DY% . S%(D|
00001280  58 25 2c 44 59 25 2b 31  29 3d 30 20 84 20 59 25  |X%,DY%+1)=0 . Y%|
00001290  3e 44 59 25 20 80 20 53  25 28 44 58 25 2c 44 59  |>DY% . S%(DX%,DY|
000012a0  25 2b 31 29 3e 31 20 44  59 25 3d 44 59 25 2b 31  |%+1)>1 DY%=DY%+1|
000012b0  0d 05 d2 41 e7 59 25 3c  44 59 25 20 80 20 53 25  |...A.Y%<DY% . S%|
000012c0  28 44 58 25 2c 44 59 25  2d 31 29 3d 30 20 84 20  |(DX%,DY%-1)=0 . |
000012d0  59 25 3c 44 59 25 20 80  53 25 28 44 58 25 2c 44  |Y%<DY% .S%(DX%,D|
000012e0  59 25 2d 31 29 3e 31 20  44 59 25 3d 44 59 25 2d  |Y%-1)>1 DY%=DY%-|
000012f0  31 0d 05 dc 30 e7 53 25  28 44 58 25 2c 44 59 25  |1...0.S%(DX%,DY%|
00001300  29 3e 31 20 4d 25 28 53  25 28 44 58 25 2c 44 59  |)>1 M%(S%(DX%,DY|
00001310  25 29 2d 31 29 3d 30 3a  4d 4e 25 3d 4d 4e 25 2d  |%)-1)=0:MN%=MN%-|
00001320  31 0d 05 e6 2d e7 44 58  25 3c 31 31 20 80 20 44  |1...-.DX%<11 . D|
00001330  58 25 3e 38 20 80 20 44  59 25 3c 31 31 20 80 20  |X%>8 . DY%<11 . |
00001340  44 59 25 3e 39 20 44 45  4d 25 3d 30 3a e1 0d 05  |DY%>9 DEM%=0:...|
00001350  f0 15 fb 33 3a f1 8a 44  58 25 2c 44 59 25 29 bd  |...3:..DX%,DY%).|
00001360  32 34 30 0d 05 fa 12 53  25 28 44 58 25 2c 44 59  |240....S%(DX%,DY|
00001370  25 29 3d 2d 32 0d 06 04  1a e7 20 44 58 25 3d 58  |%)=-2..... DX%=X|
00001380  25 20 80 20 44 59 25 3d  59 25 20 45 25 3d 30 0d  |% . DY%=Y% E%=0.|
00001390  06 0e 05 e1 0d 06 18 0d  dd f2 64 65 6d 64 65 61  |..........demdea|
000013a0  64 0d 06 22 0f e3 4a 25  3d 33 b8 30 20 88 2d 31  |d.."..J%=3.0 .-1|
000013b0  0d 06 2c 12 d4 30 2c 2d  31 32 2c 31 39 2b 4a 25  |..,..0,-12,19+J%|
000013c0  2c 35 0d 06 36 3b fb 4a  25 3a f1 8a 44 58 25 2c  |,5..6;.J%:..DX%,|
000013d0  44 59 25 29 bd 32 34 30  3a e3 5a 3d 31 b8 33 30  |DY%).240:.Z=1.30|
000013e0  30 3a ed 3a f1 8a 44 58  25 2c 44 59 25 29 bd 32  |0:.:..DX%,DY%).2|
000013f0  34 31 3a e3 5a 3d 31 b8  33 30 30 3a ed 0d 06 40  |41:.Z=1.300:...@|
00001400  05 ed 0d 06 4a 11 53 25  28 44 58 25 2c 44 59 25  |....J.S%(DX%,DY%|
00001410  29 3d 30 0d 06 54 05 e1  0d 06 5e 0b dd f2 73 74  |)=0..T....^...st|
00001420  6f 6d 70 0d 06 68 15 7a  25 3d b3 28 31 38 29 3a  |omp..h.z%=.(18):|
00001430  79 25 3d b3 28 31 38 29  0d 06 72 12 e7 53 25 28  |y%=.(18)..r..S%(|
00001440  7a 25 2c 79 25 29 3c 3e  31 e1 0d 06 7c 22 e7 7a  |z%,y%)<>1...|".z|
00001450  25 3e 38 20 80 20 7a 25  3c 31 31 20 80 20 79 25  |%>8 . z%<11 . y%|
00001460  3e 38 20 80 20 79 25 3c  31 31 20 e1 0d 06 86 06  |>8 . y%<11 .....|
00001470  fb 32 0d 06 90 0b e3 74  25 3d 31 b8 34 0d 06 9a  |.2.....t%=1.4...|
00001480  11 f1 8a 7a 25 2c 79 25  29 3b bd 32 34 32 0d 06  |...z%,y%);.242..|
00001490  a4 0e d4 30 2c 2d 31 35  2c 34 2c 31 0d 06 ae 11  |...0,-15,4,1....|
000014a0  f1 8a 7a 25 2c 79 25 29  3b bd 32 34 33 0d 06 b8  |..z%,y%);.243...|
000014b0  0e d4 30 2c 2d 31 35 2c  35 2c 31 0d 06 c2 05 ed  |..0,-15,5,1.....|
000014c0  0d 06 cc 0f 53 25 28 7a  25 2c 79 25 29 3d 30 0d  |....S%(z%,y%)=0.|
000014d0  06 d6 11 f1 8a 7a 25 2c  79 25 29 3b 22 20 22 3b  |.....z%,y%);" ";|
000014e0  0d 06 e0 05 e1 0d 06 ea  0e dd f2 77 69 70 65 73  |...........wipes|
000014f0  6f 6d 65 0d 06 f4 0f e3  77 3d 31 b8 33 2d 4c 45  |ome.....w=1.3-LE|
00001500  56 25 0d 06 fe 0b e3 74  3d 31 b8 32 30 0d 07 08  |V%.....t=1.20...|
00001510  0b 6d 3d b3 28 36 38 29  0d 07 12 3f e7 53 25 28  |.m=.(68)...?.S%(|
00001520  4d 58 25 28 6d 29 2c 4d  59 25 28 6d 29 29 3c 3e  |MX%(m),MY%(m))<>|
00001530  30 20 4d 4e 25 3d 4d 4e  25 2d 31 3a 53 25 28 4d  |0 MN%=MN%-1:S%(M|
00001540  58 25 28 6d 29 2c 4d 59  25 28 6d 29 29 3d 30 3a  |X%(m),MY%(m))=0:|
00001550  4d 25 28 6d 29 3d 30 0d  07 1c 19 f1 8a 4d 58 25  |M%(m)=0......MX%|
00001560  28 6d 29 2c 4d 59 25 28  6d 29 29 3b 22 20 22 3b  |(m),MY%(m));" ";|
00001570  0d 07 26 06 ed 2c 0d 07  30 05 e1 0d 07 3a 2d dd  |..&..,..0....:-.|
00001580  f2 70 28 62 24 2c 79 25  2c 54 70 25 2c 4d 70 25  |.p(b$,y%,Tp%,Mp%|
00001590  2c 42 70 25 2c 54 78 25  2c 4d 78 25 2c 42 78 25  |,Bp%,Tx%,Mx%,Bx%|
000015a0  2c 6c 79 25 2c 73 25 29  0d 07 44 0e e3 61 3d 31  |,ly%,s%)..D..a=1|
000015b0  b8 a9 28 62 24 29 0d 07  4e 0b ec 54 78 25 2c 79  |..(b$)..N..Tx%,y|
000015c0  25 0d 07 58 14 7a 3d 97  28 c1 62 24 2c 61 2c 31  |%..X.z=.(.b$,a,1|
000015d0  29 29 2d 36 34 0d 07 62  0e e7 7a 3d 2d 33 32 20  |))-64..b..z=-32 |
000015e0  7a 3d 30 0d 07 6c 10 e3  62 3d 31 b8 20 a9 6c 24  |z=0..l..b=1. .l$|
000015f0  28 7a 29 0d 07 76 12 73  24 3d c1 6c 24 28 7a 29  |(z)..v.s$=.l$(z)|
00001600  2c 62 2c 31 29 0d 07 80  13 e7 73 24 3d 22 31 22  |,b,1).....s$="1"|
00001610  3a df 54 78 25 2c 79 25  0d 07 8a 17 e7 73 24 3d  |:.Tx%,y%.....s$=|
00001620  22 32 22 3a df 4d 78 25  2c 79 25 2d 6c 79 25 0d  |"2":.Mx%,y%-ly%.|
00001630  07 94 1b e7 73 24 3d 22  33 22 3a df 42 78 25 2c  |....s$="3":.Bx%,|
00001640  79 25 2d 28 6c 79 25 2a  32 29 0d 07 9e 17 e7 73  |y%-(ly%*2).....s|
00001650  24 3d 22 34 22 3a df 54  78 25 2b 54 70 25 2c 79  |$="4":.Tx%+Tp%,y|
00001660  25 0d 07 a8 1b e7 73 24  3d 22 35 22 3a df 4d 78  |%.....s$="5":.Mx|
00001670  25 2b 4d 70 25 2c 79 25  2d 6c 79 25 0d 07 b2 1f  |%+Mp%,y%-ly%....|
00001680  e7 73 24 3d 22 36 22 3a  df 42 78 25 2b 42 70 25  |.s$="6":.Bx%+Bp%|
00001690  2c 79 25 2d 28 6c 79 25  2a 32 29 0d 07 bc 1b e7  |,y%-(ly%*2).....|
000016a0  73 24 3d 22 37 22 3a df  54 78 25 2b 28 32 2a 54  |s$="7":.Tx%+(2*T|
000016b0  70 25 29 2c 79 25 0d 07  c6 1f e7 73 24 3d 22 38  |p%),y%.....s$="8|
000016c0  22 3a df 4d 78 25 2b 28  32 2a 4d 70 25 29 2c 79  |":.Mx%+(2*Mp%),y|
000016d0  25 2d 6c 79 25 0d 07 d0  23 e7 73 24 3d 22 39 22  |%-ly%...#.s$="9"|
000016e0  3a df 42 78 25 2b 28 32  2a 42 70 25 29 2c 79 25  |:.Bx%+(2*Bp%),y%|
000016f0  2d 28 6c 79 25 2a 32 29  0d 07 da 40 ed 3a 54 78  |-(ly%*2)...@.:Tx|
00001700  25 3d 54 78 25 2b 28 54  70 25 2a 32 29 2b 73 25  |%=Tx%+(Tp%*2)+s%|
00001710  3a 4d 78 25 3d 4d 78 25  2b 28 4d 70 25 2a 32 29  |:Mx%=Mx%+(Mp%*2)|
00001720  2b 73 25 3a 42 78 25 3d  42 78 25 2b 28 42 70 25  |+s%:Bx%=Bx%+(Bp%|
00001730  2a 32 29 2b 73 25 3a ed  0d 07 e4 05 e1 0d 07 ee  |*2)+s%:.........|
00001740  9b dc 33 32 38 39 37 31  2c 34 38 32 38 36 33 31  |..328971,4828631|
00001750  2c 37 31 33 39 2c 33 36  38 34 31 2c 33 39 33 32  |,7139,36841,3932|
00001760  35 32 31 37 2c 33 32 35  32 31 37 2c 37 31 33 39  |5217,325217,7139|
00001770  38 35 2c 33 32 38 37 39  2c 37 34 36 33 39 2c 37  |85,32879,74639,7|
00001780  34 36 33 2c 33 32 37 32  39 2c 33 39 2c 33 31 35  |463,32729,39,315|
00001790  37 39 2c 33 31 39 37 2c  37 39 33 31 2c 33 32 38  |79,3197,7931,328|
000017a0  37 31 2c 37 39 33 31 37  39 35 2c 33 32 35 39 35  |71,7931795,32595|
000017b0  38 37 31 2c 37 31 32 38  39 33 2c 37 34 36 2c 33  |871,712893,746,3|
000017c0  39 37 2c 36 37 2c 33 35  39 37 2c 39 35 33 37 2c  |97,67,3597,9537,|
000017d0  35 36 35 37 2c 37 33 39  0d 07 f8 0a dd f2 69 6e  |5657,739......in|
000017e0  73 74 0d 08 02 32 f2 70  28 22 42 59 20 44 20 48  |st...2.p("BY D H|
000017f0  4f 50 4b 49 4e 53 22 2c  31 35 30 2c 38 2c 38 2c  |OPKINS",150,8,8,|
00001800  38 2c 36 37 30 2c 36 37  30 2c 36 37 30 2c 31 32  |8,670,670,670,12|
00001810  2c 31 36 29 0d 08 0c 35  f2 70 28 22 47 55 49 44  |,16)...5.p("GUID|
00001820  45 20 59 4f 55 52 20 41  4e 47 45 4c 22 2c 31 31  |E YOUR ANGEL",11|
00001830  30 2c 38 2c 38 2c 38 2c  36 30 30 2c 36 30 30 2c  |0,8,8,8,600,600,|
00001840  36 30 30 2c 38 2c 31 36  29 0d 08 16 36 f2 70 28  |600,8,16)...6.p(|
00001850  22 52 4f 55 4e 44 20 54  48 45 20 54 48 49 52 54  |"ROUND THE THIRT|
00001860  45 45 4e 22 2c 38 30 2c  38 2c 38 2c 38 2c 36 30  |EEN",80,8,8,8,60|
00001870  30 2c 36 30 30 2c 36 30  30 2c 38 2c 31 36 29 0d  |0,600,600,8,16).|
00001880  08 20 69 f2 70 28 22 4c  41 59 45 52 53 20 4f 46  |. i.p("LAYERS OF|
00001890  20 48 45 4c 4c 20 41 4e  44 22 2c 35 34 2c 38 2c  | HELL AND",54,8,|
000018a0  38 2c 38 2c 36 30 30 2c  36 30 30 2c 36 30 30 2c  |8,8,600,600,600,|
000018b0  38 2c 31 36 29 3a f2 70  28 22 50 55 52 49 46 59  |8,16):.p("PURIFY|
000018c0  20 41 4c 4c 20 53 50 49  52 49 54 53 22 2c 32 34  | ALL SPIRITS",24|
000018d0  2c 38 2c 38 2c 38 2c 36  30 30 2c 36 30 30 2c 36  |,8,8,8,600,600,6|
000018e0  30 30 2c 38 2c 31 36 29  0d 08 2a b7 ef 35 3a ec  |00,8,16)..*..5:.|
000018f0  30 2c 32 30 30 3a f1 4d  24 3a f2 70 28 22 53 50  |0,200:.M$:.p("SP|
00001900  49 52 49 54 22 2c 31 39  36 2c 38 2c 38 2c 38 2c  |IRIT",196,8,8,8,|
00001910  31 30 30 2c 31 30 30 2c  31 30 30 2c 38 2c 31 36  |100,100,100,8,16|
00001920  29 3a ec 33 30 30 2c 32  30 30 3a e6 30 2c 31 3a  |):.300,200:.0,1:|
00001930  ef 32 33 39 3a e6 30 2c  32 3a f2 70 28 22 44 45  |.239:.0,2:.p("DE|
00001940  41 54 48 22 2c 31 39 36  2c 38 2c 38 2c 38 2c 34  |ATH",196,8,8,8,4|
00001950  30 30 2c 34 30 30 2c 34  30 30 2c 38 2c 31 36 29  |00,400,400,8,16)|
00001960  3a ec 36 30 30 2c 32 30  30 3a e6 30 2c 33 3a ef  |:.600,200:.0,3:.|
00001970  32 34 30 3a e6 30 2c 32  3a f2 70 28 22 44 45 4d  |240:.0,2:.p("DEM|
00001980  4f 4e 22 2c 31 39 36 2c  38 2c 38 2c 38 2c 37 30  |ON",196,8,8,8,70|
00001990  30 2c 37 30 30 2c 37 30  30 2c 38 2c 31 36 29 0d  |0,700,700,8,16).|
000019a0  08 34 3d ec 39 30 30 2c  32 30 30 3a ef 32 34 32  |.4=.900,200:.242|
000019b0  3a f2 70 28 22 53 54 4f  4d 50 45 52 22 2c 31 39  |:.p("STOMPER",19|
000019c0  36 2c 38 2c 38 2c 38 2c  31 30 30 30 2c 31 30 30  |6,8,8,8,1000,100|
000019d0  30 2c 31 30 30 30 2c 38  2c 31 36 29 0d 08 3e 06  |0,1000,8,16)..>.|
000019e0  ef 34 0d 08 48 0d e3 76  3d 31 b8 30 88 2d 31 0d  |.4..H..v=1.0.-1.|
000019f0  08 52 08 e6 30 2c 76 0d  08 5c 3f f2 70 28 22 59  |.R..0,v..\?.p("Y|
00001a00  4f 55 20 41 52 45 20 45  4e 54 45 52 49 4e 47 20  |OU ARE ENTERING |
00001a10  54 48 45 20 47 41 54 45  22 2c 38 35 30 2c 31 36  |THE GATE",850,16|
00001a20  2c 31 36 2c 31 36 2c 35  30 2c 35 30 2c 35 30 2c  |,16,16,50,50,50,|
00001a30  31 36 2c 31 36 29 0d 08  66 39 f2 70 28 22 50 52  |16,16)..f9.p("PR|
00001a40  45 50 41 52 45 20 59 4f  55 52 53 45 4c 46 22 2c  |EPARE YOURSELF",|
00001a50  36 35 30 2c 31 36 2c 31  36 2c 31 36 2c 32 37 30  |650,16,16,16,270|
00001a60  2c 32 37 30 2c 32 37 30  2c 31 36 2c 31 36 29 0d  |,270,270,16,16).|
00001a70  08 70 36 f2 70 28 22 46  4f 52 20 41 44 56 45 4e  |.p6.p("FOR ADVEN|
00001a80  54 55 52 45 22 2c 34 35  30 2c 31 36 2c 31 36 2c  |TURE",450,16,16,|
00001a90  31 36 2c 33 32 30 2c 33  32 30 2c 33 32 30 2c 31  |16,320,320,320,1|
00001aa0  36 2c 31 36 29 0d 08 7a  14 e7 76 3d 31 20 e3 70  |6,16)..z..v=1 .p|
00001ab0  3d 31 b8 31 30 30 30 3a  ed 0d 08 84 05 ed 0d 08  |=1.1000:........|
00001ac0  8e 05 e1 0d 08 98 36 dd  f2 66 61 64 65 3a f2 57  |......6..fade:.W|
00001ad0  3a ef 31 39 2c 32 2c 30  3b 30 3b 3a f2 57 3a ef  |:.19,2,0;0;:.W:.|
00001ae0  31 39 2c 33 2c 30 3b 30  3b 3a f2 57 3a ef 31 39  |19,3,0;0;:.W:.19|
00001af0  2c 31 2c 30 3b 30 3b 3a  e1 0d 08 a2 37 dd f2 72  |,1,0;0;:....7..r|
00001b00  61 69 73 65 3a f2 57 3a  ef 31 39 2c 31 2c 34 3b  |aise:.W:.19,1,4;|
00001b10  30 3b 3a f2 57 3a ef 31  39 2c 33 2c 31 3b 30 3b  |0;:.W:.19,3,1;0;|
00001b20  3a f2 57 3a ef 31 39 2c  32 2c 32 3b 30 3b 3a e1  |:.W:.19,2,2;0;:.|
00001b30  0d 08 ac 14 dd f2 57 3a  e3 70 3d 31 b8 37 30 30  |......W:.p=1.700|
00001b40  3a ed 3a e1 0d 08 b6 0a  dd f2 69 6e 69 74 0d 08  |:.:.......init..|
00001b50  c0 3b 61 24 3d 22 22 3a  78 25 3d 30 3a 79 25 3d  |.;a$="":x%=0:y%=|
00001b60  30 3a 6c 78 25 3d 30 3a  6c 79 25 3d 30 3a 73 25  |0:lx%=0:ly%=0:s%|
00001b70  3d 30 3a f7 8d 64 6e 47  3a e3 61 3d 31 b8 32 36  |=0:..dnG:.a=1.26|
00001b80  3a f3 6c 24 28 61 29 3a  ed 0d 08 ca 43 4c 49 25  |:.l$(a):....CLI%|
00001b90  3d 35 3a 45 25 3d 31 32  38 30 3a 53 50 4c 41 54  |=5:E%=1280:SPLAT|
00001ba0  3d a3 3a e2 31 2c 34 2c  2d 31 2c 2d 33 2c 2d 39  |=.:.1,4,-1,-3,-9|
00001bb0  2c 38 2c 34 2c 31 2c 31  32 37 2c 31 32 37 2c 2d  |,8,4,1,127,127,-|
00001bc0  33 2c 2d 33 2c 31 32 36  2c 31 32 36 0d 08 d4 ed  |3,-3,126,126....|
00001bd0  ef 32 33 2c 32 33 35 2c  37 2c 32 34 2c 33 39 2c  |.23,235,7,24,39,|
00001be0  37 34 2c 37 34 2c 31 39  31 2c 31 37 30 2c 31 37  |74,74,191,170,17|
00001bf0  30 2c 32 33 2c 32 33 36  2c 31 39 32 2c 34 38 2c  |0,23,236,192,48,|
00001c00  32 30 30 2c 31 36 34 2c  31 36 34 2c 32 35 30 2c  |200,164,164,250,|
00001c10  31 37 30 2c 31 37 30 2c  32 33 2c 32 33 37 2c 32  |170,170,23,237,2|
00001c20  35 35 2c 31 37 30 2c 31  37 30 2c 32 35 34 2c 31  |55,170,170,254,1|
00001c30  37 30 2c 31 37 30 2c 31  37 30 2c 32 35 35 2c 32  |70,170,170,255,2|
00001c40  33 2c 32 33 38 2c 32 35  34 2c 31 37 30 2c 31 37  |3,238,254,170,17|
00001c50  30 2c 32 35 34 2c 31 37  30 2c 31 37 30 2c 31 37  |0,254,170,170,17|
00001c60  30 2c 32 35 34 2c 32 33  2c 32 34 34 2c 30 2c 30  |0,254,23,244,0,0|
00001c70  2c 31 38 2c 30 2c 30 2c  30 2c 30 2c 30 2c 32 33  |,18,0,0,0,0,0,23|
00001c80  2c 32 34 35 2c 36 32 2c  37 33 2c 37 33 2c 37 33  |,245,62,73,73,73|
00001c90  2c 36 32 2c 32 30 2c 32  30 2c 38 2c 32 33 2c 32  |,62,20,20,8,23,2|
00001ca0  33 39 2c 30 2c 36 30 2c  39 30 2c 39 30 2c 31 32  |39,0,60,90,90,12|
00001cb0  36 2c 33 36 2c 36 30 2c  30 0d 08 de 4f 4d 24 3d  |6,36,60,0...OM$=|
00001cc0  bd 31 38 2b bd 30 2b bd  31 2b bd 32 34 35 2b bd  |.18+.0+.1+.245+.|
00001cd0  38 2b bd 31 38 2b bd 30  2b bd 32 2b bd 32 34 34  |8+.18+.0+.2+.244|
00001ce0  3a 47 24 3d bd 31 37 2b  bd 32 2b bd 32 33 35 2b  |:G$=.17+.2+.235+|
00001cf0  bd 32 33 36 2b bd 31 30  2b bd 38 2b bd 38 2b bd  |.236+.10+.8+.8+.|
00001d00  32 33 37 2b bd 32 33 38  0d 08 e8 d4 ef 32 33 2c  |237+.238.....23,|
00001d10  32 32 34 2c 32 38 2c 34  32 2c 32 38 2c 30 2c 36  |224,28,42,28,0,6|
00001d20  32 2c 37 33 2c 32 30 2c  32 30 2c 32 33 2c 32 32  |2,73,20,20,23,22|
00001d30  35 2c 31 32 2c 33 30 2c  31 32 2c 32 2c 32 38 2c  |5,12,30,12,2,28,|
00001d40  32 2c 32 2c 36 2c 32 33  2c 32 32 36 2c 31 32 2c  |2,2,6,23,226,12,|
00001d50  33 30 2c 31 32 2c 32 2c  32 38 2c 30 2c 32 30 2c  |30,12,2,28,0,20,|
00001d60  31 38 2c 32 33 2c 32 32  37 2c 32 38 2c 34 32 2c  |18,23,227,28,42,|
00001d70  32 38 2c 33 34 2c 37 33  2c 32 30 2c 32 30 2c 31  |28,34,73,20,20,1|
00001d80  36 2c 32 33 2c 32 32 38  2c 32 38 2c 34 32 2c 32  |6,23,228,28,42,2|
00001d90  38 2c 33 34 2c 37 33 2c  32 30 2c 32 30 2c 34 2c  |8,34,73,20,20,4,|
00001da0  32 33 2c 32 32 39 2c 32  38 2c 36 32 2c 32 38 2c  |23,229,28,62,28,|
00001db0  33 34 2c 37 33 2c 32 30  2c 32 30 2c 34 2c 32 33  |34,73,20,20,4,23|
00001dc0  2c 32 33 30 2c 32 38 2c  36 32 2c 32 38 2c 33 34  |,230,28,62,28,34|
00001dd0  2c 37 33 2c 32 30 2c 32  30 2c 31 36 0d 08 f2 df  |,73,20,20,16....|
00001de0  ef 32 33 2c 32 34 30 2c  36 36 2c 36 36 2c 31 30  |.23,240,66,66,10|
00001df0  32 2c 39 30 2c 36 30 2c  33 36 2c 36 30 2c 32 34  |2,90,60,36,60,24|
00001e00  2c 32 33 2c 32 34 31 2c  36 36 2c 36 36 2c 31 30  |,23,241,66,66,10|
00001e10  32 2c 39 30 2c 31 32 36  2c 33 36 2c 33 36 2c 32  |2,90,126,36,36,2|
00001e20  34 2c 32 33 2c 32 34 32  2c 30 2c 34 2c 33 36 2c  |4,23,242,0,4,36,|
00001e30  33 32 2c 36 2c 31 30 33  2c 32 33 31 2c 32 32 34  |32,6,103,231,224|
00001e40  2c 32 33 2c 32 34 33 2c  30 2c 33 32 2c 33 36 2c  |,23,243,0,32,36,|
00001e50  34 2c 39 36 2c 32 33 30  2c 32 33 31 2c 37 2c 32  |4,96,230,231,7,2|
00001e60  33 2c 32 33 31 2c 31 32  2c 33 30 2c 31 32 2c 31  |3,231,12,30,12,1|
00001e70  36 2c 31 34 2c 31 36 2c  31 36 2c 32 34 2c 32 33  |6,14,16,16,24,23|
00001e80  2c 32 33 32 2c 34 38 2c  31 32 30 2c 34 38 2c 36  |,232,48,120,48,6|
00001e90  34 2c 35 36 2c 30 2c 34  30 2c 37 32 2c 32 33 2c  |4,56,0,40,72,23,|
00001ea0  32 33 33 2c 32 34 2c 32  34 2c 32 34 2c 32 34 2c  |233,24,24,24,24,|
00001eb0  32 34 2c 32 34 2c 32 34  2c 32 34 0d 08 fc 69 ef  |24,24,24,24...i.|
00001ec0  32 33 2c 32 33 34 2c 30  2c 30 2c 30 2c 32 35 35  |23,234,0,0,0,255|
00001ed0  2c 32 35 35 2c 30 2c 30  2c 30 2c 32 33 2c 32 35  |,255,0,0,0,23,25|
00001ee0  35 2c 30 2c 32 35 31 2c  32 35 31 2c 32 35 31 2c  |5,0,251,251,251,|
00001ef0  30 2c 31 39 31 2c 31 39  31 2c 31 39 31 2c 32 33  |0,191,191,191,23|
00001f00  2c 32 35 33 2c 32 35 35  2c 32 35 35 2c 32 35 35  |,253,255,255,255|
00001f10  2c 32 35 35 2c 32 35 35  2c 32 35 35 2c 32 35 35  |,255,255,255,255|
00001f20  2c 32 35 35 0d 09 06 85  4d 24 28 30 2c 30 29 3d  |,255....M$(0,0)=|
00001f30  bd 32 32 34 3a 4d 24 28  30 2c 31 29 3d bd 32 32  |.224:M$(0,1)=.22|
00001f40  34 3a 4d 24 28 31 2c 30  29 3d bd 32 32 39 3a 4d  |4:M$(1,0)=.229:M|
00001f50  24 28 31 2c 31 29 3d bd  32 33 30 3a 4d 24 28 32  |$(1,1)=.230:M$(2|
00001f60  2c 30 29 3d bd 32 33 31  3a 4d 24 28 32 2c 31 29  |,0)=.231:M$(2,1)|
00001f70  3d bd 32 33 32 3a 4d 24  28 33 2c 30 29 3d bd 32  |=.232:M$(3,0)=.2|
00001f80  32 37 3a 4d 24 28 33 2c  31 29 3d bd 32 32 38 3a  |27:M$(3,1)=.228:|
00001f90  4d 24 28 34 2c 30 29 3d  bd 32 32 35 3a 4d 24 28  |M$(4,0)=.225:M$(|
00001fa0  34 2c 31 29 3d bd 32 32  36 0d 09 10 05 e1 0d 0a  |4,1)=.226.......|
00001fb0  78 19 dd f2 77 69 6e 3a  ef 32 38 2c 30 2c 31 39  |x...win:.28,0,19|
00001fc0  2c 31 39 2c 30 3a db 0d  0a 82 08 e6 30 2c 31 0d  |,19,0:......0,1.|
00001fd0  0a 8c 3c f2 70 28 22 59  4f 55 20 48 41 56 45 20  |..<.p("YOU HAVE |
00001fe0  44 4f 4e 45 20 57 45 4c  4c 22 2c 31 30 30 30 2c  |DONE WELL",1000,|
00001ff0  32 30 2c 32 30 2c 32 30  2c 31 30 30 2c 31 30 30  |20,20,20,100,100|
00002000  2c 31 30 30 2c 34 30 2c  31 36 29 0d 0a 96 08 e6  |,100,40,16).....|
00002010  30 2c 33 0d 0a a0 3b f2  70 28 22 54 48 45 20 41  |0,3...;.p("THE A|
00002020  4e 47 45 4c 53 20 57 45  4c 43 4f 4d 45 22 2c 38  |NGELS WELCOME",8|
00002030  30 30 2c 32 30 2c 32 30  2c 32 30 2c 31 30 30 2c  |00,20,20,20,100,|
00002040  31 30 30 2c 31 30 30 2c  32 34 2c 31 36 29 0d 0a  |100,100,24,16)..|
00002050  aa 35 f2 70 28 22 59 4f  55 20 54 4f 20 54 48 45  |.5.p("YOU TO THE|
00002060  49 52 22 2c 37 32 35 2c  32 30 2c 32 30 2c 32 30  |IR",725,20,20,20|
00002070  2c 32 30 30 2c 32 30 30  2c 32 30 30 2c 32 34 2c  |,200,200,200,24,|
00002080  31 36 29 0d 0a b4 34 f2  70 28 22 42 52 4f 54 48  |16)...4.p("BROTH|
00002090  45 52 48 4f 4f 44 22 2c  36 35 30 2c 32 30 2c 32  |ERHOOD",650,20,2|
000020a0  30 2c 32 30 2c 32 32 35  2c 32 32 35 2c 32 32 35  |0,20,225,225,225|
000020b0  2c 32 34 2c 31 36 29 0d  0a be 09 f2 57 3a f2 57  |,24,16).....W:.W|
000020c0  0d 0a c8 34 f2 70 28 22  49 4d 4d 4f 52 54 41 4c  |...4.p("IMMORTAL|
000020d0  49 54 59 22 2c 35 37 35  2c 32 30 2c 32 30 2c 32  |ITY",575,20,20,2|
000020e0  30 2c 32 32 35 2c 32 32  35 2c 32 32 35 2c 32 34  |0,225,225,225,24|
000020f0  2c 31 36 29 0d 0a d2 37  f2 70 28 22 49 53 20 59  |,16)...7.p("IS Y|
00002100  4f 55 52 20 52 45 57 41  52 44 22 2c 35 30 30 2c  |OUR REWARD",500,|
00002110  32 30 2c 32 30 2c 32 30  2c 31 37 35 2c 31 37 35  |20,20,20,175,175|
00002120  2c 31 37 35 2c 32 34 2c  31 36 29 0d 0a dc 07 41  |,175,24,16)....A|
00002130  3d a5 0d 0a e6 05 e1 0d  0a f0 19 eb 37 3a f6 3a  |=...........7:.:|
00002140  f1 22 20 61 74 20 6c 69  6e 65 20 22 3b 9e 3a e0  |." at line ";.:.|
00002150  0d ff                                             |..|
00002152