� TAI2
� by Albert Gardner
� (c) The Micro User
(*L.TAIDATA
2	*TAPE
<
�&4600
F
*TV0,1
P�1:t%=&70:b%=&71:r%=&73
Zl%=&7A:f%=&7B:e%=&7C:u%=&7D
dE%=&1AE0:F%=&1B70:G%=&1B98
ntl=&1CC6:spr=&1D1D:prt=&938
xAblnk=&1DBD:off=&1E2E:chk=&1FC3:ch=&1FC2:w=&2084:!&74=&C870C37
�c%=&E27:d%=&1BC8:d%?37=1
�$�23,1,0;0;0;0;19,0,4;0;19,2,2;0;
�	�init
�-O%=144:U%=2:V%=1:W%=0:�:�chk:�pair:�?ch=1
�� D%=2 �end
�� D%>3 N%=N%+D%-4:� �tV@
�8�7:�8,10)"Deal Number was ";M%;�10,12)"Redeals ";N%
��
�:
�
��init
�
I%=�(-M%)
�)�I%=0�3:�J%=1�36:E%?(J%+36*I%)=J%:�:�
��J%=0�N%:�I%=1�144

/L%=�(144):K%=E%?I%:E%?I%=E%?L%:E%?L%=K%:�:�

&�:�I%=1�8:� I%?F%,I%?G%,I%?&1BC0:�

D� 2,13,0,4,11,10,3,12,19,1,15,31,2,15,45,3,12,56,4,11,65,2,13,75

"�I%=9�40:F%?I%=16:G%?I%=0:�

,�L%=1�3:� J%=L%+1�8-L%

6,J%?(F%+8*L%)=L%+4:J%?(G%+8*L%)=11-L%:�:�

@#F%?36=7:F%?37=7:G%?36=8:G%?37=8

J!t%=0:!l%=&2121

T$?&84=0:!&85=&E00:!&8A=&100:L%=-1

^�J%=0�9:�I%=-1�18

h�blnk:�prt:�:�

r�28,0,31,39,28:�

|�L%=0�4:� J%=1 � 8

��I%=1�15:�tl:�:�:�

�hF%?5=1:�1,1);"TILES LEFT 144";:�1:�25,1);"TAIPEI";�25,2);"------";:�2:�21,3);"Albert Gardner";:�3

��

�:

�	��end

��:�1:�" GAME OVER"

��3:�O%� �djA � �" You Win"

��I%=1�6:� X%:�1,1,X%,6

��:� �dtA

�� 63,71,79,83,83,63

��7:�" Tiles left ";O%

�0� " Another game?":T%=��&DF:� T%=89 D%=5 � �

�B� O% �" Same Deal (S) or Different (D)?":T%=��&DF:� T%=83 D%=4
�
:
ݤt(I%,J%,L%)
&=(�(&1C43))�256
0:
:ݤx
D=(U%=1 � U%>13 � W%=4)
N:
X
��pair
b�?ch=1 �
lD%=0:�M:�:*FX21,0
vT%=��&DF:Q%=D%
��T%=81 D%=3:?ch=1
��T%=83 D%=4:?ch=1
��T%=68 D%=5:?ch=1
��T%=15 �mark:�down:�M
��T%=26 �mark:�up:�M
��T%=90 �mark:�left:�M
��T%=88 �mark:�rt:�M
��T%=72 � D%=0 �H
�
�T%=0 �sp
�	�D%>1
��
�:
���up

� �x V%=4
�:�V%=1 V%=8 � V%=V%-1
� G%?V%:�U
 �
