�ThJ

�  Ultima
�  by Terry Blunt
(�  (c) The Micro User
2:
<�1
F	�init
P� �aban
Z�
d�
n
�board
x�
��L N=M:M=(M+1)�2
�	�move
���get(kX?N,kY?N)=80
��end
���
�:
�
��aban
��=17 �� � �
�R=0:W=0
��23;10,32;0;0;0;
��Q% �1,-15,50,10
�1�2,30)"Game abandoned.  Calculating points."
��X=1 �8

�Y=1 �8

A=�get(X,Y):B=(A �40)�4

	��T^J

"�I%=0 �B

,� C

6�

@�A<40 R=R+C �W=W+C

J�,

T(�R>W kX?1=0:kY?1=0 ��R<W ?kX=0:?kY=0

^�end

h�

r:

|
��init

�X%=176:Y%=944

�kX=R%+100:kY=R%+104

��23;10,32;0;0;0;

��19,1,4;0;19,2,1;0;

�
�130:�

��

�:

���board

�
�clear

��Y=6 �29 �3

��X=8 �31 �3

��28,X,Y,X+2,Y-2

��129-(X+Y)�2:�
�,
�26:�130:�3
�I%=3 �24 �3
&O�7,I%+2);9-I% �3 �32,I%+2);9-I% �3 �I%+6,3)�(I% �3+64)�I%+6,28)�(I% �3+64)
0�
:�X=0 �9
D�Y=0 �9
N�put(X,Y,80)
X�,
b�X=1 �8
lA=X?&9CF:B=X?&9D7
v4�put(X,1,A):�put(X,2,4):�put(X,7,44):�put(X,8,B)
�K�print(�,A,0,X,1):�print(�,4,0,X,2):�print(�,4,1,X,7):�print(�,B,1,X,8)
��
�9�1,14)"Move" �4,30)"'ESCAPE' to abandon a stalemate"
��beep(200)
�+kX?0=5:kX?1=4:kY?0=1:kY?1=8:L=�:M=1:N=0
��
�:
�
��move
�1�M=0 �15,1)" Red move " ��15,1)"White move"
�L=�
�
�in(0)
�V=X:W=Y
�
�in(2)
�1,12)"Last"
�get(X,Y)<80 L=�
� L �no:�
 C=�get(V,W)
*B=C �40
4D=�get(X,Y)
>�I%=0 �7
HE=I%?&9C0-1:F=I%?&9C8-1
R'�(X-V)<>�(Y-W) �X-V<>0 �Y-W<>0 L=�
\�get(V+E,W+F)=16+N*40 L=�
f$�B=16 ��get(V+E,W+F)=20+N*40 L=�
p�
z�C �40<>M L=�
�� L �no:�
��B<>8 �B<>20 �B<>24 �line
�� L �no:�
��B=4 �roll
��B=28 �coord
��B=8 �leap
��B=20 �amaeb
��B=12 �with
��B=24 �king
�� L �no:�
��beep(200)
��put(V,W,80):�put(X,Y,C)
�'�print(�,C,M,V,W):�print(�,C,M,X,Y)
�
:

��line
$E=�(X-V):F=�(Y-W):G=V:H=W
.�
8G=G+E:H=H+F
B�get(G,H)<80 L=�
L
�G=X �H=Y
V�
`:
j��in(B)
t�23;10,64;0;0;0;
~X=0:Y=0
��I%=1 �4 �3
��31,I%,16+B
��
�K=�
��(K>48 �K<57) �(K>64 �K<73)
��I%=1 �B=0 �clear
�(�K<57 �Y=0 Y=57-K ��K>64 �X=0 X=K-64
��31,I%,16+B,K
��
��X<1 �X>8 �Y<1 �Y>8 L=�
��23;10,32;0;0;0;
��
:


��roll
�(V-X)=�(W-Y) L=� ��rolla
�
(:
2��rolla
<�I%=0 �3
FE=I%?&9C0-1:F=I%?&9C8-1
PJ�B=20 ��get(X+E,Y+F)<>4+N*40 �X+E*2<0 �X+E*2>9 �Y+F*2<0 �Y+F*2>9 �DdE
Zb�get(X+E,Y+F)�40=N ��get(X+E*2,Y+F*2)�40=M �print(�,�get(X+E,Y+F),N,X+E,Y+F):�put(X+E,Y+F,80)
d�
n�
x:
�
��leap
�E=�(X-V):F=�(Y-W)
�G=V:H=W
��
�G=G+E:H=H+F
��G=X �H=Y ��get(G,H)<80
��get(G,H)�40=M L=�:�TbF
��G=X �H=Y �TbF
�g=G:h=H
��
��get(G,H)�40<>N L=�
�G=G+E:H=H+F
��get(G,H)<80 L=�
G=G+E:H=H+F
�G=X+E �H=Y+F �L=�
�L �step
"�
,:
6��leapa
@E=�(X-V):F=�(Y-W)
JG=V+E:H=W+F
T�get(G,H)=8+N*40 �tZF
^�
h(�get(G,H)<80 ��get(G,H)<>8+N*40 L=�
rG=G+E:H=H+F
|�G=X �H=Y �L=�
�
� L �
�G=X-E:H=Y-F
�.�print(�,�get(G,H),N,G,H):�put(X-E,Y-F,80)
��
�:
�
��step
��
�8�get(g,h)<80 �print(�,�get(g,h),N,g,h):�put(g,h,80)
�g=g+E:h=h+F
�
�g=X �h=Y
��
�:
�
��with
E=V+�(V-X):F=W+�(W-Y)
:�get(E,F)�40=N �print(�,�get(E,F),N,E,F):�put(E,F,80)
�
&:
0��coord
:!E=�get(X,kY?M):F=�get(kX?M,Y)
D1�E �40=N �print(�,E,N,X,kY?M):�put(X,kY?M,80)
N1�F �40=N �print(�,F,N,kX?M,Y):�put(kX?M,Y,80)
X�
b:
l��amaeb
v!�D=24+N*40 �king:� ��D<80 L=�
�?�get(X,Y)=80 ��get(�(V-X)+X,�(W-Y)+Y)=8+N*40 �leapa ��line
�
� L �
�*�get(�(V-X)+V,�(W-Y)+W)=12+N*40 �with
�
�rolla
�!E=�get(X,kY?M):F=�get(kX?M,Y)
�3�E=28+N*40 �print(�,E,N,X,kY?M):�put(X,kY?M,80)
�3�F=28+N*40 �print(�,F,N,kX?M,Y):�put(kX?M,Y,80)
��
�:
�
��king
��C �40=D �40 L=�
�/�(X-V)=0 ��(Y-W)=0 ��(X-V)>1 ��(Y-W)>1 L=�
�
� L �
�D<80 �print(�,D,N,X,Y)
E�D=24+N*40 kX?N=0:kY?N=0:�put(X,Y,80) ��put(X,Y,80):kX?M=X:kY?M=Y
�
 :
*��no
4�Q% �1,-15,50,10
>$�9,30)"You can't move there !";
H�
R:
\��print(T,C,M,X,Y)
fI%=&9F0+(C �40)*4
pG=(Y �2)�(X �2)
z�G A=2+M �A=3-M
�C=C �40+220:X=X*96:Y=Y*96
��3,A
�� X+X%,Y%-Y+32
�&�5,C,C+1,10,8,8,C+2,C+3,4,31,10,30
�
� T �
��M=0 �"White "; ��" Red ";
��"takes " $I% �7;
��beep(100):�wait(100)
��
�:
�	��end
��11,1);
�l�get(kX?1,kY?1)=80 �" *** RED  WIN ***" ��get(?kX,?kY)=80 �"*** WHITE  WIN ***" ��"*** GAME DRAWN ***"
	�I%=0 �4
	�wait(30):�beep(180)
	�
	$+�2,30)�6 "Press any key to restart" �6
	.� �
	8�
	B:
	L��put(X,Y,Z)
	VR%?(X+Y*10)=Z
	`�
	j:
	tݤget(X,Y)
	~=R%?(X+Y*10)
	�:
	�
��beep(P)
	��Q% � 1,1,P,1
	��
	�:
	�
��wait(T)
	��=0
	�	�:�0
	���>T
	��
	�:
	���clear
2�2,1)�36 �1,12)�4 �1,16)�4 �1,18)�4 �2,30)�36

�
:
� 0,16,72,108,271,158,0,335
(�:
2�7:�23;8202;0;0;0;:��DjN
<
�title(3)
F"�1,7)�145 �183 �33,�163) �235
P
�I%=8 �10
Z'�1,I%)�145 �181 �149 �31 �145 �234
d�
n#�1,11)�145 �245 �33,�240) �250
x'�6,8)"T H E   B O A R D   G A M E"
�*�5,10)"F O R   T W O   P L A Y E R S"
��I%=13 �14
�*�7,I%)�141 �134"W R I T T E N"�5"B Y"
��
��title(16)
��23,224,48,28,6,3,1,1,3,15
�#�23,225,0,0,1,3,130,134,204,248
�#�23,226,31,51,97,65,192,128,0,0
�(�23,227,240,192,128,128,192,96,56,12
��23,228,0,14,123,97,3,3,3,7
�(�23,229,30,54,96,192,192,192,128,128
� �23,230,12,12,6,3,6,12,24,28
�&�23,231,192,96,48,24,48,96,192,224
#�23,232,128,64,96,48,16,24,8,24
�23,233,0,0,0,4,14,31,30,48
'�23,234,48,48,96,227,239,127,127,20
"'�23,235,48,24,28,142,231,254,252,40
,(�23,236,56,124,254,63,121,249,63,127
6)�23,237,28,62,127,252,158,159,252,254
@)�23,238,255,60,56,113,251,255,204,204
J'�23,239,255,60,28,140,223,255,51,51
T�23,240,0,3,7,15,7,7,7,15
^(�23,241,0,156,254,254,252,252,220,14
h!�23,242,30,62,62,63,31,15,7,3
r'�23,243,14,63,127,254,224,192,128,0
|#�23,244,1,99,55,31,29,57,255,63
�+�23,245,128,198,236,248,184,156,255,252
� �23,246,63,25,28,15,7,2,6,12
�'�23,247,252,152,48,240,224,64,96,48
�"�23,248,3,15,31,51,51,63,63,31
�+�23,249,192,240,248,204,204,252,252,248
�!�23,250,60,108,79,71,6,6,6,14
�&�23,251,60,54,242,226,96,96,96,112
�&� 1,1,0,0,0,1,0,0,126,0,0,-1,126,0
��:
�	��D~N
��I%=&A00 �&A60 �16
�	� $I%
��
!R%=I%:Q%=�:A$="Press any key"
�I%=&9C0 �&9DF
	� ?I%
&�
0L�wait(100):�7,21)�134 "DO YOU WANT SOUND CUES ?"�13,23)�134"( Y / N )";
:Q%=�key
D5�wait(100):�7,21)�133 "DO YOU WANT DIRECTIONS ?"
N笤key �DHM
X�:
b�28,0,24,39,7,12
l
�I%=0 �16
v	�130
��
��28,1,24,38,7,12
���4 "The object of this game is to takeyour opponents king. There is no Checkunlike chess."''�5 "With the exception of the Rollersand the King,  movement of the  piecesis in the style of a chess Queen."
���'�3 "The Rollers move only verticaly andhorizontaly, taking pieces by trappingthem against any other piece belongingto the same player as the Roller."''�4 "The King moves and takes pieces asa chess King does."
�	�hold
���3 "The Leapers can step over pieces totake them  and must  have a clear pathto the piece being taken. However theycan take a line of pieces provided onegap only exists between each of them."
���'�3 "The Withdrawer has to move directlyaway from a piece to take it."''�4 "When the Co-ordinator is moved anyof your opponents pieces placed on thecolumn _ row intersections of the Kingand Co-ordinator are taken."
�	�hold
ж�'�5 "Amoebas  change their behavior tomatch the piece they are dealing with.They roll Rollers, leap Leapers etc."''�5 "The Immobiliser is the only pieceunable to take  others.";
ڴ�"  Any opponentspiece that comes into  contact with itis held  until the immobilser is movedor taken." �3,12)�131 "'ESCAPE'" �130 " if you want to read thisinformation again."
�	�hold
�� �DHM
�%�4:�23;8202;0;0;0;19,0,4;0;:��tpN

)�7,3)"THE ULTIMA PIECES" �22)"value"

