� Santa's Slip - Up!
� Listing III
� by Oliver Bishop
(� (c) The Micro User
2:
<*LOAD code 1D00
F*KEY10PAGE=&2200|MOLD|M
P.left=&1F04:right=&1E7F:down=&1F4C:up=&1F22
Z'� � � �<>17 � 6:�err � sc%=0:� �TlA
dnDIE=�:DEAD=�:bonus=1100:P=5:DIR=�:HOUSE=�:sc%=0:EE=0:screen=0:lives=3:R=�:pl=0:FALL=�:DD=0:START=�:smash=�
n �init:�init2:�6:�insts:�TXA
x:
�� �init:� DIE=� � �
�*�1,2,1,1,1,-5,1,1,126,0,0,-126,126,126
�)�2,2,1,2,1,2,1,2,126,0,0,-126,126,126
�,�3,1,2,-2,1,1,1,1,126,0,0,-126,126,126  
���23,224,128,69,170,85,170,85,162,1,23,225,28,22,62,28,8,30,63,127,23,226,123,123,62,28,24,0,24,56,23,227,56,104,124,56,16,120,252,254,23,228,222,222,124,56,24,0,24,28,23,229,223,223,223,0,223,223,223,223  
��� 23,230,60,102,251,253,253,255,126,60,23,231,0,28,28,31,31,31,127,255,23,232,60,126,255,255,255,255,255,255,23,233,0,0,128,224,240,252,254,255,23,234,255,255,129,129,129,129,255,255  
��� 23,235,255,129,129,129,255,255,255,255,23,236,255,129,129,129,161,129,129,129,23,237,189,255,126,255,219,255,102,60,23,238,255,231,255,231,255,231,126,60,23,241,123,115,38,60,24,130,230,199
ȳ� 23,242,60,110,94,94,126,126,203,16,23,243,0,0,0,0,85,170,255,255,23,244,85,170,85,170,85,170,85,170,23,245,128,69,170,85,170,69,2,0,23,246,129,255,129,129,129,255,129,129   
�I� 23,247,255,255,255,255,0,0,0,0,23,248,222,206,100,60,24,193,231,131
�dleft$=�(225)+�(8)+�(10)+�(226):plat$=�4,�224):righ$=�(227)+�(8)+�(10)+�(228):lift$=�(224)+�(224)
�Xman$=righ$:snowman$=�(237)+�(8)+�(10)+�(238):ladder$=�(246):blan$=" "+�(8)+�(10)+" "
�Troof$=�(231)+�(232)+�(233):wind$=�(234)+�(234)+�(234):door$=�(235)+�(236)+�(235)
�+house$=wind$+�(8)+�(8)+�(8)+�(10)+door$

�

:

� 5

"	�TvA

,!�6:� 23;8202;0;0;0;:�table:�5

6� 23;8202;0;0;0;

@�3:�17,20);house$

J�1:�17,19);roof$

T-?&70=&7178 �256:?&71=&7178 � 256:�&1D00  

^R �5:�0,3:� 320,700:� "Get Ready!":� 0,1:�320,696:� "Get Ready!":�4:�tune:EE=0 

h�7:�draw:�DvB  

r!� �draw:bonus=1100:� DEAD � �

|�:EE=0:HOUSE=�:�7 

�� screen>5 � �lights

�
*FX9,7

�*FX10,20

�:

�Fscr=screen � 6:� screen>11 � plat$=" "+�2,�224) � plat$=�4,�224)  

�%� 23,245,128,69,170,85,170,69,2,0

�� 19,3,7,0,0,0

��cls

��4,29);"Score":�update

� �  Note the next line number

�o � scr=0 � � �dNN:PSTA=1:PSTO=-2:PLEV=0:ST=9:STO=17:LL=7:S=10:mx%=2:my%=1:FF=16:GG=26:hx%=17:hy%=25:�screen

�q � scr=1 � � �TrO:PSTA=5:PSTO=13:PLEV=8:ST=9:STO=13:LL=17:S=10:mx%=12:my%=1:FF=16:GG=26:hx%=17:hy%=25:�screen

�q � scr=2 � � �tVO:PSTA=5:PSTO=9:PLEV=13:ST=14:STO=18:LL=12:S=15:mx%=5:my%=6:FF=16:GG=26:hx%=17:hy%=25:�screen
p � scr=3 � � �dzO:PSTA=3:PSTO=10:PLEV=13:ST=2:STO=17:LL=27:S=3:mx%=16:my%=21:FF=16:GG=1:hx%=17:hy%=0:�screen
q � scr=4 � � �D^P:PSTA=7:PSTO=16:PLEV=18:ST=15:STO=18:LL=22:S=16:mx%=9:my%=26:FF=4:GG=21:hx%=1:hy%=20:�screen
� scr=5 ��uncls:�win:� �D|A
&
�uncls
0;add=&5800+&10*mx%+&140*my%:?&70=add �256:?&71=add � 256
::
D:
NJ�2:� D=0 � lives-1:�D,29);righ$:�:�1:� A=27 � 0 � -1:�0,A);ladder$:�
X
�&1D00
b�
l:
v
DEAD=�:� 
�START=�:bonus=bonus-5
��DEAD=� � � �TVC
��lives<1 � DEAD=� :� �TVC
�� mx%=0 �ups 
�� my%>27 � �die
�� DIE=� � DIE=�:�die
�� �(-74)��jump
�.� �(-98)�mx%>0��l:�blank:mx%=mx%-1:� �TtC 
�2� �(-67)� mx%<19 ��r:�blank:mx%=mx%+1:� �TtC  
�1� FALL=� � FALL=�:�mx%+1,my%);" ":�die      
�� �(-56) � � � �(-52) 
�� DIE=� � DIE=�:�die
�&� screen>5 � screen<11 � �lights  
� screen>17 � �lights 
� DEAD = � � �move:�test  
� DEAD:� DEAD � � �TlA
 :
*:
4an=an+1:� an=3 � an=1
>
�0,3,12,2
H� DEAD=� � � �TVC
R� mx%>19 � mx%=19
\�1
fL� HOUSE=� � mx%=FF � my%=GG � HOUSE=�:screen=screen+1:�getready:� �DhA  
p�test:�TVC
z:
�:
�<� �blank:�move:� �mx%*64,1023-((my%+2)*32)+12)=3 � DIE=�
��
�
��gettest
��
�:
�4��test:�plat:� �mx%*64,1023-(my%+2)*32)=0 ��fall
�,� �mx%*64,1023-((my%+2)*32)+8)=2 ��get  
�.� �mx%*64,1023-((my%+2)*32)+12)=3 ��die:� 
��
�:
�E��fall:Z=�:DD=0:�1:�:DD=DD+1:�&0011,3,200-my%*4,2:my%=my%+1:�down
�?� �(mx%*64)+8,1023-(my%+2)*32)=2 � �mx%,my%+2);" ":�get   
+� �mx%*64,1023-(my%+2)*32)<>0 � my%>26 
!� Z=� � �&0010,-15,7,10:Z=�  
� DD>6 � �die
$� mx%>=27 � �die
.�
8:
B��jump:� my%<1 � �
L �2:� �(-98) � mx%>3 ��left:�
V' � �(-67) � mx%<16 � �right:�      
`	�up:�
j:
to��left:�blank:mx%=mx%-1:my%=my%-1:�l:� up:�wait:�blank:mx%=mx%-1:�l:�wait:�blank:mx%=mx%-1:�l:�wait:�blank 
~*mx%=mx%-1:my%=my%+1:�l:� down:�wait:� 
�:
���wait:� mx%=0 � �ups
�<�plat:�testy:�t:� smash=� � my%=my%-1:mx%=mx%-1:smash=� 
�.� smash2=� � my%=my%-1:mx%=mx%-1:smash2=� 
��t:�
�:
�p��right:�blank:mx%=mx%+1:my%=my%-1:�r:� up:�wait:�blank:mx%=mx%+1:�r:�wait:�blank:mx%=mx%+1:�r:�wait:�blank 
�+mx%=mx%+1:my%=my%+1:�r:� down:�wait:�  
�:
�"��l:� left:�d=0 � 50:�:�left:�
�$��r:� right:�d=0 � 50:�:�right:�
� ��up:�up:�up:� down:� down:�
:

��t:� A=1 � 2:�:�
:
��wait1:�plat:�
(:
2��die:� A=my% � 28:� down:�
<[A=3:�1,2,48,A:�1,2,40,A:�1,2,32,A:�1,2,24,A:�1,2,20,A:�1,2,12,A:�1,2,4,A*3:�1,2,52,A   
F*FX 15,1
PDIE=�:�gover:�draw:�
Z:
d��move:�R=� � S>STO � R=�
n"�IF DEAD=TRUE THEN ENDPROC    
x�R=� � S<ST � R=�
��S,LL);" ":� R=� � S=S+1
�� R=� � S=S-1
��3:�S,LL);�(230):�2:�
�:
�e� �getready:� 0,0:� A=0 � 640 � 8:�&0011,3,200-A/5,10:� A,0:� A,1023:� 1279-A,0:� 1279-A,1023:� A
��3:� bonus<5 � �
�(�5,5);"Time Bonus";�8,7);bonus     
�3sc%=sc%+bonus:bonus=1100:�A=0 � 2000:�:�128:�:�
�:
�G��gover:bonus=1100:lives=lives-1:� lives=0 � � �dfE � �startagain:�
�� T=0 � 1000:� 
�� R,E,V,O," ",E,M,A,G
�k� �dpE:� A=1 � 9:� A$:� T=1 � 13-A:�&0011,-15,T+50,2:�T,15);A$:� S=0 � 40:�:�T,15);" ":�:�T,15);A$:�
� T=0 � 3000:�:DEAD=�:�
:
C��ups:� my%=1 � � �1:�A=my% � 2 �-1:�1,1,50-A,1:� up:�:my%=1:� 
":
,��d(A,B,C,D)
6�7
@+� B<>28 � �dl(A,B,C,D) � �A,B);�19,�D)
J�
T:
^
��plat
h� PLEV=0 �
r pl=pl+1:� pl=2 � pl=0 � �   
| �P,PLEV);"    "  
�� 7
�� DIR=� � P=P+1
�� DIR=� � P=P-1
��P,PLEV);plat$ 
�� P=PSTO � DIR=�  
�� P=PSTA � DIR=�
��2
��
�:
�� �startagain
��S=0 � 4000:�
��
�:
� �insts
% � sc%>=score%(8) � �entername   

DEAD=�
&�
0�0,1);�20,�(242)+" ")
: �10,3);"Santa's Slip - Up!"
D�0,5);�20,�(242)+" ")
N#�10,20);"PRESS SPACE TO START"
X3�1,15);"Z = Left   X = Right    Return = Jump"
b!�1,8);"S = Sound  Q = Quiet"
l&�1,11);"P = Pause  R = Resume"   
v�23,1,0;0;0;0; 
�A$=�:� A$=" "��
�� A$="S" � *FX210,0
�� A$="Q" � *FX210,1
�	�t@G
��
�:
���testy:smash=�:smash2=�
��
�6� �(mx%-1)*64,1023-(my%+1)*32)=3 � FALL=�:smash2=�
�5� �(mx%+1)*64,1023-(my%+1)*32)=3 � FALL=�:smash=�
�� FALL=� �die:FALL=�
��
�:
	��get
�&0011,-15,25,1
sc%=sc%+10
 �update
*"EE=EE+1:� EE=11 � EE=1:HOUSE=�
4�mx%,my%);" "
>�mx%,my%+1);" " 
H
�&1D00
R�1
\.� HOUSE=� � �0,30);" Your sack is full!" 
f� HOUSE=� � �0,29);�3
p�
z:
�
� �win
��3:�129
�
�1,4)�17
��1,5);" CONGRATULATIONS "
�
�1,8)�17
��1,6)�17 
�5� lives<3 � �1,7)"  EXTRA MAN AND  " � �1,7)�17
��4,11)�11    
��4,12);" B O N U S " 
��4,13)�11 
�
�7,16)�5
��7,17);" 500 "
�
�7,18)�5
		� 128
	!�1,2);�9,snowman$+�11+�32)  
	�2,10);snowman$
	$�16,10);snowman$ 
	.�5,17);snowman$ 
	8�13,17);snowman$ 
	B� A=0 � 100 � 4
	L�1,2,A,2
	V�1,2,1,1
	`�
	jscreen=screen+1
	tsc%=sc%+500 
	~� lives<3 � lives=lives+1
	��
	��
	�:
	�� �tune 
	�
� �TJJ
	�	A=7  
	�� T=1 � 17
	�	� C,D
	�� C=999 � �1,0,0,A/2:� �T@J
	�
�1,3,C,D 
	��1,0,0,0.5
	�
�right
� T

i�52,A,72,A,72,A,72,A,80,A,88,A/2,80,A/2,88,A/2,92,A/2,100,A,88,A,92,A,88,A/2,72,A/2,80,A,80,A,72,A*2 
	� 0,0
 