*:
4
��down
>
� �x V%=5
H�:�V%=8 V%=1 � V%=V%+1
R� G%?V%:�U
\�
f:
p��V
z�U:�M:�
� 
���U
��w:�W%=5 �left
��
�:
�
��left
��W%=4 U%=7
� � U%=U%-1:�U%<F%?V% U%=G%?V%
��w:� W%<5:�
�:
���rt
��W%=4 U%=8
� � U%=U%+1:�U%>G%?V% U%=F%?V%
�w:� W%<5:�
:
��H:H%=0
$�1:�1,3)"HELP mode";
.!�:H%=H%+1:�d%?H%:�H%=37 �DVD
8(�mark:U%=(c%?H%)�16:V%=(c%?H%)�16:�V
B/�sp:U%=(d%?H%)�16:V%=(d%?H%)�16:�V:T%=��&DF
L�T%�C:�T%=72 Q%=0:� �TnD
V�1,3)�(9);:�3
`�
j:
t��M
~Q%=D%+2
�
��mark
��D%=1�U%=R%�V%=S% �
�K%=�t(U%,V%,W%):�K%=0 �
�%I%=U%:J%=V%:L%=W%:!t%=0:!l%=&2121
��spr:A%=Q%:�&900
��
�:
���sp
�� �x V%=4:�W%=4U%=7
�"�D%=0 D%=1:R%=U%:S%=V%:Z%=W%:�
��R%=U%�S%=V% D%=0:�
�+�t(R%,S%,Z%)=�t(U%,V%,W%) �rem � �7:�C
�

:
	��rem
�off:R%=U%:S%=V%:Z%=W%:�off
(O%=O%-2:� O%=0 �DFE
2$� D%=1 �rt �� D%=2 �left � �down
<�12,1);�(4);�12,1);O%
F
D%=2:�
P:
Z��C
d'Q%=1:�mark:D%=0:U%=R%:V%=S%:W%=Z%:�
�

00000000  0d 00 0a 0a f4 20 54 41  49 32 0d 00 14 17 f4 20  |..... TAI2..... |
00000010  62 79 20 41 6c 62 65 72  74 20 47 61 72 64 6e 65  |by Albert Gardne|
00000020  72 0d 00 1e 18 f4 20 28  63 29 20 54 68 65 20 4d  |r..... (c) The M|
00000030  69 63 72 6f 20 55 73 65  72 0d 00 28 0e 2a 4c 2e  |icro User..(.*L.|
00000040  54 41 49 44 41 54 41 0d  00 32 09 2a 54 41 50 45  |TAIDATA..2.*TAPE|
00000050  0d 00 3c 0a d6 26 34 36  30 30 0d 00 46 0a 2a 54  |..<..&4600..F.*T|
00000060  56 30 2c 31 0d 00 50 1b  eb 31 3a 74 25 3d 26 37  |V0,1..P..1:t%=&7|
00000070  30 3a 62 25 3d 26 37 31  3a 72 25 3d 26 37 33 0d  |0:b%=&71:r%=&73.|
00000080  00 5a 1f 6c 25 3d 26 37  41 3a 66 25 3d 26 37 42  |.Z.l%=&7A:f%=&7B|
00000090  3a 65 25 3d 26 37 43 3a  75 25 3d 26 37 44 0d 00  |:e%=&7C:u%=&7D..|
000000a0  64 1e 45 25 3d 26 31 41  45 30 3a 46 25 3d 26 31  |d.E%=&1AE0:F%=&1|
000000b0  42 37 30 3a 47 25 3d 26  31 42 39 38 0d 00 6e 1f  |B70:G%=&1B98..n.|
000000c0  74 6c 3d 26 31 43 43 36  3a 73 70 72 3d 26 31 44  |tl=&1CC6:spr=&1D|
000000d0  31 44 3a 70 72 74 3d 26  39 33 38 0d 00 78 41 62  |1D:prt=&938..xAb|
000000e0  6c 6e 6b 3d 26 31 44 42  44 3a 6f 66 66 3d 26 31  |lnk=&1DBD:off=&1|
000000f0  45 32 45 3a 63 68 6b 3d  26 31 46 43 33 3a 63 68  |E2E:chk=&1FC3:ch|
00000100  3d 26 31 46 43 32 3a 77  3d 26 32 30 38 34 3a 21  |=&1FC2:w=&2084:!|
00000110  26 37 34 3d 26 43 38 37  30 43 33 37 0d 00 82 1c  |&74=&C870C37....|
00000120  63 25 3d 26 45 32 37 3a  64 25 3d 26 31 42 43 38  |c%=&E27:d%=&1BC8|
00000130  3a 64 25 3f 33 37 3d 31  0d 00 8c 24 ef 32 33 2c  |:d%?37=1...$.23,|
00000140  31 2c 30 3b 30 3b 30 3b  30 3b 31 39 2c 30 2c 34  |1,0;0;0;0;19,0,4|
00000150  3b 30 3b 31 39 2c 32 2c  32 3b 30 3b 0d 00 96 09  |;0;19,2,2;0;....|
00000160  f2 69 6e 69 74 0d 00 a0  2d 4f 25 3d 31 34 34 3a  |.init...-O%=144:|
00000170  55 25 3d 32 3a 56 25 3d  31 3a 57 25 3d 30 3a f5  |U%=2:V%=1:W%=0:.|
00000180  3a d6 63 68 6b 3a f2 70  61 69 72 3a fd 3f 63 68  |:.chk:.pair:.?ch|
00000190  3d 31 0d 00 aa 0f e7 20  44 25 3d 32 20 f2 65 6e  |=1..... D%=2 .en|
000001a0  64 0d 00 b4 1c e7 20 44  25 3e 33 20 4e 25 3d 4e  |d..... D%>3 N%=N|
000001b0  25 2b 44 25 2d 34 3a e5  20 8d 74 56 40 0d 00 be  |%+D%-4:. .tV@...|
000001c0  38 eb 37 3a f1 8a 38 2c  31 30 29 22 44 65 61 6c  |8.7:..8,10)"Deal|
000001d0  20 4e 75 6d 62 65 72 20  77 61 73 20 22 3b 4d 25  | Number was ";M%|
000001e0  3b 8a 31 30 2c 31 32 29  22 52 65 64 65 61 6c 73  |;.10,12)"Redeals|
000001f0  20 22 3b 4e 25 0d 00 c8  05 e0 0d 00 d2 05 3a 0d  | ";N%.........:.|
00000200  00 dc 0a dd f2 69 6e 69  74 0d 00 e6 0d 49 25 3d  |.....init....I%=|
00000210  b3 28 2d 4d 25 29 0d 00  f0 29 e3 49 25 3d 30 b8  |.(-M%)...).I%=0.|
00000220  33 3a e3 4a 25 3d 31 b8  33 36 3a 45 25 3f 28 4a  |3:.J%=1.36:E%?(J|
00000230  25 2b 33 36 2a 49 25 29  3d 4a 25 3a ed 3a ed 0d  |%+36*I%)=J%:.:..|
00000240  00 fa 16 e3 4a 25 3d 30  b8 4e 25 3a e3 49 25 3d  |....J%=0.N%:.I%=|
00000250  31 b8 31 34 34 0d 01 04  2f 4c 25 3d b3 28 31 34  |1.144.../L%=.(14|
00000260  34 29 3a 4b 25 3d 45 25  3f 49 25 3a 45 25 3f 49  |4):K%=E%?I%:E%?I|
00000270  25 3d 45 25 3f 4c 25 3a  45 25 3f 4c 25 3d 4b 25  |%=E%?L%:E%?L%=K%|
00000280  3a ed 3a ed 0d 01 0e 26  f7 3a e3 49 25 3d 31 b8  |:.:....&.:.I%=1.|
00000290  38 3a f3 20 49 25 3f 46  25 2c 49 25 3f 47 25 2c  |8:. I%?F%,I%?G%,|
000002a0  49 25 3f 26 31 42 43 30  3a ed 0d 01 18 44 dc 20  |I%?&1BC0:....D. |
000002b0  32 2c 31 33 2c 30 2c 34  2c 31 31 2c 31 30 2c 33  |2,13,0,4,11,10,3|
000002c0  2c 31 32 2c 31 39 2c 31  2c 31 35 2c 33 31 2c 32  |,12,19,1,15,31,2|
000002d0  2c 31 35 2c 34 35 2c 33  2c 31 32 2c 35 36 2c 34  |,15,45,3,12,56,4|
000002e0  2c 31 31 2c 36 35 2c 32  2c 31 33 2c 37 35 0d 01  |,11,65,2,13,75..|
000002f0  22 1f e3 49 25 3d 39 b8  34 30 3a 46 25 3f 49 25  |"..I%=9.40:F%?I%|
00000300  3d 31 36 3a 47 25 3f 49  25 3d 30 3a ed 0d 01 2c  |=16:G%?I%=0:...,|
00000310  1a e3 4c 25 3d 31 b8 33  3a e3 20 4a 25 3d 4c 25  |..L%=1.3:. J%=L%|
00000320  2b 31 b8 38 2d 4c 25 0d  01 36 2c 4a 25 3f 28 46  |+1.8-L%..6,J%?(F|
00000330  25 2b 38 2a 4c 25 29 3d  4c 25 2b 34 3a 4a 25 3f  |%+8*L%)=L%+4:J%?|
00000340  28 47 25 2b 38 2a 4c 25  29 3d 31 31 2d 4c 25 3a  |(G%+8*L%)=11-L%:|
00000350  ed 3a ed 0d 01 40 23 46  25 3f 33 36 3d 37 3a 46  |.:...@#F%?36=7:F|
00000360  25 3f 33 37 3d 37 3a 47  25 3f 33 36 3d 38 3a 47  |%?37=7:G%?36=8:G|
00000370  25 3f 33 37 3d 38 0d 01  4a 13 21 74 25 3d 30 3a  |%?37=8..J.!t%=0:|
00000380  21 6c 25 3d 26 32 31 32  31 0d 01 54 24 3f 26 38  |!l%=&2121..T$?&8|
00000390  34 3d 30 3a 21 26 38 35  3d 26 45 30 30 3a 21 26  |4=0:!&85=&E00:!&|
000003a0  38 41 3d 26 31 30 30 3a  4c 25 3d 2d 31 0d 01 5e  |8A=&100:L%=-1..^|
000003b0  15 e3 4a 25 3d 30 b8 39  3a e3 49 25 3d 2d 31 b8  |..J%=0.9:.I%=-1.|
000003c0  31 38 0d 01 68 12 d6 62  6c 6e 6b 3a d6 70 72 74  |18..h..blnk:.prt|
000003d0  3a ed 3a ed 0d 01 72 14  ef 32 38 2c 30 2c 33 31  |:.:...r..28,0,31|
000003e0  2c 33 39 2c 32 38 3a db  0d 01 7c 16 e3 4c 25 3d  |,39,28:...|..L%=|
000003f0  30 b8 34 3a e3 20 4a 25  3d 31 20 b8 20 38 0d 01  |0.4:. J%=1 . 8..|
00000400  86 16 e3 49 25 3d 31 b8  31 35 3a d6 74 6c 3a ed  |...I%=1.15:.tl:.|
00000410  3a ed 3a ed 0d 01 90 68  46 25 3f 35 3d 31 3a f1  |:.:....hF%?5=1:.|
00000420  8a 31 2c 31 29 3b 22 54  49 4c 45 53 20 4c 45 46  |.1,1);"TILES LEF|
00000430  54 20 31 34 34 22 3b 3a  fb 31 3a f1 8a 32 35 2c  |T 144";:.1:..25,|
00000440  31 29 3b 22 54 41 49 50  45 49 22 3b 8a 32 35 2c  |1);"TAIPEI";.25,|
00000450  32 29 3b 22 2d 2d 2d 2d  2d 2d 22 3b 3a fb 32 3a  |2);"------";:.2:|
00000460  f1 8a 32 31 2c 33 29 3b  22 41 6c 62 65 72 74 20  |..21,3);"Albert |
00000470  47 61 72 64 6e 65 72 22  3b 3a fb 33 0d 01 9a 05  |Gardner";:.3....|
00000480  e1 0d 01 a4 05 3a 0d 01  ae 09 dd f2 65 6e 64 0d  |.....:......end.|
00000490  01 b8 16 db 3a fb 31 3a  f1 22 20 47 41 4d 45 20  |....:.1:." GAME |
000004a0  4f 56 45 52 22 0d 01 c2  1e fb 33 3a e7 4f 25 e5  |OVER".....3:.O%.|
000004b0  20 8d 64 6a 41 20 8b 20  f1 22 20 59 6f 75 20 57  | .djA . ." You W|
000004c0  69 6e 22 0d 01 cc 1a e3  49 25 3d 31 b8 36 3a f3  |in".....I%=1.6:.|
000004d0  20 58 25 3a d4 31 2c 31  2c 58 25 2c 36 0d 01 d6  | X%:.1,1,X%,6...|
000004e0  0c ed 3a e5 20 8d 64 74  41 0d 01 e0 17 dc 20 36  |..:. .dtA..... 6|
000004f0  33 2c 37 31 2c 37 39 2c  38 33 2c 38 33 2c 36 33  |3,71,79,83,83,63|
00000500  0d 01 ea 19 ef 37 3a f1  22 20 54 69 6c 65 73 20  |.....7:." Tiles |
00000510  6c 65 66 74 20 22 3b 4f  25 0d 01 f4 30 f1 20 22  |left ";O%...0. "|
00000520  20 41 6e 6f 74 68 65 72  20 67 61 6d 65 3f 22 3a  | Another game?":|
00000530  54 25 3d a5 80 26 44 46  3a e7 20 54 25 3d 38 39  |T%=..&DF:. T%=89|
00000540  20 44 25 3d 35 20 8b 20  e1 0d 01 fe 42 e7 20 4f  | D%=5 . ....B. O|
00000550  25 20 f1 22 20 53 61 6d  65 20 44 65 61 6c 20 28  |% ." Same Deal (|
00000560  53 29 20 6f 72 20 44 69  66 66 65 72 65 6e 74 20  |S) or Different |
00000570  28 44 29 3f 22 3a 54 25  3d a5 80 26 44 46 3a e7  |(D)?":T%=..&DF:.|
00000580  20 54 25 3d 38 33 20 44  25 3d 34 0d 02 08 05 e1  | T%=83 D%=4.....|
00000590  0d 02 12 05 3a 0d 02 1c  11 dd a4 74 28 49 25 2c  |....:......t(I%,|
000005a0  4a 25 2c 4c 25 29 0d 02  26 13 3d 28 ba 28 26 31  |J%,L%)..&.=(.(&1|
000005b0  43 34 33 29 29 83 32 35  36 0d 02 30 05 3a 0d 02  |C43)).256..0.:..|
000005c0  3a 07 dd a4 78 0d 02 44  1a 3d 28 55 25 3d 31 20  |:...x..D.=(U%=1 |
000005d0  84 20 55 25 3e 31 33 20  84 20 57 25 3d 34 29 0d  |. U%>13 . W%=4).|
000005e0  02 4e 05 3a 0d 02 58 0a  dd f2 70 61 69 72 0d 02  |.N.:..X...pair..|
000005f0  62 0c e7 3f 63 68 3d 31  20 e1 0d 02 6c 15 44 25  |b..?ch=1 ...l.D%|
00000600  3d 30 3a f2 4d 3a f5 3a  2a 46 58 32 31 2c 30 0d  |=0:.M:.:*FX21,0.|
00000610  02 76 12 54 25 3d a5 80  26 44 46 3a 51 25 3d 44  |.v.T%=..&DF:Q%=D|
00000620  25 0d 02 80 15 e7 54 25  3d 38 31 20 44 25 3d 33  |%.....T%=81 D%=3|
00000630  3a 3f 63 68 3d 31 0d 02  8a 15 e7 54 25 3d 38 33  |:?ch=1.....T%=83|
00000640  20 44 25 3d 34 3a 3f 63  68 3d 31 0d 02 94 15 e7  | D%=4:?ch=1.....|
00000650  54 25 3d 36 38 20 44 25  3d 35 3a 3f 63 68 3d 31  |T%=68 D%=5:?ch=1|
00000660  0d 02 9e 19 e7 54 25 3d  31 35 20 f2 6d 61 72 6b  |.....T%=15 .mark|
00000670  3a f2 64 6f 77 6e 3a f2  4d 0d 02 a8 17 e7 54 25  |:.down:.M.....T%|
00000680  3d 32 36 20 f2 6d 61 72  6b 3a f2 75 70 3a f2 4d  |=26 .mark:.up:.M|
00000690  0d 02 b2 19 e7 54 25 3d  39 30 20 f2 6d 61 72 6b  |.....T%=90 .mark|
000006a0  3a f2 6c 65 66 74 3a f2  4d 0d 02 bc 17 e7 54 25  |:.left:.M.....T%|
000006b0  3d 38 38 20 f2 6d 61 72  6b 3a f2 72 74 3a f2 4d  |=88 .mark:.rt:.M|
000006c0  0d 02 c6 14 e7 54 25 3d  37 32 20 e7 20 44 25 3d  |.....T%=72 . D%=|
000006d0  30 20 f2 48 0d 02 d0 0d  e7 54 25 3d 30 20 f2 73  |0 .H.....T%=0 .s|
000006e0  70 0d 02 da 09 fd 44 25  3e 31 0d 02 e4 05 e1 0d  |p.....D%>1......|
000006f0  02 ee 05 3a 0d 02 f8 08  dd f2 75 70 0d 03 02 0d  |...:......up....|
00000700  e7 20 a4 78 20 56 25 3d  34 0d 03 0c 1a f5 3a e7  |. .x V%=4.....:.|
00000710  56 25 3d 31 20 56 25 3d  38 20 8b 20 56 25 3d 56  |V%=1 V%=8 . V%=V|
00000720  25 2d 31 0d 03 16 0e fd  20 47 25 3f 56 25 3a f2  |%-1..... G%?V%:.|
00000730  55 0d 03 20 05 e1 0d 03  2a 05 3a 0d 03 34 0a dd  |U.. ....*.:..4..|
00000740  f2 64 6f 77 6e 0d 03 3e  0d e7 20 a4 78 20 56 25  |.down..>.. .x V%|
00000750  3d 35 0d 03 48 1a f5 3a  e7 56 25 3d 38 20 56 25  |=5..H..:.V%=8 V%|
00000760  3d 31 20 8b 20 56 25 3d  56 25 2b 31 0d 03 52 0e  |=1 . V%=V%+1..R.|
00000770  fd 20 47 25 3f 56 25 3a  f2 55 0d 03 5c 05 e1 0d  |. G%?V%:.U..\...|
00000780  03 66 05 3a 0d 03 70 07  dd f2 56 0d 03 7a 0b f2  |.f.:..p...V..z..|
00000790  55 3a f2 4d 3a e1 0d 03  84 05 20 0d 03 8e 07 dd  |U:.M:..... .....|
000007a0  f2 55 0d 03 98 12 d6 77  3a e7 57 25 3d 35 20 f2  |.U.....w:.W%=5 .|
000007b0  6c 65 66 74 0d 03 a2 05  e1 0d 03 ac 05 3a 0d 03  |left.........:..|
000007c0  b6 0a dd f2 6c 65 66 74  0d 03 c0 0e e7 57 25 3d  |....left.....W%=|
000007d0  34 20 55 25 3d 37 0d 03  ca 20 f5 20 55 25 3d 55  |4 U%=7... . U%=U|
000007e0  25 2d 31 3a e7 55 25 3c  46 25 3f 56 25 20 55 25  |%-1:.U%<F%?V% U%|
000007f0  3d 47 25 3f 56 25 0d 03  d4 0f d6 77 3a fd 20 57  |=G%?V%.....w:. W|
00000800  25 3c 35 3a e1 0d 03 de  05 3a 0d 03 e8 08 dd f2  |%<5:.....:......|
00000810  72 74 0d 03 f2 0e e7 57  25 3d 34 20 55 25 3d 38  |rt.....W%=4 U%=8|
00000820  0d 03 fc 20 f5 20 55 25  3d 55 25 2b 31 3a e7 55  |... . U%=U%+1:.U|
00000830  25 3e 47 25 3f 56 25 20  55 25 3d 46 25 3f 56 25  |%>G%?V% U%=F%?V%|
00000840  0d 04 06 0f d6 77 3a fd  20 57 25 3c 35 3a e1 0d  |.....w:. W%<5:..|
00000850  04 10 05 3a 0d 04 1a 0c  dd f2 48 3a 48 25 3d 30  |...:......H:H%=0|
00000860  0d 04 24 19 fb 31 3a f1  8a 31 2c 33 29 22 48 45  |..$..1:..1,3)"HE|
00000870  4c 50 20 6d 6f 64 65 22  3b 0d 04 2e 21 f5 3a 48  |LP mode";...!.:H|
00000880  25 3d 48 25 2b 31 3a fd  64 25 3f 48 25 3a e7 48  |%=H%+1:.d%?H%:.H|
00000890  25 3d 33 37 20 e5 8d 44  56 44 0d 04 38 28 f2 6d  |%=37 ..DVD..8(.m|
000008a0  61 72 6b 3a 55 25 3d 28  63 25 3f 48 25 29 83 31  |ark:U%=(c%?H%).1|
000008b0  36 3a 56 25 3d 28 63 25  3f 48 25 29 81 31 36 3a  |6:V%=(c%?H%).16:|
000008c0  f2 56 0d 04 42 2f f2 73  70 3a 55 25 3d 28 64 25  |.V..B/.sp:U%=(d%|
000008d0  3f 48 25 29 83 31 36 3a  56 25 3d 28 64 25 3f 48  |?H%).16:V%=(d%?H|
000008e0  25 29 81 31 36 3a f2 56  3a 54 25 3d a5 80 26 44  |%).16:.V:T%=..&D|
000008f0  46 0d 04 4c 1c e7 54 25  f2 43 3a e7 54 25 3d 37  |F..L..T%.C:.T%=7|
00000900  32 20 51 25 3d 30 3a e5  20 8d 54 6e 44 0d 04 56  |2 Q%=0:. .TnD..V|
00000910  12 f1 8a 31 2c 33 29 89  28 39 29 3b 3a fb 33 0d  |...1,3).(9);:.3.|
00000920  04 60 05 e1 0d 04 6a 05  3a 0d 04 74 07 dd f2 4d  |.`....j.:..t...M|
00000930  0d 04 7e 0b 51 25 3d 44  25 2b 32 0d 04 88 0a dd  |..~.Q%=D%+2.....|
00000940  f2 6d 61 72 6b 0d 04 92  17 e7 44 25 3d 31 80 55  |.mark.....D%=1.U|
00000950  25 3d 52 25 80 56 25 3d  53 25 20 e1 0d 04 9c 1b  |%=R%.V%=S% .....|
00000960  4b 25 3d a4 74 28 55 25  2c 56 25 2c 57 25 29 3a  |K%=.t(U%,V%,W%):|
00000970  e7 4b 25 3d 30 20 e1 0d  04 a6 25 49 25 3d 55 25  |.K%=0 ....%I%=U%|
00000980  3a 4a 25 3d 56 25 3a 4c  25 3d 57 25 3a 21 74 25  |:J%=V%:L%=W%:!t%|
00000990  3d 30 3a 21 6c 25 3d 26  32 31 32 31 0d 04 b0 14  |=0:!l%=&2121....|
000009a0  d6 73 70 72 3a 41 25 3d  51 25 3a d6 26 39 30 30  |.spr:A%=Q%:.&900|
000009b0  0d 04 ba 05 e1 0d 04 c4  05 3a 0d 04 ce 08 dd f2  |.........:......|
000009c0  73 70 0d 04 d8 17 e7 20  a4 78 20 56 25 3d 34 3a  |sp..... .x V%=4:|
000009d0  e7 57 25 3d 34 55 25 3d  37 0d 04 e2 22 e7 44 25  |.W%=4U%=7...".D%|
000009e0  3d 30 20 44 25 3d 31 3a  52 25 3d 55 25 3a 53 25  |=0 D%=1:R%=U%:S%|
000009f0  3d 56 25 3a 5a 25 3d 57  25 3a e1 0d 04 ec 17 e7  |=V%:Z%=W%:......|
00000a00  52 25 3d 55 25 80 53 25  3d 56 25 20 44 25 3d 30  |R%=U%.S%=V% D%=0|
00000a10  3a e1 0d 04 f6 2b e7 a4  74 28 52 25 2c 53 25 2c  |:....+..t(R%,S%,|
00000a20  5a 25 29 3d a4 74 28 55  25 2c 56 25 2c 57 25 29  |Z%)=.t(U%,V%,W%)|
00000a30  20 f2 72 65 6d 20 8b 20  ef 37 3a f2 43 0d 05 00  | .rem . .7:.C...|
00000a40  05 e1 0d 05 0a 05 3a 0d  05 14 09 dd f2 72 65 6d  |......:......rem|
00000a50  0d 05 1e 1f d6 6f 66 66  3a 52 25 3d 55 25 3a 53  |.....off:R%=U%:S|
00000a60  25 3d 56 25 3a 5a 25 3d  57 25 3a d6 6f 66 66 0d  |%=V%:Z%=W%:.off.|
00000a70  05 28 18 4f 25 3d 4f 25  2d 32 3a e7 20 4f 25 3d  |.(.O%=O%-2:. O%=|
00000a80  30 20 e5 8d 44 46 45 0d  05 32 24 e7 20 44 25 3d  |0 ..DFE..2$. D%=|
00000a90  31 20 f2 72 74 20 8b e7  20 44 25 3d 32 20 f2 6c  |1 .rt .. D%=2 .l|
00000aa0  65 66 74 20 8b 20 f2 64  6f 77 6e 0d 05 3c 1a f1  |eft . .down..<..|
00000ab0  8a 31 32 2c 31 29 3b 89  28 34 29 3b 8a 31 32 2c  |.12,1);.(4);.12,|
00000ac0  31 29 3b 4f 25 0d 05 46  0a 44 25 3d 32 3a e1 0d  |1);O%..F.D%=2:..|
00000ad0  05 50 05 3a 0d 05 5a 07  dd f2 43 0d 05 64 27 51  |.P.:..Z...C..d'Q|
00000ae0  25 3d 31 3a f2 6d 61 72  6b 3a 44 25 3d 30 3a 55  |%=1:.mark:D%=0:U|
00000af0  25 3d 52 25 3a 56 25 3d  53 25 3a 57 25 3d 5a 25  |%=R%:V%=S%:W%=Z%|
00000b00  3a e1 0d ff                                       |:...|
00000b04