�I%=8 �32 �4

� B$

 
A%=I%+216

*K�5,I%*0.75)�A% �(A%+1)�5,I%*0.75+1)�(A%+2)�(A%+3)�9)$(&9E0+I%*4)�27)B$

4�

>�wait(100):�12,29)A$:�

H!(�+4)=&F4:��ThJ

RI%=2+!&1C �&FFFF

\
�:I%=I%-1

f� I%?-1=13

p�>&E00 �down

z?I%=&FF:!&12=I%+1:�

�:

���down:*TAPE

�'�beep(200):�11�14"PLEASE WAIT"�80;

�!�J%=0 �I%-� �4:J%!&E00=J%!�:�

�I%=I%+&E00-�:�=&E00

��

�:

���title(N%)

��$&C00:�0,N%);

��I%=0 �223 �2

�!�("&"+�(I%?&C00)+�(I%?&C01))

��

��
:
 ��hold:�wait(100):�beep(200)
�12,16)�131 A$:��
$�
.:
8ݤkey:�beep(200)
B�:G%=� �95
L�G%=78 �G%=89
V
=G%=89
`:
j�� 939A20FF20B5202020FF2020202020A3FFA1202020EBB720202020FDB8B5202020FEA3B40D0A939A20FF20B5202020FF202020202020FF20202020EAB520202020FF20B5202020FFACB50D0A939A20EFF0A5202020FFF0B020202020FF20202020FAF520202020FF20B5202020FF20B5
t�� 929A20A3FFA1FFA3A1FFA3B4FFA3B4FF20B5202020FFA3B4FF2020FF20B5FFB0B5A3FFA10D0A929A2020FF20FFAC20FFACB1FFACB1A2ACB5202020FFACB1FF2020FF20B5FFEDB520FF200D0A929A2020FF20FFF0B0FF20B5FF20B5E0F0A5202020FFF0A5FFF0B0EFF0A5FFA2B520FF20
~C� Roller,Leaper,Withdrawer,Immobiliser,Amoeba,King,Co-ordinator
�� 2,1,0,1,2,0,0,2
�� 1,2,1,0,2,2,0,0
�� 28,8,20,12,24,20,8,16
�� 68,48,60,64,52,60,48,56
�� 16,72,108,271,158,+++,335
�

00000000  0d 00 0a 09 e5 8d 54 68  4a 0d 00 14 0d f4 20 20  |......ThJ.....  |
00000010  55 6c 74 69 6d 61 0d 00  1e 15 f4 20 20 62 79 20  |Ultima.....  by |
00000020  54 65 72 72 79 20 42 6c  75 6e 74 0d 00 28 19 f4  |Terry Blunt..(..|
00000030  20 20 28 63 29 20 54 68  65 20 4d 69 63 72 6f 20  |  (c) The Micro |
00000040  55 73 65 72 0d 00 32 05  3a 0d 00 3c 06 eb 31 0d  |User..2.:..<..1.|
00000050  00 46 09 f2 69 6e 69 74  0d 00 50 0c ee 85 20 f2  |.F..init..P... .|
00000060  61 62 61 6e 0d 00 5a 05  f5 0d 00 64 05 f5 0d 00  |aban..Z....d....|
00000070  6e 0a f2 62 6f 61 72 64  0d 00 78 05 f5 0d 00 82  |n..board..x.....|
00000080  14 e7 4c 20 4e 3d 4d 3a  4d 3d 28 4d 2b 31 29 83  |..L N=M:M=(M+1).|
00000090  32 0d 00 8c 09 f2 6d 6f  76 65 0d 00 96 17 fd a4  |2.....move......|
000000a0  67 65 74 28 6b 58 3f 4e  2c 6b 59 3f 4e 29 3d 38  |get(kX?N,kY?N)=8|
000000b0  30 0d 00 a0 08 f2 65 6e  64 0d 00 aa 06 fd a3 0d  |0.....end.......|
000000c0  00 b4 05 3a 0d 00 be 0a  dd f2 61 62 61 6e 0d 00  |...:......aban..|
000000d0  c8 10 e7 9f 3d 31 37 20  80 a6 20 b9 20 e0 0d 00  |....=17 .. . ...|
000000e0  d2 0b 52 3d 30 3a 57 3d  30 0d 00 dc 14 ef 32 33  |..R=0:W=0.....23|
000000f0  3b 31 30 2c 33 32 3b 30  3b 30 3b 30 3b 0d 00 e6  |;10,32;0;0;0;...|
00000100  14 e7 51 25 20 d4 31 2c  2d 31 35 2c 35 30 2c 31  |..Q% .1,-15,50,1|
00000110  30 0d 00 f0 31 f1 8a 32  2c 33 30 29 22 47 61 6d  |0...1..2,30)"Gam|
00000120  65 20 61 62 61 6e 64 6f  6e 65 64 2e 20 20 43 61  |e abandoned.  Ca|
00000130  6c 63 75 6c 61 74 69 6e  67 20 70 6f 69 6e 74 73  |lculating points|
00000140  2e 22 0d 00 fa 0b e3 58  3d 31 20 b8 38 0d 01 04  |.".....X=1 .8...|
00000150  0b e3 59 3d 31 20 b8 38  0d 01 0e 1b 41 3d a4 67  |..Y=1 .8....A=.g|
00000160  65 74 28 58 2c 59 29 3a  42 3d 28 41 20 83 34 30  |et(X,Y):B=(A .40|
00000170  29 81 34 0d 01 18 09 f7  8d 54 5e 4a 0d 01 22 0c  |).4......T^J..".|
00000180  e3 49 25 3d 30 20 b8 42  0d 01 2c 07 f3 20 43 0d  |.I%=0 .B..,.. C.|
00000190  01 36 05 ed 0d 01 40 16  e7 41 3c 34 30 20 52 3d  |.6....@..A<40 R=|
000001a0  52 2b 43 20 8b 57 3d 57  2b 43 0d 01 4a 06 ed 2c  |R+C .W=W+C..J..,|
000001b0  0d 01 54 28 e7 52 3e 57  20 6b 58 3f 31 3d 30 3a  |..T(.R>W kX?1=0:|
000001c0  6b 59 3f 31 3d 30 20 8b  e7 52 3c 57 20 3f 6b 58  |kY?1=0 ..R<W ?kX|
000001d0  3d 30 3a 3f 6b 59 3d 30  0d 01 5e 08 f2 65 6e 64  |=0:?kY=0..^..end|
000001e0  0d 01 68 05 e1 0d 01 72  05 3a 0d 01 7c 0a dd f2  |..h....r.:..|...|
000001f0  69 6e 69 74 0d 01 86 11  58 25 3d 31 37 36 3a 59  |init....X%=176:Y|
00000200  25 3d 39 34 34 0d 01 90  17 6b 58 3d 52 25 2b 31  |%=944....kX=R%+1|
00000210  30 30 3a 6b 59 3d 52 25  2b 31 30 34 0d 01 9a 14  |00:kY=R%+104....|
00000220  ef 32 33 3b 31 30 2c 33  32 3b 30 3b 30 3b 30 3b  |.23;10,32;0;0;0;|
00000230  0d 01 a4 17 ef 31 39 2c  31 2c 34 3b 30 3b 31 39  |.....19,1,4;0;19|
00000240  2c 32 2c 31 3b 30 3b 0d  01 ae 0a fb 31 33 30 3a  |,2,1;0;.....130:|
00000250  db 0d 01 b8 05 e1 0d 01  c2 05 3a 0d 01 cc 0b dd  |..........:.....|
00000260  f2 62 6f 61 72 64 0d 01  d6 0a f2 63 6c 65 61 72  |.board.....clear|
00000270  0d 01 e0 0f e3 59 3d 36  20 b8 32 39 20 88 33 0d  |.....Y=6 .29 .3.|
00000280  01 ea 0f e3 58 3d 38 20  b8 33 31 20 88 33 0d 01  |....X=8 .31 .3..|
00000290  f4 13 ef 32 38 2c 58 2c  59 2c 58 2b 32 2c 59 2d  |...28,X,Y,X+2,Y-|
000002a0  32 0d 01 fe 12 fb 31 32  39 2d 28 58 2b 59 29 83  |2.....129-(X+Y).|
000002b0  32 3a db 0d 02 08 06 ed  2c 0d 02 12 0f ef 32 36  |2:......,.....26|
000002c0  3a fb 31 33 30 3a fb 33  0d 02 1c 10 e3 49 25 3d  |:.130:.3.....I%=|
000002d0  33 20 b8 32 34 20 88 33  0d 02 26 4f f1 8a 37 2c  |3 .24 .3..&O..7,|
000002e0  49 25 2b 32 29 3b 39 2d  49 25 20 81 33 20 8a 33  |I%+2);9-I% .3 .3|
000002f0  32 2c 49 25 2b 32 29 3b  39 2d 49 25 20 81 33 20  |2,I%+2);9-I% .3 |
00000300  8a 49 25 2b 36 2c 33 29  bd 28 49 25 20 81 33 2b  |.I%+6,3).(I% .3+|
00000310  36 34 29 8a 49 25 2b 36  2c 32 38 29 bd 28 49 25  |64).I%+6,28).(I%|
00000320  20 81 33 2b 36 34 29 0d  02 30 05 ed 0d 02 3a 0b  | .3+64)..0....:.|
00000330  e3 58 3d 30 20 b8 39 0d  02 44 0b e3 59 3d 30 20  |.X=0 .9..D..Y=0 |
00000340  b8 39 0d 02 4e 10 f2 70  75 74 28 58 2c 59 2c 38  |.9..N..put(X,Y,8|
00000350  30 29 0d 02 58 06 ed 2c  0d 02 62 0b e3 58 3d 31  |0)..X..,..b..X=1|
00000360  20 b8 38 0d 02 6c 15 41  3d 58 3f 26 39 43 46 3a  | .8..l.A=X?&9CF:|
00000370  42 3d 58 3f 26 39 44 37  0d 02 76 34 f2 70 75 74  |B=X?&9D7..v4.put|
00000380  28 58 2c 31 2c 41 29 3a  f2 70 75 74 28 58 2c 32  |(X,1,A):.put(X,2|
00000390  2c 34 29 3a f2 70 75 74  28 58 2c 37 2c 34 34 29  |,4):.put(X,7,44)|
000003a0  3a f2 70 75 74 28 58 2c  38 2c 42 29 0d 02 80 4b  |:.put(X,8,B)...K|
000003b0  f2 70 72 69 6e 74 28 a3  2c 41 2c 30 2c 58 2c 31  |.print(.,A,0,X,1|
000003c0  29 3a f2 70 72 69 6e 74  28 a3 2c 34 2c 30 2c 58  |):.print(.,4,0,X|
000003d0  2c 32 29 3a f2 70 72 69  6e 74 28 a3 2c 34 2c 31  |,2):.print(.,4,1|
000003e0  2c 58 2c 37 29 3a f2 70  72 69 6e 74 28 a3 2c 42  |,X,7):.print(.,B|
000003f0  2c 31 2c 58 2c 38 29 0d  02 8a 05 ed 0d 02 94 39  |,1,X,8)........9|
00000400  f1 8a 31 2c 31 34 29 22  4d 6f 76 65 22 20 8a 34  |..1,14)"Move" .4|
00000410  2c 33 30 29 22 27 45 53  43 41 50 45 27 20 74 6f  |,30)"'ESCAPE' to|
00000420  20 61 62 61 6e 64 6f 6e  20 61 20 73 74 61 6c 65  | abandon a stale|
00000430  6d 61 74 65 22 0d 02 9e  0e f2 62 65 65 70 28 32  |mate".....beep(2|
00000440  30 30 29 0d 02 a8 2b 6b  58 3f 30 3d 35 3a 6b 58  |00)...+kX?0=5:kX|
00000450  3f 31 3d 34 3a 6b 59 3f  30 3d 31 3a 6b 59 3f 31  |?1=4:kY?0=1:kY?1|
00000460  3d 38 3a 4c 3d a3 3a 4d  3d 31 3a 4e 3d 30 0d 02  |=8:L=.:M=1:N=0..|
00000470  b2 05 e1 0d 02 bc 05 3a  0d 02 c6 0a dd f2 6d 6f  |.......:......mo|
00000480  76 65 0d 02 d0 31 e7 4d  3d 30 20 f1 8a 31 35 2c  |ve...1.M=0 ..15,|
00000490  31 29 22 20 52 65 64 20  6d 6f 76 65 20 22 20 8b  |1)" Red move " .|
000004a0  f1 8a 31 35 2c 31 29 22  57 68 69 74 65 20 6d 6f  |..15,1)"White mo|
000004b0  76 65 22 0d 02 da 07 4c  3d b9 0d 02 e4 0a f2 69  |ve"....L=......i|
000004c0  6e 28 30 29 0d 02 ee 0b  56 3d 58 3a 57 3d 59 0d  |n(0)....V=X:W=Y.|
000004d0  02 f8 0a f2 69 6e 28 32  29 0d 03 02 11 f1 8a 31  |....in(2)......1|
000004e0  2c 31 32 29 22 4c 61 73  74 22 0d 03 0c 15 e7 a4  |,12)"Last"......|
000004f0  67 65 74 28 58 2c 59 29  3c 38 30 20 4c 3d a3 0d  |get(X,Y)<80 L=..|
00000500  03 16 0e e7 ac 20 4c 20  f2 6e 6f 3a e1 0d 03 20  |..... L .no:... |
00000510  0f 43 3d a4 67 65 74 28  56 2c 57 29 0d 03 2a 0b  |.C=.get(V,W)..*.|
00000520  42 3d 43 20 83 34 30 0d  03 34 0f 44 3d a4 67 65  |B=C .40..4.D=.ge|
00000530  74 28 58 2c 59 29 0d 03  3e 0c e3 49 25 3d 30 20  |t(X,Y)..>..I%=0 |
00000540  b8 37 0d 03 48 1b 45 3d  49 25 3f 26 39 43 30 2d  |.7..H.E=I%?&9C0-|
00000550  31 3a 46 3d 49 25 3f 26  39 43 38 2d 31 0d 03 52  |1:F=I%?&9C8-1..R|
00000560  27 e7 94 28 58 2d 56 29  3c 3e 94 28 59 2d 57 29  |'..(X-V)<>.(Y-W)|
00000570  20 80 58 2d 56 3c 3e 30  20 80 59 2d 57 3c 3e 30  | .X-V<>0 .Y-W<>0|
00000580  20 4c 3d a3 0d 03 5c 1e  e7 a4 67 65 74 28 56 2b  | L=...\...get(V+|
00000590  45 2c 57 2b 46 29 3d 31  36 2b 4e 2a 34 30 20 4c  |E,W+F)=16+N*40 L|
000005a0  3d a3 0d 03 66 24 e7 42  3d 31 36 20 80 a4 67 65  |=...f$.B=16 ..ge|
000005b0  74 28 56 2b 45 2c 57 2b  46 29 3d 32 30 2b 4e 2a  |t(V+E,W+F)=20+N*|
000005c0  34 30 20 4c 3d a3 0d 03  70 05 ed 0d 03 7a 11 e7  |40 L=...p....z..|
000005d0  43 20 81 34 30 3c 3e 4d  20 4c 3d a3 0d 03 84 0e  |C .40<>M L=.....|
000005e0  e7 ac 20 4c 20 f2 6e 6f  3a e1 0d 03 8e 1d e7 42  |.. L .no:......B|
000005f0  3c 3e 38 20 80 42 3c 3e  32 30 20 80 42 3c 3e 32  |<>8 .B<>20 .B<>2|
00000600  34 20 f2 6c 69 6e 65 0d  03 98 0e e7 ac 20 4c 20  |4 .line...... L |
00000610  f2 6e 6f 3a e1 0d 03 a2  0e e7 42 3d 34 20 f2 72  |.no:......B=4 .r|
00000620  6f 6c 6c 0d 03 ac 10 e7  42 3d 32 38 20 f2 63 6f  |oll.....B=28 .co|
00000630  6f 72 64 0d 03 b6 0e e7  42 3d 38 20 f2 6c 65 61  |ord.....B=8 .lea|
00000640  70 0d 03 c0 10 e7 42 3d  32 30 20 f2 61 6d 61 65  |p.....B=20 .amae|
00000650  62 0d 03 ca 0f e7 42 3d  31 32 20 f2 77 69 74 68  |b.....B=12 .with|
00000660  0d 03 d4 0f e7 42 3d 32  34 20 f2 6b 69 6e 67 0d  |.....B=24 .king.|
00000670  03 de 0e e7 ac 20 4c 20  f2 6e 6f 3a e1 0d 03 e8  |..... L .no:....|
00000680  0e f2 62 65 65 70 28 32  30 30 29 0d 03 f2 1c f2  |..beep(200).....|
00000690  70 75 74 28 56 2c 57 2c  38 30 29 3a f2 70 75 74  |put(V,W,80):.put|
000006a0  28 58 2c 59 2c 43 29 0d  03 fc 27 f2 70 72 69 6e  |(X,Y,C)...'.prin|
000006b0  74 28 a3 2c 43 2c 4d 2c  56 2c 57 29 3a f2 70 72  |t(.,C,M,V,W):.pr|
000006c0  69 6e 74 28 a3 2c 43 2c  4d 2c 58 2c 59 29 0d 04  |int(.,C,M,X,Y)..|
000006d0  06 05 e1 0d 04 10 05 3a  0d 04 1a 0a dd f2 6c 69  |.......:......li|
000006e0  6e 65 0d 04 24 1d 45 3d  b4 28 58 2d 56 29 3a 46  |ne..$.E=.(X-V):F|
000006f0  3d b4 28 59 2d 57 29 3a  47 3d 56 3a 48 3d 57 0d  |=.(Y-W):G=V:H=W.|
00000700  04 2e 05 f5 0d 04 38 0f  47 3d 47 2b 45 3a 48 3d  |......8.G=G+E:H=|
00000710  48 2b 46 0d 04 42 15 e7  a4 67 65 74 28 47 2c 48  |H+F..B...get(G,H|
00000720  29 3c 38 30 20 4c 3d a3  0d 04 4c 0d fd 47 3d 58  |)<80 L=...L..G=X|
00000730  20 80 48 3d 59 0d 04 56  05 e1 0d 04 60 05 3a 0d  | .H=Y..V....`.:.|
00000740  04 6a 0b dd f2 69 6e 28  42 29 0d 04 74 14 ef 32  |.j...in(B)..t..2|
00000750  33 3b 31 30 2c 36 34 3b  30 3b 30 3b 30 3b 0d 04  |3;10,64;0;0;0;..|
00000760  7e 0b 58 3d 30 3a 59 3d  30 0d 04 88 0f e3 49 25  |~.X=0:Y=0.....I%|
00000770  3d 31 20 b8 34 20 88 33  0d 04 92 0f ef 33 31 2c  |=1 .4 .3.....31,|
00000780  49 25 2c 31 36 2b 42 0d  04 9c 05 f5 0d 04 a6 07  |I%,16+B.........|
00000790  4b 3d a5 0d 04 b0 1f fd  28 4b 3e 34 38 20 80 4b  |K=......(K>48 .K|
000007a0  3c 35 37 29 20 84 28 4b  3e 36 34 20 80 4b 3c 37  |<57) .(K>64 .K<7|
000007b0  33 29 0d 04 ba 15 e7 49  25 3d 31 20 80 42 3d 30  |3).....I%=1 .B=0|
000007c0  20 f2 63 6c 65 61 72 0d  04 c4 28 e7 4b 3c 35 37  | .clear...(.K<57|
000007d0  20 80 59 3d 30 20 59 3d  35 37 2d 4b 20 8b e7 4b  | .Y=0 Y=57-K ..K|
000007e0  3e 36 34 20 80 58 3d 30  20 58 3d 4b 2d 36 34 0d  |>64 .X=0 X=K-64.|
000007f0  04 ce 11 ef 33 31 2c 49  25 2c 31 36 2b 42 2c 4b  |....31,I%,16+B,K|
00000800  0d 04 d8 05 ed 0d 04 e2  1b e7 58 3c 31 20 84 58  |..........X<1 .X|
00000810  3e 38 20 84 59 3c 31 20  84 59 3e 38 20 4c 3d a3  |>8 .Y<1 .Y>8 L=.|
00000820  0d 04 ec 14 ef 32 33 3b  31 30 2c 33 32 3b 30 3b  |.....23;10,32;0;|
00000830  30 3b 30 3b 0d 04 f6 05  e1 0d 05 00 05 3a 0d 05  |0;0;.........:..|
00000840  0a 0a dd f2 72 6f 6c 6c  0d 05 14 1e e7 94 28 56  |....roll......(V|
00000850  2d 58 29 3d 94 28 57 2d  59 29 20 4c 3d a3 20 8b  |-X)=.(W-Y) L=. .|
00000860  f2 72 6f 6c 6c 61 0d 05  1e 05 e1 0d 05 28 05 3a  |.rolla.......(.:|
00000870  0d 05 32 0b dd f2 72 6f  6c 6c 61 0d 05 3c 0c e3  |..2...rolla..<..|
00000880  49 25 3d 30 20 b8 33 0d  05 46 1b 45 3d 49 25 3f  |I%=0 .3..F.E=I%?|
00000890  26 39 43 30 2d 31 3a 46  3d 49 25 3f 26 39 43 38  |&9C0-1:F=I%?&9C8|
000008a0  2d 31 0d 05 50 4a e7 42  3d 32 30 20 80 a4 67 65  |-1..PJ.B=20 ..ge|
000008b0  74 28 58 2b 45 2c 59 2b  46 29 3c 3e 34 2b 4e 2a  |t(X+E,Y+F)<>4+N*|
000008c0  34 30 20 84 58 2b 45 2a  32 3c 30 20 84 58 2b 45  |40 .X+E*2<0 .X+E|
000008d0  2a 32 3e 39 20 84 59 2b  46 2a 32 3c 30 20 84 59  |*2>9 .Y+F*2<0 .Y|
000008e0  2b 46 2a 32 3e 39 20 e5  8d 44 64 45 0d 05 5a 62  |+F*2>9 ..DdE..Zb|
000008f0  e7 a4 67 65 74 28 58 2b  45 2c 59 2b 46 29 81 34  |..get(X+E,Y+F).4|
00000900  30 3d 4e 20 80 a4 67 65  74 28 58 2b 45 2a 32 2c  |0=N ..get(X+E*2,|
00000910  59 2b 46 2a 32 29 81 34  30 3d 4d 20 f2 70 72 69  |Y+F*2).40=M .pri|
00000920  6e 74 28 b9 2c a4 67 65  74 28 58 2b 45 2c 59 2b  |nt(.,.get(X+E,Y+|
00000930  46 29 2c 4e 2c 58 2b 45  2c 59 2b 46 29 3a f2 70  |F),N,X+E,Y+F):.p|
00000940  75 74 28 58 2b 45 2c 59  2b 46 2c 38 30 29 0d 05  |ut(X+E,Y+F,80)..|
00000950  64 05 ed 0d 05 6e 05 e1  0d 05 78 05 3a 0d 05 82  |d....n....x.:...|
00000960  0a dd f2 6c 65 61 70 0d  05 8c 15 45 3d b4 28 58  |...leap....E=.(X|
00000970  2d 56 29 3a 46 3d b4 28  59 2d 57 29 0d 05 96 0b  |-V):F=.(Y-W)....|
00000980  47 3d 56 3a 48 3d 57 0d  05 a0 05 f5 0d 05 aa 0f  |G=V:H=W.........|
00000990  47 3d 47 2b 45 3a 48 3d  48 2b 46 0d 05 b4 1b fd  |G=G+E:H=H+F.....|
000009a0  47 3d 58 20 80 48 3d 59  20 84 a4 67 65 74 28 47  |G=X .H=Y ..get(G|
000009b0  2c 48 29 3c 38 30 0d 05  be 1d e7 a4 67 65 74 28  |,H)<80......get(|
000009c0  47 2c 48 29 81 34 30 3d  4d 20 4c 3d a3 3a e5 8d  |G,H).40=M L=.:..|
000009d0  54 62 46 0d 05 c8 13 e7  47 3d 58 20 80 48 3d 59  |TbF.....G=X .H=Y|
000009e0  20 e5 8d 54 62 46 0d 05  d2 0b 67 3d 47 3a 68 3d  | ..TbF....g=G:h=|
000009f0  48 0d 05 dc 05 f5 0d 05  e6 18 e7 a4 67 65 74 28  |H...........get(|
00000a00  47 2c 48 29 81 34 30 3c  3e 4e 20 4c 3d a3 0d 05  |G,H).40<>N L=...|
00000a10  f0 0f 47 3d 47 2b 45 3a  48 3d 48 2b 46 0d 05 fa  |..G=G+E:H=H+F...|
00000a20  15 e7 a4 67 65 74 28 47  2c 48 29 3c 38 30 20 4c  |...get(G,H)<80 L|
00000a30  3d a3 0d 06 04 0f 47 3d  47 2b 45 3a 48 3d 48 2b  |=.....G=G+E:H=H+|
00000a40  46 0d 06 0e 16 fd 47 3d  58 2b 45 20 80 48 3d 59  |F.....G=X+E .H=Y|
00000a50  2b 46 20 84 4c 3d a3 0d  06 18 0c e7 4c 20 f2 73  |+F .L=......L .s|
00000a60  74 65 70 0d 06 22 05 e1  0d 06 2c 05 3a 0d 06 36  |tep.."....,.:..6|
00000a70  0b dd f2 6c 65 61 70 61  0d 06 40 15 45 3d b4 28  |...leapa..@.E=.(|
00000a80  58 2d 56 29 3a 46 3d b4  28 59 2d 57 29 0d 06 4a  |X-V):F=.(Y-W)..J|
00000a90  0f 47 3d 56 2b 45 3a 48  3d 57 2b 46 0d 06 54 1b  |.G=V+E:H=W+F..T.|
00000aa0  e7 a4 67 65 74 28 47 2c  48 29 3d 38 2b 4e 2a 34  |..get(G,H)=8+N*4|
00000ab0  30 20 e5 8d 74 5a 46 0d  06 5e 05 f5 0d 06 68 28  |0 ..tZF..^....h(|
00000ac0  e7 a4 67 65 74 28 47 2c  48 29 3c 38 30 20 80 a4  |..get(G,H)<80 ..|
00000ad0  67 65 74 28 47 2c 48 29  3c 3e 38 2b 4e 2a 34 30  |get(G,H)<>8+N*40|
00000ae0  20 4c 3d a3 0d 06 72 0f  47 3d 47 2b 45 3a 48 3d  | L=...r.G=G+E:H=|
00000af0  48 2b 46 0d 06 7c 12 fd  47 3d 58 20 80 48 3d 59  |H+F..|..G=X .H=Y|
00000b00  20 84 4c 3d a3 0d 06 86  0a e7 ac 20 4c 20 e1 0d  | .L=....... L ..|
00000b10  06 90 0f 47 3d 58 2d 45  3a 48 3d 59 2d 46 0d 06  |...G=X-E:H=Y-F..|
00000b20  9a 2e f2 70 72 69 6e 74  28 b9 2c a4 67 65 74 28  |...print(.,.get(|
00000b30  47 2c 48 29 2c 4e 2c 47  2c 48 29 3a f2 70 75 74  |G,H),N,G,H):.put|
00000b40  28 58 2d 45 2c 59 2d 46  2c 38 30 29 0d 06 a4 05  |(X-E,Y-F,80)....|
00000b50  e1 0d 06 ae 05 3a 0d 06  b8 0a dd f2 73 74 65 70  |.....:......step|
00000b60  0d 06 c2 05 f5 0d 06 cc  38 e7 a4 67 65 74 28 67  |........8..get(g|
00000b70  2c 68 29 3c 38 30 20 f2  70 72 69 6e 74 28 b9 2c  |,h)<80 .print(.,|
00000b80  a4 67 65 74 28 67 2c 68  29 2c 4e 2c 67 2c 68 29  |.get(g,h),N,g,h)|
00000b90  3a f2 70 75 74 28 67 2c  68 2c 38 30 29 0d 06 d6  |:.put(g,h,80)...|
00000ba0  0f 67 3d 67 2b 45 3a 68  3d 68 2b 46 0d 06 e0 0d  |.g=g+E:h=h+F....|
00000bb0  fd 67 3d 58 20 80 68 3d  59 0d 06 ea 05 e1 0d 06  |.g=X .h=Y.......|
00000bc0  f4 05 3a 0d 06 fe 0a dd  f2 77 69 74 68 0d 07 08  |..:......with...|
00000bd0  19 45 3d 56 2b b4 28 56  2d 58 29 3a 46 3d 57 2b  |.E=V+.(V-X):F=W+|
00000be0  b4 28 57 2d 59 29 0d 07  12 3a e7 a4 67 65 74 28  |.(W-Y)...:..get(|
00000bf0  45 2c 46 29 81 34 30 3d  4e 20 f2 70 72 69 6e 74  |E,F).40=N .print|
00000c00  28 b9 2c a4 67 65 74 28  45 2c 46 29 2c 4e 2c 45  |(.,.get(E,F),N,E|
00000c10  2c 46 29 3a f2 70 75 74  28 45 2c 46 2c 38 30 29  |,F):.put(E,F,80)|
00000c20  0d 07 1c 05 e1 0d 07 26  05 3a 0d 07 30 0b dd f2  |.......&.:..0...|
00000c30  63 6f 6f 72 64 0d 07 3a  21 45 3d a4 67 65 74 28  |coord..:!E=.get(|
00000c40  58 2c 6b 59 3f 4d 29 3a  46 3d a4 67 65 74 28 6b  |X,kY?M):F=.get(k|
00000c50  58 3f 4d 2c 59 29 0d 07  44 31 e7 45 20 81 34 30  |X?M,Y)..D1.E .40|
00000c60  3d 4e 20 f2 70 72 69 6e  74 28 b9 2c 45 2c 4e 2c  |=N .print(.,E,N,|
00000c70  58 2c 6b 59 3f 4d 29 3a  f2 70 75 74 28 58 2c 6b  |X,kY?M):.put(X,k|
00000c80  59 3f 4d 2c 38 30 29 0d  07 4e 31 e7 46 20 81 34  |Y?M,80)..N1.F .4|
00000c90  30 3d 4e 20 f2 70 72 69  6e 74 28 b9 2c 46 2c 4e  |0=N .print(.,F,N|
00000ca0  2c 6b 58 3f 4d 2c 59 29  3a f2 70 75 74 28 6b 58  |,kX?M,Y):.put(kX|
00000cb0  3f 4d 2c 59 2c 38 30 29  0d 07 58 05 e1 0d 07 62  |?M,Y,80)..X....b|
00000cc0  05 3a 0d 07 6c 0b dd f2  61 6d 61 65 62 0d 07 76  |.:..l...amaeb..v|
00000cd0  21 e7 44 3d 32 34 2b 4e  2a 34 30 20 f2 6b 69 6e  |!.D=24+N*40 .kin|
00000ce0  67 3a e1 20 8b e7 44 3c  38 30 20 4c 3d a3 0d 07  |g:. ..D<80 L=...|
00000cf0  80 3f e7 a4 67 65 74 28  58 2c 59 29 3d 38 30 20  |.?..get(X,Y)=80 |
00000d00  80 a4 67 65 74 28 b4 28  56 2d 58 29 2b 58 2c b4  |..get(.(V-X)+X,.|
00000d10  28 57 2d 59 29 2b 59 29  3d 38 2b 4e 2a 34 30 20  |(W-Y)+Y)=8+N*40 |
00000d20  f2 6c 65 61 70 61 20 8b  f2 6c 69 6e 65 0d 07 8a  |.leapa ..line...|
00000d30  0a e7 ac 20 4c 20 e1 0d  07 94 2a e7 a4 67 65 74  |... L ....*..get|
00000d40  28 b4 28 56 2d 58 29 2b  56 2c b4 28 57 2d 59 29  |(.(V-X)+V,.(W-Y)|
00000d50  2b 57 29 3d 31 32 2b 4e  2a 34 30 20 f2 77 69 74  |+W)=12+N*40 .wit|
00000d60  68 0d 07 9e 0a f2 72 6f  6c 6c 61 0d 07 a8 21 45  |h.....rolla...!E|
00000d70  3d a4 67 65 74 28 58 2c  6b 59 3f 4d 29 3a 46 3d  |=.get(X,kY?M):F=|
00000d80  a4 67 65 74 28 6b 58 3f  4d 2c 59 29 0d 07 b2 33  |.get(kX?M,Y)...3|
00000d90  e7 45 3d 32 38 2b 4e 2a  34 30 20 f2 70 72 69 6e  |.E=28+N*40 .prin|
00000da0  74 28 b9 2c 45 2c 4e 2c  58 2c 6b 59 3f 4d 29 3a  |t(.,E,N,X,kY?M):|
00000db0  f2 70 75 74 28 58 2c 6b  59 3f 4d 2c 38 30 29 0d  |.put(X,kY?M,80).|
00000dc0  07 bc 33 e7 46 3d 32 38  2b 4e 2a 34 30 20 f2 70  |..3.F=28+N*40 .p|
00000dd0  72 69 6e 74 28 b9 2c 46  2c 4e 2c 6b 58 3f 4d 2c  |rint(.,F,N,kX?M,|
00000de0  59 29 3a f2 70 75 74 28  6b 58 3f 4d 2c 59 2c 38  |Y):.put(kX?M,Y,8|
00000df0  30 29 0d 07 c6 05 e1 0d  07 d0 05 3a 0d 07 da 0a  |0).........:....|
00000e00  dd f2 6b 69 6e 67 0d 07  e4 14 e7 43 20 81 34 30  |..king.....C .40|
00000e10  3d 44 20 81 34 30 20 4c  3d a3 0d 07 ee 2f e7 94  |=D .40 L=..../..|
00000e20  28 58 2d 56 29 3d 30 20  80 94 28 59 2d 57 29 3d  |(X-V)=0 ..(Y-W)=|
00000e30  30 20 84 94 28 58 2d 56  29 3e 31 20 84 94 28 59  |0 ..(X-V)>1 ..(Y|
00000e40  2d 57 29 3e 31 20 4c 3d  a3 0d 07 f8 0a e7 ac 20  |-W)>1 L=....... |
00000e50  4c 20 e1 0d 08 02 1b e7  44 3c 38 30 20 f2 70 72  |L ......D<80 .pr|
00000e60  69 6e 74 28 b9 2c 44 2c  4e 2c 58 2c 59 29 0d 08  |int(.,D,N,X,Y)..|
00000e70  0c 45 e7 44 3d 32 34 2b  4e 2a 34 30 20 6b 58 3f  |.E.D=24+N*40 kX?|
00000e80  4e 3d 30 3a 6b 59 3f 4e  3d 30 3a f2 70 75 74 28  |N=0:kY?N=0:.put(|
00000e90  58 2c 59 2c 38 30 29 20  8b f2 70 75 74 28 58 2c  |X,Y,80) ..put(X,|
00000ea0  59 2c 38 30 29 3a 6b 58  3f 4d 3d 58 3a 6b 59 3f  |Y,80):kX?M=X:kY?|
00000eb0  4d 3d 59 0d 08 16 05 e1  0d 08 20 05 3a 0d 08 2a  |M=Y....... .:..*|
00000ec0  08 dd f2 6e 6f 0d 08 34  14 e7 51 25 20 d4 31 2c  |...no..4..Q% .1,|
00000ed0  2d 31 35 2c 35 30 2c 31  30 0d 08 3e 24 f1 8a 39  |-15,50,10..>$..9|
00000ee0  2c 33 30 29 22 59 6f 75  20 63 61 6e 27 74 20 6d  |,30)"You can't m|
00000ef0  6f 76 65 20 74 68 65 72  65 20 21 22 3b 0d 08 48  |ove there !";..H|
00000f00  05 e1 0d 08 52 05 3a 0d  08 5c 16 dd f2 70 72 69  |....R.:..\...pri|
00000f10  6e 74 28 54 2c 43 2c 4d  2c 58 2c 59 29 0d 08 66  |nt(T,C,M,X,Y)..f|
00000f20  15 49 25 3d 26 39 46 30  2b 28 43 20 83 34 30 29  |.I%=&9F0+(C .40)|
00000f30  2a 34 0d 08 70 13 47 3d  28 59 20 83 32 29 82 28  |*4..p.G=(Y .2).(|
00000f40  58 20 83 32 29 0d 08 7a  13 e7 47 20 41 3d 32 2b  |X .2)..z..G A=2+|
00000f50  4d 20 8b 41 3d 33 2d 4d  0d 08 84 1d 43 3d 43 20  |M .A=3-M....C=C |
00000f60  83 34 30 2b 32 32 30 3a  58 3d 58 2a 39 36 3a 59  |.40+220:X=X*96:Y|
00000f70  3d 59 2a 39 36 0d 08 8e  08 e6 33 2c 41 0d 08 98  |=Y*96.....3,A...|
00000f80  12 ec 20 58 2b 58 25 2c  59 25 2d 59 2b 33 32 0d  |.. X+X%,Y%-Y+32.|
00000f90  08 a2 26 ef 35 2c 43 2c  43 2b 31 2c 31 30 2c 38  |..&.5,C,C+1,10,8|
00000fa0  2c 38 2c 43 2b 32 2c 43  2b 33 2c 34 2c 33 31 2c  |,8,C+2,C+3,4,31,|
00000fb0  31 30 2c 33 30 0d 08 ac  0a e7 ac 20 54 20 e1 0d  |10,30...... T ..|
00000fc0  08 b6 1e e7 4d 3d 30 20  f1 22 57 68 69 74 65 20  |....M=0 ."White |
00000fd0  22 3b 20 8b f1 22 20 52  65 64 20 22 3b 0d 08 c0  |"; .." Red ";...|
00000fe0  15 f1 22 74 61 6b 65 73  20 22 20 24 49 25 20 89  |.."takes " $I% .|
00000ff0  37 3b 0d 08 ca 19 f2 62  65 65 70 28 31 30 30 29  |7;.....beep(100)|
00001000  3a f2 77 61 69 74 28 31  30 30 29 0d 08 d4 05 e1  |:.wait(100).....|
00001010  0d 08 de 05 3a 0d 08 e8  09 dd f2 65 6e 64 0d 08  |....:......end..|
00001020  f2 0c f1 8a 31 31 2c 31  29 3b 0d 08 fc 6c e7 a4  |....11,1);...l..|
00001030  67 65 74 28 6b 58 3f 31  2c 6b 59 3f 31 29 3d 38  |get(kX?1,kY?1)=8|
00001040  30 20 f1 22 20 2a 2a 2a  20 52 45 44 20 20 57 49  |0 ." *** RED  WI|
00001050  4e 20 2a 2a 2a 22 20 8b  e7 a4 67 65 74 28 3f 6b  |N ***" ...get(?k|
00001060  58 2c 3f 6b 59 29 3d 38  30 20 f1 22 2a 2a 2a 20  |X,?kY)=80 ."*** |
00001070  57 48 49 54 45 20 20 57  49 4e 20 2a 2a 2a 22 20  |WHITE  WIN ***" |
00001080  8b f1 22 2a 2a 2a 20 47  41 4d 45 20 44 52 41 57  |.."*** GAME DRAW|
00001090  4e 20 2a 2a 2a 22 0d 09  06 0c e3 49 25 3d 30 20  |N ***".....I%=0 |
000010a0  b8 34 0d 09 10 18 f2 77  61 69 74 28 33 30 29 3a  |.4.....wait(30):|
000010b0  f2 62 65 65 70 28 31 38  30 29 0d 09 1a 05 ed 0d  |.beep(180)......|
000010c0  09 24 2b f1 8a 32 2c 33  30 29 89 36 20 22 50 72  |.$+..2,30).6 "Pr|
000010d0  65 73 73 20 61 6e 79 20  6b 65 79 20 74 6f 20 72  |ess any key to r|
000010e0  65 73 74 61 72 74 22 20  89 36 0d 09 2e 07 e7 20  |estart" .6..... |
000010f0  a5 0d 09 38 05 e1 0d 09  42 05 3a 0d 09 4c 10 dd  |...8....B.:..L..|
00001100  f2 70 75 74 28 58 2c 59  2c 5a 29 0d 09 56 11 52  |.put(X,Y,Z)..V.R|
00001110  25 3f 28 58 2b 59 2a 31  30 29 3d 5a 0d 09 60 05  |%?(X+Y*10)=Z..`.|
00001120  e1 0d 09 6a 05 3a 0d 09  74 0e dd a4 67 65 74 28  |...j.:..t...get(|
00001130  58 2c 59 29 0d 09 7e 10  3d 52 25 3f 28 58 2b 59  |X,Y)..~.=R%?(X+Y|
00001140  2a 31 30 29 0d 09 88 05  3a 0d 09 92 0d dd f2 62  |*10)....:......b|
00001150  65 65 70 28 50 29 0d 09  9c 11 e7 51 25 20 d4 20  |eep(P).....Q% . |
00001160  31 2c 31 2c 50 2c 31 0d  09 a6 05 e1 0d 09 b0 05  |1,1,P,1.........|
00001170  3a 0d 09 ba 0d dd f2 77  61 69 74 28 54 29 0d 09  |:......wait(T)..|
00001180  c4 07 d1 3d 30 0d 09 ce  09 f5 3a e7 a6 30 0d 09  |...=0.....:..0..|
00001190  d8 08 fd 91 3e 54 0d 09  e2 05 e1 0d 09 ec 05 3a  |....>T.........:|
000011a0  0d 09 f6 0b dd f2 63 6c  65 61 72 0d 0a 00 32 f1  |......clear...2.|
000011b0  8a 32 2c 31 29 89 33 36  20 8a 31 2c 31 32 29 89  |.2,1).36 .1,12).|
000011c0  34 20 8a 31 2c 31 36 29  89 34 20 8a 31 2c 31 38  |4 .1,16).4 .1,18|
000011d0  29 89 34 20 8a 32 2c 33  30 29 89 33 36 0d 0a 0a  |).4 .2,30).36...|
000011e0  05 e1 0d 0a 14 05 3a 0d  0a 1e 1f dc 20 30 2c 31  |......:..... 0,1|
000011f0  36 2c 37 32 2c 31 30 38  2c 32 37 31 2c 31 35 38  |6,72,108,271,158|
00001200  2c 30 2c 33 33 35 0d 0a  28 07 ee 85 3a 0d 0a 32  |,0,335..(...:..2|
00001210  1c eb 37 3a ef 32 33 3b  38 32 30 32 3b 30 3b 30  |..7:.23;8202;0;0|
00001220  3b 30 3b 3a f7 8d 44 6a  4e 0d 0a 3c 0d f2 74 69  |;0;:..DjN..<..ti|
00001230  74 6c 65 28 33 29 0d 0a  46 22 f1 8a 31 2c 37 29  |tle(3)..F"..1,7)|
00001240  bd 31 34 35 20 bd 31 38  33 20 c4 33 33 2c bd 31  |.145 .183 .33,.1|
00001250  36 33 29 20 bd 32 33 35  0d 0a 50 0d e3 49 25 3d  |63) .235..P..I%=|
00001260  38 20 b8 31 30 0d 0a 5a  27 f1 8a 31 2c 49 25 29  |8 .10..Z'..1,I%)|
00001270  bd 31 34 35 20 bd 31 38  31 20 bd 31 34 39 20 89  |.145 .181 .149 .|
00001280  33 31 20 bd 31 34 35 20  bd 32 33 34 0d 0a 64 05  |31 .145 .234..d.|
00001290  ed 0d 0a 6e 23 f1 8a 31  2c 31 31 29 bd 31 34 35  |...n#..1,11).145|
000012a0  20 bd 32 34 35 20 c4 33  33 2c bd 32 34 30 29 20  | .245 .33,.240) |
000012b0  bd 32 35 30 0d 0a 78 27  f1 8a 36 2c 38 29 22 54  |.250..x'..6,8)"T|
000012c0  20 48 20 45 20 20 20 42  20 4f 20 41 20 52 20 44  | H E   B O A R D|
000012d0  20 20 20 47 20 41 20 4d  20 45 22 0d 0a 82 2a f1  |   G A M E"...*.|
000012e0  8a 35 2c 31 30 29 22 46  20 4f 20 52 20 20 20 54  |.5,10)"F O R   T|
000012f0  20 57 20 4f 20 20 20 50  20 4c 20 41 20 59 20 45  | W O   P L A Y E|
00001300  20 52 20 53 22 0d 0a 8c  0e e3 49 25 3d 31 33 20  | R S".....I%=13 |
00001310  b8 31 34 0d 0a 96 2a f1  8a 37 2c 49 25 29 bd 31  |.14...*..7,I%).1|
00001320  34 31 20 bd 31 33 34 22  57 20 52 20 49 20 54 20  |41 .134"W R I T |
00001330  54 20 45 20 4e 22 89 35  22 42 20 59 22 0d 0a a0  |T E N".5"B Y"...|
00001340  05 ed 0d 0a aa 0e f2 74  69 74 6c 65 28 31 36 29  |.......title(16)|
00001350  0d 0a b4 1e ef 32 33 2c  32 32 34 2c 34 38 2c 32  |.....23,224,48,2|
00001360  38 2c 36 2c 33 2c 31 2c  31 2c 33 2c 31 35 0d 0a  |8,6,3,1,1,3,15..|
00001370  be 23 ef 32 33 2c 32 32  35 2c 30 2c 30 2c 31 2c  |.#.23,225,0,0,1,|
00001380  33 2c 31 33 30 2c 31 33  34 2c 32 30 34 2c 32 34  |3,130,134,204,24|
00001390  38 0d 0a c8 23 ef 32 33  2c 32 32 36 2c 33 31 2c  |8...#.23,226,31,|
000013a0  35 31 2c 39 37 2c 36 35  2c 31 39 32 2c 31 32 38  |51,97,65,192,128|
000013b0  2c 30 2c 30 0d 0a d2 28  ef 32 33 2c 32 32 37 2c  |,0,0...(.23,227,|
000013c0  32 34 30 2c 31 39 32 2c  31 32 38 2c 31 32 38 2c  |240,192,128,128,|
000013d0  31 39 32 2c 39 36 2c 35  36 2c 31 32 0d 0a dc 1f  |192,96,56,12....|
000013e0  ef 32 33 2c 32 32 38 2c  30 2c 31 34 2c 31 32 33  |.23,228,0,14,123|
000013f0  2c 39 37 2c 33 2c 33 2c  33 2c 37 0d 0a e6 28 ef  |,97,3,3,3,7...(.|
00001400  32 33 2c 32 32 39 2c 33  30 2c 35 34 2c 39 36 2c  |23,229,30,54,96,|
00001410  31 39 32 2c 31 39 32 2c  31 39 32 2c 31 32 38 2c  |192,192,192,128,|
00001420  31 32 38 0d 0a f0 20 ef  32 33 2c 32 33 30 2c 31  |128... .23,230,1|
00001430  32 2c 31 32 2c 36 2c 33  2c 36 2c 31 32 2c 32 34  |2,12,6,3,6,12,24|
00001440  2c 32 38 0d 0a fa 26 ef  32 33 2c 32 33 31 2c 31  |,28...&.23,231,1|
00001450  39 32 2c 39 36 2c 34 38  2c 32 34 2c 34 38 2c 39  |92,96,48,24,48,9|
00001460  36 2c 31 39 32 2c 32 32  34 0d 0b 04 23 ef 32 33  |6,192,224...#.23|
00001470  2c 32 33 32 2c 31 32 38  2c 36 34 2c 39 36 2c 34  |,232,128,64,96,4|
00001480  38 2c 31 36 2c 32 34 2c  38 2c 32 34 0d 0b 0e 1f  |8,16,24,8,24....|
00001490  ef 32 33 2c 32 33 33 2c  30 2c 30 2c 30 2c 34 2c  |.23,233,0,0,0,4,|
000014a0  31 34 2c 33 31 2c 33 30  2c 34 38 0d 0b 18 27 ef  |14,31,30,48...'.|
000014b0  32 33 2c 32 33 34 2c 34  38 2c 34 38 2c 39 36 2c  |23,234,48,48,96,|
000014c0  32 32 37 2c 32 33 39 2c  31 32 37 2c 31 32 37 2c  |227,239,127,127,|
000014d0  32 30 0d 0b 22 27 ef 32  33 2c 32 33 35 2c 34 38  |20.."'.23,235,48|
000014e0  2c 32 34 2c 32 38 2c 31  34 32 2c 32 33 31 2c 32  |,24,28,142,231,2|
000014f0  35 34 2c 32 35 32 2c 34  30 0d 0b 2c 28 ef 32 33  |54,252,40..,(.23|
00001500  2c 32 33 36 2c 35 36 2c  31 32 34 2c 32 35 34 2c  |,236,56,124,254,|
00001510  36 33 2c 31 32 31 2c 32  34 39 2c 36 33 2c 31 32  |63,121,249,63,12|
00001520  37 0d 0b 36 29 ef 32 33  2c 32 33 37 2c 32 38 2c  |7..6).23,237,28,|
00001530  36 32 2c 31 32 37 2c 32  35 32 2c 31 35 38 2c 31  |62,127,252,158,1|
00001540  35 39 2c 32 35 32 2c 32  35 34 0d 0b 40 29 ef 32  |59,252,254..@).2|
00001550  33 2c 32 33 38 2c 32 35  35 2c 36 30 2c 35 36 2c  |3,238,255,60,56,|
00001560  31 31 33 2c 32 35 31 2c  32 35 35 2c 32 30 34 2c  |113,251,255,204,|
00001570  32 30 34 0d 0b 4a 27 ef  32 33 2c 32 33 39 2c 32  |204..J'.23,239,2|
00001580  35 35 2c 36 30 2c 32 38  2c 31 34 30 2c 32 32 33  |55,60,28,140,223|
00001590  2c 32 35 35 2c 35 31 2c  35 31 0d 0b 54 1d ef 32  |,255,51,51..T..2|
000015a0  33 2c 32 34 30 2c 30 2c  33 2c 37 2c 31 35 2c 37  |3,240,0,3,7,15,7|
000015b0  2c 37 2c 37 2c 31 35 0d  0b 5e 28 ef 32 33 2c 32  |,7,7,15..^(.23,2|
000015c0  34 31 2c 30 2c 31 35 36  2c 32 35 34 2c 32 35 34  |41,0,156,254,254|
000015d0  2c 32 35 32 2c 32 35 32  2c 32 32 30 2c 31 34 0d  |,252,252,220,14.|
000015e0  0b 68 21 ef 32 33 2c 32  34 32 2c 33 30 2c 36 32  |.h!.23,242,30,62|
000015f0  2c 36 32 2c 36 33 2c 33  31 2c 31 35 2c 37 2c 33  |,62,63,31,15,7,3|
00001600  0d 0b 72 27 ef 32 33 2c  32 34 33 2c 31 34 2c 36  |..r'.23,243,14,6|
00001610  33 2c 31 32 37 2c 32 35  34 2c 32 32 34 2c 31 39  |3,127,254,224,19|
00001620  32 2c 31 32 38 2c 30 0d  0b 7c 23 ef 32 33 2c 32  |2,128,0..|#.23,2|
00001630  34 34 2c 31 2c 39 39 2c  35 35 2c 33 31 2c 32 39  |44,1,99,55,31,29|
00001640  2c 35 37 2c 32 35 35 2c  36 33 0d 0b 86 2b ef 32  |,57,255,63...+.2|
00001650  33 2c 32 34 35 2c 31 32  38 2c 31 39 38 2c 32 33  |3,245,128,198,23|
00001660  36 2c 32 34 38 2c 31 38  34 2c 31 35 36 2c 32 35  |6,248,184,156,25|
00001670  35 2c 32 35 32 0d 0b 90  20 ef 32 33 2c 32 34 36  |5,252... .23,246|
00001680  2c 36 33 2c 32 35 2c 32  38 2c 31 35 2c 37 2c 32  |,63,25,28,15,7,2|
00001690  2c 36 2c 31 32 0d 0b 9a  27 ef 32 33 2c 32 34 37  |,6,12...'.23,247|
000016a0  2c 32 35 32 2c 31 35 32  2c 34 38 2c 32 34 30 2c  |,252,152,48,240,|
000016b0  32 32 34 2c 36 34 2c 39  36 2c 34 38 0d 0b a4 22  |224,64,96,48..."|
000016c0  ef 32 33 2c 32 34 38 2c  33 2c 31 35 2c 33 31 2c  |.23,248,3,15,31,|
000016d0  35 31 2c 35 31 2c 36 33  2c 36 33 2c 33 31 0d 0b  |51,51,63,63,31..|
000016e0  ae 2b ef 32 33 2c 32 34  39 2c 31 39 32 2c 32 34  |.+.23,249,192,24|
000016f0  30 2c 32 34 38 2c 32 30  34 2c 32 30 34 2c 32 35  |0,248,204,204,25|
00001700  32 2c 32 35 32 2c 32 34  38 0d 0b b8 21 ef 32 33  |2,252,248...!.23|
00001710  2c 32 35 30 2c 36 30 2c  31 30 38 2c 37 39 2c 37  |,250,60,108,79,7|
00001720  31 2c 36 2c 36 2c 36 2c  31 34 0d 0b c2 26 ef 32  |1,6,6,6,14...&.2|
00001730  33 2c 32 35 31 2c 36 30  2c 35 34 2c 32 34 32 2c  |3,251,60,54,242,|
00001740  32 32 36 2c 39 36 2c 39  36 2c 39 36 2c 31 31 32  |226,96,96,96,112|
00001750  0d 0b cc 26 e2 20 31 2c  31 2c 30 2c 30 2c 30 2c  |...&. 1,1,0,0,0,|
00001760  31 2c 30 2c 30 2c 31 32  36 2c 30 2c 30 2c 2d 31  |1,0,0,126,0,0,-1|
00001770  2c 31 32 36 2c 30 0d 0b  d6 07 ee 85 3a 0d 0b e0  |,126,0......:...|
00001780  09 f7 8d 44 7e 4e 0d 0b  ea 16 e3 49 25 3d 26 41  |...D~N.....I%=&A|
00001790  30 30 20 b8 26 41 36 30  20 88 31 36 0d 0b f4 09  |00 .&A60 .16....|
000017a0  f3 20 24 49 25 0d 0b fe  05 ed 0d 0c 08 21 52 25  |. $I%........!R%|
000017b0  3d 49 25 3a 51 25 3d b9  3a 41 24 3d 22 50 72 65  |=I%:Q%=.:A$="Pre|
000017c0  73 73 20 61 6e 79 20 6b  65 79 22 0d 0c 12 12 e3  |ss any key".....|
000017d0  49 25 3d 26 39 43 30 20  b8 26 39 44 46 0d 0c 1c  |I%=&9C0 .&9DF...|
000017e0  09 f3 20 3f 49 25 0d 0c  26 05 ed 0d 0c 30 4c f2  |.. ?I%..&....0L.|
000017f0  77 61 69 74 28 31 30 30  29 3a f1 8a 37 2c 32 31  |wait(100):..7,21|
00001800  29 bd 31 33 34 20 22 44  4f 20 59 4f 55 20 57 41  |).134 "DO YOU WA|
00001810  4e 54 20 53 4f 55 4e 44  20 43 55 45 53 20 3f 22  |NT SOUND CUES ?"|
00001820  8a 31 33 2c 32 33 29 bd  31 33 34 22 28 20 59 20  |.13,23).134"( Y |
00001830  2f 20 4e 20 29 22 3b 0d  0c 3a 0b 51 25 3d a4 6b  |/ N )";..:.Q%=.k|
00001840  65 79 0d 0c 44 35 f2 77  61 69 74 28 31 30 30 29  |ey..D5.wait(100)|
00001850  3a f1 8a 37 2c 32 31 29  bd 31 33 33 20 22 44 4f  |:..7,21).133 "DO|
00001860  20 59 4f 55 20 57 41 4e  54 20 44 49 52 45 43 54  | YOU WANT DIRECT|
00001870  49 4f 4e 53 20 3f 22 0d  0c 4e 10 e7 ac a4 6b 65  |IONS ?"..N....ke|
00001880  79 20 e5 8d 44 48 4d 0d  0c 58 07 ee 85 3a 0d 0c  |y ..DHM..X...:..|
00001890  62 14 ef 32 38 2c 30 2c  32 34 2c 33 39 2c 37 2c  |b..28,0,24,39,7,|
000018a0  31 32 0d 0c 6c 0d e3 49  25 3d 30 20 b8 31 36 0d  |12..l..I%=0 .16.|
000018b0  0c 76 09 f1 bd 31 33 30  0d 0c 80 05 ed 0d 0c 8a  |.v...130........|
000018c0  14 ef 32 38 2c 31 2c 32  34 2c 33 38 2c 37 2c 31  |..28,1,24,38,7,1|
000018d0  32 0d 0c 94 ce f1 89 34  20 22 54 68 65 20 6f 62  |2......4 "The ob|
000018e0  6a 65 63 74 20 6f 66 20  74 68 69 73 20 67 61 6d  |ject of this gam|
000018f0  65 20 69 73 20 74 6f 20  74 61 6b 65 79 6f 75 72  |e is to takeyour|
00001900  20 6f 70 70 6f 6e 65 6e  74 73 20 6b 69 6e 67 2e  | opponents king.|
00001910  20 54 68 65 72 65 20 69  73 20 6e 6f 20 43 68 65  | There is no Che|
00001920  63 6b 75 6e 6c 69 6b 65  20 63 68 65 73 73 2e 22  |ckunlike chess."|
00001930  27 27 89 35 20 22 57 69  74 68 20 74 68 65 20 65  |''.5 "With the e|
00001940  78 63 65 70 74 69 6f 6e  20 6f 66 20 74 68 65 20  |xception of the |
00001950  52 6f 6c 6c 65 72 73 61  6e 64 20 74 68 65 20 4b  |Rollersand the K|
00001960  69 6e 67 2c 20 20 6d 6f  76 65 6d 65 6e 74 20 6f  |ing,  movement o|
00001970  66 20 74 68 65 20 20 70  69 65 63 65 73 69 73 20  |f the  piecesis |
00001980  69 6e 20 74 68 65 20 73  74 79 6c 65 20 6f 66 20  |in the style of |
00001990  61 20 63 68 65 73 73 20  51 75 65 65 6e 2e 22 0d  |a chess Queen.".|
000019a0  0c 9e d6 f1 27 89 33 20  22 54 68 65 20 52 6f 6c  |....'.3 "The Rol|
000019b0  6c 65 72 73 20 6d 6f 76  65 20 6f 6e 6c 79 20 76  |lers move only v|
000019c0  65 72 74 69 63 61 6c 79  20 61 6e 64 68 6f 72 69  |erticaly andhori|
000019d0  7a 6f 6e 74 61 6c 79 2c  20 74 61 6b 69 6e 67 20  |zontaly, taking |
000019e0  70 69 65 63 65 73 20 62  79 20 74 72 61 70 70 69  |pieces by trappi|
000019f0  6e 67 74 68 65 6d 20 61  67 61 69 6e 73 74 20 61  |ngthem against a|
00001a00  6e 79 20 6f 74 68 65 72  20 70 69 65 63 65 20 62  |ny other piece b|
00001a10  65 6c 6f 6e 67 69 6e 67  74 6f 20 74 68 65 20 73  |elongingto the s|
00001a20  61 6d 65 20 70 6c 61 79  65 72 20 61 73 20 74 68  |ame player as th|
00001a30  65 20 52 6f 6c 6c 65 72  2e 22 27 27 89 34 20 22  |e Roller."''.4 "|
00001a40  54 68 65 20 4b 69 6e 67  20 6d 6f 76 65 73 20 61  |The King moves a|
00001a50  6e 64 20 74 61 6b 65 73  20 70 69 65 63 65 73 20  |nd takes pieces |
00001a60  61 73 61 20 63 68 65 73  73 20 4b 69 6e 67 20 64  |asa chess King d|
00001a70  6f 65 73 2e 22 0d 0c a8  09 f2 68 6f 6c 64 0d 0c  |oes.".....hold..|
00001a80  b2 c4 f1 89 33 20 22 54  68 65 20 4c 65 61 70 65  |....3 "The Leape|
00001a90  72 73 20 63 61 6e 20 73  74 65 70 20 6f 76 65 72  |rs can step over|
00001aa0  20 70 69 65 63 65 73 20  74 6f 74 61 6b 65 20 74  | pieces totake t|
00001ab0  68 65 6d 20 20 61 6e 64  20 6d 75 73 74 20 20 68  |hem  and must  h|
00001ac0  61 76 65 20 61 20 63 6c  65 61 72 20 70 61 74 68  |ave a clear path|
00001ad0  74 6f 20 74 68 65 20 70  69 65 63 65 20 62 65 69  |to the piece bei|
00001ae0  6e 67 20 74 61 6b 65 6e  2e 20 48 6f 77 65 76 65  |ng taken. Howeve|
00001af0  72 20 74 68 65 79 63 61  6e 20 74 61 6b 65 20 61  |r theycan take a|
00001b00  20 6c 69 6e 65 20 6f 66  20 70 69 65 63 65 73 20  | line of pieces |
00001b10  70 72 6f 76 69 64 65 64  20 6f 6e 65 67 61 70 20  |provided onegap |
00001b20  6f 6e 6c 79 20 65 78 69  73 74 73 20 62 65 74 77  |only exists betw|
00001b30  65 65 6e 20 65 61 63 68  20 6f 66 20 74 68 65 6d  |een each of them|
00001b40  2e 22 0d 0c bc db f1 27  89 33 20 22 54 68 65 20  |.".....'.3 "The |
00001b50  57 69 74 68 64 72 61 77  65 72 20 68 61 73 20 74  |Withdrawer has t|
00001b60  6f 20 6d 6f 76 65 20 64  69 72 65 63 74 6c 79 61  |o move directlya|
00001b70  77 61 79 20 66 72 6f 6d  20 61 20 70 69 65 63 65  |way from a piece|
00001b80  20 74 6f 20 74 61 6b 65  20 69 74 2e 22 27 27 89  | to take it."''.|
00001b90  34 20 22 57 68 65 6e 20  74 68 65 20 43 6f 2d 6f  |4 "When the Co-o|
00001ba0  72 64 69 6e 61 74 6f 72  20 69 73 20 6d 6f 76 65  |rdinator is move|
00001bb0  64 20 61 6e 79 6f 66 20  79 6f 75 72 20 6f 70 70  |d anyof your opp|
00001bc0  6f 6e 65 6e 74 73 20 70  69 65 63 65 73 20 70 6c  |onents pieces pl|
00001bd0  61 63 65 64 20 6f 6e 20  74 68 65 63 6f 6c 75 6d  |aced on thecolum|
00001be0  6e 20 5f 20 72 6f 77 20  69 6e 74 65 72 73 65 63  |n _ row intersec|
00001bf0  74 69 6f 6e 73 20 6f 66  20 74 68 65 20 4b 69 6e  |tions of the Kin|
00001c00  67 61 6e 64 20 43 6f 2d  6f 72 64 69 6e 61 74 6f  |gand Co-ordinato|
00001c10  72 20 61 72 65 20 74 61  6b 65 6e 2e 22 0d 0c c6  |r are taken."...|
00001c20  09 f2 68 6f 6c 64 0d 0c  d0 b6 f1 27 89 35 20 22  |..hold.....'.5 "|
00001c30  41 6d 6f 65 62 61 73 20  20 63 68 61 6e 67 65 20  |Amoebas  change |
00001c40  74 68 65 69 72 20 62 65  68 61 76 69 6f 72 20 74  |their behavior t|
00001c50  6f 6d 61 74 63 68 20 74  68 65 20 70 69 65 63 65  |omatch the piece|
00001c60  20 74 68 65 79 20 61 72  65 20 64 65 61 6c 69 6e  | they are dealin|
00001c70  67 20 77 69 74 68 2e 54  68 65 79 20 72 6f 6c 6c  |g with.They roll|
00001c80  20 52 6f 6c 6c 65 72 73  2c 20 6c 65 61 70 20 4c  | Rollers, leap L|
00001c90  65 61 70 65 72 73 20 65  74 63 2e 22 27 27 89 35  |eapers etc."''.5|
00001ca0  20 22 54 68 65 20 49 6d  6d 6f 62 69 6c 69 73 65  | "The Immobilise|
00001cb0  72 20 69 73 20 74 68 65  20 6f 6e 6c 79 20 70 69  |r is the only pi|
00001cc0  65 63 65 75 6e 61 62 6c  65 20 74 6f 20 74 61 6b  |eceunable to tak|
00001cd0  65 20 20 6f 74 68 65 72  73 2e 22 3b 0d 0c da b4  |e  others.";....|
00001ce0  f1 22 20 20 41 6e 79 20  6f 70 70 6f 6e 65 6e 74  |."  Any opponent|
00001cf0  73 70 69 65 63 65 20 74  68 61 74 20 63 6f 6d 65  |spiece that come|
00001d00  73 20 69 6e 74 6f 20 20  63 6f 6e 74 61 63 74 20  |s into  contact |
00001d10  77 69 74 68 20 69 74 69  73 20 68 65 6c 64 20 20  |with itis held  |
00001d20  75 6e 74 69 6c 20 74 68  65 20 69 6d 6d 6f 62 69  |until the immobi|
00001d30  6c 73 65 72 20 69 73 20  6d 6f 76 65 64 6f 72 20  |lser is movedor |
00001d40  74 61 6b 65 6e 2e 22 20  8a 33 2c 31 32 29 bd 31  |taken." .3,12).1|
00001d50  33 31 20 22 27 45 53 43  41 50 45 27 22 20 bd 31  |31 "'ESCAPE'" .1|
00001d60  33 30 20 22 20 69 66 20  79 6f 75 20 77 61 6e 74  |30 " if you want|
00001d70  20 74 6f 20 72 65 61 64  20 74 68 69 73 69 6e 66  | to read thisinf|
00001d80  6f 72 6d 61 74 69 6f 6e  20 61 67 61 69 6e 2e 22  |ormation again."|
00001d90  0d 0c e4 09 f2 68 6f 6c  64 0d 0c ee 0c ee 85 20  |.....hold...... |
00001da0  e5 8d 44 48 4d 0d 0c f8  25 eb 34 3a ef 32 33 3b  |..DHM...%.4:.23;|
00001db0  38 32 30 32 3b 30 3b 30  3b 30 3b 31 39 2c 30 2c  |8202;0;0;0;19,0,|
00001dc0  34 3b 30 3b 3a f7 8d 74  70 4e 0d 0d 02 29 f1 8a  |4;0;:..tpN...)..|
00001dd0  37 2c 33 29 22 54 48 45  20 55 4c 54 49 4d 41 20  |7,3)"THE ULTIMA |
00001de0  50 49 45 43 45 53 22 20  8a 32 32 29 22 76 61 6c  |PIECES" .22)"val|
00001df0  75 65 22 0d 0d 0c 10 e3  49 25 3d 38 20 b8 33 32  |ue".....I%=8 .32|
00001e00  20 88 34 0d 0d 16 08 f3  20 42 24 0d 0d 20 0d 41  | .4..... B$.. .A|
00001e10  25 3d 49 25 2b 32 31 36  0d 0d 2a 4b f1 8a 35 2c  |%=I%+216..*K..5,|
00001e20  49 25 2a 30 2e 37 35 29  bd 41 25 20 bd 28 41 25  |I%*0.75).A% .(A%|
00001e30  2b 31 29 8a 35 2c 49 25  2a 30 2e 37 35 2b 31 29  |+1).5,I%*0.75+1)|
00001e40  bd 28 41 25 2b 32 29 bd  28 41 25 2b 33 29 8a 39  |.(A%+2).(A%+3).9|
00001e50  29 24 28 26 39 45 30 2b  49 25 2a 34 29 8a 32 37  |)$(&9E0+I%*4).27|
00001e60  29 42 24 0d 0d 34 05 ed  0d 0d 3e 1c f2 77 61 69  |)B$..4....>..wai|
00001e70  74 28 31 30 30 29 3a f1  8a 31 32 2c 32 39 29 41  |t(100):..12,29)A|
00001e80  24 3a e7 a5 0d 0d 48 14  21 28 90 2b 34 29 3d 26  |$:....H.!(.+4)=&|
00001e90  46 34 3a f7 8d 54 68 4a  0d 0d 52 14 49 25 3d 32  |F4:..ThJ..R.I%=2|
00001ea0  2b 21 26 31 43 20 80 26  46 46 46 46 0d 0d 5c 0d  |+!&1C .&FFFF..\.|
00001eb0  f5 3a 49 25 3d 49 25 2d  31 0d 0d 66 0e fd 20 49  |.:I%=I%-1..f.. I|
00001ec0  25 3f 2d 31 3d 31 33 0d  0d 70 11 e7 90 3e 26 45  |%?-1=13..p...>&E|
00001ed0  30 30 20 f2 64 6f 77 6e  0d 0d 7a 17 3f 49 25 3d  |00 .down..z.?I%=|
00001ee0  26 46 46 3a 21 26 31 32  3d 49 25 2b 31 3a f9 0d  |&FF:!&12=I%+1:..|
00001ef0  0d 84 05 3a 0d 0d 8e 10  dd f2 64 6f 77 6e 3a 2a  |...:......down:*|
00001f00  54 41 50 45 0d 0d 98 27  f2 62 65 65 70 28 32 30  |TAPE...'.beep(20|
00001f10  30 29 3a f1 bd 31 31 89  31 34 22 50 4c 45 41 53  |0):..11.14"PLEAS|
00001f20  45 20 57 41 49 54 22 89  38 30 3b 0d 0d a2 21 e3  |E WAIT".80;...!.|
00001f30  4a 25 3d 30 20 b8 49 25  2d 90 20 88 34 3a 4a 25  |J%=0 .I%-. .4:J%|
00001f40  21 26 45 30 30 3d 4a 25  21 90 3a ed 0d 0d ac 17  |!&E00=J%!.:.....|
00001f50  49 25 3d 49 25 2b 26 45  30 30 2d 90 3a d0 3d 26  |I%=I%+&E00-.:.=&|
00001f60  45 30 30 0d 0d b6 05 e1  0d 0d c0 05 3a 0d 0d ca  |E00.........:...|
00001f70  0f dd f2 74 69 74 6c 65  28 4e 25 29 0d 0d d4 13  |...title(N%)....|
00001f80  f3 24 26 43 30 30 3a f1  8a 30 2c 4e 25 29 3b 0d  |.$&C00:..0,N%);.|
00001f90  0d de 11 e3 49 25 3d 30  20 b8 32 32 33 20 88 32  |....I%=0 .223 .2|
00001fa0  0d 0d e8 21 ef a0 28 22  26 22 2b bd 28 49 25 3f  |...!..("&"+.(I%?|
00001fb0  26 43 30 30 29 2b bd 28  49 25 3f 26 43 30 31 29  |&C00)+.(I%?&C01)|
00001fc0  29 0d 0d f2 05 ed 0d 0d  fc 05 e1 0d 0e 06 05 3a  |)..............:|
00001fd0  0d 0e 10 20 dd f2 68 6f  6c 64 3a f2 77 61 69 74  |... ..hold:.wait|
00001fe0  28 31 30 30 29 3a f2 62  65 65 70 28 32 30 30 29  |(100):.beep(200)|
00001ff0  0d 0e 1a 17 f1 8a 31 32  2c 31 36 29 bd 31 33 31  |......12,16).131|
00002000  20 41 24 3a e7 a5 db 0d  0e 24 05 e1 0d 0e 2e 05  | A$:.....$......|
00002010  3a 0d 0e 38 14 dd a4 6b  65 79 3a f2 62 65 65 70  |:..8...key:.beep|
00002020  28 32 30 30 29 0d 0e 42  0e f5 3a 47 25 3d a5 20  |(200)..B..:G%=. |
00002030  80 39 35 0d 0e 4c 11 fd  47 25 3d 37 38 20 84 47  |.95..L..G%=78 .G|
00002040  25 3d 38 39 0d 0e 56 0a  3d 47 25 3d 38 39 0d 0e  |%=89..V.=G%=89..|
00002050  60 05 3a 0d 0e 6a e6 dc  20 39 33 39 41 32 30 46  |`.:..j.. 939A20F|
00002060  46 32 30 42 35 32 30 32  30 32 30 46 46 32 30 32  |F20B5202020FF202|
00002070  30 32 30 32 30 32 30 41  33 46 46 41 31 32 30 32  |0202020A3FFA1202|
00002080  30 32 30 45 42 42 37 32  30 32 30 32 30 32 30 46  |020EBB720202020F|
00002090  44 42 38 42 35 32 30 32  30 32 30 46 45 41 33 42  |DB8B5202020FEA3B|
000020a0  34 30 44 30 41 39 33 39  41 32 30 46 46 32 30 42  |40D0A939A20FF20B|
000020b0  35 32 30 32 30 32 30 46  46 32 30 32 30 32 30 32  |5202020FF2020202|
000020c0  30 32 30 32 30 46 46 32  30 32 30 32 30 32 30 45  |02020FF20202020E|
000020d0  41 42 35 32 30 32 30 32  30 32 30 46 46 32 30 42  |AB520202020FF20B|
000020e0  35 32 30 32 30 32 30 46  46 41 43 42 35 30 44 30  |5202020FFACB50D0|
000020f0  41 39 33 39 41 32 30 45  46 46 30 41 35 32 30 32  |A939A20EFF0A5202|
00002100  30 32 30 46 46 46 30 42  30 32 30 32 30 32 30 32  |020FFF0B02020202|
00002110  30 46 46 32 30 32 30 32  30 32 30 46 41 46 35 32  |0FF20202020FAF52|
00002120  30 32 30 32 30 32 30 46  46 32 30 42 35 32 30 32  |0202020FF20B5202|
00002130  30 32 30 46 46 32 30 42  35 0d 0e 74 e6 dc 20 39  |020FF20B5..t.. 9|
00002140  32 39 41 32 30 41 33 46  46 41 31 46 46 41 33 41  |29A20A3FFA1FFA3A|
00002150  31 46 46 41 33 42 34 46  46 41 33 42 34 46 46 32  |1FFA3B4FFA3B4FF2|
00002160  30 42 35 32 30 32 30 32  30 46 46 41 33 42 34 46  |0B5202020FFA3B4F|
00002170  46 32 30 32 30 46 46 32  30 42 35 46 46 42 30 42  |F2020FF20B5FFB0B|
00002180  35 41 33 46 46 41 31 30  44 30 41 39 32 39 41 32  |5A3FFA10D0A929A2|
00002190  30 32 30 46 46 32 30 46  46 41 43 32 30 46 46 41  |020FF20FFAC20FFA|
000021a0  43 42 31 46 46 41 43 42  31 41 32 41 43 42 35 32  |CB1FFACB1A2ACB52|
000021b0  30 32 30 32 30 46 46 41  43 42 31 46 46 32 30 32  |02020FFACB1FF202|
000021c0  30 46 46 32 30 42 35 46  46 45 44 42 35 32 30 46  |0FF20B5FFEDB520F|
000021d0  46 32 30 30 44 30 41 39  32 39 41 32 30 32 30 46  |F200D0A929A2020F|
000021e0  46 32 30 46 46 46 30 42  30 46 46 32 30 42 35 46  |F20FFF0B0FF20B5F|
000021f0  46 32 30 42 35 45 30 46  30 41 35 32 30 32 30 32  |F20B5E0F0A520202|
00002200  30 46 46 46 30 41 35 46  46 46 30 42 30 45 46 46  |0FFF0A5FFF0B0EFF|
00002210  30 41 35 46 46 41 32 42  35 32 30 46 46 32 30 0d  |0A5FFA2B520FF20.|
00002220  0e 7e 43 dc 20 52 6f 6c  6c 65 72 2c 4c 65 61 70  |.~C. Roller,Leap|
00002230  65 72 2c 57 69 74 68 64  72 61 77 65 72 2c 49 6d  |er,Withdrawer,Im|
00002240  6d 6f 62 69 6c 69 73 65  72 2c 41 6d 6f 65 62 61  |mobiliser,Amoeba|
00002250  2c 4b 69 6e 67 2c 43 6f  2d 6f 72 64 69 6e 61 74  |,King,Co-ordinat|
00002260  6f 72 0d 0e 88 15 dc 20  32 2c 31 2c 30 2c 31 2c  |or..... 2,1,0,1,|
00002270  32 2c 30 2c 30 2c 32 0d  0e 92 15 dc 20 31 2c 32  |2,0,0,2..... 1,2|
00002280  2c 31 2c 30 2c 32 2c 32  2c 30 2c 30 0d 0e 9c 1b  |,1,0,2,2,0,0....|
00002290  dc 20 32 38 2c 38 2c 32  30 2c 31 32 2c 32 34 2c  |. 28,8,20,12,24,|
000022a0  32 30 2c 38 2c 31 36 0d  0e a6 1d dc 20 36 38 2c  |20,8,16..... 68,|
000022b0  34 38 2c 36 30 2c 36 34  2c 35 32 2c 36 30 2c 34  |48,60,64,52,60,4|
000022c0  38 2c 35 36 0d 0e b0 1f  dc 20 31 36 2c 37 32 2c  |8,56..... 16,72,|
000022d0  31 30 38 2c 32 37 31 2c  31 35 38 2c 2b 2b 2b 2c  |108,271,158,+++,|
000022e0  33 33 35 0d ff                                    |335..|
000022e5