� Santa's Slip - Up!
� Screen Designer
� Listing IV
(� by Oliver Bishop
2� (c) The Micro User
<:
FA%=3790
P
B%=490
Z�6:�title:�init 
d��23,224,255,255,255,255,255,255,255,255,23,225,56,104,124,56,16,120,252,254,23,226,222,206,100,60,24,194,230,135,23,227,223,223,223,0,223,223,223,223 
n�� 23,228,60,126,255,255,255,126,60,0,23,229,0,28,28,31,31,31,127,255,23,230,60,126,255,255,255,255,255,255,23,231,0,0,128,224,240,252,254,255,23,232,255,255,129,129,129,129,255,255 
x�� 23,233,255,129,129,129,255,255,255,255,23,234,255,129,129,129,161,129,129,129,23,235,189,255,126,255,219,255,102,60,23,236,255,231,255,231,255,231,126,60
�"righ$=�(225)+�(8)+�(10)+�(226)
�%snowman$=�(235)+�(8)+�(10)+�(236)
�Troof$=�(229)+�(230)+�(231):wind$=�(232)+�(232)+�(232):door$=�(233)+�(234)+�(233)
�+house$=wind$+�(8)+�(8)+�(8)+�(10)+door$
�%� 5:�up:�:�cls:�drawlevel:�uncls 
�� 23,1,0;0;0;0;:*FX200,1
��'" Select a function."
�*FX15 1
�W$=�
�� W$="L" � �level
�� W$="R" � �roll
�� W$="M" � �snowman
�� W$="B" � �snowball

� W$="P" � �parcel

� W$="S" � �startpos

� W$="F" � �6:�'':�finish

"� W$="H" � �house

,� W$="E" � �move

6� W$="C" � �clear

@� W$="," � left=�

J� W$="." � left=�

T� �

^� �level

h� L>19 � �7:�  

r�

|�7

��'"Input row "A 

�8� A=3 � A=8 � A=13 � A=18 � A=23 � A=28 � � �tZA � �

�LB(L)=A

�0�:�7:�'"Input start "A:� A>19 � A<0 � � �tdA

�LA(L)=A

�2�:�7:�'"Input finish "B:� B>19 � B<1 � � �txA 

�LC(L)=(B-A)+1

�L=L+1:�

�;� �up:� 23,1,0;0;0;0;:�128:�:�:� 28,0,31,19,29:�129:�:�

�
��init

�F� LA(20),LB(20),LC(20),SX(20),SY(20),PX(20),PY(20),SNX(20),SNY(20)

�� �clear

�yLL=26:ST=10:STO=16:X=9:Y=26:XH=17:YH=25:L=0:S=0:P=0:SN=0:�A=0 � 20:LA(A)=-1:SX(A)=-1:PX(A)=-1:�:�A=0 �20:SNX(A)=-1:� 

left=�
PSTA=10:PSTO=16:PLEV=27
�
&`� �drawlevel:�26:�128:�:�1:�"01234567890123456789012345678":�0:�0,0);"01234567890123456789"
0
� A=0 � L
:� LA(A)=-1 � � A:� �DXB 
D�LA(A),LB(A));�LC(A),�224)
N�A
X�2:�X,Y);righ$:�3
b%� A=0 � S:� SX(A)=-1 � � A:� �DvB
l�SX(A),SY(A));�(228):�   
v-�129:�2:� A=0 � P:� PX(A)=-1 � � A:� �tJB
��PX(A),PY(A));�(227):�  
��128:�3
�'� A=0 � SN:� SNX(A)=-1 � � A:� �thB
��SNX(A),SNY(A));snowman$:�
�G�1:� PLEV<>-1 � �PSTA,PLEV);�(PSTO-PSTA)+1,"-"):�PSTA+1,PLEV);"P"
��3
�8� LL<>-1 � �ST,LL);�(STO-ST)+1,"-"):�ST+1,LL);�228
�� XH=-1 � � �dnB
�*�1:�XH,YH);roof$:�3:�XH,YH+1);house$
�6� left=� � �XH-1,YH+1);"F" � �(XH-1)+4,YH+1);"F"
�7� left=� � �XH-1,YH+2);"F" � �(XH-1)+4,YH+2);"F" 
��3:�28,0,0,0,0:�up:�
���startpos:�:�7
� '"X pos of man "X
� X>19 � X<1 � � �TBC
�:�7
 � '"Y pos of man "Y
*� Y<1 � Y>27 � � �T`C
4�
>� �snowball:�:�7
H� S>19 � � 
R� '"X pos of ball "SX(S)
\%� SX(S)>19 � SX(S)<1 � � �DRC    
f	�:�7 
p� '"Y pos of ball "SY(S)
z$� SY(S)>27 � SY(S)<1 � � �DpC   
�	S=S+1
��
�	��cls
��A=0 � 3
�� 19,A,0,0,0,0
��
��
�� �uncls
��19,1,1,0,0,0
��19,2,3,0,0,0
��19,3,7,0,0,0
��
���parcel
 �:�7:� P>19 � �
� '"X pos of present "PX(P)
�:�7
$� '"Y pos of present "PY(P)
.	P=P+1
8�
B
��snowman
L�:�7:� SN>19 � � 
V!� '"X pos of snowman "SNX(SN)
`	�:�7 
j!� '"Y pos of snowman "SNY(SN)
tSN=SN+1
~�
�� �house
��:�7
�� '"X pos of house "XH
��:�7
�� '"Y pos of house "YH
��
�:
�
� �finish
�ST=ST+1
�
STO=STO-1
�PSTO=PSTO-3
�$�:� ''"Enter number of screen"  
� '"(1-5) ="A

� A<1 � A>5 � � �dvD
�
� ''"Enter Title :S";A;
(
� ""A$
2"� �(A$)<0 � �(A$)>8 � � �TTE  
<L%=(A%-100)+(A*100)
FF%=(B%-10)+A*10 
P� left=� � FF=XH-1:GG=YH+1
Z$� left=� � FF=(XH-1)+4:GG=YH+1  
dB$="S"+�A+A$
n� "SPOOL "+B$
x��;F%;" IF scr=";A-1;" THEN RESTORE ";L%;":PSTA=";PSTA;":PSTO=";PSTO;":PLEV=";PLEV;":ST=";ST;":STO=";STO;":LL=";LL;":S=";ST+1;":mx%=";X;":my%=";Y;":FF=";FF;":GG=";GG;":hx%=";XH;":hy%=";YH;":PROCscreen"
�Z=�
��';L%;"DATA";
�:
�� A=0 � 20  
�*� Z=� � LA(A)=-1 � � ;" -1,-1,-1":Z=� 
�� Z=� � � A:� �dHE
�+�;" ";LA(A);",";LB(A);",";LC(A);",";:� 
�:
�Z=�
�� ;L%+10;"DATA";
�� A=0 � 20
�'� Z=� � SX(A)=-1 � � ;" -1,-1":Z=� 
�� Z=� � � A:� �TNF
 �;" ";SX(A);",";SY(A);",";:�
:
Z=�
"� ;L%+20;"DATA"; 
,
� A=0 � 5
6(� Z=� � SNX(A)=-1 � � ;" -1,-1":Z=� 
@� Z=� � � A:� �DTF
J#�;" ";SNX(A);",";SNY(A);",";:� 
T:
^Z=�
h� ;L%+30;"DATA"; 
r� A=0 � 20
|'� Z=� � PX(A)=-1 � � ;" -1,-1":Z=� 
�� Z=� � � A:� �tZF
� �;" ";PX(A);",";PY(A);",";:�
�:
�
*SPOOL
��
�� �roll
��7:�
�� '"row ";LL
�� LL<1 � LL>27 � � �dLF
��7:�
�� '"start ";ST
�� ST<1 � ST>19 � � �djF
�	�7:� 
� '"stop ";STO
� STO<1 � STO>19 � � �THG
�
&� �move
0�7:�
:� '"row ";PLEV
D� PLEV<1 � PLEV>27 � � �TzG
N�7:�:� '"start ";PSTA
X� PSTA<1 � PSTA>19 � � �DNG
b�7:�:� '"stop ";PSTO
l� PSTO<1 � PSTO>19 � � �DbG
v�
�:
�� �title
��
��2,1);�36,"*")
��2,3);�36,"*")
�1�2,2);"Santa's Slip - Up!   Screen Designer"
��2,4);"By Oliver Bishop"
��8,6);"L  Place Level" 
��8,7);"B  Place Snowball"
�&�8,8);"R  Place Moving Snowball" 
��8,9);"M  Place Snowman"
�'�8,10);"S  Place Start position"  
��8,11);"P  Place Parcel"
�8,12);"H  Place House"
'�8,13);"E  Place Moving Platform" 
�8,14);"C  Clear" 
 �8,15);"<  Finish Left"
*�8,16);">  Finish Right"
4/�4,19);"Once you have selected a command" 
>+�6,20);"follow the on-screen prompts" 
H"�14,23);"Press a key":W=�:�  
�

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 15 f4 20 53 63  |ip - Up!..... Sc|
00000020  72 65 65 6e 20 44 65 73  69 67 6e 65 72 0d 00 1e  |reen Designer...|
00000030  10 f4 20 4c 69 73 74 69  6e 67 20 49 56 0d 00 28  |.. Listing IV..(|
00000040  16 f4 20 62 79 20 4f 6c  69 76 65 72 20 42 69 73  |.. by Oliver Bis|
00000050  68 6f 70 0d 00 32 18 f4  20 28 63 29 20 54 68 65  |hop..2.. (c) The|
00000060  20 4d 69 63 72 6f 20 55  73 65 72 0d 00 3c 05 3a  | Micro User..<.:|
00000070  0d 00 46 0b 41 25 3d 33  37 39 30 0d 00 50 0a 42  |..F.A%=3790..P.B|
00000080  25 3d 34 39 30 0d 00 5a  14 eb 36 3a f2 74 69 74  |%=490..Z..6:.tit|
00000090  6c 65 3a f2 69 6e 69 74  20 0d 00 64 9a ef 32 33  |le:.init ..d..23|
000000a0  2c 32 32 34 2c 32 35 35  2c 32 35 35 2c 32 35 35  |,224,255,255,255|
000000b0  2c 32 35 35 2c 32 35 35  2c 32 35 35 2c 32 35 35  |,255,255,255,255|
000000c0  2c 32 35 35 2c 32 33 2c  32 32 35 2c 35 36 2c 31  |,255,23,225,56,1|
000000d0  30 34 2c 31 32 34 2c 35  36 2c 31 36 2c 31 32 30  |04,124,56,16,120|
000000e0  2c 32 35 32 2c 32 35 34  2c 32 33 2c 32 32 36 2c  |,252,254,23,226,|
000000f0  32 32 32 2c 32 30 36 2c  31 30 30 2c 36 30 2c 32  |222,206,100,60,2|
00000100  34 2c 31 39 34 2c 32 33  30 2c 31 33 35 2c 32 33  |4,194,230,135,23|
00000110  2c 32 32 37 2c 32 32 33  2c 32 32 33 2c 32 32 33  |,227,223,223,223|
00000120  2c 30 2c 32 32 33 2c 32  32 33 2c 32 32 33 2c 32  |,0,223,223,223,2|
00000130  32 33 20 0d 00 6e b9 ef  20 32 33 2c 32 32 38 2c  |23 ..n.. 23,228,|
00000140  36 30 2c 31 32 36 2c 32  35 35 2c 32 35 35 2c 32  |60,126,255,255,2|
00000150  35 35 2c 31 32 36 2c 36  30 2c 30 2c 32 33 2c 32  |55,126,60,0,23,2|
00000160  32 39 2c 30 2c 32 38 2c  32 38 2c 33 31 2c 33 31  |29,0,28,28,31,31|
00000170  2c 33 31 2c 31 32 37 2c  32 35 35 2c 32 33 2c 32  |,31,127,255,23,2|
00000180  33 30 2c 36 30 2c 31 32  36 2c 32 35 35 2c 32 35  |30,60,126,255,25|
00000190  35 2c 32 35 35 2c 32 35  35 2c 32 35 35 2c 32 35  |5,255,255,255,25|
000001a0  35 2c 32 33 2c 32 33 31  2c 30 2c 30 2c 31 32 38  |5,23,231,0,0,128|
000001b0  2c 32 32 34 2c 32 34 30  2c 32 35 32 2c 32 35 34  |,224,240,252,254|
000001c0  2c 32 35 35 2c 32 33 2c  32 33 32 2c 32 35 35 2c  |,255,23,232,255,|
000001d0  32 35 35 2c 31 32 39 2c  31 32 39 2c 31 32 39 2c  |255,129,129,129,|
000001e0  31 32 39 2c 32 35 35 2c  32 35 35 20 0d 00 78 9f  |129,255,255 ..x.|
000001f0  ef 20 32 33 2c 32 33 33  2c 32 35 35 2c 31 32 39  |. 23,233,255,129|
00000200  2c 31 32 39 2c 31 32 39  2c 32 35 35 2c 32 35 35  |,129,129,255,255|
00000210  2c 32 35 35 2c 32 35 35  2c 32 33 2c 32 33 34 2c  |,255,255,23,234,|
00000220  32 35 35 2c 31 32 39 2c  31 32 39 2c 31 32 39 2c  |255,129,129,129,|
00000230  31 36 31 2c 31 32 39 2c  31 32 39 2c 31 32 39 2c  |161,129,129,129,|
00000240  32 33 2c 32 33 35 2c 31  38 39 2c 32 35 35 2c 31  |23,235,189,255,1|
00000250  32 36 2c 32 35 35 2c 32  31 39 2c 32 35 35 2c 31  |26,255,219,255,1|
00000260  30 32 2c 36 30 2c 32 33  2c 32 33 36 2c 32 35 35  |02,60,23,236,255|
00000270  2c 32 33 31 2c 32 35 35  2c 32 33 31 2c 32 35 35  |,231,255,231,255|
00000280  2c 32 33 31 2c 31 32 36  2c 36 30 0d 00 82 22 72  |,231,126,60..."r|
00000290  69 67 68 24 3d bd 28 32  32 35 29 2b bd 28 38 29  |igh$=.(225)+.(8)|
000002a0  2b bd 28 31 30 29 2b bd  28 32 32 36 29 0d 00 8c  |+.(10)+.(226)...|
000002b0  25 73 6e 6f 77 6d 61 6e  24 3d bd 28 32 33 35 29  |%snowman$=.(235)|
000002c0  2b bd 28 38 29 2b bd 28  31 30 29 2b bd 28 32 33  |+.(8)+.(10)+.(23|
000002d0  36 29 0d 00 96 54 72 6f  6f 66 24 3d bd 28 32 32  |6)...Troof$=.(22|
000002e0  39 29 2b bd 28 32 33 30  29 2b bd 28 32 33 31 29  |9)+.(230)+.(231)|
000002f0  3a 77 69 6e 64 24 3d bd  28 32 33 32 29 2b bd 28  |:wind$=.(232)+.(|
00000300  32 33 32 29 2b bd 28 32  33 32 29 3a 64 6f 6f 72  |232)+.(232):door|
00000310  24 3d bd 28 32 33 33 29  2b bd 28 32 33 34 29 2b  |$=.(233)+.(234)+|
00000320  bd 28 32 33 33 29 0d 00  a0 2b 68 6f 75 73 65 24  |.(233)...+house$|
00000330  3d 77 69 6e 64 24 2b bd  28 38 29 2b bd 28 38 29  |=wind$+.(8)+.(8)|
00000340  2b bd 28 38 29 2b bd 28  31 30 29 2b 64 6f 6f 72  |+.(8)+.(10)+door|
00000350  24 0d 00 aa 25 eb 20 35  3a f2 75 70 3a f5 3a f2  |$...%. 5:.up:.:.|
00000360  63 6c 73 3a f2 64 72 61  77 6c 65 76 65 6c 3a f2  |cls:.drawlevel:.|
00000370  75 6e 63 6c 73 20 0d 00  b4 1c ef 20 32 33 2c 31  |uncls ..... 23,1|
00000380  2c 30 3b 30 3b 30 3b 30  3b 3a 2a 46 58 32 30 30  |,0;0;0;0;:*FX200|
00000390  2c 31 0d 00 be 1b f1 27  22 20 53 65 6c 65 63 74  |,1.....'" Select|
000003a0  20 61 20 66 75 6e 63 74  69 6f 6e 2e 22 0d 00 c8  | a function."...|
000003b0  0b 2a 46 58 31 35 20 31  0d 00 d2 08 57 24 3d be  |.*FX15 1....W$=.|
000003c0  0d 00 dc 15 e7 20 57 24  3d 22 4c 22 20 8c 20 f2  |..... W$="L" . .|
000003d0  6c 65 76 65 6c 0d 00 e6  14 e7 20 57 24 3d 22 52  |level..... W$="R|
000003e0  22 20 8c 20 f2 72 6f 6c  6c 0d 00 f0 17 e7 20 57  |" . .roll..... W|
000003f0  24 3d 22 4d 22 20 8c 20  f2 73 6e 6f 77 6d 61 6e  |$="M" . .snowman|
00000400  0d 00 fa 18 e7 20 57 24  3d 22 42 22 20 8c 20 f2  |..... W$="B" . .|
00000410  73 6e 6f 77 62 61 6c 6c  0d 01 04 16 e7 20 57 24  |snowball..... W$|
00000420  3d 22 50 22 20 8c 20 f2  70 61 72 63 65 6c 0d 01  |="P" . .parcel..|
00000430  0e 18 e7 20 57 24 3d 22  53 22 20 8c 20 f2 73 74  |... W$="S" . .st|
00000440  61 72 74 70 6f 73 0d 01  18 1d e7 20 57 24 3d 22  |artpos..... W$="|
00000450  46 22 20 8c 20 eb 36 3a  f1 27 27 3a f2 66 69 6e  |F" . .6:.'':.fin|
00000460  69 73 68 0d 01 22 15 e7  20 57 24 3d 22 48 22 20  |ish..".. W$="H" |
00000470  8c 20 f2 68 6f 75 73 65  0d 01 2c 14 e7 20 57 24  |. .house..,.. W$|
00000480  3d 22 45 22 20 8c 20 f2  6d 6f 76 65 0d 01 36 15  |="E" . .move..6.|
00000490  e7 20 57 24 3d 22 43 22  20 8c 20 f2 63 6c 65 61  |. W$="C" . .clea|
000004a0  72 0d 01 40 15 e7 20 57  24 3d 22 2c 22 20 8c 20  |r..@.. W$="," . |
000004b0  6c 65 66 74 3d b9 0d 01  4a 15 e7 20 57 24 3d 22  |left=...J.. W$="|
000004c0  2e 22 20 8c 20 6c 65 66  74 3d a3 0d 01 54 07 fd  |." . left=...T..|
000004d0  20 a3 0d 01 5e 0c dd 20  f2 6c 65 76 65 6c 0d 01  | ...^.. .level..|
000004e0  68 13 e7 20 4c 3e 31 39  20 8c 20 ef 37 3a e1 20  |h.. L>19 . .7:. |
000004f0  20 0d 01 72 05 db 0d 01  7c 06 ef 37 0d 01 86 14  | ..r....|..7....|
00000500  e8 27 22 49 6e 70 75 74  20 72 6f 77 20 22 41 20  |.'"Input row "A |
00000510  0d 01 90 38 e7 20 41 3d  33 20 84 20 41 3d 38 20  |...8. A=3 . A=8 |
00000520  84 20 41 3d 31 33 20 84  20 41 3d 31 38 20 84 20  |. A=13 . A=18 . |
00000530  41 3d 32 33 20 84 20 41  3d 32 38 20 8c 20 e5 20  |A=23 . A=28 . . |
00000540  8d 74 5a 41 20 8b 20 e1  0d 01 9a 0b 4c 42 28 4c  |.tZA . .....LB(L|
00000550  29 3d 41 0d 01 a4 30 db  3a ef 37 3a e8 27 22 49  |)=A...0.:.7:.'"I|
00000560  6e 70 75 74 20 73 74 61  72 74 20 22 41 3a e7 20  |nput start "A:. |
00000570  41 3e 31 39 20 84 20 41  3c 30 20 8c 20 e5 20 8d  |A>19 . A<0 . . .|
00000580  74 64 41 0d 01 ae 0b 4c  41 28 4c 29 3d 41 0d 01  |tdA....LA(L)=A..|
00000590  b8 32 db 3a ef 37 3a e8  27 22 49 6e 70 75 74 20  |.2.:.7:.'"Input |
000005a0  66 69 6e 69 73 68 20 22  42 3a e7 20 42 3e 31 39  |finish "B:. B>19|
000005b0  20 84 20 42 3c 31 20 8c  20 e5 20 8d 74 78 41 20  | . B<1 . . .txA |
000005c0  0d 01 c2 11 4c 43 28 4c  29 3d 28 42 2d 41 29 2b  |....LC(L)=(B-A)+|
000005d0  31 0d 01 cc 0b 4c 3d 4c  2b 31 3a e1 0d 01 d6 3b  |1....L=L+1:....;|
000005e0  dd 20 f2 75 70 3a ef 20  32 33 2c 31 2c 30 3b 30  |. .up:. 23,1,0;0|
000005f0  3b 30 3b 30 3b 3a fb 31  32 38 3a db 3a db 3a ef  |;0;0;:.128:.:.:.|
00000600  20 32 38 2c 30 2c 33 31  2c 31 39 2c 32 39 3a fb  | 28,0,31,19,29:.|
00000610  31 32 39 3a db 3a e1 0d  01 e0 0a dd f2 69 6e 69  |129:.:.......ini|
00000620  74 0d 01 ea 46 de 20 4c  41 28 32 30 29 2c 4c 42  |t...F. LA(20),LB|
00000630  28 32 30 29 2c 4c 43 28  32 30 29 2c 53 58 28 32  |(20),LC(20),SX(2|
00000640  30 29 2c 53 59 28 32 30  29 2c 50 58 28 32 30 29  |0),SY(20),PX(20)|
00000650  2c 50 59 28 32 30 29 2c  53 4e 58 28 32 30 29 2c  |,PY(20),SNX(20),|
00000660  53 4e 59 28 32 30 29 0d  01 f4 0c dd 20 f2 63 6c  |SNY(20)..... .cl|
00000670  65 61 72 0d 01 fe 79 4c  4c 3d 32 36 3a 53 54 3d  |ear...yLL=26:ST=|
00000680  31 30 3a 53 54 4f 3d 31  36 3a 58 3d 39 3a 59 3d  |10:STO=16:X=9:Y=|
00000690  32 36 3a 58 48 3d 31 37  3a 59 48 3d 32 35 3a 4c  |26:XH=17:YH=25:L|
000006a0  3d 30 3a 53 3d 30 3a 50  3d 30 3a 53 4e 3d 30 3a  |=0:S=0:P=0:SN=0:|
000006b0  e3 41 3d 30 20 b8 20 32  30 3a 4c 41 28 41 29 3d  |.A=0 . 20:LA(A)=|
000006c0  2d 31 3a 53 58 28 41 29  3d 2d 31 3a 50 58 28 41  |-1:SX(A)=-1:PX(A|
000006d0  29 3d 2d 31 3a ed 3a e3  41 3d 30 20 b8 32 30 3a  |)=-1:.:.A=0 .20:|
000006e0  53 4e 58 28 41 29 3d 2d  31 3a ed 20 0d 02 08 0a  |SNX(A)=-1:. ....|
000006f0  6c 65 66 74 3d b9 0d 02  12 1b 50 53 54 41 3d 31  |left=.....PSTA=1|
00000700  30 3a 50 53 54 4f 3d 31  36 3a 50 4c 45 56 3d 32  |0:PSTO=16:PLEV=2|
00000710  37 0d 02 1c 05 e1 0d 02  26 60 dd 20 f2 64 72 61  |7.......&`. .dra|
00000720  77 6c 65 76 65 6c 3a ef  32 36 3a fb 31 32 38 3a  |wlevel:.26:.128:|
00000730  db 3a fe 31 3a f1 22 30  31 32 33 34 35 36 37 38  |.:.1:."012345678|
00000740  39 30 31 32 33 34 35 36  37 38 39 30 31 32 33 34  |9012345678901234|
00000750  35 36 37 38 22 3a fe 30  3a f1 8a 30 2c 30 29 3b  |5678":.0:..0,0);|
00000760  22 30 31 32 33 34 35 36  37 38 39 30 31 32 33 34  |"012345678901234|
00000770  35 36 37 38 39 22 0d 02  30 0d e3 20 41 3d 30 20  |56789"..0.. A=0 |
00000780  b8 20 4c 0d 02 3a 1c e7  20 4c 41 28 41 29 3d 2d  |. L..:.. LA(A)=-|
00000790  31 20 8c 20 ed 20 41 3a  e5 20 8d 44 58 42 20 0d  |1 . . A:. .DXB .|
000007a0  02 44 1f f1 8a 4c 41 28  41 29 2c 4c 42 28 41 29  |.D...LA(A),LB(A)|
000007b0  29 3b c4 4c 43 28 41 29  2c bd 32 32 34 29 0d 02  |);.LC(A),.224)..|
000007c0  4e 06 ed 41 0d 02 58 16  fb 32 3a f1 8a 58 2c 59  |N..A..X..2:..X,Y|
000007d0  29 3b 72 69 67 68 24 3a  fb 33 0d 02 62 25 e3 20  |);righ$:.3..b%. |
000007e0  41 3d 30 20 b8 20 53 3a  e7 20 53 58 28 41 29 3d  |A=0 . S:. SX(A)=|
000007f0  2d 31 20 8c 20 ed 20 41  3a e5 20 8d 44 76 42 0d  |-1 . . A:. .DvB.|
00000800  02 6c 1e f1 8a 53 58 28  41 29 2c 53 59 28 41 29  |.l...SX(A),SY(A)|
00000810  29 3b bd 28 32 32 38 29  3a ed 20 20 20 0d 02 76  |);.(228):.   ..v|
00000820  2d fb 31 32 39 3a fb 32  3a e3 20 41 3d 30 20 b8  |-.129:.2:. A=0 .|
00000830  20 50 3a e7 20 50 58 28  41 29 3d 2d 31 20 8c 20  | P:. PX(A)=-1 . |
00000840  ed 20 41 3a e5 20 8d 74  4a 42 0d 02 80 1d f1 8a  |. A:. .tJB......|
00000850  50 58 28 41 29 2c 50 59  28 41 29 29 3b bd 28 32  |PX(A),PY(A));.(2|
00000860  32 37 29 3a ed 20 20 0d  02 8a 0b fb 31 32 38 3a  |27):.  .....128:|
00000870  fb 33 0d 02 94 27 e3 20  41 3d 30 20 b8 20 53 4e  |.3...'. A=0 . SN|
00000880  3a e7 20 53 4e 58 28 41  29 3d 2d 31 20 8c 20 ed  |:. SNX(A)=-1 . .|
00000890  20 41 3a e5 20 8d 74 68  42 0d 02 9e 1f f1 8a 53  | A:. .thB......S|
000008a0  4e 58 28 41 29 2c 53 4e  59 28 41 29 29 3b 73 6e  |NX(A),SNY(A));sn|
000008b0  6f 77 6d 61 6e 24 3a ed  0d 02 a8 47 fb 31 3a e7  |owman$:....G.1:.|
000008c0  20 50 4c 45 56 3c 3e 2d  31 20 8c 20 f1 8a 50 53  | PLEV<>-1 . ..PS|
000008d0  54 41 2c 50 4c 45 56 29  3b c4 28 50 53 54 4f 2d  |TA,PLEV);.(PSTO-|
000008e0  50 53 54 41 29 2b 31 2c  22 2d 22 29 3a f1 8a 50  |PSTA)+1,"-"):..P|
000008f0  53 54 41 2b 31 2c 50 4c  45 56 29 3b 22 50 22 0d  |STA+1,PLEV);"P".|
00000900  02 b2 06 fb 33 0d 02 bc  38 e7 20 4c 4c 3c 3e 2d  |....3...8. LL<>-|
00000910  31 20 8c 20 f1 8a 53 54  2c 4c 4c 29 3b c4 28 53  |1 . ..ST,LL);.(S|
00000920  54 4f 2d 53 54 29 2b 31  2c 22 2d 22 29 3a f1 8a  |TO-ST)+1,"-"):..|
00000930  53 54 2b 31 2c 4c 4c 29  3b bd 32 32 38 0d 02 c6  |ST+1,LL);.228...|
00000940  14 e7 20 58 48 3d 2d 31  20 8c 20 e5 20 8d 64 6e  |.. XH=-1 . . .dn|
00000950  42 0d 02 d0 2a fb 31 3a  f1 8a 58 48 2c 59 48 29  |B...*.1:..XH,YH)|
00000960  3b 72 6f 6f 66 24 3a fb  33 3a f1 8a 58 48 2c 59  |;roof$:.3:..XH,Y|
00000970  48 2b 31 29 3b 68 6f 75  73 65 24 0d 02 da 36 e7  |H+1);house$...6.|
00000980  20 6c 65 66 74 3d b9 20  8c 20 f1 8a 58 48 2d 31  | left=. . ..XH-1|
00000990  2c 59 48 2b 31 29 3b 22  46 22 20 8b 20 f1 8a 28  |,YH+1);"F" . ..(|
000009a0  58 48 2d 31 29 2b 34 2c  59 48 2b 31 29 3b 22 46  |XH-1)+4,YH+1);"F|
000009b0  22 0d 02 e4 37 e7 20 6c  65 66 74 3d b9 20 8c 20  |"...7. left=. . |
000009c0  f1 8a 58 48 2d 31 2c 59  48 2b 32 29 3b 22 46 22  |..XH-1,YH+2);"F"|
000009d0  20 8b 20 f1 8a 28 58 48  2d 31 29 2b 34 2c 59 48  | . ..(XH-1)+4,YH|
000009e0  2b 32 29 3b 22 46 22 20  0d 02 ee 18 fb 33 3a ef  |+2);"F" .....3:.|
000009f0  32 38 2c 30 2c 30 2c 30  2c 30 3a f2 75 70 3a e1  |28,0,0,0,0:.up:.|
00000a00  0d 02 f8 13 dd f2 73 74  61 72 74 70 6f 73 3a db  |......startpos:.|
00000a10  3a ef 37 0d 03 02 17 e8  20 27 22 58 20 70 6f 73  |:.7..... '"X pos|
00000a20  20 6f 66 20 6d 61 6e 20  22 58 0d 03 0c 19 e7 20  | of man "X..... |
00000a30  58 3e 31 39 20 84 20 58  3c 31 20 8c 20 e5 20 8d  |X>19 . X<1 . . .|
00000a40  54 42 43 0d 03 16 08 db  3a ef 37 0d 03 20 17 e8  |TBC.....:.7.. ..|
00000a50  20 27 22 59 20 70 6f 73  20 6f 66 20 6d 61 6e 20  | '"Y pos of man |
00000a60  22 59 0d 03 2a 19 e7 20  59 3c 31 20 84 20 59 3e  |"Y..*.. Y<1 . Y>|
00000a70  32 37 20 8c 20 e5 20 8d  54 60 43 0d 03 34 05 e1  |27 . . .T`C..4..|
00000a80  0d 03 3e 14 dd 20 f2 73  6e 6f 77 62 61 6c 6c 3a  |..>.. .snowball:|
00000a90  db 3a ef 37 0d 03 48 0f  e7 20 53 3e 31 39 20 8c  |.:.7..H.. S>19 .|
00000aa0  20 e1 20 0d 03 52 1c e8  20 27 22 58 20 70 6f 73  | . ..R.. '"X pos|
00000ab0  20 6f 66 20 62 61 6c 6c  20 22 53 58 28 53 29 0d  | of ball "SX(S).|
00000ac0  03 5c 25 e7 20 53 58 28  53 29 3e 31 39 20 84 20  |.\%. SX(S)>19 . |
00000ad0  53 58 28 53 29 3c 31 20  8c 20 e5 20 8d 44 52 43  |SX(S)<1 . . .DRC|
00000ae0  20 20 20 20 0d 03 66 09  db 3a ef 37 20 0d 03 70  |    ..f..:.7 ..p|
00000af0  1c e8 20 27 22 59 20 70  6f 73 20 6f 66 20 62 61  |.. '"Y pos of ba|
00000b00  6c 6c 20 22 53 59 28 53  29 0d 03 7a 24 e7 20 53  |ll "SY(S)..z$. S|
00000b10  59 28 53 29 3e 32 37 20  84 20 53 59 28 53 29 3c  |Y(S)>27 . SY(S)<|
00000b20  31 20 8c 20 e5 20 8d 44  70 43 20 20 20 0d 03 84  |1 . . .DpC   ...|
00000b30  09 53 3d 53 2b 31 0d 03  8e 05 e1 0d 03 98 09 dd  |.S=S+1..........|
00000b40  f2 63 6c 73 0d 03 a2 0c  e3 41 3d 30 20 b8 20 33  |.cls.....A=0 . 3|
00000b50  0d 03 ac 12 ef 20 31 39  2c 41 2c 30 2c 30 2c 30  |..... 19,A,0,0,0|
00000b60  2c 30 0d 03 b6 05 ed 0d  03 c0 05 e1 0d 03 ca 0c  |,0..............|
00000b70  dd 20 f2 75 6e 63 6c 73  0d 03 d4 11 ef 31 39 2c  |. .uncls.....19,|
00000b80  31 2c 31 2c 30 2c 30 2c  30 0d 03 de 11 ef 31 39  |1,1,0,0,0.....19|
00000b90  2c 32 2c 33 2c 30 2c 30  2c 30 0d 03 e8 11 ef 31  |,2,3,0,0,0.....1|
00000ba0  39 2c 33 2c 37 2c 30 2c  30 2c 30 0d 03 f2 05 e1  |9,3,7,0,0,0.....|
00000bb0  0d 03 fc 0c dd f2 70 61  72 63 65 6c 0d 04 06 14  |......parcel....|
00000bc0  20 db 3a ef 37 3a e7 20  50 3e 31 39 20 8c 20 e1  | .:.7:. P>19 . .|
00000bd0  0d 04 10 1f e8 20 27 22  58 20 70 6f 73 20 6f 66  |..... '"X pos of|
00000be0  20 70 72 65 73 65 6e 74  20 22 50 58 28 50 29 0d  | present "PX(P).|
00000bf0  04 1a 08 db 3a ef 37 0d  04 24 1f e8 20 27 22 59  |....:.7..$.. '"Y|
00000c00  20 70 6f 73 20 6f 66 20  70 72 65 73 65 6e 74 20  | pos of present |
00000c10  22 50 59 28 50 29 0d 04  2e 09 50 3d 50 2b 31 0d  |"PY(P)....P=P+1.|
00000c20  04 38 05 e1 0d 04 42 0d  dd f2 73 6e 6f 77 6d 61  |.8....B...snowma|
00000c30  6e 0d 04 4c 15 db 3a ef  37 3a e7 20 53 4e 3e 31  |n..L..:.7:. SN>1|
00000c40  39 20 8c 20 e1 20 0d 04  56 21 e8 20 27 22 58 20  |9 . . ..V!. '"X |
00000c50  70 6f 73 20 6f 66 20 73  6e 6f 77 6d 61 6e 20 22  |pos of snowman "|
00000c60  53 4e 58 28 53 4e 29 0d  04 60 09 db 3a ef 37 20  |SNX(SN)..`..:.7 |
00000c70  0d 04 6a 21 e8 20 27 22  59 20 70 6f 73 20 6f 66  |..j!. '"Y pos of|
00000c80  20 73 6e 6f 77 6d 61 6e  20 22 53 4e 59 28 53 4e  | snowman "SNY(SN|
00000c90  29 0d 04 74 0b 53 4e 3d  53 4e 2b 31 0d 04 7e 05  |)..t.SN=SN+1..~.|
00000ca0  e1 0d 04 88 0c dd 20 f2  68 6f 75 73 65 0d 04 92  |...... .house...|
00000cb0  08 db 3a ef 37 0d 04 9c  1a e8 20 27 22 58 20 70  |..:.7..... '"X p|
00000cc0  6f 73 20 6f 66 20 68 6f  75 73 65 20 22 58 48 0d  |os of house "XH.|
00000cd0  04 a6 08 db 3a ef 37 0d  04 b0 1a e8 20 27 22 59  |....:.7..... '"Y|
00000ce0  20 70 6f 73 20 6f 66 20  68 6f 75 73 65 20 22 59  | pos of house "Y|
00000cf0  48 0d 04 ba 05 e1 0d 04  c4 05 3a 0d 04 ce 0d dd  |H.........:.....|
00000d00  20 f2 66 69 6e 69 73 68  0d 04 d8 0b 53 54 3d 53  | .finish....ST=S|
00000d10  54 2b 31 0d 04 e2 0d 53  54 4f 3d 53 54 4f 2d 31  |T+1....STO=STO-1|
00000d20  0d 04 ec 0f 50 53 54 4f  3d 50 53 54 4f 2d 33 0d  |....PSTO=PSTO-3.|
00000d30  04 f6 24 db 3a f1 20 27  27 22 45 6e 74 65 72 20  |..$.:. ''"Enter |
00000d40  6e 75 6d 62 65 72 20 6f  66 20 73 63 72 65 65 6e  |number of screen|
00000d50  22 20 20 0d 05 00 11 e8  20 27 22 28 31 2d 35 29  |"  ..... '"(1-5)|
00000d60  20 3d 22 41 0d 05 0a 18  e7 20 41 3c 31 20 84 20  | ="A..... A<1 . |
00000d70  41 3e 35 20 8c 20 e5 20  8d 64 76 44 0d 05 14 05  |A>5 . . .dvD....|
00000d80  db 0d 05 1e 1b f1 20 27  27 22 45 6e 74 65 72 20  |...... ''"Enter |
00000d90  54 69 74 6c 65 20 3a 53  22 3b 41 3b 0d 05 28 0a  |Title :S";A;..(.|
00000da0  e8 20 22 22 41 24 0d 05  32 22 e7 20 a9 28 41 24  |. ""A$..2". .(A$|
00000db0  29 3c 30 20 84 20 a9 28  41 24 29 3e 38 20 8c 20  |)<0 . .(A$)>8 . |
00000dc0  e5 20 8d 54 54 45 20 20  0d 05 3c 17 4c 25 3d 28  |. .TTE  ..<.L%=(|
00000dd0  41 25 2d 31 30 30 29 2b  28 41 2a 31 30 30 29 0d  |A%-100)+(A*100).|
00000de0  05 46 14 46 25 3d 28 42  25 2d 31 30 29 2b 41 2a  |.F.F%=(B%-10)+A*|
00000df0  31 30 20 0d 05 50 1e e7  20 6c 65 66 74 3d b9 20  |10 ..P.. left=. |
00000e00  8c 20 46 46 3d 58 48 2d  31 3a 47 47 3d 59 48 2b  |. FF=XH-1:GG=YH+|
00000e10  31 0d 05 5a 24 e7 20 6c  65 66 74 3d a3 20 8c 20  |1..Z$. left=. . |
00000e20  46 46 3d 28 58 48 2d 31  29 2b 34 3a 47 47 3d 59  |FF=(XH-1)+4:GG=Y|
00000e30  48 2b 31 20 20 0d 05 64  10 42 24 3d 22 53 22 2b  |H+1  ..d.B$="S"+|
00000e40  c3 41 2b 41 24 0d 05 6e  11 ff 20 22 53 50 4f 4f  |.A+A$..n.. "SPOO|
00000e50  4c 20 22 2b 42 24 0d 05  78 cc f1 3b 46 25 3b 22  |L "+B$..x..;F%;"|
00000e60  20 49 46 20 73 63 72 3d  22 3b 41 2d 31 3b 22 20  | IF scr=";A-1;" |
00000e70  54 48 45 4e 20 52 45 53  54 4f 52 45 20 22 3b 4c  |THEN RESTORE ";L|
00000e80  25 3b 22 3a 50 53 54 41  3d 22 3b 50 53 54 41 3b  |%;":PSTA=";PSTA;|
00000e90  22 3a 50 53 54 4f 3d 22  3b 50 53 54 4f 3b 22 3a  |":PSTO=";PSTO;":|
00000ea0  50 4c 45 56 3d 22 3b 50  4c 45 56 3b 22 3a 53 54  |PLEV=";PLEV;":ST|
00000eb0  3d 22 3b 53 54 3b 22 3a  53 54 4f 3d 22 3b 53 54  |=";ST;":STO=";ST|
00000ec0  4f 3b 22 3a 4c 4c 3d 22  3b 4c 4c 3b 22 3a 53 3d  |O;":LL=";LL;":S=|
00000ed0  22 3b 53 54 2b 31 3b 22  3a 6d 78 25 3d 22 3b 58  |";ST+1;":mx%=";X|
00000ee0  3b 22 3a 6d 79 25 3d 22  3b 59 3b 22 3a 46 46 3d  |;":my%=";Y;":FF=|
00000ef0  22 3b 46 46 3b 22 3a 47  47 3d 22 3b 47 47 3b 22  |";FF;":GG=";GG;"|
00000f00  3a 68 78 25 3d 22 3b 58  48 3b 22 3a 68 79 25 3d  |:hx%=";XH;":hy%=|
00000f10  22 3b 59 48 3b 22 3a 50  52 4f 43 73 63 72 65 65  |";YH;":PROCscree|
00000f20  6e 22 0d 05 82 07 5a 3d  a3 0d 05 8c 11 f1 27 3b  |n"....Z=......';|
00000f30  4c 25 3b 22 44 41 54 41  22 3b 0d 05 96 05 3a 0d  |L%;"DATA";....:.|
00000f40  05 a0 10 e3 20 41 3d 30  20 b8 20 32 30 20 20 0d  |.... A=0 . 20  .|
00000f50  05 aa 2a e7 20 5a 3d a3  20 80 20 4c 41 28 41 29  |..*. Z=. . LA(A)|
00000f60  3d 2d 31 20 8c 20 f1 20  3b 22 20 2d 31 2c 2d 31  |=-1 . . ;" -1,-1|
00000f70  2c 2d 31 22 3a 5a 3d b9  20 0d 05 b4 16 e7 20 5a  |,-1":Z=. ..... Z|
00000f80  3d b9 20 8c 20 ed 20 41  3a e5 20 8d 64 48 45 0d  |=. . . A:. .dHE.|
00000f90  05 be 2b f1 3b 22 20 22  3b 4c 41 28 41 29 3b 22  |..+.;" ";LA(A);"|
00000fa0  2c 22 3b 4c 42 28 41 29  3b 22 2c 22 3b 4c 43 28  |,";LB(A);",";LC(|
00000fb0  41 29 3b 22 2c 22 3b 3a  ed 20 0d 05 c8 05 3a 0d  |A);",";:. ....:.|
00000fc0  05 d2 07 5a 3d a3 0d 05  dc 14 f1 20 3b 4c 25 2b  |...Z=...... ;L%+|
00000fd0  31 30 3b 22 44 41 54 41  22 3b 0d 05 e6 0e e3 20  |10;"DATA";..... |
00000fe0  41 3d 30 20 b8 20 32 30  0d 05 f0 27 e7 20 5a 3d  |A=0 . 20...'. Z=|
00000ff0  a3 20 80 20 53 58 28 41  29 3d 2d 31 20 8c 20 f1  |. . SX(A)=-1 . .|
00001000  20 3b 22 20 2d 31 2c 2d  31 22 3a 5a 3d b9 20 0d  | ;" -1,-1":Z=. .|
00001010  05 fa 16 e7 20 5a 3d b9  20 8c 20 ed 20 41 3a e5  |.... Z=. . . A:.|
00001020  20 8d 54 4e 46 0d 06 04  20 f1 3b 22 20 22 3b 53  | .TNF... .;" ";S|
00001030  58 28 41 29 3b 22 2c 22  3b 53 59 28 41 29 3b 22  |X(A);",";SY(A);"|
00001040  2c 22 3b 3a ed 0d 06 0e  05 3a 0d 06 18 07 5a 3d  |,";:.....:....Z=|
00001050  a3 0d 06 22 15 f1 20 3b  4c 25 2b 32 30 3b 22 44  |...".. ;L%+20;"D|
00001060  41 54 41 22 3b 20 0d 06  2c 0d e3 20 41 3d 30 20  |ATA"; ..,.. A=0 |
00001070  b8 20 35 0d 06 36 28 e7  20 5a 3d a3 20 80 20 53  |. 5..6(. Z=. . S|
00001080  4e 58 28 41 29 3d 2d 31  20 8c 20 f1 20 3b 22 20  |NX(A)=-1 . . ;" |
00001090  2d 31 2c 2d 31 22 3a 5a  3d b9 20 0d 06 40 16 e7  |-1,-1":Z=. ..@..|
000010a0  20 5a 3d b9 20 8c 20 ed  20 41 3a e5 20 8d 44 54  | Z=. . . A:. .DT|
000010b0  46 0d 06 4a 23 f1 3b 22  20 22 3b 53 4e 58 28 41  |F..J#.;" ";SNX(A|
000010c0  29 3b 22 2c 22 3b 53 4e  59 28 41 29 3b 22 2c 22  |);",";SNY(A);","|
000010d0  3b 3a ed 20 0d 06 54 05  3a 0d 06 5e 07 5a 3d a3  |;:. ..T.:..^.Z=.|
000010e0  0d 06 68 15 f1 20 3b 4c  25 2b 33 30 3b 22 44 41  |..h.. ;L%+30;"DA|
000010f0  54 41 22 3b 20 0d 06 72  0e e3 20 41 3d 30 20 b8  |TA"; ..r.. A=0 .|
00001100  20 32 30 0d 06 7c 27 e7  20 5a 3d a3 20 80 20 50  | 20..|'. Z=. . P|
00001110  58 28 41 29 3d 2d 31 20  8c 20 f1 20 3b 22 20 2d  |X(A)=-1 . . ;" -|
00001120  31 2c 2d 31 22 3a 5a 3d  b9 20 0d 06 86 16 e7 20  |1,-1":Z=. ..... |
00001130  5a 3d b9 20 8c 20 ed 20  41 3a e5 20 8d 74 5a 46  |Z=. . . A:. .tZF|
00001140  0d 06 90 20 f1 3b 22 20  22 3b 50 58 28 41 29 3b  |... .;" ";PX(A);|
00001150  22 2c 22 3b 50 59 28 41  29 3b 22 2c 22 3b 3a ed  |",";PY(A);",";:.|
00001160  0d 06 9a 05 3a 0d 06 a4  0a 2a 53 50 4f 4f 4c 0d  |....:....*SPOOL.|
00001170  06 ae 05 e0 0d 06 b8 0b  dd 20 f2 72 6f 6c 6c 0d  |......... .roll.|
00001180  06 c2 08 ef 37 3a db 0d  06 cc 10 e8 20 27 22 72  |....7:...... '"r|
00001190  6f 77 20 22 3b 4c 4c 0d  06 d6 1b e7 20 4c 4c 3c  |ow ";LL..... LL<|
000011a0  31 20 84 20 4c 4c 3e 32  37 20 8c 20 e5 20 8d 64  |1 . LL>27 . . .d|
000011b0  4c 46 0d 06 e0 08 ef 37  3a db 0d 06 ea 12 e8 20  |LF.....7:...... |
000011c0  27 22 73 74 61 72 74 20  22 3b 53 54 0d 06 f4 1b  |'"start ";ST....|
000011d0  e7 20 53 54 3c 31 20 84  20 53 54 3e 31 39 20 8c  |. ST<1 . ST>19 .|
000011e0  20 e5 20 8d 64 6a 46 0d  06 fe 09 ef 37 3a db 20  | . .djF.....7:. |
000011f0  0d 07 08 12 e8 20 27 22  73 74 6f 70 20 22 3b 53  |..... '"stop ";S|
00001200  54 4f 0d 07 12 1d e7 20  53 54 4f 3c 31 20 84 20  |TO..... STO<1 . |
00001210  53 54 4f 3e 31 39 20 8c  20 e5 20 8d 54 48 47 0d  |STO>19 . . .THG.|
00001220  07 1c 05 e1 0d 07 26 0b  dd 20 f2 6d 6f 76 65 0d  |......&.. .move.|
00001230  07 30 08 ef 37 3a db 0d  07 3a 12 e8 20 27 22 72  |.0..7:...:.. '"r|
00001240  6f 77 20 22 3b 50 4c 45  56 0d 07 44 1f e7 20 50  |ow ";PLEV..D.. P|
00001250  4c 45 56 3c 31 20 84 20  50 4c 45 56 3e 32 37 20  |LEV<1 . PLEV>27 |
00001260  8c 20 e5 20 8d 54 7a 47  0d 07 4e 19 ef 37 3a db  |. . .TzG..N..7:.|
00001270  3a e8 20 27 22 73 74 61  72 74 20 22 3b 50 53 54  |:. '"start ";PST|
00001280  41 0d 07 58 1f e7 20 50  53 54 41 3c 31 20 84 20  |A..X.. PSTA<1 . |
00001290  50 53 54 41 3e 31 39 20  8c 20 e5 20 8d 44 4e 47  |PSTA>19 . . .DNG|
000012a0  0d 07 62 18 ef 37 3a db  3a e8 20 27 22 73 74 6f  |..b..7:.:. '"sto|
000012b0  70 20 22 3b 50 53 54 4f  0d 07 6c 1f e7 20 50 53  |p ";PSTO..l.. PS|
000012c0  54 4f 3c 31 20 84 20 50  53 54 4f 3e 31 39 20 8c  |TO<1 . PSTO>19 .|
000012d0  20 e5 20 8d 44 62 47 0d  07 76 05 e1 0d 07 80 05  | . .DbG..v......|
000012e0  3a 0d 07 8a 0c dd 20 f2  74 69 74 6c 65 0d 07 94  |:..... .title...|
000012f0  05 db 0d 07 9e 13 f1 8a  32 2c 31 29 3b c4 33 36  |........2,1);.36|
00001300  2c 22 2a 22 29 0d 07 a8  13 f1 8a 32 2c 33 29 3b  |,"*")......2,3);|
00001310  c4 33 36 2c 22 2a 22 29  0d 07 b2 31 f1 8a 32 2c  |.36,"*")...1..2,|
00001320  32 29 3b 22 53 61 6e 74  61 27 73 20 53 6c 69 70  |2);"Santa's Slip|
00001330  20 2d 20 55 70 21 20 20  20 53 63 72 65 65 6e 20  | - Up!   Screen |
00001340  44 65 73 69 67 6e 65 72  22 0d 07 bc 1d f1 8a 32  |Designer"......2|
00001350  2c 34 29 3b 22 42 79 20  4f 6c 69 76 65 72 20 42  |,4);"By Oliver B|
00001360  69 73 68 6f 70 22 0d 07  c6 1c f1 8a 38 2c 36 29  |ishop"......8,6)|
00001370  3b 22 4c 20 20 50 6c 61  63 65 20 4c 65 76 65 6c  |;"L  Place Level|
00001380  22 20 0d 07 d0 1e f1 8a  38 2c 37 29 3b 22 42 20  |" ......8,7);"B |
00001390  20 50 6c 61 63 65 20 53  6e 6f 77 62 61 6c 6c 22  | Place Snowball"|
000013a0  0d 07 da 26 f1 8a 38 2c  38 29 3b 22 52 20 20 50  |...&..8,8);"R  P|
000013b0  6c 61 63 65 20 4d 6f 76  69 6e 67 20 53 6e 6f 77  |lace Moving Snow|
000013c0  62 61 6c 6c 22 20 0d 07  e4 1d f1 8a 38 2c 39 29  |ball" ......8,9)|
000013d0  3b 22 4d 20 20 50 6c 61  63 65 20 53 6e 6f 77 6d  |;"M  Place Snowm|
000013e0  61 6e 22 0d 07 ee 27 f1  8a 38 2c 31 30 29 3b 22  |an"...'..8,10);"|
000013f0  53 20 20 50 6c 61 63 65  20 53 74 61 72 74 20 70  |S  Place Start p|
00001400  6f 73 69 74 69 6f 6e 22  20 20 0d 07 f8 1d f1 8a  |osition"  ......|
00001410  38 2c 31 31 29 3b 22 50  20 20 50 6c 61 63 65 20  |8,11);"P  Place |
00001420  50 61 72 63 65 6c 22 0d  08 02 1c f1 8a 38 2c 31  |Parcel"......8,1|
00001430  32 29 3b 22 48 20 20 50  6c 61 63 65 20 48 6f 75  |2);"H  Place Hou|
00001440  73 65 22 0d 08 0c 27 f1  8a 38 2c 31 33 29 3b 22  |se"...'..8,13);"|
00001450  45 20 20 50 6c 61 63 65  20 4d 6f 76 69 6e 67 20  |E  Place Moving |
00001460  50 6c 61 74 66 6f 72 6d  22 20 0d 08 16 17 f1 8a  |Platform" ......|
00001470  38 2c 31 34 29 3b 22 43  20 20 43 6c 65 61 72 22  |8,14);"C  Clear"|
00001480  20 0d 08 20 1c f1 8a 38  2c 31 35 29 3b 22 3c 20  | .. ...8,15);"< |
00001490  20 46 69 6e 69 73 68 20  4c 65 66 74 22 0d 08 2a  | Finish Left"..*|
000014a0  1d f1 8a 38 2c 31 36 29  3b 22 3e 20 20 46 69 6e  |...8,16);">  Fin|
000014b0  69 73 68 20 52 69 67 68  74 22 0d 08 34 2f f1 8a  |ish Right"..4/..|
000014c0  34 2c 31 39 29 3b 22 4f  6e 63 65 20 79 6f 75 20  |4,19);"Once you |
000014d0  68 61 76 65 20 73 65 6c  65 63 74 65 64 20 61 20  |have selected a |
000014e0  63 6f 6d 6d 61 6e 64 22  20 0d 08 3e 2b f1 8a 36  |command" ..>+..6|
000014f0  2c 32 30 29 3b 22 66 6f  6c 6c 6f 77 20 74 68 65  |,20);"follow the|
00001500  20 6f 6e 2d 73 63 72 65  65 6e 20 70 72 6f 6d 70  | on-screen promp|
00001510  74 73 22 20 0d 08 48 22  f1 8a 31 34 2c 32 33 29  |ts" ..H"..14,23)|
00001520  3b 22 50 72 65 73 73 20  61 20 6b 65 79 22 3a 57  |;"Press a key":W|
00001530  3d a5 3a e1 20 20 0d ff                           |=.:.  ..|
00001538