(� Z=0 � 3000:� 
2�
<:
F� �table
P � sc%>score%(8) � �entername
Z�
d�'�20,�(242)+" ")
n?� "  Santa's Slip - Up!";�6;"Hi - Scores":�'�20,�(242)+" ")
x� I%=1 � 8
�2�;�5);I%;".  ";�10);name$(I%);�30);score%(I%) 
��
��
�*FX15,1
� �9)"Press <SPACE> to play!"
�
���=32
�DEAD=�:HOUSE=�:lives=3
�screen=0:sc%=0 
��
�:
�� �init2
�	��THL
�� score%(8),name$(8)
� I%=1 � 8 
score%(I%)=5000 - I%*500  
� A$:name$(I%)=A$
"� I%
,�
6:
@� �entername
J
�128:�
T� 3
^�0,3);�20,�(242)+" ") 
h �5,5);"**Congratulations**"
r�0,7);�20,�(242)+" ")
|�
�G� '"You are in the high score table!"''"What is your name?"''''"?";
�*FX 15,1
�!�1:string$="":� 23,1,1;0;0;0;
�
�:K%=�(0)
�4� K%>31 � K%<127 � �<18 string$=string$+�K%:�K% 
�B� K%=127 � � string$ string$=�string$,�(string$)-1):� �>1 � K%
�� K%=13
�"score%(8)=sc%:name$(8)=string$
�� I%=8 � 2 � -1
�� score%(I%)>score%(I%-1) sc%=score%(I%):score%(I%)=score%(I%-1):score%(I%-1)=sc%:string$=name$(I%):name$(I%)=name$(I%-1):name$(I%-1)=string$ 
�� I%
��
�:
�� "Written By:","Oliver Bishop","Original Screens by","Stuart Williams","Julian Bishop","Philip Jefferies","Rashid Qureshi","Jonathan Price" 
:
��lights
&
�0,3,12,1
0
A=�(2)
:� A=1 � � 19,3,15,0,0,0
D� A=2 � � 19,3,7,0,0,0
N�
X:
b��update:�1
l�10,29);sc% 
v�
�:
�	��err
��128:�7
��
�
�''''':� 
��''"At line"   
��';�
�
�''':�
�:
�
� �screen
�,�0,1:�A=0 � 60:�69,�(1279),�(923)+100:� 
�P=PSTA+1
��

� A,B,C

� A=-1 � � �T`M

�d(A,B,C,224)

 
� A=-1

*�

4	� A,B

>� A=-1 � � �DRM

H�A,B);�(230)

R
� A=-1

\�

f
� A,B 

p� A=-1 � � �tDM

z�A,B);snowman$

�
� A=-1

�
� 129:� 2

��

�	� A,B

�� A=-1 � � �d@M

��A,B);�(229)

�
� A=-1

�� 128:�1

�C�A=0 � 28:�0,A);�246:�:�hx%,hy%);roof$:�3:�hx%,hy%+1);house$

�:

��

���dl(A,B,C,D)

��0,3:A=A*64  
B=B*32:B=1023-B 
�5:� A,B:��C,�D)
� A,B:�0,1:��C,�243):�4
$�
.	��cls
8�A=1 �3
B�19,A,0,0,0,0
L�
V�
`��uncls
j�19,1,1,0,0,0 
t�19,2,3,0,0,0
~�19,3,7,0,0,0 
��
�:
�:
�$� All these colons are necessary
�� to space out the data.
�� Screen 1
�� Note the next line number
�K� 1,3,10, 8,8,12, 1,13,7, 10,18,10, 1,23,10, 1,28,19, 12,13,4, -1,-1,-1
�� -1,-1
�� 19,6, 19,16, -1,-1
�b� 5,2, 9,2, 2,12, 5,12, 12,17, 16,17, 2,22, 5,22, 9,22, 2,27, 6,27, 10,27, 13,27, 13,12, -1,-1
�:
:

:
:
:
(� Screen 2
2p� 1,3,6, 11,3,4, 1,8,4, 17,8,3, 4,13,6, 1,28,19, 8,18,7, 1,18,4, 15,13,5, 18,18,2, 4,23,7, 15,23,5, -1,-1,-1
<� 19,12, 6,27, 8,27, -1,-1
F� 7,26, 19,21, 10,21, -1,-1
PO� 3,2, 2,7, 2,17, 6,12, 17,12, 3,27, 12,27, 7,22, 17,22, 14,2, 18,7, -1,-1 
Z:
d:
n:
x:
�:
�� Screen 3
�n� 1,3,2, 1,8,6, 6,3,5, 14,3,6, 11,8,3, 17,8,3, 1,13,4, 13,13,7, 1,28,19, 3,18,5, 12,18,8, 8,23,4, -1,-1,-1
�� 9,27, -1,-1
�#� 1,6, 19,1, 19,6, 19,16, -1,-1
�[� 3,7, 15,2, 9,2, 12,7, 2,12, 14,17, 17,17, 5,17, 9,22, 2,27, 6,27, 12,27, 15,27, -1,-1
�:
�:
�:
�:
�:
�� Screen 4
�y� 1,3,7, 11,3,9, 1,28,19, 14,23,6, 1,23,4, 8,23,3, 14,18,6, 14,13,6, 13,8,7, 1,13,2, 5,18,3, 11,18,1, 4,8,6, -1,-1,-1
� 5,7, -1,-1
� 19,6, 19,11, 19,26, -1,-1
M� 3,2, 6,2, 13,2, 7,7, 15,7, 16,12, 16,17, 3,22, 18,22, 9,22, 6,17, -1,-1
":
,:
6:
@:
J:
T� Screen 5
^n� 1,28,19, 1,23,7, 1,18,6, 1,23,6, 1,13,6, 1,8,4, 1,3,1, 14,23,6, 6,3,5, 15,3,5, 10,8,6, 14,13,6, -1,-1,-1
h� 2,12, 11,27, -1,-1
r� 19,11, 19,1, 19,26, -1,-1
|Y� 14,27, 3,27, 6,27, 6,22, 2,27, 2,17, 5,17, 5,12, 3,7, 8,2, 16,2, 11,7, 15,12, -1,-1
�

00000000  0d 00 0a 18 f4 20 53 61  6e 74 61 27 73 20 53 6c  |..... Santa's Sl|
00000010  69 70 20 2d 20 55 70 21  0d 00 14 11 f4 20 4c 69  |ip - Up!..... Li|
00000020  73 74 69 6e 67 20 49 49  49 0d 00 1e 16 f4 20 62  |sting III..... b|
00000030  79 20 4f 6c 69 76 65 72  20 42 69 73 68 6f 70 0d  |y Oliver Bishop.|
00000040  00 28 18 f4 20 28 63 29  20 54 68 65 20 4d 69 63  |.(.. (c) The Mic|
00000050  72 6f 20 55 73 65 72 0d  00 32 05 3a 0d 00 3c 13  |ro User..2.:..<.|
00000060  2a 4c 4f 41 44 20 63 6f  64 65 20 31 44 30 30 0d  |*LOAD code 1D00.|
00000070  00 46 1b 2a 4b 45 59 31  30 50 41 47 45 3d 26 32  |.F.*KEY10PAGE=&2|
00000080  32 30 30 7c 4d 4f 4c 44  7c 4d 0d 00 50 2e 6c 65  |200|MOLD|M..P.le|
00000090  66 74 3d 26 31 46 30 34  3a 72 69 67 68 74 3d 26  |ft=&1F04:right=&|
000000a0  31 45 37 46 3a 64 6f 77  6e 3d 26 31 46 34 43 3a  |1E7F:down=&1F4C:|
000000b0  75 70 3d 26 31 46 32 32  0d 00 5a 27 ee 20 85 20  |up=&1F22..Z'. . |
000000c0  e7 20 9f 3c 3e 31 37 20  eb 20 36 3a f2 65 72 72  |. .<>17 . 6:.err|
000000d0  20 8b 20 73 63 25 3d 30  3a e5 20 8d 54 6c 41 0d  | . sc%=0:. .TlA.|
000000e0  00 64 6e 44 49 45 3d a3  3a 44 45 41 44 3d a3 3a  |.dnDIE=.:DEAD=.:|
000000f0  62 6f 6e 75 73 3d 31 31  30 30 3a 50 3d 35 3a 44  |bonus=1100:P=5:D|
00000100  49 52 3d b9 3a 48 4f 55  53 45 3d a3 3a 73 63 25  |IR=.:HOUSE=.:sc%|
00000110  3d 30 3a 45 45 3d 30 3a  73 63 72 65 65 6e 3d 30  |=0:EE=0:screen=0|
00000120  3a 6c 69 76 65 73 3d 33  3a 52 3d b9 3a 70 6c 3d  |:lives=3:R=.:pl=|
00000130  30 3a 46 41 4c 4c 3d a3  3a 44 44 3d 30 3a 53 54  |0:FALL=.:DD=0:ST|
00000140  41 52 54 3d a3 3a 73 6d  61 73 68 3d b9 0d 00 6e  |ART=.:smash=...n|
00000150  20 f2 69 6e 69 74 3a f2  69 6e 69 74 32 3a eb 36  | .init:.init2:.6|
00000160  3a f2 69 6e 73 74 73 3a  e5 8d 54 58 41 0d 00 78  |:.insts:..TXA..x|
00000170  05 3a 0d 00 82 17 dd 20  f2 69 6e 69 74 3a e7 20  |.:..... .init:. |
00000180  44 49 45 3d b9 20 8c 20  e1 0d 00 8c 2a e2 31 2c  |DIE=. . ....*.1,|
00000190  32 2c 31 2c 31 2c 31 2c  2d 35 2c 31 2c 31 2c 31  |2,1,1,1,-5,1,1,1|
000001a0  32 36 2c 30 2c 30 2c 2d  31 32 36 2c 31 32 36 2c  |26,0,0,-126,126,|
000001b0  31 32 36 0d 00 96 29 e2  32 2c 32 2c 31 2c 32 2c  |126...).2,2,1,2,|
000001c0  31 2c 32 2c 31 2c 32 2c  31 32 36 2c 30 2c 30 2c  |1,2,1,2,126,0,0,|
000001d0  2d 31 32 36 2c 31 32 36  2c 31 32 36 0d 00 a0 2c  |-126,126,126...,|
000001e0  e2 33 2c 31 2c 32 2c 2d  32 2c 31 2c 31 2c 31 2c  |.3,1,2,-2,1,1,1,|
000001f0  31 2c 31 32 36 2c 30 2c  30 2c 2d 31 32 36 2c 31  |1,126,0,0,-126,1|
00000200  32 36 2c 31 32 36 20 20  0d 00 aa d1 ef 32 33 2c  |26,126  .....23,|
00000210  32 32 34 2c 31 32 38 2c  36 39 2c 31 37 30 2c 38  |224,128,69,170,8|
00000220  35 2c 31 37 30 2c 38 35  2c 31 36 32 2c 31 2c 32  |5,170,85,162,1,2|
00000230  33 2c 32 32 35 2c 32 38  2c 32 32 2c 36 32 2c 32  |3,225,28,22,62,2|
00000240  38 2c 38 2c 33 30 2c 36  33 2c 31 32 37 2c 32 33  |8,8,30,63,127,23|
00000250  2c 32 32 36 2c 31 32 33  2c 31 32 33 2c 36 32 2c  |,226,123,123,62,|
00000260  32 38 2c 32 34 2c 30 2c  32 34 2c 35 36 2c 32 33  |28,24,0,24,56,23|
00000270  2c 32 32 37 2c 35 36 2c  31 30 34 2c 31 32 34 2c  |,227,56,104,124,|
00000280  35 36 2c 31 36 2c 31 32  30 2c 32 35 32 2c 32 35  |56,16,120,252,25|
00000290  34 2c 32 33 2c 32 32 38  2c 32 32 32 2c 32 32 32  |4,23,228,222,222|
000002a0  2c 31 32 34 2c 35 36 2c  32 34 2c 30 2c 32 34 2c  |,124,56,24,0,24,|
000002b0  32 38 2c 32 33 2c 32 32  39 2c 32 32 33 2c 32 32  |28,23,229,223,22|
000002c0  33 2c 32 32 33 2c 30 2c  32 32 33 2c 32 32 33 2c  |3,223,0,223,223,|
000002d0  32 32 33 2c 32 32 33 20  20 0d 00 b4 bc ef 20 32  |223,223  ..... 2|
000002e0  33 2c 32 33 30 2c 36 30  2c 31 30 32 2c 32 35 31  |3,230,60,102,251|
000002f0  2c 32 35 33 2c 32 35 33  2c 32 35 35 2c 31 32 36  |,253,253,255,126|
00000300  2c 36 30 2c 32 33 2c 32  33 31 2c 30 2c 32 38 2c  |,60,23,231,0,28,|
00000310  32 38 2c 33 31 2c 33 31  2c 33 31 2c 31 32 37 2c  |28,31,31,31,127,|
00000320  32 35 35 2c 32 33 2c 32  33 32 2c 36 30 2c 31 32  |255,23,232,60,12|
00000330  36 2c 32 35 35 2c 32 35  35 2c 32 35 35 2c 32 35  |6,255,255,255,25|
00000340  35 2c 32 35 35 2c 32 35  35 2c 32 33 2c 32 33 33  |5,255,255,23,233|
00000350  2c 30 2c 30 2c 31 32 38  2c 32 32 34 2c 32 34 30  |,0,0,128,224,240|
00000360  2c 32 35 32 2c 32 35 34  2c 32 35 35 2c 32 33 2c  |,252,254,255,23,|
00000370  32 33 34 2c 32 35 35 2c  32 35 35 2c 31 32 39 2c  |234,255,255,129,|
00000380  31 32 39 2c 31 32 39 2c  31 32 39 2c 32 35 35 2c  |129,129,129,255,|
00000390  32 35 35 20 20 0d 00 be  c3 ef 20 32 33 2c 32 33  |255  ..... 23,23|
000003a0  35 2c 32 35 35 2c 31 32  39 2c 31 32 39 2c 31 32  |5,255,129,129,12|
000003b0  39 2c 32 35 35 2c 32 35  35 2c 32 35 35 2c 32 35  |9,255,255,255,25|
000003c0  35 2c 32 33 2c 32 33 36  2c 32 35 35 2c 31 32 39  |5,23,236,255,129|
000003d0  2c 31 32 39 2c 31 32 39  2c 31 36 31 2c 31 32 39  |,129,129,161,129|
000003e0  2c 31 32 39 2c 31 32 39  2c 32 33 2c 32 33 37 2c  |,129,129,23,237,|
000003f0  31 38 39 2c 32 35 35 2c  31 32 36 2c 32 35 35 2c  |189,255,126,255,|
00000400  32 31 39 2c 32 35 35 2c  31 30 32 2c 36 30 2c 32  |219,255,102,60,2|
00000410  33 2c 32 33 38 2c 32 35  35 2c 32 33 31 2c 32 35  |3,238,255,231,25|
00000420  35 2c 32 33 31 2c 32 35  35 2c 32 33 31 2c 31 32  |5,231,255,231,12|
00000430  36 2c 36 30 2c 32 33 2c  32 34 31 2c 31 32 33 2c  |6,60,23,241,123,|
00000440  31 31 35 2c 33 38 2c 36  30 2c 32 34 2c 31 33 30  |115,38,60,24,130|
00000450  2c 32 33 30 2c 31 39 39  0d 00 c8 b3 ef 20 32 33  |,230,199..... 23|
00000460  2c 32 34 32 2c 36 30 2c  31 31 30 2c 39 34 2c 39  |,242,60,110,94,9|
00000470  34 2c 31 32 36 2c 31 32  36 2c 32 30 33 2c 31 36  |4,126,126,203,16|
00000480  2c 32 33 2c 32 34 33 2c  30 2c 30 2c 30 2c 30 2c  |,23,243,0,0,0,0,|
00000490  38 35 2c 31 37 30 2c 32  35 35 2c 32 35 35 2c 32  |85,170,255,255,2|
000004a0  33 2c 32 34 34 2c 38 35  2c 31 37 30 2c 38 35 2c  |3,244,85,170,85,|
000004b0  31 37 30 2c 38 35 2c 31  37 30 2c 38 35 2c 31 37  |170,85,170,85,17|
000004c0  30 2c 32 33 2c 32 34 35  2c 31 32 38 2c 36 39 2c  |0,23,245,128,69,|
000004d0  31 37 30 2c 38 35 2c 31  37 30 2c 36 39 2c 32 2c  |170,85,170,69,2,|
000004e0  30 2c 32 33 2c 32 34 36  2c 31 32 39 2c 32 35 35  |0,23,246,129,255|
000004f0  2c 31 32 39 2c 31 32 39  2c 31 32 39 2c 32 35 35  |,129,129,129,255|
00000500  2c 31 32 39 2c 31 32 39  20 20 20 0d 00 d2 49 ef  |,129,129   ...I.|
00000510  20 32 33 2c 32 34 37 2c  32 35 35 2c 32 35 35 2c  | 23,247,255,255,|
00000520  32 35 35 2c 32 35 35 2c  30 2c 30 2c 30 2c 30 2c  |255,255,0,0,0,0,|
00000530  32 33 2c 32 34 38 2c 32  32 32 2c 32 30 36 2c 31  |23,248,222,206,1|
00000540  30 30 2c 36 30 2c 32 34  2c 31 39 33 2c 32 33 31  |00,60,24,193,231|
00000550  2c 31 33 31 0d 00 dc 64  6c 65 66 74 24 3d bd 28  |,131...dleft$=.(|
00000560  32 32 35 29 2b bd 28 38  29 2b bd 28 31 30 29 2b  |225)+.(8)+.(10)+|
00000570  bd 28 32 32 36 29 3a 70  6c 61 74 24 3d c4 34 2c  |.(226):plat$=.4,|
00000580  bd 32 32 34 29 3a 72 69  67 68 24 3d bd 28 32 32  |.224):righ$=.(22|
00000590  37 29 2b bd 28 38 29 2b  bd 28 31 30 29 2b bd 28  |7)+.(8)+.(10)+.(|
000005a0  32 32 38 29 3a 6c 69 66  74 24 3d bd 28 32 32 34  |228):lift$=.(224|
000005b0  29 2b bd 28 32 32 34 29  0d 00 e6 58 6d 61 6e 24  |)+.(224)...Xman$|
000005c0  3d 72 69 67 68 24 3a 73  6e 6f 77 6d 61 6e 24 3d  |=righ$:snowman$=|
000005d0  bd 28 32 33 37 29 2b bd  28 38 29 2b bd 28 31 30  |.(237)+.(8)+.(10|
000005e0  29 2b bd 28 32 33 38 29  3a 6c 61 64 64 65 72 24  |)+.(238):ladder$|
000005f0  3d bd 28 32 34 36 29 3a  62 6c 61 6e 24 3d 22 20  |=.(246):blan$=" |
00000600  22 2b bd 28 38 29 2b bd  28 31 30 29 2b 22 20 22  |"+.(8)+.(10)+" "|
00000610  0d 00 f0 54 72 6f 6f 66  24 3d bd 28 32 33 31 29  |...Troof$=.(231)|
00000620  2b bd 28 32 33 32 29 2b  bd 28 32 33 33 29 3a 77  |+.(232)+.(233):w|
00000630  69 6e 64 24 3d bd 28 32  33 34 29 2b bd 28 32 33  |ind$=.(234)+.(23|
00000640  34 29 2b bd 28 32 33 34  29 3a 64 6f 6f 72 24 3d  |4)+.(234):door$=|
00000650  bd 28 32 33 35 29 2b bd  28 32 33 36 29 2b bd 28  |.(235)+.(236)+.(|
00000660  32 33 35 29 0d 00 fa 2b  68 6f 75 73 65 24 3d 77  |235)...+house$=w|
00000670  69 6e 64 24 2b bd 28 38  29 2b bd 28 38 29 2b bd  |ind$+.(8)+.(8)+.|
00000680  28 38 29 2b bd 28 31 30  29 2b 64 6f 6f 72 24 0d  |(8)+.(10)+door$.|
00000690  01 04 05 e1 0d 01 0e 05  3a 0d 01 18 07 eb 20 35  |........:..... 5|
000006a0  0d 01 22 09 e5 8d 54 76  41 0d 01 2c 21 eb 36 3a  |.."...TvA..,!.6:|
000006b0  ef 20 32 33 3b 38 32 30  32 3b 30 3b 30 3b 30 3b  |. 23;8202;0;0;0;|
000006c0  3a f2 74 61 62 6c 65 3a  eb 35 0d 01 36 14 ef 20  |:.table:.5..6.. |
000006d0  32 33 3b 38 32 30 32 3b  30 3b 30 3b 30 3b 0d 01  |23;8202;0;0;0;..|
000006e0  40 16 fb 33 3a f1 8a 31  37 2c 32 30 29 3b 68 6f  |@..3:..17,20);ho|
000006f0  75 73 65 24 0d 01 4a 15  fb 31 3a f1 8a 31 37 2c  |use$..J..1:..17,|
00000700  31 39 29 3b 72 6f 6f 66  24 0d 01 54 2d 3f 26 37  |19);roof$..T-?&7|
00000710  30 3d 26 37 31 37 38 20  83 32 35 36 3a 3f 26 37  |0=&7178 .256:?&7|
00000720  31 3d 26 37 31 37 38 20  81 20 32 35 36 3a d6 26  |1=&7178 . 256:.&|
00000730  31 44 30 30 20 20 0d 01  5e 52 20 ef 35 3a e6 30  |1D00  ..^R .5:.0|
00000740  2c 33 3a ec 20 33 32 30  2c 37 30 30 3a f1 20 22  |,3:. 320,700:. "|
00000750  47 65 74 20 52 65 61 64  79 21 22 3a e6 20 30 2c  |Get Ready!":. 0,|
00000760  31 3a ec 33 32 30 2c 36  39 36 3a f1 20 22 47 65  |1:.320,696:. "Ge|
00000770  74 20 52 65 61 64 79 21  22 3a ef 34 3a f2 74 75  |t Ready!":.4:.tu|
00000780  6e 65 3a 45 45 3d 30 20  0d 01 68 14 fb 37 3a f2  |ne:EE=0 ..h..7:.|
00000790  64 72 61 77 3a e5 8d 44  76 42 20 20 0d 01 72 21  |draw:..DvB  ..r!|
000007a0  dd 20 f2 64 72 61 77 3a  62 6f 6e 75 73 3d 31 31  |. .draw:bonus=11|
000007b0  30 30 3a e7 20 44 45 41  44 20 8c 20 e1 0d 01 7c  |00:. DEAD . ...||
000007c0  16 db 3a 45 45 3d 30 3a  48 4f 55 53 45 3d a3 3a  |..:EE=0:HOUSE=.:|
000007d0  fb 37 20 0d 01 86 18 e7  20 73 63 72 65 65 6e 3e  |.7 ..... screen>|
000007e0  35 20 8c 20 f2 6c 69 67  68 74 73 0d 01 90 0a 2a  |5 . .lights....*|
000007f0  46 58 39 2c 37 0d 01 9a  0c 2a 46 58 31 30 2c 32  |FX9,7....*FX10,2|
00000800  30 0d 01 a4 05 3a 0d 01  ae 46 73 63 72 3d 73 63  |0....:...Fscr=sc|
00000810  72 65 65 6e 20 83 20 36  3a e7 20 73 63 72 65 65  |reen . 6:. scree|
00000820  6e 3e 31 31 20 8c 20 70  6c 61 74 24 3d 22 20 22  |n>11 . plat$=" "|
00000830  2b c4 32 2c bd 32 32 34  29 20 8b 20 70 6c 61 74  |+.2,.224) . plat|
00000840  24 3d c4 34 2c bd 32 32  34 29 20 20 0d 01 b8 25  |$=.4,.224)  ...%|
00000850  ef 20 32 33 2c 32 34 35  2c 31 32 38 2c 36 39 2c  |. 23,245,128,69,|
00000860  31 37 30 2c 38 35 2c 31  37 30 2c 36 39 2c 32 2c  |170,85,170,69,2,|
00000870  30 0d 01 c2 12 ef 20 31  39 2c 33 2c 37 2c 30 2c  |0..... 19,3,7,0,|
00000880  30 2c 30 0d 01 cc 08 f2  63 6c 73 0d 01 d6 1b f1  |0,0.....cls.....|
00000890  8a 34 2c 32 39 29 3b 22  53 63 6f 72 65 22 3a f2  |.4,29);"Score":.|
000008a0  75 70 64 61 74 65 0d 01  e0 20 f4 20 20 4e 6f 74  |update... .  Not|
000008b0  65 20 74 68 65 20 6e 65  78 74 20 6c 69 6e 65 20  |e the next line |
000008c0  6e 75 6d 62 65 72 0d 01  ea 6f 20 e7 20 73 63 72  |number...o . scr|
000008d0  3d 30 20 8c 20 f7 20 8d  64 4e 4e 3a 50 53 54 41  |=0 . . .dNN:PSTA|
000008e0  3d 31 3a 50 53 54 4f 3d  2d 32 3a 50 4c 45 56 3d  |=1:PSTO=-2:PLEV=|
000008f0  30 3a 53 54 3d 39 3a 53  54 4f 3d 31 37 3a 4c 4c  |0:ST=9:STO=17:LL|
00000900  3d 37 3a 53 3d 31 30 3a  6d 78 25 3d 32 3a 6d 79  |=7:S=10:mx%=2:my|
00000910  25 3d 31 3a 46 46 3d 31  36 3a 47 47 3d 32 36 3a  |%=1:FF=16:GG=26:|
00000920  68 78 25 3d 31 37 3a 68  79 25 3d 32 35 3a f2 73  |hx%=17:hy%=25:.s|
00000930  63 72 65 65 6e 0d 01 f4  71 20 e7 20 73 63 72 3d  |creen...q . scr=|
00000940  31 20 8c 20 f7 20 8d 54  72 4f 3a 50 53 54 41 3d  |1 . . .TrO:PSTA=|
00000950  35 3a 50 53 54 4f 3d 31  33 3a 50 4c 45 56 3d 38  |5:PSTO=13:PLEV=8|
00000960  3a 53 54 3d 39 3a 53 54  4f 3d 31 33 3a 4c 4c 3d  |:ST=9:STO=13:LL=|
00000970  31 37 3a 53 3d 31 30 3a  6d 78 25 3d 31 32 3a 6d  |17:S=10:mx%=12:m|
00000980  79 25 3d 31 3a 46 46 3d  31 36 3a 47 47 3d 32 36  |y%=1:FF=16:GG=26|
00000990  3a 68 78 25 3d 31 37 3a  68 79 25 3d 32 35 3a f2  |:hx%=17:hy%=25:.|
000009a0  73 63 72 65 65 6e 0d 01  fe 71 20 e7 20 73 63 72  |screen...q . scr|
000009b0  3d 32 20 8c 20 f7 20 8d  74 56 4f 3a 50 53 54 41  |=2 . . .tVO:PSTA|
000009c0  3d 35 3a 50 53 54 4f 3d  39 3a 50 4c 45 56 3d 31  |=5:PSTO=9:PLEV=1|
000009d0  33 3a 53 54 3d 31 34 3a  53 54 4f 3d 31 38 3a 4c  |3:ST=14:STO=18:L|
000009e0  4c 3d 31 32 3a 53 3d 31  35 3a 6d 78 25 3d 35 3a  |L=12:S=15:mx%=5:|
000009f0  6d 79 25 3d 36 3a 46 46  3d 31 36 3a 47 47 3d 32  |my%=6:FF=16:GG=2|
00000a00  36 3a 68 78 25 3d 31 37  3a 68 79 25 3d 32 35 3a  |6:hx%=17:hy%=25:|
00000a10  f2 73 63 72 65 65 6e 0d  02 08 70 20 e7 20 73 63  |.screen...p . sc|
00000a20  72 3d 33 20 8c 20 f7 20  8d 64 7a 4f 3a 50 53 54  |r=3 . . .dzO:PST|
00000a30  41 3d 33 3a 50 53 54 4f  3d 31 30 3a 50 4c 45 56  |A=3:PSTO=10:PLEV|
00000a40  3d 31 33 3a 53 54 3d 32  3a 53 54 4f 3d 31 37 3a  |=13:ST=2:STO=17:|
00000a50  4c 4c 3d 32 37 3a 53 3d  33 3a 6d 78 25 3d 31 36  |LL=27:S=3:mx%=16|
00000a60  3a 6d 79 25 3d 32 31 3a  46 46 3d 31 36 3a 47 47  |:my%=21:FF=16:GG|
00000a70  3d 31 3a 68 78 25 3d 31  37 3a 68 79 25 3d 30 3a  |=1:hx%=17:hy%=0:|
00000a80  f2 73 63 72 65 65 6e 0d  02 12 71 20 e7 20 73 63  |.screen...q . sc|
00000a90  72 3d 34 20 8c 20 f7 20  8d 44 5e 50 3a 50 53 54  |r=4 . . .D^P:PST|
00000aa0  41 3d 37 3a 50 53 54 4f  3d 31 36 3a 50 4c 45 56  |A=7:PSTO=16:PLEV|
00000ab0  3d 31 38 3a 53 54 3d 31  35 3a 53 54 4f 3d 31 38  |=18:ST=15:STO=18|
00000ac0  3a 4c 4c 3d 32 32 3a 53  3d 31 36 3a 6d 78 25 3d  |:LL=22:S=16:mx%=|
00000ad0  39 3a 6d 79 25 3d 32 36  3a 46 46 3d 34 3a 47 47  |9:my%=26:FF=4:GG|
00000ae0  3d 32 31 3a 68 78 25 3d  31 3a 68 79 25 3d 32 30  |=21:hx%=1:hy%=20|
00000af0  3a f2 73 63 72 65 65 6e  0d 02 1c 1f e7 20 73 63  |:.screen..... sc|
00000b00  72 3d 35 20 8c f2 75 6e  63 6c 73 3a f2 77 69 6e  |r=5 ..uncls:.win|
00000b10  3a e5 20 8d 44 7c 41 0d  02 26 0a f2 75 6e 63 6c  |:. .D|A..&..uncl|
00000b20  73 0d 02 30 3b 61 64 64  3d 26 35 38 30 30 2b 26  |s..0;add=&5800+&|
00000b30  31 30 2a 6d 78 25 2b 26  31 34 30 2a 6d 79 25 3a  |10*mx%+&140*my%:|
00000b40  3f 26 37 30 3d 61 64 64  20 83 32 35 36 3a 3f 26  |?&70=add .256:?&|
00000b50  37 31 3d 61 64 64 20 81  20 32 35 36 0d 02 3a 05  |71=add . 256..:.|
00000b60  3a 0d 02 44 05 3a 0d 02  4e 4a fb 32 3a e3 20 44  |:..D.:..NJ.2:. D|
00000b70  3d 30 20 b8 20 6c 69 76  65 73 2d 31 3a f1 8a 44  |=0 . lives-1:..D|
00000b80  2c 32 39 29 3b 72 69 67  68 24 3a ed 3a fb 31 3a  |,29);righ$:.:.1:|
00000b90  e3 20 41 3d 32 37 20 b8  20 30 20 88 20 2d 31 3a  |. A=27 . 0 . -1:|
00000ba0  f1 8a 30 2c 41 29 3b 6c  61 64 64 65 72 24 3a ed  |..0,A);ladder$:.|
00000bb0  0d 02 58 0a d6 26 31 44  30 30 0d 02 62 05 e1 0d  |..X..&1D00..b...|
00000bc0  02 6c 05 3a 0d 02 76 0d  44 45 41 44 3d a3 3a f5  |.l.:..v.DEAD=.:.|
00000bd0  20 0d 02 80 19 53 54 41  52 54 3d b9 3a 62 6f 6e  | ....START=.:bon|
00000be0  75 73 3d 62 6f 6e 75 73  2d 35 0d 02 8a 14 e7 44  |us=bonus-5.....D|
00000bf0  45 41 44 3d b9 20 8c 20  e5 20 8d 54 56 43 0d 02  |EAD=. . . .TVC..|
00000c00  94 1d e7 6c 69 76 65 73  3c 31 20 8c 20 44 45 41  |...lives<1 . DEA|
00000c10  44 3d b9 20 3a e5 20 8d  54 56 43 0d 02 9e 11 e7  |D=. :. .TVC.....|
00000c20  20 6d 78 25 3d 30 20 f2  75 70 73 20 0d 02 a8 13  | mx%=0 .ups ....|
00000c30  e7 20 6d 79 25 3e 32 37  20 8c 20 f2 64 69 65 0d  |. my%>27 . .die.|
00000c40  02 b2 18 e7 20 44 49 45  3d b9 20 8c 20 44 49 45  |.... DIE=. . DIE|
00000c50  3d a3 3a f2 64 69 65 0d  02 bc 12 e7 20 a6 28 2d  |=.:.die..... .(-|
00000c60  37 34 29 8c f2 6a 75 6d  70 0d 02 c6 2e e7 20 a6  |74)..jump..... .|
00000c70  28 2d 39 38 29 80 6d 78  25 3e 30 8c f2 6c 3a f2  |(-98).mx%>0..l:.|
00000c80  62 6c 61 6e 6b 3a 6d 78  25 3d 6d 78 25 2d 31 3a  |blank:mx%=mx%-1:|
00000c90  e5 20 8d 54 74 43 20 0d  02 d0 32 e7 20 a6 28 2d  |. .TtC ...2. .(-|
00000ca0  36 37 29 80 20 6d 78 25  3c 31 39 20 8c f2 72 3a  |67). mx%<19 ..r:|
00000cb0  f2 62 6c 61 6e 6b 3a 6d  78 25 3d 6d 78 25 2b 31  |.blank:mx%=mx%+1|
00000cc0  3a e5 20 8d 54 74 43 20  20 0d 02 da 31 e7 20 46  |:. .TtC  ...1. F|
00000cd0  41 4c 4c 3d b9 20 8c 20  46 41 4c 4c 3d a3 3a f1  |ALL=. . FALL=.:.|
00000ce0  8a 6d 78 25 2b 31 2c 6d  79 25 29 3b 22 20 22 3a  |.mx%+1,my%);" ":|
00000cf0  f2 64 69 65 20 20 20 20  20 20 0d 02 e4 1a e7 20  |.die      ..... |
00000d00  a6 28 2d 35 36 29 20 8c  20 f5 20 fd 20 a6 28 2d  |.(-56) . . . .(-|
00000d10  35 32 29 20 0d 02 ee 18  e7 20 44 49 45 3d b9 20  |52) ..... DIE=. |
00000d20  8c 20 44 49 45 3d a3 3a  f2 64 69 65 0d 02 f8 26  |. DIE=.:.die...&|
00000d30  e7 20 73 63 72 65 65 6e  3e 35 20 80 20 73 63 72  |. screen>5 . scr|
00000d40  65 65 6e 3c 31 31 20 8c  20 f2 6c 69 67 68 74 73  |een<11 . .lights|
00000d50  20 20 0d 03 02 1a e7 20  73 63 72 65 65 6e 3e 31  |  ..... screen>1|
00000d60  37 20 8c 20 f2 6c 69 67  68 74 73 20 0d 03 0c 1e  |7 . .lights ....|
00000d70  e7 20 44 45 41 44 20 3d  20 a3 20 8c 20 f2 6d 6f  |. DEAD = . . .mo|
00000d80  76 65 3a f2 74 65 73 74  20 20 0d 03 16 1a fd 20  |ve:.test  ..... |
00000d90  44 45 41 44 3a e7 20 44  45 41 44 20 8c 20 e5 20  |DEAD:. DEAD . . |
00000da0  8d 54 6c 41 0d 03 20 05  3a 0d 03 2a 05 3a 0d 03  |.TlA.. .:..*.:..|
00000db0  34 19 61 6e 3d 61 6e 2b  31 3a e7 20 61 6e 3d 33  |4.an=an+1:. an=3|
00000dc0  20 8c 20 61 6e 3d 31 0d  03 3e 0d d4 30 2c 33 2c  | . an=1..>..0,3,|
00000dd0  31 32 2c 32 0d 03 48 15  e7 20 44 45 41 44 3d b9  |12,2..H.. DEAD=.|
00000de0  20 8c 20 e5 20 8d 54 56  43 0d 03 52 15 e7 20 6d  | . . .TVC..R.. m|
00000df0  78 25 3e 31 39 20 8c 20  6d 78 25 3d 31 39 0d 03  |x%>19 . mx%=19..|
00000e00  5c 06 fb 31 0d 03 66 4c  e7 20 48 4f 55 53 45 3d  |\..1..fL. HOUSE=|
00000e10  b9 20 80 20 6d 78 25 3d  46 46 20 80 20 6d 79 25  |. . mx%=FF . my%|
00000e20  3d 47 47 20 8c 20 48 4f  55 53 45 3d a3 3a 73 63  |=GG . HOUSE=.:sc|
00000e30  72 65 65 6e 3d 73 63 72  65 65 6e 2b 31 3a f2 67  |reen=screen+1:.g|
00000e40  65 74 72 65 61 64 79 3a  e5 20 8d 44 68 41 20 20  |etready:. .DhA  |
00000e50  0d 03 70 0f f2 74 65 73  74 3a e5 8d 54 56 43 0d  |..p..test:..TVC.|
00000e60  03 7a 05 3a 0d 03 84 05  3a 0d 03 8e 3c dd 20 f2  |.z.:....:...<. .|
00000e70  62 6c 61 6e 6b 3a f2 6d  6f 76 65 3a e7 20 b0 6d  |blank:.move:. .m|
00000e80  78 25 2a 36 34 2c 31 30  32 33 2d 28 28 6d 79 25  |x%*64,1023-((my%|
00000e90  2b 32 29 2a 33 32 29 2b  31 32 29 3d 33 20 8c 20  |+2)*32)+12)=3 . |
00000ea0  44 49 45 3d b9 0d 03 98  05 e1 0d 03 a2 0d dd f2  |DIE=............|
00000eb0  67 65 74 74 65 73 74 0d  03 ac 05 e1 0d 03 b6 05  |gettest.........|
00000ec0  3a 0d 03 c0 34 dd f2 74  65 73 74 3a f2 70 6c 61  |:...4..test:.pla|
00000ed0  74 3a e7 20 b0 6d 78 25  2a 36 34 2c 31 30 32 33  |t:. .mx%*64,1023|
00000ee0  2d 28 6d 79 25 2b 32 29  2a 33 32 29 3d 30 20 8c  |-(my%+2)*32)=0 .|
00000ef0  f2 66 61 6c 6c 0d 03 ca  2c e7 20 b0 6d 78 25 2a  |.fall...,. .mx%*|
00000f00  36 34 2c 31 30 32 33 2d  28 28 6d 79 25 2b 32 29  |64,1023-((my%+2)|
00000f10  2a 33 32 29 2b 38 29 3d  32 20 8c f2 67 65 74 20  |*32)+8)=2 ..get |
00000f20  20 0d 03 d4 2e e7 20 b0  6d 78 25 2a 36 34 2c 31  | ..... .mx%*64,1|
00000f30  30 32 33 2d 28 28 6d 79  25 2b 32 29 2a 33 32 29  |023-((my%+2)*32)|
00000f40  2b 31 32 29 3d 33 20 8c  f2 64 69 65 3a e1 20 0d  |+12)=3 ..die:. .|
00000f50  03 de 05 e1 0d 03 e8 05  3a 0d 03 f2 45 dd f2 66  |........:...E..f|
00000f60  61 6c 6c 3a 5a 3d a3 3a  44 44 3d 30 3a fb 31 3a  |all:Z=.:DD=0:.1:|
00000f70  f5 3a 44 44 3d 44 44 2b  31 3a d4 26 30 30 31 31  |.:DD=DD+1:.&0011|
00000f80  2c 33 2c 32 30 30 2d 6d  79 25 2a 34 2c 32 3a 6d  |,3,200-my%*4,2:m|
00000f90  79 25 3d 6d 79 25 2b 31  3a d6 64 6f 77 6e 0d 03  |y%=my%+1:.down..|
00000fa0  fc 3f e7 20 b0 28 6d 78  25 2a 36 34 29 2b 38 2c  |.?. .(mx%*64)+8,|
00000fb0  31 30 32 33 2d 28 6d 79  25 2b 32 29 2a 33 32 29  |1023-(my%+2)*32)|
00000fc0  3d 32 20 8c 20 f1 8a 6d  78 25 2c 6d 79 25 2b 32  |=2 . ..mx%,my%+2|
00000fd0  29 3b 22 20 22 3a f2 67  65 74 20 20 20 0d 04 06  |);" ":.get   ...|
00000fe0  2b fd 20 b0 6d 78 25 2a  36 34 2c 31 30 32 33 2d  |+. .mx%*64,1023-|
00000ff0  28 6d 79 25 2b 32 29 2a  33 32 29 3c 3e 30 20 84  |(my%+2)*32)<>0 .|
00001000  20 6d 79 25 3e 32 36 20  0d 04 10 21 e7 20 5a 3d  | my%>26 ...!. Z=|
00001010  b9 20 8c 20 d4 26 30 30  31 30 2c 2d 31 35 2c 37  |. . .&0010,-15,7|
00001020  2c 31 30 3a 5a 3d a3 20  20 0d 04 1a 11 e7 20 44  |,10:Z=.  ..... D|
00001030  44 3e 36 20 8c 20 f2 64  69 65 0d 04 24 14 e7 20  |D>6 . .die..$.. |
00001040  6d 78 25 3e 3d 32 37 20  8c 20 f2 64 69 65 0d 04  |mx%>=27 . .die..|
00001050  2e 05 e1 0d 04 38 05 3a  0d 04 42 16 dd f2 6a 75  |.....8.:..B...ju|
00001060  6d 70 3a e7 20 6d 79 25  3c 31 20 8c 20 e1 0d 04  |mp:. my%<1 . ...|
00001070  4c 20 fb 32 3a e7 20 a6  28 2d 39 38 29 20 80 20  |L .2:. .(-98) . |
00001080  6d 78 25 3e 33 20 8c f2  6c 65 66 74 3a e1 0d 04  |mx%>3 ..left:...|
00001090  56 27 20 e7 20 a6 28 2d  36 37 29 20 80 20 6d 78  |V' . .(-67) . mx|
000010a0  25 3c 31 36 20 8c 20 f2  72 69 67 68 74 3a e1 20  |%<16 . .right:. |
000010b0  20 20 20 20 20 0d 04 60  09 f2 75 70 3a e1 0d 04  |     ..`..up:...|
000010c0  6a 05 3a 0d 04 74 6f dd  f2 6c 65 66 74 3a f2 62  |j.:..to..left:.b|
000010d0  6c 61 6e 6b 3a 6d 78 25  3d 6d 78 25 2d 31 3a 6d  |lank:mx%=mx%-1:m|
000010e0  79 25 3d 6d 79 25 2d 31  3a f2 6c 3a d6 20 75 70  |y%=my%-1:.l:. up|
000010f0  3a f2 77 61 69 74 3a f2  62 6c 61 6e 6b 3a 6d 78  |:.wait:.blank:mx|
00001100  25 3d 6d 78 25 2d 31 3a  f2 6c 3a f2 77 61 69 74  |%=mx%-1:.l:.wait|
00001110  3a f2 62 6c 61 6e 6b 3a  6d 78 25 3d 6d 78 25 2d  |:.blank:mx%=mx%-|
00001120  31 3a f2 6c 3a f2 77 61  69 74 3a f2 62 6c 61 6e  |1:.l:.wait:.blan|
00001130  6b 20 0d 04 7e 2a 6d 78  25 3d 6d 78 25 2d 31 3a  |k ..~*mx%=mx%-1:|
00001140  6d 79 25 3d 6d 79 25 2b  31 3a f2 6c 3a d6 20 64  |my%=my%+1:.l:. d|
00001150  6f 77 6e 3a f2 77 61 69  74 3a e1 20 0d 04 88 05  |own:.wait:. ....|
00001160  3a 0d 04 92 19 dd f2 77  61 69 74 3a e7 20 6d 78  |:......wait:. mx|
00001170  25 3d 30 20 8c 20 f2 75  70 73 0d 04 9c 3c f2 70  |%=0 . .ups...<.p|
00001180  6c 61 74 3a f2 74 65 73  74 79 3a f2 74 3a e7 20  |lat:.testy:.t:. |
00001190  73 6d 61 73 68 3d b9 20  8c 20 6d 79 25 3d 6d 79  |smash=. . my%=my|
000011a0  25 2d 31 3a 6d 78 25 3d  6d 78 25 2d 31 3a 73 6d  |%-1:mx%=mx%-1:sm|
000011b0  61 73 68 3d a3 20 0d 04  a6 2e e7 20 73 6d 61 73  |ash=. ..... smas|
000011c0  68 32 3d b9 20 8c 20 6d  79 25 3d 6d 79 25 2d 31  |h2=. . my%=my%-1|
000011d0  3a 6d 78 25 3d 6d 78 25  2d 31 3a 73 6d 61 73 68  |:mx%=mx%-1:smash|
000011e0  32 3d a3 20 0d 04 b0 08  f2 74 3a e1 0d 04 ba 05  |2=. .....t:.....|
000011f0  3a 0d 04 c4 70 dd f2 72  69 67 68 74 3a f2 62 6c  |:...p..right:.bl|
00001200  61 6e 6b 3a 6d 78 25 3d  6d 78 25 2b 31 3a 6d 79  |ank:mx%=mx%+1:my|
00001210  25 3d 6d 79 25 2d 31 3a  f2 72 3a d6 20 75 70 3a  |%=my%-1:.r:. up:|
00001220  f2 77 61 69 74 3a f2 62  6c 61 6e 6b 3a 6d 78 25  |.wait:.blank:mx%|
00001230  3d 6d 78 25 2b 31 3a f2  72 3a f2 77 61 69 74 3a  |=mx%+1:.r:.wait:|
00001240  f2 62 6c 61 6e 6b 3a 6d  78 25 3d 6d 78 25 2b 31  |.blank:mx%=mx%+1|
00001250  3a f2 72 3a f2 77 61 69  74 3a f2 62 6c 61 6e 6b  |:.r:.wait:.blank|
00001260  20 0d 04 ce 2b 6d 78 25  3d 6d 78 25 2b 31 3a 6d  | ...+mx%=mx%+1:m|
00001270  79 25 3d 6d 79 25 2b 31  3a f2 72 3a d6 20 64 6f  |y%=my%+1:.r:. do|
00001280  77 6e 3a f2 77 61 69 74  3a e1 20 20 0d 04 d8 05  |wn:.wait:.  ....|
00001290  3a 0d 04 e2 22 dd f2 6c  3a d6 20 6c 65 66 74 3a  |:..."..l:. left:|
000012a0  e3 64 3d 30 20 b8 20 35  30 3a ed 3a d6 6c 65 66  |.d=0 . 50:.:.lef|
000012b0  74 3a e1 0d 04 ec 24 dd  f2 72 3a d6 20 72 69 67  |t:....$..r:. rig|
000012c0  68 74 3a e3 64 3d 30 20  b8 20 35 30 3a ed 3a d6  |ht:.d=0 . 50:.:.|
000012d0  72 69 67 68 74 3a e1 0d  04 f6 20 dd f2 75 70 3a  |right:.... ..up:|
000012e0  d6 75 70 3a d6 75 70 3a  d6 20 64 6f 77 6e 3a d6  |.up:.up:. down:.|
000012f0  20 64 6f 77 6e 3a e1 0d  05 00 05 3a 0d 05 0a 15  | down:.....:....|
00001300  dd f2 74 3a e3 20 41 3d  31 20 b8 20 32 3a ed 3a  |..t:. A=1 . 2:.:|
00001310  e1 0d 05 14 05 3a 0d 05  1e 13 dd f2 77 61 69 74  |.....:......wait|
00001320  31 3a f2 70 6c 61 74 3a  e1 0d 05 28 05 3a 0d 05  |1:.plat:...(.:..|
00001330  32 1f dd f2 64 69 65 3a  e3 20 41 3d 6d 79 25 20  |2...die:. A=my% |
00001340  b8 20 32 38 3a d6 20 64  6f 77 6e 3a ed 0d 05 3c  |. 28:. down:...<|
00001350  5b 41 3d 33 3a d4 31 2c  32 2c 34 38 2c 41 3a d4  |[A=3:.1,2,48,A:.|
00001360  31 2c 32 2c 34 30 2c 41  3a d4 31 2c 32 2c 33 32  |1,2,40,A:.1,2,32|
00001370  2c 41 3a d4 31 2c 32 2c  32 34 2c 41 3a d4 31 2c  |,A:.1,2,24,A:.1,|
00001380  32 2c 32 30 2c 41 3a d4  31 2c 32 2c 31 32 2c 41  |2,20,A:.1,2,12,A|
00001390  3a d4 31 2c 32 2c 34 2c  41 2a 33 3a d4 31 2c 32  |:.1,2,4,A*3:.1,2|
000013a0  2c 35 32 2c 41 20 20 20  0d 05 46 0c 2a 46 58 20  |,52,A   ..F.*FX |
000013b0  31 35 2c 31 0d 05 50 18  44 49 45 3d a3 3a f2 67  |15,1..P.DIE=.:.g|
000013c0  6f 76 65 72 3a f2 64 72  61 77 3a e1 0d 05 5a 05  |over:.draw:...Z.|
000013d0  3a 0d 05 64 1d dd f2 6d  6f 76 65 3a e7 52 3d b9  |:..d...move:.R=.|
000013e0  20 80 20 53 3e 53 54 4f  20 8c 20 52 3d a3 0d 05  | . S>STO . R=...|
000013f0  6e 22 f4 49 46 20 44 45  41 44 3d 54 52 55 45 20  |n".IF DEAD=TRUE |
00001400  54 48 45 4e 20 45 4e 44  50 52 4f 43 20 20 20 20  |THEN ENDPROC    |
00001410  0d 05 78 15 e7 52 3d a3  20 80 20 53 3c 53 54 20  |..x..R=. . S<ST |
00001420  8c 20 52 3d b9 0d 05 82  1d f1 8a 53 2c 4c 4c 29  |. R=.......S,LL)|
00001430  3b 22 20 22 3a e7 20 52  3d b9 20 8c 20 53 3d 53  |;" ":. R=. . S=S|
00001440  2b 31 0d 05 8c 11 e7 20  52 3d a3 20 8c 20 53 3d  |+1..... R=. . S=|
00001450  53 2d 31 0d 05 96 1a fb  33 3a f1 8a 53 2c 4c 4c  |S-1.....3:..S,LL|
00001460  29 3b bd 28 32 33 30 29  3a fb 32 3a e1 0d 05 a0  |);.(230):.2:....|
00001470  05 3a 0d 05 aa 65 dd 20  f2 67 65 74 72 65 61 64  |.:...e. .getread|
00001480  79 3a e6 20 30 2c 30 3a  e3 20 41 3d 30 20 b8 20  |y:. 0,0:. A=0 . |
00001490  36 34 30 20 88 20 38 3a  d4 26 30 30 31 31 2c 33  |640 . 8:.&0011,3|
000014a0  2c 32 30 30 2d 41 2f 35  2c 31 30 3a ec 20 41 2c  |,200-A/5,10:. A,|
000014b0  30 3a df 20 41 2c 31 30  32 33 3a ec 20 31 32 37  |0:. A,1023:. 127|
000014c0  39 2d 41 2c 30 3a df 20  31 32 37 39 2d 41 2c 31  |9-A,0:. 1279-A,1|
000014d0  30 32 33 3a ed 20 41 0d  05 b4 14 fb 33 3a e7 20  |023:. A.....3:. |
000014e0  62 6f 6e 75 73 3c 35 20  8c 20 e1 0d 05 be 28 f1  |bonus<5 . ....(.|
000014f0  8a 35 2c 35 29 3b 22 54  69 6d 65 20 42 6f 6e 75  |.5,5);"Time Bonu|
00001500  73 22 3b 8a 38 2c 37 29  3b 62 6f 6e 75 73 20 20  |s";.8,7);bonus  |
00001510  20 20 20 0d 05 c8 33 73  63 25 3d 73 63 25 2b 62  |   ...3sc%=sc%+b|
00001520  6f 6e 75 73 3a 62 6f 6e  75 73 3d 31 31 30 30 3a  |onus:bonus=1100:|
00001530  e3 41 3d 30 20 b8 20 32  30 30 30 3a ed 3a fb 31  |.A=0 . 2000:.:.1|
00001540  32 38 3a db 3a e1 0d 05  d2 05 3a 0d 05 dc 47 dd  |28:.:.....:...G.|
00001550  f2 67 6f 76 65 72 3a 62  6f 6e 75 73 3d 31 31 30  |.gover:bonus=110|
00001560  30 3a 6c 69 76 65 73 3d  6c 69 76 65 73 2d 31 3a  |0:lives=lives-1:|
00001570  e7 20 6c 69 76 65 73 3d  30 20 8c 20 e5 20 8d 64  |. lives=0 . . .d|
00001580  66 45 20 8b 20 f2 73 74  61 72 74 61 67 61 69 6e  |fE . .startagain|
00001590  3a e1 0d 05 e6 13 e3 20  54 3d 30 20 b8 20 31 30  |:...... T=0 . 10|
000015a0  30 30 3a ed 20 0d 05 f0  19 dc 20 52 2c 45 2c 56  |00:. ..... R,E,V|
000015b0  2c 4f 2c 22 20 22 2c 45  2c 4d 2c 41 2c 47 0d 05  |,O," ",E,M,A,G..|
000015c0  fa 6b f7 20 8d 64 70 45  3a e3 20 41 3d 31 20 b8  |.k. .dpE:. A=1 .|
000015d0  20 39 3a f3 20 41 24 3a  e3 20 54 3d 31 20 b8 20  | 9:. A$:. T=1 . |
000015e0  31 33 2d 41 3a d4 26 30  30 31 31 2c 2d 31 35 2c  |13-A:.&0011,-15,|
000015f0  54 2b 35 30 2c 32 3a f1  8a 54 2c 31 35 29 3b 41  |T+50,2:..T,15);A|
00001600  24 3a e3 20 53 3d 30 20  b8 20 34 30 3a ed 3a f1  |$:. S=0 . 40:.:.|
00001610  8a 54 2c 31 35 29 3b 22  20 22 3a ed 3a f1 8a 54  |.T,15);" ":.:..T|
00001620  2c 31 35 29 3b 41 24 3a  ed 0d 06 04 1b e3 20 54  |,15);A$:...... T|
00001630  3d 30 20 b8 20 33 30 30  30 3a ed 3a 44 45 41 44  |=0 . 3000:.:DEAD|
00001640  3d b9 3a e1 0d 06 0e 05  3a 0d 06 18 43 dd f2 75  |=.:.....:...C..u|
00001650  70 73 3a e7 20 6d 79 25  3d 31 20 e1 20 8b 20 fb  |ps:. my%=1 . . .|
00001660  31 3a e3 41 3d 6d 79 25  20 b8 20 32 20 88 2d 31  |1:.A=my% . 2 .-1|
00001670  3a d4 31 2c 31 2c 35 30  2d 41 2c 31 3a d6 20 75  |:.1,1,50-A,1:. u|
00001680  70 3a ed 3a 6d 79 25 3d  31 3a e1 20 0d 06 22 05  |p:.:my%=1:. ..".|
00001690  3a 0d 06 2c 10 dd f2 64  28 41 2c 42 2c 43 2c 44  |:..,...d(A,B,C,D|
000016a0  29 0d 06 36 06 fb 37 0d  06 40 2b e7 20 42 3c 3e  |)..6..7..@+. B<>|
000016b0  32 38 20 8c 20 f2 64 6c  28 41 2c 42 2c 43 2c 44  |28 . .dl(A,B,C,D|
000016c0  29 20 8b 20 f1 8a 41 2c  42 29 3b c4 31 39 2c bd  |) . ..A,B);.19,.|
000016d0  44 29 0d 06 4a 05 e1 0d  06 54 05 3a 0d 06 5e 0a  |D)..J....T.:..^.|
000016e0  dd f2 70 6c 61 74 0d 06  68 0e e7 20 50 4c 45 56  |..plat..h.. PLEV|
000016f0  3d 30 20 e1 0d 06 72 20  70 6c 3d 70 6c 2b 31 3a  |=0 ...r pl=pl+1:|
00001700  e7 20 70 6c 3d 32 20 8c  20 70 6c 3d 30 20 8b 20  |. pl=2 . pl=0 . |
00001710  e1 20 20 20 0d 06 7c 17  20 f1 8a 50 2c 50 4c 45  |.   ..|. ..P,PLE|
00001720  56 29 3b 22 20 20 20 20  22 20 20 0d 06 86 07 fb  |V);"    "  .....|
00001730  20 37 0d 06 90 13 e7 20  44 49 52 3d b9 20 8c 20  | 7..... DIR=. . |
00001740  50 3d 50 2b 31 0d 06 9a  13 e7 20 44 49 52 3d a3  |P=P+1..... DIR=.|
00001750  20 8c 20 50 3d 50 2d 31  0d 06 a4 14 f1 8a 50 2c  | . P=P-1......P,|
00001760  50 4c 45 56 29 3b 70 6c  61 74 24 20 0d 06 ae 16  |PLEV);plat$ ....|
00001770  e7 20 50 3d 50 53 54 4f  20 8c 20 44 49 52 3d a3  |. P=PSTO . DIR=.|
00001780  20 20 0d 06 b8 14 e7 20  50 3d 50 53 54 41 20 8c  |  ..... P=PSTA .|
00001790  20 44 49 52 3d b9 0d 06  c2 06 fb 32 0d 06 cc 05  | DIR=......2....|
000017a0  e1 0d 06 d6 05 3a 0d 06  e0 11 dd 20 f2 73 74 61  |.....:..... .sta|
000017b0  72 74 61 67 61 69 6e 0d  06 ea 11 e3 53 3d 30 20  |rtagain.....S=0 |
000017c0  b8 20 34 30 30 30 3a ed  0d 06 f4 05 e1 0d 06 fe  |. 4000:.........|
000017d0  05 3a 0d 07 08 0c dd 20  f2 69 6e 73 74 73 0d 07  |.:..... .insts..|
000017e0  12 25 20 e7 20 73 63 25  3e 3d 73 63 6f 72 65 25  |.% . sc%>=score%|
000017f0  28 38 29 20 8c 20 f2 65  6e 74 65 72 6e 61 6d 65  |(8) . .entername|
00001800  20 20 20 0d 07 1c 0a 44  45 41 44 3d a3 0d 07 26  |   ....DEAD=...&|
00001810  05 db 0d 07 30 1a f1 8a  30 2c 31 29 3b c4 32 30  |....0...0,1);.20|
00001820  2c bd 28 32 34 32 29 2b  22 20 22 29 0d 07 3a 20  |,.(242)+" ")..: |
00001830  f1 8a 31 30 2c 33 29 3b  22 53 61 6e 74 61 27 73  |..10,3);"Santa's|
00001840  20 53 6c 69 70 20 2d 20  55 70 21 22 0d 07 44 1a  | Slip - Up!"..D.|
00001850  f1 8a 30 2c 35 29 3b c4  32 30 2c bd 28 32 34 32  |..0,5);.20,.(242|
00001860  29 2b 22 20 22 29 0d 07  4e 23 f1 8a 31 30 2c 32  |)+" ")..N#..10,2|
00001870  30 29 3b 22 50 52 45 53  53 20 53 50 41 43 45 20  |0);"PRESS SPACE |
00001880  54 4f 20 53 54 41 52 54  22 0d 07 58 33 f1 8a 31  |TO START"..X3..1|
00001890  2c 31 35 29 3b 22 5a 20  3d 20 4c 65 66 74 20 20  |,15);"Z = Left  |
000018a0  20 58 20 3d 20 52 69 67  68 74 20 20 20 20 52 65  | X = Right    Re|
000018b0  74 75 72 6e 20 3d 20 4a  75 6d 70 22 0d 07 62 21  |turn = Jump"..b!|
000018c0  f1 8a 31 2c 38 29 3b 22  53 20 3d 20 53 6f 75 6e  |..1,8);"S = Soun|
000018d0  64 20 20 51 20 3d 20 51  75 69 65 74 22 0d 07 6c  |d  Q = Quiet"..l|
000018e0  26 f1 8a 31 2c 31 31 29  3b 22 50 20 3d 20 50 61  |&..1,11);"P = Pa|
000018f0  75 73 65 20 20 52 20 3d  20 52 65 73 75 6d 65 22  |use  R = Resume"|
00001900  20 20 20 0d 07 76 13 ef  32 33 2c 31 2c 30 3b 30  |   ..v..23,1,0;0|
00001910  3b 30 3b 30 3b 20 0d 07  80 13 41 24 3d be 3a e7  |;0;0; ....A$=.:.|
00001920  20 41 24 3d 22 20 22 8c  e1 0d 07 8a 17 e7 20 41  | A$=" "....... A|
00001930  24 3d 22 53 22 20 8c 20  2a 46 58 32 31 30 2c 30  |$="S" . *FX210,0|
00001940  0d 07 94 17 e7 20 41 24  3d 22 51 22 20 8c 20 2a  |..... A$="Q" . *|
00001950  46 58 32 31 30 2c 31 0d  07 9e 09 e5 8d 74 40 47  |FX210,1......t@G|
00001960  0d 07 a8 05 e1 0d 07 b2  05 3a 0d 07 bc 1c dd f2  |.........:......|
00001970  74 65 73 74 79 3a 73 6d  61 73 68 3d a3 3a 73 6d  |testy:smash=.:sm|
00001980  61 73 68 32 3d a3 0d 07  c6 05 e1 0d 07 d0 36 e7  |ash2=.........6.|
00001990  20 b0 28 6d 78 25 2d 31  29 2a 36 34 2c 31 30 32  | .(mx%-1)*64,102|
000019a0  33 2d 28 6d 79 25 2b 31  29 2a 33 32 29 3d 33 20  |3-(my%+1)*32)=3 |
000019b0  8c 20 46 41 4c 4c 3d b9  3a 73 6d 61 73 68 32 3d  |. FALL=.:smash2=|
000019c0  b9 0d 07 da 35 e7 20 b0  28 6d 78 25 2b 31 29 2a  |....5. .(mx%+1)*|
000019d0  36 34 2c 31 30 32 33 2d  28 6d 79 25 2b 31 29 2a  |64,1023-(my%+1)*|
000019e0  33 32 29 3d 33 20 8c 20  46 41 4c 4c 3d b9 3a 73  |32)=3 . FALL=.:s|
000019f0  6d 61 73 68 3d b9 0d 07  e4 18 e7 20 46 41 4c 4c  |mash=...... FALL|
00001a00  3d b9 20 f2 64 69 65 3a  46 41 4c 4c 3d a3 0d 07  |=. .die:FALL=...|
00001a10  ee 05 e1 0d 07 f8 05 3a  0d 08 02 09 dd f2 67 65  |.......:......ge|
00001a20  74 0d 08 0c 13 d4 26 30  30 31 31 2c 2d 31 35 2c  |t.....&0011,-15,|
00001a30  32 35 2c 31 0d 08 16 0e  73 63 25 3d 73 63 25 2b  |25,1....sc%=sc%+|
00001a40  31 30 0d 08 20 0b f2 75  70 64 61 74 65 0d 08 2a  |10.. ..update..*|
00001a50  22 45 45 3d 45 45 2b 31  3a e7 20 45 45 3d 31 31  |"EE=EE+1:. EE=11|
00001a60  20 8c 20 45 45 3d 31 3a  48 4f 55 53 45 3d b9 0d  | . EE=1:HOUSE=..|
00001a70  08 34 12 f1 8a 6d 78 25  2c 6d 79 25 29 3b 22 20  |.4...mx%,my%);" |
00001a80  22 0d 08 3e 15 f1 8a 6d  78 25 2c 6d 79 25 2b 31  |"..>...mx%,my%+1|
00001a90  29 3b 22 20 22 20 0d 08  48 0a d6 26 31 44 30 30  |);" " ..H..&1D00|
00001aa0  0d 08 52 06 fb 31 0d 08  5c 2e e7 20 48 4f 55 53  |..R..1..\.. HOUS|
00001ab0  45 3d b9 20 8c 20 f1 8a  30 2c 33 30 29 3b 22 20  |E=. . ..0,30);" |
00001ac0  59 6f 75 72 20 73 61 63  6b 20 69 73 20 66 75 6c  |Your sack is ful|
00001ad0  6c 21 22 20 0d 08 66 1a  e7 20 48 4f 55 53 45 3d  |l!" ..f.. HOUSE=|
00001ae0  b9 20 8c 20 f1 8a 30 2c  32 39 29 3b 89 33 0d 08  |. . ..0,29);.3..|
00001af0  70 05 e1 0d 08 7a 05 3a  0d 08 84 0a dd 20 f2 77  |p....z.:..... .w|
00001b00  69 6e 0d 08 8e 0b fb 33  3a fb 31 32 39 0d 08 98  |in.....3:.129...|
00001b10  0d f1 8a 31 2c 34 29 89  31 37 0d 08 a2 1e f1 8a  |...1,4).17......|
00001b20  31 2c 35 29 3b 22 20 43  4f 4e 47 52 41 54 55 4c  |1,5);" CONGRATUL|
00001b30  41 54 49 4f 4e 53 20 22  0d 08 ac 0d f1 8a 31 2c  |ATIONS "......1,|
00001b40  38 29 89 31 37 0d 08 b6  0e f1 8a 31 2c 36 29 89  |8).17......1,6).|
00001b50  31 37 20 0d 08 c0 35 e7  20 6c 69 76 65 73 3c 33  |17 ...5. lives<3|
00001b60  20 8c 20 f1 8a 31 2c 37  29 22 20 20 45 58 54 52  | . ..1,7)"  EXTR|
00001b70  41 20 4d 41 4e 20 41 4e  44 20 20 22 20 8b 20 f1  |A MAN AND  " . .|
00001b80  8a 31 2c 37 29 89 31 37  0d 08 ca 12 f1 8a 34 2c  |.1,7).17......4,|
00001b90  31 31 29 89 31 31 20 20  20 20 0d 08 d4 1a f1 8a  |11).11    ......|
00001ba0  34 2c 31 32 29 3b 22 20  42 20 4f 20 4e 20 55 20  |4,12);" B O N U |
00001bb0  53 20 22 20 0d 08 de 0f  f1 8a 34 2c 31 33 29 89  |S " ......4,13).|
00001bc0  31 31 20 0d 08 e8 0d f1  8a 37 2c 31 36 29 89 35  |11 ......7,16).5|
00001bd0  0d 08 f2 13 f1 8a 37 2c  31 37 29 3b 22 20 35 30  |......7,17);" 50|
00001be0  30 20 22 0d 08 fc 0d f1  8a 37 2c 31 38 29 89 35  |0 "......7,18).5|
00001bf0  0d 09 06 09 fb 20 31 32  38 0d 09 10 21 f1 8a 31  |..... 128...!..1|
00001c00  2c 32 29 3b c4 39 2c 73  6e 6f 77 6d 61 6e 24 2b  |,2);.9,snowman$+|
00001c10  bd 31 31 2b bd 33 32 29  20 20 0d 09 1a 14 f1 8a  |.11+.32)  ......|
00001c20  32 2c 31 30 29 3b 73 6e  6f 77 6d 61 6e 24 0d 09  |2,10);snowman$..|
00001c30  24 16 f1 8a 31 36 2c 31  30 29 3b 73 6e 6f 77 6d  |$...16,10);snowm|
00001c40  61 6e 24 20 0d 09 2e 15  f1 8a 35 2c 31 37 29 3b  |an$ ......5,17);|
00001c50  73 6e 6f 77 6d 61 6e 24  20 0d 09 38 16 f1 8a 31  |snowman$ ..8...1|
00001c60  33 2c 31 37 29 3b 73 6e  6f 77 6d 61 6e 24 20 0d  |3,17);snowman$ .|
00001c70  09 42 13 e3 20 41 3d 30  20 b8 20 31 30 30 20 88  |.B.. A=0 . 100 .|
00001c80  20 34 0d 09 4c 0c d4 31  2c 32 2c 41 2c 32 0d 09  | 4..L..1,2,A,2..|
00001c90  56 0c d4 31 2c 32 2c 31  2c 31 0d 09 60 05 ed 0d  |V..1,2,1,1..`...|
00001ca0  09 6a 13 73 63 72 65 65  6e 3d 73 63 72 65 65 6e  |.j.screen=screen|
00001cb0  2b 31 0d 09 74 10 73 63  25 3d 73 63 25 2b 35 30  |+1..t.sc%=sc%+50|
00001cc0  30 20 0d 09 7e 1d e7 20  6c 69 76 65 73 3c 33 20  |0 ..~.. lives<3 |
00001cd0  8c 20 6c 69 76 65 73 3d  6c 69 76 65 73 2b 31 0d  |. lives=lives+1.|
00001ce0  09 88 05 db 0d 09 92 05  e1 0d 09 9c 05 3a 0d 09  |.............:..|
00001cf0  a6 0c dd 20 f2 74 75 6e  65 20 0d 09 b0 0a f7 20  |... .tune ..... |
00001d00  8d 54 4a 4a 0d 09 ba 09  41 3d 37 20 20 0d 09 c4  |.TJJ....A=7  ...|
00001d10  0e e3 20 54 3d 31 20 b8  20 31 37 0d 09 ce 09 f3  |.. T=1 . 17.....|
00001d20  20 43 2c 44 0d 09 d8 1f  e7 20 43 3d 39 39 39 20  | C,D..... C=999 |
00001d30  8c 20 d4 31 2c 30 2c 30  2c 41 2f 32 3a e5 20 8d  |. .1,0,0,A/2:. .|
00001d40  54 40 4a 0d 09 e2 0d d4  31 2c 33 2c 43 2c 44 20  |T@J.....1,3,C,D |
00001d50  0d 09 ec 0e d4 31 2c 30  2c 30 2c 30 2e 35 0d 09  |.....1,0,0,0.5..|
00001d60  f6 0a d6 72 69 67 68 74  0d 0a 00 07 ed 20 54 0d  |...right..... T.|
00001d70  0a 0a 69 dc 35 32 2c 41  2c 37 32 2c 41 2c 37 32  |..i.52,A,72,A,72|
00001d80  2c 41 2c 37 32 2c 41 2c  38 30 2c 41 2c 38 38 2c  |,A,72,A,80,A,88,|
00001d90  41 2f 32 2c 38 30 2c 41  2f 32 2c 38 38 2c 41 2f  |A/2,80,A/2,88,A/|
00001da0  32 2c 39 32 2c 41 2f 32  2c 31 30 30 2c 41 2c 38  |2,92,A/2,100,A,8|
00001db0  38 2c 41 2c 39 32 2c 41  2c 38 38 2c 41 2f 32 2c  |8,A,92,A,88,A/2,|
00001dc0  37 32 2c 41 2f 32 2c 38  30 2c 41 2c 38 30 2c 41  |72,A/2,80,A,80,A|
00001dd0  2c 37 32 2c 41 2a 32 20  0d 0a 14 09 e6 20 30 2c  |,72,A*2 ..... 0,|
00001de0  30 0d 0a 1e 05 20 0d 0a  28 13 e3 20 5a 3d 30 20  |0.... ..(.. Z=0 |
00001df0  b8 20 33 30 30 30 3a ed  20 0d 0a 32 05 e1 0d 0a  |. 3000:. ..2....|
00001e00  3c 05 3a 0d 0a 46 0c dd  20 f2 74 61 62 6c 65 0d  |<.:..F.. .table.|
00001e10  0a 50 20 e7 20 73 63 25  3e 73 63 6f 72 65 25 28  |.P . sc%>score%(|
00001e20  38 29 20 8c 20 f2 65 6e  74 65 72 6e 61 6d 65 0d  |8) . .entername.|
00001e30  0a 5a 05 db 0d 0a 64 15  f1 27 c4 32 30 2c bd 28  |.Z....d..'.20,.(|
00001e40  32 34 32 29 2b 22 20 22  29 0d 0a 6e 3f f1 20 22  |242)+" ")..n?. "|
00001e50  20 20 53 61 6e 74 61 27  73 20 53 6c 69 70 20 2d  |  Santa's Slip -|
00001e60  20 55 70 21 22 3b 89 36  3b 22 48 69 20 2d 20 53  | Up!";.6;"Hi - S|
00001e70  63 6f 72 65 73 22 3a f1  27 c4 32 30 2c bd 28 32  |cores":.'.20,.(2|
00001e80  34 32 29 2b 22 20 22 29  0d 0a 78 0e e3 20 49 25  |42)+" ")..x.. I%|
00001e90  3d 31 20 b8 20 38 0d 0a  82 32 f1 3b 8a 35 29 3b  |=1 . 8...2.;.5);|
00001ea0  49 25 3b 22 2e 20 20 22  3b 8a 31 30 29 3b 6e 61  |I%;".  ";.10);na|
00001eb0  6d 65 24 28 49 25 29 3b  8a 33 30 29 3b 73 63 6f  |me$(I%);.30);sco|
00001ec0  72 65 25 28 49 25 29 20  0d 0a 8c 05 f1 0d 0a 96  |re%(I%) ........|
00001ed0  05 ed 0d 0a a0 0b 2a 46  58 31 35 2c 31 0d 0a aa  |......*FX15,1...|
00001ee0  20 f1 8a 39 29 22 50 72  65 73 73 20 3c 53 50 41  | ..9)"Press <SPA|
00001ef0  43 45 3e 20 74 6f 20 70  6c 61 79 21 22 0d 0a b4  |CE> to play!"...|
00001f00  0a f5 fd a5 3d 33 32 0d  0a be 1a 44 45 41 44 3d  |....=32....DEAD=|
00001f10  a3 3a 48 4f 55 53 45 3d  a3 3a 6c 69 76 65 73 3d  |.:HOUSE=.:lives=|
00001f20  33 0d 0a c8 13 73 63 72  65 65 6e 3d 30 3a 73 63  |3....screen=0:sc|
00001f30  25 3d 30 20 0d 0a d2 05  e1 0d 0a dc 05 3a 0d 0a  |%=0 .........:..|
00001f40  e6 0c dd 20 f2 69 6e 69  74 32 0d 0a f0 09 f7 8d  |... .init2......|
00001f50  54 48 4c 0d 0a fa 18 de  20 73 63 6f 72 65 25 28  |THL..... score%(|
00001f60  38 29 2c 6e 61 6d 65 24  28 38 29 0d 0b 04 0f e3  |8),name$(8).....|
00001f70  20 49 25 3d 31 20 b8 20  38 20 0d 0b 0e 1e 73 63  | I%=1 . 8 ....sc|
00001f80  6f 72 65 25 28 49 25 29  3d 35 30 30 30 20 2d 20  |ore%(I%)=5000 - |
00001f90  49 25 2a 35 30 30 20 20  0d 0b 18 15 f3 20 41 24  |I%*500  ..... A$|
00001fa0  3a 6e 61 6d 65 24 28 49  25 29 3d 41 24 0d 0b 22  |:name$(I%)=A$.."|
00001fb0  08 ed 20 49 25 0d 0b 2c  05 e1 0d 0b 36 05 3a 0d  |.. I%..,....6.:.|
00001fc0  0b 40 10 dd 20 f2 65 6e  74 65 72 6e 61 6d 65 0d  |.@.. .entername.|
00001fd0  0b 4a 0a fb 31 32 38 3a  db 0d 0b 54 07 fb 20 33  |.J..128:...T.. 3|
00001fe0  0d 0b 5e 1b f1 8a 30 2c  33 29 3b c4 32 30 2c bd  |..^...0,3);.20,.|
00001ff0  28 32 34 32 29 2b 22 20  22 29 20 0d 0b 68 20 f1  |(242)+" ") ..h .|
00002000  8a 35 2c 35 29 3b 22 2a  2a 43 6f 6e 67 72 61 74  |.5,5);"**Congrat|
00002010  75 6c 61 74 69 6f 6e 73  2a 2a 22 0d 0b 72 1a f1  |ulations**"..r..|
00002020  8a 30 2c 37 29 3b c4 32  30 2c bd 28 32 34 32 29  |.0,7);.20,.(242)|
00002030  2b 22 20 22 29 0d 0b 7c  05 f1 0d 0b 86 47 f1 20  |+" ")..|.....G. |
00002040  27 22 59 6f 75 20 61 72  65 20 69 6e 20 74 68 65  |'"You are in the|
00002050  20 68 69 67 68 20 73 63  6f 72 65 20 74 61 62 6c  | high score tabl|
00002060  65 21 22 27 27 22 57 68  61 74 20 69 73 20 79 6f  |e!"''"What is yo|
00002070  75 72 20 6e 61 6d 65 3f  22 27 27 27 27 22 3f 22  |ur name?"''''"?"|
00002080  3b 0d 0b 90 0c 2a 46 58  20 31 35 2c 31 0d 0b 9a  |;....*FX 15,1...|
00002090  21 fb 31 3a 73 74 72 69  6e 67 24 3d 22 22 3a ef  |!.1:string$="":.|
000020a0  20 32 33 2c 31 2c 31 3b  30 3b 30 3b 30 3b 0d 0b  | 23,1,1;0;0;0;..|
000020b0  a4 0d f5 3a 4b 25 3d a6  28 30 29 0d 0b ae 34 e7  |...:K%=.(0)...4.|
000020c0  20 4b 25 3e 33 31 20 80  20 4b 25 3c 31 32 37 20  | K%>31 . K%<127 |
000020d0  80 20 b1 3c 31 38 20 73  74 72 69 6e 67 24 3d 73  |. .<18 string$=s|
000020e0  74 72 69 6e 67 24 2b bd  4b 25 3a ef 4b 25 20 0d  |tring$+.K%:.K% .|
000020f0  0b b8 42 e7 20 4b 25 3d  31 32 37 20 80 20 a9 20  |..B. K%=127 . . |
00002100  73 74 72 69 6e 67 24 20  73 74 72 69 6e 67 24 3d  |string$ string$=|
00002110  c0 73 74 72 69 6e 67 24  2c a9 28 73 74 72 69 6e  |.string$,.(strin|
00002120  67 24 29 2d 31 29 3a e7  20 b1 3e 31 20 ef 20 4b  |g$)-1):. .>1 . K|
00002130  25 0d 0b c2 0b fd 20 4b  25 3d 31 33 0d 0b cc 22  |%..... K%=13..."|
00002140  73 63 6f 72 65 25 28 38  29 3d 73 63 25 3a 6e 61  |score%(8)=sc%:na|
00002150  6d 65 24 28 38 29 3d 73  74 72 69 6e 67 24 0d 0b  |me$(8)=string$..|
00002160  d6 13 e3 20 49 25 3d 38  20 b8 20 32 20 88 20 2d  |... I%=8 . 2 . -|
00002170  31 0d 0b e0 92 e7 20 73  63 6f 72 65 25 28 49 25  |1..... score%(I%|
00002180  29 3e 73 63 6f 72 65 25  28 49 25 2d 31 29 20 73  |)>score%(I%-1) s|
00002190  63 25 3d 73 63 6f 72 65  25 28 49 25 29 3a 73 63  |c%=score%(I%):sc|
000021a0  6f 72 65 25 28 49 25 29  3d 73 63 6f 72 65 25 28  |ore%(I%)=score%(|
000021b0  49 25 2d 31 29 3a 73 63  6f 72 65 25 28 49 25 2d  |I%-1):score%(I%-|
000021c0  31 29 3d 73 63 25 3a 73  74 72 69 6e 67 24 3d 6e  |1)=sc%:string$=n|
000021d0  61 6d 65 24 28 49 25 29  3a 6e 61 6d 65 24 28 49  |ame$(I%):name$(I|
000021e0  25 29 3d 6e 61 6d 65 24  28 49 25 2d 31 29 3a 6e  |%)=name$(I%-1):n|
000021f0  61 6d 65 24 28 49 25 2d  31 29 3d 73 74 72 69 6e  |ame$(I%-1)=strin|
00002200  67 24 20 0d 0b ea 08 ed  20 49 25 0d 0b f4 05 e1  |g$ ..... I%.....|
00002210  0d 0b fe 05 3a 0d 0c 08  91 dc 20 22 57 72 69 74  |....:..... "Writ|
00002220  74 65 6e 20 42 79 3a 22  2c 22 4f 6c 69 76 65 72  |ten By:","Oliver|
00002230  20 42 69 73 68 6f 70 22  2c 22 4f 72 69 67 69 6e  | Bishop","Origin|
00002240  61 6c 20 53 63 72 65 65  6e 73 20 62 79 22 2c 22  |al Screens by","|
00002250  53 74 75 61 72 74 20 57  69 6c 6c 69 61 6d 73 22  |Stuart Williams"|
00002260  2c 22 4a 75 6c 69 61 6e  20 42 69 73 68 6f 70 22  |,"Julian Bishop"|
00002270  2c 22 50 68 69 6c 69 70  20 4a 65 66 66 65 72 69  |,"Philip Jefferi|
00002280  65 73 22 2c 22 52 61 73  68 69 64 20 51 75 72 65  |es","Rashid Qure|
00002290  73 68 69 22 2c 22 4a 6f  6e 61 74 68 61 6e 20 50  |shi","Jonathan P|
000022a0  72 69 63 65 22 20 0d 0c  12 05 3a 0d 0c 1c 0c dd  |rice" ....:.....|
000022b0  f2 6c 69 67 68 74 73 0d  0c 26 0d d4 30 2c 33 2c  |.lights..&..0,3,|
000022c0  31 32 2c 31 0d 0c 30 0a  41 3d b3 28 32 29 0d 0c  |12,1..0.A=.(2)..|
000022d0  3a 1b e7 20 41 3d 31 20  8c 20 ef 20 31 39 2c 33  |:.. A=1 . . 19,3|
000022e0  2c 31 35 2c 30 2c 30 2c  30 0d 0c 44 1a e7 20 41  |,15,0,0,0..D.. A|
000022f0  3d 32 20 8c 20 ef 20 31  39 2c 33 2c 37 2c 30 2c  |=2 . . 19,3,7,0,|
00002300  30 2c 30 0d 0c 4e 05 e1  0d 0c 58 05 3a 0d 0c 62  |0,0..N....X.:..b|
00002310  0f dd f2 75 70 64 61 74  65 3a fb 31 0d 0c 6c 11  |...update:.1..l.|
00002320  f1 8a 31 30 2c 32 39 29  3b 73 63 25 20 0d 0c 76  |..10,29);sc% ..v|
00002330  05 e1 0d 0c 80 05 3a 0d  0c 8a 09 dd f2 65 72 72  |......:......err|
00002340  0d 0c 94 0b fb 31 32 38  3a fb 37 0d 0c 9e 05 db  |.....128:.7.....|
00002350  0d 0c a8 0d f1 27 27 27  27 27 3a f6 20 0d 0c b2  |.....''''':. ...|
00002360  13 f1 27 27 22 41 74 20  6c 69 6e 65 22 20 20 20  |..''"At line"   |
00002370  0d 0c bc 08 f1 27 3b 9e  0d 0c c6 0a f1 27 27 27  |.....';......'''|
00002380  3a e0 0d 0c d0 05 3a 0d  0c da 0d dd 20 f2 73 63  |:.....:..... .sc|
00002390  72 65 65 6e 0d 0c e4 2c  e6 30 2c 31 3a e3 41 3d  |reen...,.0,1:.A=|
000023a0  30 20 b8 20 36 30 3a f0  36 39 2c b3 28 31 32 37  |0 . 60:.69,.(127|
000023b0  39 29 2c b3 28 39 32 33  29 2b 31 30 30 3a ed 20  |9),.(923)+100:. |
000023c0  0d 0c ee 0c 50 3d 50 53  54 41 2b 31 0d 0c f8 05  |....P=PSTA+1....|
000023d0  f5 0d 0d 02 0b f3 20 41  2c 42 2c 43 0d 0d 0c 13  |...... A,B,C....|
000023e0  e7 20 41 3d 2d 31 20 8c  20 e5 20 8d 54 60 4d 0d  |. A=-1 . . .T`M.|
000023f0  0d 16 11 f2 64 28 41 2c  42 2c 43 2c 32 32 34 29  |....d(A,B,C,224)|
00002400  0d 0d 20 0a fd 20 41 3d  2d 31 0d 0d 2a 05 f5 0d  |.. .. A=-1..*...|
00002410  0d 34 09 f3 20 41 2c 42  0d 0d 3e 13 e7 20 41 3d  |.4.. A,B..>.. A=|
00002420  2d 31 20 8c 20 e5 20 8d  44 52 4d 0d 0d 48 11 f1  |-1 . . .DRM..H..|
00002430  8a 41 2c 42 29 3b bd 28  32 33 30 29 0d 0d 52 0a  |.A,B);.(230)..R.|
00002440  fd 20 41 3d 2d 31 0d 0d  5c 05 f5 0d 0d 66 0a f3  |. A=-1..\....f..|
00002450  20 41 2c 42 20 0d 0d 70  13 e7 20 41 3d 2d 31 20  | A,B ..p.. A=-1 |
00002460  8c 20 e5 20 8d 74 44 4d  0d 0d 7a 13 f1 8a 41 2c  |. . .tDM..z...A,|
00002470  42 29 3b 73 6e 6f 77 6d  61 6e 24 0d 0d 84 0a fd  |B);snowman$.....|
00002480  20 41 3d 2d 31 0d 0d 8e  0d fb 20 31 32 39 3a fb  | A=-1..... 129:.|
00002490  20 32 0d 0d 98 05 f5 0d  0d a2 09 f3 20 41 2c 42  | 2.......... A,B|
000024a0  0d 0d ac 13 e7 20 41 3d  2d 31 20 8c 20 e5 20 8d  |..... A=-1 . . .|
000024b0  64 40 4d 0d 0d b6 11 f1  8a 41 2c 42 29 3b bd 28  |d@M......A,B);.(|
000024c0  32 32 39 29 0d 0d c0 0a  fd 20 41 3d 2d 31 0d 0d  |229)..... A=-1..|
000024d0  ca 0c fb 20 31 32 38 3a  fb 31 0d 0d d4 43 e3 41  |... 128:.1...C.A|
000024e0  3d 30 20 b8 20 32 38 3a  f1 8a 30 2c 41 29 3b bd  |=0 . 28:..0,A);.|
000024f0  32 34 36 3a ed 3a f1 8a  68 78 25 2c 68 79 25 29  |246:.:..hx%,hy%)|
00002500  3b 72 6f 6f 66 24 3a fb  33 3a f1 8a 68 78 25 2c  |;roof$:.3:..hx%,|
00002510  68 79 25 2b 31 29 3b 68  6f 75 73 65 24 0d 0d de  |hy%+1);house$...|
00002520  05 3a 0d 0d e8 05 e1 0d  0d f2 11 dd f2 64 6c 28  |.:...........dl(|
00002530  41 2c 42 2c 43 2c 44 29  0d 0d fc 11 e6 30 2c 33  |A,B,C,D).....0,3|
00002540  3a 41 3d 41 2a 36 34 20  20 0d 0e 06 14 42 3d 42  |:A=A*64  ....B=B|
00002550  2a 33 32 3a 42 3d 31 30  32 33 2d 42 20 0d 0e 10  |*32:B=1023-B ...|
00002560  14 ef 35 3a ec 20 41 2c  42 3a f1 c4 43 2c bd 44  |..5:. A,B:..C,.D|
00002570  29 0d 0e 1a 1b ec 20 41  2c 42 3a e6 30 2c 31 3a  |)..... A,B:.0,1:|
00002580  f1 c4 43 2c bd 32 34 33  29 3a ef 34 0d 0e 24 05  |..C,.243):.4..$.|
00002590  e1 0d 0e 2e 09 dd f2 63  6c 73 0d 0e 38 0b e3 41  |.......cls..8..A|
000025a0  3d 31 20 b8 33 0d 0e 42  11 ef 31 39 2c 41 2c 30  |=1 .3..B..19,A,0|
000025b0  2c 30 2c 30 2c 30 0d 0e  4c 05 ed 0d 0e 56 05 e1  |,0,0,0..L....V..|
000025c0  0d 0e 60 0b dd f2 75 6e  63 6c 73 0d 0e 6a 12 ef  |..`...uncls..j..|
000025d0  31 39 2c 31 2c 31 2c 30  2c 30 2c 30 20 0d 0e 74  |19,1,1,0,0,0 ..t|
000025e0  11 ef 31 39 2c 32 2c 33  2c 30 2c 30 2c 30 0d 0e  |..19,2,3,0,0,0..|
000025f0  7e 12 ef 31 39 2c 33 2c  37 2c 30 2c 30 2c 30 20  |~..19,3,7,0,0,0 |
00002600  0d 0e 88 05 e1 0d 0e 92  05 3a 0d 0e 9c 05 3a 0d  |.........:....:.|
00002610  0e a6 24 f4 20 41 6c 6c  20 74 68 65 73 65 20 63  |..$. All these c|
00002620  6f 6c 6f 6e 73 20 61 72  65 20 6e 65 63 65 73 73  |olons are necess|
00002630  61 72 79 0d 0e b0 1c f4  20 74 6f 20 73 70 61 63  |ary..... to spac|
00002640  65 20 6f 75 74 20 74 68  65 20 64 61 74 61 2e 0d  |e out the data..|
00002650  0e ba 0e f4 20 53 63 72  65 65 6e 20 31 0d 0e c4  |.... Screen 1...|
00002660  1f f4 20 4e 6f 74 65 20  74 68 65 20 6e 65 78 74  |.. Note the next|
00002670  20 6c 69 6e 65 20 6e 75  6d 62 65 72 0d 0e ce 4b  | line number...K|
00002680  dc 20 31 2c 33 2c 31 30  2c 20 38 2c 38 2c 31 32  |. 1,3,10, 8,8,12|
00002690  2c 20 31 2c 31 33 2c 37  2c 20 31 30 2c 31 38 2c  |, 1,13,7, 10,18,|
000026a0  31 30 2c 20 31 2c 32 33  2c 31 30 2c 20 31 2c 32  |10, 1,23,10, 1,2|
000026b0  38 2c 31 39 2c 20 31 32  2c 31 33 2c 34 2c 20 2d  |8,19, 12,13,4, -|
000026c0  31 2c 2d 31 2c 2d 31 0d  0e d8 0b dc 20 2d 31 2c  |1,-1,-1..... -1,|
000026d0  2d 31 0d 0e e2 18 dc 20  31 39 2c 36 2c 20 31 39  |-1..... 19,6, 19|
000026e0  2c 31 36 2c 20 2d 31 2c  2d 31 0d 0e ec 62 dc 20  |,16, -1,-1...b. |
000026f0  35 2c 32 2c 20 39 2c 32  2c 20 32 2c 31 32 2c 20  |5,2, 9,2, 2,12, |
00002700  35 2c 31 32 2c 20 31 32  2c 31 37 2c 20 31 36 2c  |5,12, 12,17, 16,|
00002710  31 37 2c 20 32 2c 32 32  2c 20 35 2c 32 32 2c 20  |17, 2,22, 5,22, |
00002720  39 2c 32 32 2c 20 32 2c  32 37 2c 20 36 2c 32 37  |9,22, 2,27, 6,27|
00002730  2c 20 31 30 2c 32 37 2c  20 31 33 2c 32 37 2c 20  |, 10,27, 13,27, |
00002740  31 33 2c 31 32 2c 20 2d  31 2c 2d 31 0d 0e f6 05  |13,12, -1,-1....|
00002750  3a 0d 0f 00 05 3a 0d 0f  0a 05 3a 0d 0f 14 05 3a  |:....:....:....:|
00002760  0d 0f 1e 05 3a 0d 0f 28  0e f4 20 53 63 72 65 65  |....:..(.. Scree|
00002770  6e 20 32 0d 0f 32 70 dc  20 31 2c 33 2c 36 2c 20  |n 2..2p. 1,3,6, |
00002780  31 31 2c 33 2c 34 2c 20  31 2c 38 2c 34 2c 20 31  |11,3,4, 1,8,4, 1|
00002790  37 2c 38 2c 33 2c 20 34  2c 31 33 2c 36 2c 20 31  |7,8,3, 4,13,6, 1|
000027a0  2c 32 38 2c 31 39 2c 20  38 2c 31 38 2c 37 2c 20  |,28,19, 8,18,7, |
000027b0  31 2c 31 38 2c 34 2c 20  31 35 2c 31 33 2c 35 2c  |1,18,4, 15,13,5,|
000027c0  20 31 38 2c 31 38 2c 32  2c 20 34 2c 32 33 2c 37  | 18,18,2, 4,23,7|
000027d0  2c 20 31 35 2c 32 33 2c  35 2c 20 2d 31 2c 2d 31  |, 15,23,5, -1,-1|
000027e0  2c 2d 31 0d 0f 3c 1e dc  20 31 39 2c 31 32 2c 20  |,-1..<.. 19,12, |
000027f0  36 2c 32 37 2c 20 38 2c  32 37 2c 20 2d 31 2c 2d  |6,27, 8,27, -1,-|
00002800  31 0d 0f 46 1f dc 20 37  2c 32 36 2c 20 31 39 2c  |1..F.. 7,26, 19,|
00002810  32 31 2c 20 31 30 2c 32  31 2c 20 2d 31 2c 2d 31  |21, 10,21, -1,-1|
00002820  0d 0f 50 4f dc 20 33 2c  32 2c 20 32 2c 37 2c 20  |..PO. 3,2, 2,7, |
00002830  32 2c 31 37 2c 20 36 2c  31 32 2c 20 31 37 2c 31  |2,17, 6,12, 17,1|
00002840  32 2c 20 33 2c 32 37 2c  20 31 32 2c 32 37 2c 20  |2, 3,27, 12,27, |
00002850  37 2c 32 32 2c 20 31 37  2c 32 32 2c 20 31 34 2c  |7,22, 17,22, 14,|
00002860  32 2c 20 31 38 2c 37 2c  20 2d 31 2c 2d 31 20 0d  |2, 18,7, -1,-1 .|
00002870  0f 5a 05 3a 0d 0f 64 05  3a 0d 0f 6e 05 3a 0d 0f  |.Z.:..d.:..n.:..|
00002880  78 05 3a 0d 0f 82 05 3a  0d 0f 8c 0e f4 20 53 63  |x.:....:..... Sc|
00002890  72 65 65 6e 20 33 0d 0f  96 6e dc 20 31 2c 33 2c  |reen 3...n. 1,3,|
000028a0  32 2c 20 31 2c 38 2c 36  2c 20 36 2c 33 2c 35 2c  |2, 1,8,6, 6,3,5,|
000028b0  20 31 34 2c 33 2c 36 2c  20 31 31 2c 38 2c 33 2c  | 14,3,6, 11,8,3,|
000028c0  20 31 37 2c 38 2c 33 2c  20 31 2c 31 33 2c 34 2c  | 17,8,3, 1,13,4,|
000028d0  20 31 33 2c 31 33 2c 37  2c 20 31 2c 32 38 2c 31  | 13,13,7, 1,28,1|
000028e0  39 2c 20 33 2c 31 38 2c  35 2c 20 31 32 2c 31 38  |9, 3,18,5, 12,18|
000028f0  2c 38 2c 20 38 2c 32 33  2c 34 2c 20 2d 31 2c 2d  |,8, 8,23,4, -1,-|
00002900  31 2c 2d 31 0d 0f a0 11  dc 20 39 2c 32 37 2c 20  |1,-1..... 9,27, |
00002910  2d 31 2c 2d 31 0d 0f aa  23 dc 20 31 2c 36 2c 20  |-1,-1...#. 1,6, |
00002920  31 39 2c 31 2c 20 31 39  2c 36 2c 20 31 39 2c 31  |19,1, 19,6, 19,1|
00002930  36 2c 20 2d 31 2c 2d 31  0d 0f b4 5b dc 20 33 2c  |6, -1,-1...[. 3,|
00002940  37 2c 20 31 35 2c 32 2c  20 39 2c 32 2c 20 31 32  |7, 15,2, 9,2, 12|
00002950  2c 37 2c 20 32 2c 31 32  2c 20 31 34 2c 31 37 2c  |,7, 2,12, 14,17,|
00002960  20 31 37 2c 31 37 2c 20  35 2c 31 37 2c 20 39 2c  | 17,17, 5,17, 9,|
00002970  32 32 2c 20 32 2c 32 37  2c 20 36 2c 32 37 2c 20  |22, 2,27, 6,27, |
00002980  31 32 2c 32 37 2c 20 31  35 2c 32 37 2c 20 2d 31  |12,27, 15,27, -1|
00002990  2c 2d 31 0d 0f be 05 3a  0d 0f c8 05 3a 0d 0f d2  |,-1....:....:...|
000029a0  05 3a 0d 0f dc 05 3a 0d  0f e6 05 3a 0d 0f f0 0e  |.:....:....:....|
000029b0  f4 20 53 63 72 65 65 6e  20 34 0d 0f fa 79 dc 20  |. Screen 4...y. |
000029c0  31 2c 33 2c 37 2c 20 31  31 2c 33 2c 39 2c 20 31  |1,3,7, 11,3,9, 1|
000029d0  2c 32 38 2c 31 39 2c 20  31 34 2c 32 33 2c 36 2c  |,28,19, 14,23,6,|
000029e0  20 31 2c 32 33 2c 34 2c  20 38 2c 32 33 2c 33 2c  | 1,23,4, 8,23,3,|
000029f0  20 31 34 2c 31 38 2c 36  2c 20 31 34 2c 31 33 2c  | 14,18,6, 14,13,|
00002a00  36 2c 20 31 33 2c 38 2c  37 2c 20 31 2c 31 33 2c  |6, 13,8,7, 1,13,|
00002a10  32 2c 20 35 2c 31 38 2c  33 2c 20 31 31 2c 31 38  |2, 5,18,3, 11,18|
00002a20  2c 31 2c 20 34 2c 38 2c  36 2c 20 2d 31 2c 2d 31  |,1, 4,8,6, -1,-1|
00002a30  2c 2d 31 0d 10 04 10 dc  20 35 2c 37 2c 20 2d 31  |,-1..... 5,7, -1|
00002a40  2c 2d 31 0d 10 0e 1f dc  20 31 39 2c 36 2c 20 31  |,-1..... 19,6, 1|
00002a50  39 2c 31 31 2c 20 31 39  2c 32 36 2c 20 2d 31 2c  |9,11, 19,26, -1,|
00002a60  2d 31 0d 10 18 4d dc 20  33 2c 32 2c 20 36 2c 32  |-1...M. 3,2, 6,2|
00002a70  2c 20 31 33 2c 32 2c 20  37 2c 37 2c 20 31 35 2c  |, 13,2, 7,7, 15,|
00002a80  37 2c 20 31 36 2c 31 32  2c 20 31 36 2c 31 37 2c  |7, 16,12, 16,17,|
00002a90  20 33 2c 32 32 2c 20 31  38 2c 32 32 2c 20 39 2c  | 3,22, 18,22, 9,|
00002aa0  32 32 2c 20 36 2c 31 37  2c 20 2d 31 2c 2d 31 0d  |22, 6,17, -1,-1.|
00002ab0  10 22 05 3a 0d 10 2c 05  3a 0d 10 36 05 3a 0d 10  |.".:..,.:..6.:..|
00002ac0  40 05 3a 0d 10 4a 05 3a  0d 10 54 0e f4 20 53 63  |@.:..J.:..T.. Sc|
00002ad0  72 65 65 6e 20 35 0d 10  5e 6e dc 20 31 2c 32 38  |reen 5..^n. 1,28|
00002ae0  2c 31 39 2c 20 31 2c 32  33 2c 37 2c 20 31 2c 31  |,19, 1,23,7, 1,1|
00002af0  38 2c 36 2c 20 31 2c 32  33 2c 36 2c 20 31 2c 31  |8,6, 1,23,6, 1,1|
00002b00  33 2c 36 2c 20 31 2c 38  2c 34 2c 20 31 2c 33 2c  |3,6, 1,8,4, 1,3,|
00002b10  31 2c 20 31 34 2c 32 33  2c 36 2c 20 36 2c 33 2c  |1, 14,23,6, 6,3,|
00002b20  35 2c 20 31 35 2c 33 2c  35 2c 20 31 30 2c 38 2c  |5, 15,3,5, 10,8,|
00002b30  36 2c 20 31 34 2c 31 33  2c 36 2c 20 2d 31 2c 2d  |6, 14,13,6, -1,-|
00002b40  31 2c 2d 31 0d 10 68 18  dc 20 32 2c 31 32 2c 20  |1,-1..h.. 2,12, |
00002b50  31 31 2c 32 37 2c 20 2d  31 2c 2d 31 0d 10 72 1f  |11,27, -1,-1..r.|
00002b60  dc 20 31 39 2c 31 31 2c  20 31 39 2c 31 2c 20 31  |. 19,11, 19,1, 1|
00002b70  39 2c 32 36 2c 20 2d 31  2c 2d 31 0d 10 7c 59 dc  |9,26, -1,-1..|Y.|
00002b80  20 31 34 2c 32 37 2c 20  33 2c 32 37 2c 20 36 2c  | 14,27, 3,27, 6,|
00002b90  32 37 2c 20 36 2c 32 32  2c 20 32 2c 32 37 2c 20  |27, 6,22, 2,27, |
00002ba0  32 2c 31 37 2c 20 35 2c  31 37 2c 20 35 2c 31 32  |2,17, 5,17, 5,12|
00002bb0  2c 20 33 2c 37 2c 20 38  2c 32 2c 20 31 36 2c 32  |, 3,7, 8,2, 16,2|
00002bc0  2c 20 31 31 2c 37 2c 20  31 35 2c 31 32 2c 20 2d  |, 11,7, 15,12, -|
00002bd0  31 2c 2d 31 0d ff                                 |1,-1..|
00002bd6