� Magic Letter (EUG #53)
#� Elk Version : (The) Dave 2000
� You Think Of A Letter
("� And The Computer Guesses It!
2� By Rushden Roy Dickens
<*FX4,0  
F
�*FX200,1
P�1:�23;8202;0;0;0;
Z��23,128,255,255,192,192,192,192,192,192,23,129,255,255,0,0,0,0,0,0,23,130,252,252,15,15,3,3,3,3,23,131,255,255,3,3,3,3,3,3,23,132,255,255,60,60,60,60,60,60,23,133,192,192,192,192,192,192,192,192,23,134,24,24,0,0,0,0,24,24
d��23,135,3,3,15,15,15,15,3,3,23,136,3,3,3,3,3,3,3,3,23,137,0,0,0,24,24,0,0,0,23,138,192,192,192,240,240,48,48,48,23,139,3,3,3,15,15,12,12,12,23,140,255,255,195,195,195,195,195,195,23,141,63,63,48,48,48,48,63,63
n��23,142,192,192,192,192,192,192,255,255,23,143,24,24,24,24,24,24,255,255,23,144,0,0,0,0,0,0,255,255,23,145,3,3,3,3,3,3,255,255,23,146,48,48,48,48,48,48,63,63,23,147,12,12,12,12,12,12,252,252,23,148,195,195,195,195,195,195,195,195
x+�23,140,255,255,195,195,195,195,195,195
���23,149,48,48,48,48,48,48,48,48,23,150,195,195,195,195,195,195,255,255,23,151,3,3,3,3,15,15,252,252,23,152,48,48,48,48,48,48,63,63
���23,153,63,63,48,48,48,48,48,48,23,154,255,255,0,0,0,0,255,255,23,155,255,255,24,24,24,24,24,24,23,156,255,255,3,3,3,3,255,255,23,157,0,0,24,24,24,24,24,24
�*�19,1,3;0;19,2,2;0;19,3,1;0;:X%=7:Y%=2
�-�1:�X%,Y%)"��������� ����PROGRAM BY����"
�/�2:�X%,Y%+1)"������� ��������������������"
�/�3:�X%,Y%+2)"������������� ����� �� � ���"
�/�1:�X%,Y%+3)"�������� �������������������"
�+�3:�'"         A MIND READING COMPUTER"
�?�3:�SC(0,11,"AB CD EF GH IJ KL MN OP QR ST UV WX YZ ",1,11)
�9�1:�0,15)"All you need to do is think of a letter,"'
�?�"and, after five screens, the computer"'''"will guess it!"
�(�2:�9,31)"PRESS SPACE WHEN READY!";
��("FX 21"):���=32

�28,0,31,39,12

T=0

S$="Screen"

",A$="If the letter you're thinking of is"

,%B$="in this list then press <Y>."

6%C$="If it isn't, then press <N>."

@"� ----------------------------

J!�:�3:�'�(26);S$;" 1 of 5";:�2

TL�'''�(7)"A - C - E - G - I - K - M"'''�(7)"- O - Q - S - U - W - Y -":�1

^#�'''"  ";A$'''"  ";B$'''"  ";C$

h2�ANS$=�:�ANS$="Y"�ANS$="N":�ANS$="Y"�T=T+1�T=T

r�1,-10,175,5 

|!�:�3:�'�(26);S$;" 2 of 5";:�2

�L�'''�(7)"- B C - - F G - - J K - -"'''�(7)"N O - - R S - - V W - - Z":�1

�#�'''"  ";A$'''"  ";B$'''"  ";C$

�3�ANS$=�:�ANS$="Y"�ANS$="N":�ANS$="Y"�T=T+2�T=T 

��1,-10,175,5

�!�:�3:�'�(26);S$;" 3 of 5";:�2

�L�'''�(7)"- - - D E F G - - - - L M"'''�(7)"N O - - - - T U V W - - -":�1

�#�'''"  ";A$'''"  ";B$'''"  ";C$

�3�ANS$=�:�ANS$="Y"�ANS$="N":�ANS$="Y"�T=T+4�T=T 

��1,-10,175,5

�!�:�3:�'�(26);S$;" 4 of 5";:�2

�L�'''�(7)"- - - - - - - H I J K L M"'''�(7)"N O - - - - - - - - X Y Z":�1

�#�'''"  ";A$'''"  ";B$'''"  ";C$

�2�ANS$=�:�ANS$="Y"�ANS$="N":�ANS$="Y"�T=T+8�T=T
�1,-10,175,5
!�:�3:�'�(26);S$;" 5 of 5";:�2
L�'''�(7)"- - - - - - - - - - - - -"'''�(7)"- - P Q R S T U V W X Y Z":�1
&#�'''"  ";A$'''"  ";B$'''"  ";C$
04�ANS$=�:�ANS$="Y"�ANS$="N":�ANS$="Y"�T=T+16�T=T 
:�1,-10,175,5
D�
N"�10,3)"You were thinking of:"
X;�1,10,-8,8,0,10,0,126,0,0,-126,-126,126,126:�1,1,150,20
bk� T+64>90�T+64<65:�13,5)"I'm confused!!!"�2,11)"Were you pressing the Y/N correctly?"� �19,8);�(T+64)
l"�2:�12,15)"Another go (Y/N)";
v �="Y"��:�28,0,31,39,0:�dR@
��Z=1�850:�Z
�
*FX4,0
� �6:�23;8202;0;0;0;:�"$.MENU"
��
�� �SC(X,Y,A$,C,N)
�B$=A$+A$
�
� A=1 � N
�C=1
�� S=1 � � A$  
�� �X,Y);�B$,S,� A$) 
��-256<>1 � �A=1�100:�A
�	� S  
��
�

00000000  0d 00 0a 1c f4 20 4d 61  67 69 63 20 4c 65 74 74  |..... Magic Lett|
00000010  65 72 20 28 45 55 47 20  23 35 33 29 0d 00 14 23  |er (EUG #53)...#|
00000020  f4 20 45 6c 6b 20 56 65  72 73 69 6f 6e 20 3a 20  |. Elk Version : |
00000030  28 54 68 65 29 20 44 61  76 65 20 32 30 30 30 0d  |(The) Dave 2000.|
00000040  00 1e 1b f4 20 59 6f 75  20 54 68 69 6e 6b 20 4f  |.... You Think O|
00000050  66 20 41 20 4c 65 74 74  65 72 0d 00 28 22 f4 20  |f A Letter..(". |
00000060  41 6e 64 20 54 68 65 20  43 6f 6d 70 75 74 65 72  |And The Computer|
00000070  20 47 75 65 73 73 65 73  20 49 74 21 0d 00 32 1c  | Guesses It!..2.|
00000080  f4 20 42 79 20 52 75 73  68 64 65 6e 20 52 6f 79  |. By Rushden Roy|
00000090  20 44 69 63 6b 65 6e 73  0d 00 3c 0c 2a 46 58 34  | Dickens..<.*FX4|
000000a0  2c 30 20 20 0d 00 46 0d  f4 2a 46 58 32 30 30 2c  |,0  ..F..*FX200,|
000000b0  31 0d 00 50 16 eb 31 3a  ef 32 33 3b 38 32 30 32  |1..P..1:.23;8202|
000000c0  3b 30 3b 30 3b 30 3b 0d  00 5a e1 ef 32 33 2c 31  |;0;0;0;..Z..23,1|
000000d0  32 38 2c 32 35 35 2c 32  35 35 2c 31 39 32 2c 31  |28,255,255,192,1|
000000e0  39 32 2c 31 39 32 2c 31  39 32 2c 31 39 32 2c 31  |92,192,192,192,1|
000000f0  39 32 2c 32 33 2c 31 32  39 2c 32 35 35 2c 32 35  |92,23,129,255,25|
00000100  35 2c 30 2c 30 2c 30 2c  30 2c 30 2c 30 2c 32 33  |5,0,0,0,0,0,0,23|
00000110  2c 31 33 30 2c 32 35 32  2c 32 35 32 2c 31 35 2c  |,130,252,252,15,|
00000120  31 35 2c 33 2c 33 2c 33  2c 33 2c 32 33 2c 31 33  |15,3,3,3,3,23,13|
00000130  31 2c 32 35 35 2c 32 35  35 2c 33 2c 33 2c 33 2c  |1,255,255,3,3,3,|
00000140  33 2c 33 2c 33 2c 32 33  2c 31 33 32 2c 32 35 35  |3,3,3,23,132,255|
00000150  2c 32 35 35 2c 36 30 2c  36 30 2c 36 30 2c 36 30  |,255,60,60,60,60|
00000160  2c 36 30 2c 36 30 2c 32  33 2c 31 33 33 2c 31 39  |,60,60,23,133,19|
00000170  32 2c 31 39 32 2c 31 39  32 2c 31 39 32 2c 31 39  |2,192,192,192,19|
00000180  32 2c 31 39 32 2c 31 39  32 2c 31 39 32 2c 32 33  |2,192,192,192,23|
00000190  2c 31 33 34 2c 32 34 2c  32 34 2c 30 2c 30 2c 30  |,134,24,24,0,0,0|
000001a0  2c 30 2c 32 34 2c 32 34  0d 00 64 d5 ef 32 33 2c  |,0,24,24..d..23,|
000001b0  31 33 35 2c 33 2c 33 2c  31 35 2c 31 35 2c 31 35  |135,3,3,15,15,15|
000001c0  2c 31 35 2c 33 2c 33 2c  32 33 2c 31 33 36 2c 33  |,15,3,3,23,136,3|
000001d0  2c 33 2c 33 2c 33 2c 33  2c 33 2c 33 2c 33 2c 32  |,3,3,3,3,3,3,3,2|
000001e0  33 2c 31 33 37 2c 30 2c  30 2c 30 2c 32 34 2c 32  |3,137,0,0,0,24,2|
000001f0  34 2c 30 2c 30 2c 30 2c  32 33 2c 31 33 38 2c 31  |4,0,0,0,23,138,1|
00000200  39 32 2c 31 39 32 2c 31  39 32 2c 32 34 30 2c 32  |92,192,192,240,2|
00000210  34 30 2c 34 38 2c 34 38  2c 34 38 2c 32 33 2c 31  |40,48,48,48,23,1|
00000220  33 39 2c 33 2c 33 2c 33  2c 31 35 2c 31 35 2c 31  |39,3,3,3,15,15,1|
00000230  32 2c 31 32 2c 31 32 2c  32 33 2c 31 34 30 2c 32  |2,12,12,23,140,2|
00000240  35 35 2c 32 35 35 2c 31  39 35 2c 31 39 35 2c 31  |55,255,195,195,1|
00000250  39 35 2c 31 39 35 2c 31  39 35 2c 31 39 35 2c 32  |95,195,195,195,2|
00000260  33 2c 31 34 31 2c 36 33  2c 36 33 2c 34 38 2c 34  |3,141,63,63,48,4|
00000270  38 2c 34 38 2c 34 38 2c  36 33 2c 36 33 0d 00 6e  |8,48,48,63,63..n|
00000280  e9 ef 32 33 2c 31 34 32  2c 31 39 32 2c 31 39 32  |..23,142,192,192|
00000290  2c 31 39 32 2c 31 39 32  2c 31 39 32 2c 31 39 32  |,192,192,192,192|
000002a0  2c 32 35 35 2c 32 35 35  2c 32 33 2c 31 34 33 2c  |,255,255,23,143,|
000002b0  32 34 2c 32 34 2c 32 34  2c 32 34 2c 32 34 2c 32  |24,24,24,24,24,2|
000002c0  34 2c 32 35 35 2c 32 35  35 2c 32 33 2c 31 34 34  |4,255,255,23,144|
000002d0  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 2c 32 35 35  |,0,0,0,0,0,0,255|
000002e0  2c 32 35 35 2c 32 33 2c  31 34 35 2c 33 2c 33 2c  |,255,23,145,3,3,|
000002f0  33 2c 33 2c 33 2c 33 2c  32 35 35 2c 32 35 35 2c  |3,3,3,3,255,255,|
00000300  32 33 2c 31 34 36 2c 34  38 2c 34 38 2c 34 38 2c  |23,146,48,48,48,|
00000310  34 38 2c 34 38 2c 34 38  2c 36 33 2c 36 33 2c 32  |48,48,48,63,63,2|
00000320  33 2c 31 34 37 2c 31 32  2c 31 32 2c 31 32 2c 31  |3,147,12,12,12,1|
00000330  32 2c 31 32 2c 31 32 2c  32 35 32 2c 32 35 32 2c  |2,12,12,252,252,|
00000340  32 33 2c 31 34 38 2c 31  39 35 2c 31 39 35 2c 31  |23,148,195,195,1|
00000350  39 35 2c 31 39 35 2c 31  39 35 2c 31 39 35 2c 31  |95,195,195,195,1|
00000360  39 35 2c 31 39 35 0d 00  78 2b ef 32 33 2c 31 34  |95,195..x+.23,14|
00000370  30 2c 32 35 35 2c 32 35  35 2c 31 39 35 2c 31 39  |0,255,255,195,19|
00000380  35 2c 31 39 35 2c 31 39  35 2c 31 39 35 2c 31 39  |5,195,195,195,19|
00000390  35 0d 00 82 86 ef 32 33  2c 31 34 39 2c 34 38 2c  |5.....23,149,48,|
000003a0  34 38 2c 34 38 2c 34 38  2c 34 38 2c 34 38 2c 34  |48,48,48,48,48,4|
000003b0  38 2c 34 38 2c 32 33 2c  31 35 30 2c 31 39 35 2c  |8,48,23,150,195,|
000003c0  31 39 35 2c 31 39 35 2c  31 39 35 2c 31 39 35 2c  |195,195,195,195,|
000003d0  31 39 35 2c 32 35 35 2c  32 35 35 2c 32 33 2c 31  |195,255,255,23,1|
000003e0  35 31 2c 33 2c 33 2c 33  2c 33 2c 31 35 2c 31 35  |51,3,3,3,3,15,15|
000003f0  2c 32 35 32 2c 32 35 32  2c 32 33 2c 31 35 32 2c  |,252,252,23,152,|
00000400  34 38 2c 34 38 2c 34 38  2c 34 38 2c 34 38 2c 34  |48,48,48,48,48,4|
00000410  38 2c 36 33 2c 36 33 0d  00 8c 9f ef 32 33 2c 31  |8,63,63.....23,1|
00000420  35 33 2c 36 33 2c 36 33  2c 34 38 2c 34 38 2c 34  |53,63,63,48,48,4|
00000430  38 2c 34 38 2c 34 38 2c  34 38 2c 32 33 2c 31 35  |8,48,48,48,23,15|
00000440  34 2c 32 35 35 2c 32 35  35 2c 30 2c 30 2c 30 2c  |4,255,255,0,0,0,|
00000450  30 2c 32 35 35 2c 32 35  35 2c 32 33 2c 31 35 35  |0,255,255,23,155|
00000460  2c 32 35 35 2c 32 35 35  2c 32 34 2c 32 34 2c 32  |,255,255,24,24,2|
00000470  34 2c 32 34 2c 32 34 2c  32 34 2c 32 33 2c 31 35  |4,24,24,24,23,15|
00000480  36 2c 32 35 35 2c 32 35  35 2c 33 2c 33 2c 33 2c  |6,255,255,3,3,3,|
00000490  33 2c 32 35 35 2c 32 35  35 2c 32 33 2c 31 35 37  |3,255,255,23,157|
000004a0  2c 30 2c 30 2c 32 34 2c  32 34 2c 32 34 2c 32 34  |,0,0,24,24,24,24|
000004b0  2c 32 34 2c 32 34 0d 00  96 2a ef 31 39 2c 31 2c  |,24,24...*.19,1,|
000004c0  33 3b 30 3b 31 39 2c 32  2c 32 3b 30 3b 31 39 2c  |3;0;19,2,2;0;19,|
000004d0  33 2c 31 3b 30 3b 3a 58  25 3d 37 3a 59 25 3d 32  |3,1;0;:X%=7:Y%=2|
000004e0  0d 00 a0 2d fb 31 3a f1  8a 58 25 2c 59 25 29 22  |...-.1:..X%,Y%)"|
000004f0  80 81 82 80 81 83 80 84  83 20 81 81 81 81 50 52  |......... ....PR|
00000500  4f 47 52 41 4d 20 42 59  81 81 81 81 22 0d 00 aa  |OGRAM BY...."...|
00000510  2f fb 32 3a f1 8a 58 25  2c 59 25 2b 31 29 22 85  |/.2:..X%,Y%+1)".|
00000520  86 87 85 89 88 8a 20 8b  80 81 82 8c 81 81 83 80  |...... .........|
00000530  9b 83 81 81 83 81 81 81  80 81 83 22 0d 00 b4 2f  |...........".../|
00000540  fb 33 3a f1 8a 58 25 2c  59 25 2b 32 29 22 8e 8f  |.3:..X%,Y%+2)"..|
00000550  91 8e 90 91 92 90 93 85  89 88 94 20 8d 9a 85 86  |........... ....|
00000560  87 20 9a 9c 20 9d 20 8e  9a 83 22 0d 00 be 2f fb  |. .. . ...".../.|
00000570  31 3a f1 8a 58 25 2c 59  25 2b 33 29 22 90 90 90  |1:..X%,Y%+3)"...|
00000580  90 90 90 90 90 20 8e 90  97 96 90 90 91 8e 8f 91  |..... ..........|
00000590  90 90 91 90 8f 90 8e 90  91 22 0d 00 c8 2b fb 33  |........."...+.3|
000005a0  3a f1 27 22 20 20 20 20  20 20 20 20 20 41 20 4d  |:.'"         A M|
000005b0  49 4e 44 20 52 45 41 44  49 4e 47 20 43 4f 4d 50  |IND READING COMP|
000005c0  55 54 45 52 22 0d 00 d2  3f fb 33 3a f2 53 43 28  |UTER"...?.3:.SC(|
000005d0  30 2c 31 31 2c 22 41 42  20 43 44 20 45 46 20 47  |0,11,"AB CD EF G|
000005e0  48 20 49 4a 20 4b 4c 20  4d 4e 20 4f 50 20 51 52  |H IJ KL MN OP QR|
000005f0  20 53 54 20 55 56 20 57  58 20 59 5a 20 22 2c 31  | ST UV WX YZ ",1|
00000600  2c 31 31 29 0d 00 dc 39  fb 31 3a f1 8a 30 2c 31  |,11)...9.1:..0,1|
00000610  35 29 22 41 6c 6c 20 79  6f 75 20 6e 65 65 64 20  |5)"All you need |
00000620  74 6f 20 64 6f 20 69 73  20 74 68 69 6e 6b 20 6f  |to do is think o|
00000630  66 20 61 20 6c 65 74 74  65 72 2c 22 27 0d 00 e6  |f a letter,"'...|
00000640  3f f1 22 61 6e 64 2c 20  61 66 74 65 72 20 66 69  |?."and, after fi|
00000650  76 65 20 73 63 72 65 65  6e 73 2c 20 74 68 65 20  |ve screens, the |
00000660  63 6f 6d 70 75 74 65 72  22 27 27 27 22 77 69 6c  |computer"'''"wil|
00000670  6c 20 67 75 65 73 73 20  69 74 21 22 0d 00 f0 28  |l guess it!"...(|
00000680  fb 32 3a f1 8a 39 2c 33  31 29 22 50 52 45 53 53  |.2:..9,31)"PRESS|
00000690  20 53 50 41 43 45 20 57  48 45 4e 20 52 45 41 44  | SPACE WHEN READ|
000006a0  59 21 22 3b 0d 00 fa 15  ff 28 22 46 58 20 32 31  |Y!";.....("FX 21|
000006b0  22 29 3a f5 fd a5 3d 33  32 0d 01 04 12 ef 32 38  |"):...=32.....28|
000006c0  2c 30 2c 33 31 2c 33 39  2c 31 32 0d 01 0e 07 54  |,0,31,39,12....T|
000006d0  3d 30 0d 01 18 0f 53 24  3d 22 53 63 72 65 65 6e  |=0....S$="Screen|
000006e0  22 0d 01 22 2c 41 24 3d  22 49 66 20 74 68 65 20  |"..",A$="If the |
000006f0  6c 65 74 74 65 72 20 79  6f 75 27 72 65 20 74 68  |letter you're th|
00000700  69 6e 6b 69 6e 67 20 6f  66 20 69 73 22 0d 01 2c  |inking of is"..,|
00000710  25 42 24 3d 22 69 6e 20  74 68 69 73 20 6c 69 73  |%B$="in this lis|
00000720  74 20 74 68 65 6e 20 70  72 65 73 73 20 3c 59 3e  |t then press <Y>|
00000730  2e 22 0d 01 36 25 43 24  3d 22 49 66 20 69 74 20  |."..6%C$="If it |
00000740  69 73 6e 27 74 2c 20 74  68 65 6e 20 70 72 65 73  |isn't, then pres|
00000750  73 20 3c 4e 3e 2e 22 0d  01 40 22 f4 20 2d 2d 2d  |s <N>."..@". ---|
00000760  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
00000770  2d 2d 2d 2d 2d 2d 2d 2d  2d 0d 01 4a 21 db 3a fb  |---------..J!.:.|
00000780  33 3a f1 27 89 28 32 36  29 3b 53 24 3b 22 20 31  |3:.'.(26);S$;" 1|
00000790  20 6f 66 20 35 22 3b 3a  fb 32 0d 01 54 4c f1 27  | of 5";:.2..TL.'|
000007a0  27 27 89 28 37 29 22 41  20 2d 20 43 20 2d 20 45  |''.(7)"A - C - E|
000007b0  20 2d 20 47 20 2d 20 49  20 2d 20 4b 20 2d 20 4d  | - G - I - K - M|
000007c0  22 27 27 27 89 28 37 29  22 2d 20 4f 20 2d 20 51  |"'''.(7)"- O - Q|
000007d0  20 2d 20 53 20 2d 20 55  20 2d 20 57 20 2d 20 59  | - S - U - W - Y|
000007e0  20 2d 22 3a fb 31 0d 01  5e 23 f1 27 27 27 22 20  | -":.1..^#.'''" |
000007f0  20 22 3b 41 24 27 27 27  22 20 20 22 3b 42 24 27  | ";A$'''"  ";B$'|
00000800  27 27 22 20 20 22 3b 43  24 0d 01 68 32 f5 41 4e  |''"  ";C$..h2.AN|
00000810  53 24 3d be 3a fd 41 4e  53 24 3d 22 59 22 84 41  |S$=.:.ANS$="Y".A|
00000820  4e 53 24 3d 22 4e 22 3a  e7 41 4e 53 24 3d 22 59  |NS$="N":.ANS$="Y|
00000830  22 8c 54 3d 54 2b 31 8b  54 3d 54 0d 01 72 11 d4  |".T=T+1.T=T..r..|
00000840  31 2c 2d 31 30 2c 31 37  35 2c 35 20 0d 01 7c 21  |1,-10,175,5 ..|!|
00000850  db 3a fb 33 3a f1 27 89  28 32 36 29 3b 53 24 3b  |.:.3:.'.(26);S$;|
00000860  22 20 32 20 6f 66 20 35  22 3b 3a fb 32 0d 01 86  |" 2 of 5";:.2...|
00000870  4c f1 27 27 27 89 28 37  29 22 2d 20 42 20 43 20  |L.'''.(7)"- B C |
00000880  2d 20 2d 20 46 20 47 20  2d 20 2d 20 4a 20 4b 20  |- - F G - - J K |
00000890  2d 20 2d 22 27 27 27 89  28 37 29 22 4e 20 4f 20  |- -"'''.(7)"N O |
000008a0  2d 20 2d 20 52 20 53 20  2d 20 2d 20 56 20 57 20  |- - R S - - V W |
000008b0  2d 20 2d 20 5a 22 3a fb  31 0d 01 90 23 f1 27 27  |- - Z":.1...#.''|
000008c0  27 22 20 20 22 3b 41 24  27 27 27 22 20 20 22 3b  |'"  ";A$'''"  ";|
000008d0  42 24 27 27 27 22 20 20  22 3b 43 24 0d 01 9a 33  |B$'''"  ";C$...3|
000008e0  f5 41 4e 53 24 3d be 3a  fd 41 4e 53 24 3d 22 59  |.ANS$=.:.ANS$="Y|
000008f0  22 84 41 4e 53 24 3d 22  4e 22 3a e7 41 4e 53 24  |".ANS$="N":.ANS$|
00000900  3d 22 59 22 8c 54 3d 54  2b 32 8b 54 3d 54 20 0d  |="Y".T=T+2.T=T .|
00000910  01 a4 10 d4 31 2c 2d 31  30 2c 31 37 35 2c 35 0d  |....1,-10,175,5.|
00000920  01 ae 21 db 3a fb 33 3a  f1 27 89 28 32 36 29 3b  |..!.:.3:.'.(26);|
00000930  53 24 3b 22 20 33 20 6f  66 20 35 22 3b 3a fb 32  |S$;" 3 of 5";:.2|
00000940  0d 01 b8 4c f1 27 27 27  89 28 37 29 22 2d 20 2d  |...L.'''.(7)"- -|
00000950  20 2d 20 44 20 45 20 46  20 47 20 2d 20 2d 20 2d  | - D E F G - - -|
00000960  20 2d 20 4c 20 4d 22 27  27 27 89 28 37 29 22 4e  | - L M"'''.(7)"N|
00000970  20 4f 20 2d 20 2d 20 2d  20 2d 20 54 20 55 20 56  | O - - - - T U V|
00000980  20 57 20 2d 20 2d 20 2d  22 3a fb 31 0d 01 c2 23  | W - - -":.1...#|
00000990  f1 27 27 27 22 20 20 22  3b 41 24 27 27 27 22 20  |.'''"  ";A$'''" |
000009a0  20 22 3b 42 24 27 27 27  22 20 20 22 3b 43 24 0d  | ";B$'''"  ";C$.|
000009b0  01 cc 33 f5 41 4e 53 24  3d be 3a fd 41 4e 53 24  |..3.ANS$=.:.ANS$|
000009c0  3d 22 59 22 84 41 4e 53  24 3d 22 4e 22 3a e7 41  |="Y".ANS$="N":.A|
000009d0  4e 53 24 3d 22 59 22 8c  54 3d 54 2b 34 8b 54 3d  |NS$="Y".T=T+4.T=|
000009e0  54 20 0d 01 d6 10 d4 31  2c 2d 31 30 2c 31 37 35  |T .....1,-10,175|
000009f0  2c 35 0d 01 e0 21 db 3a  fb 33 3a f1 27 89 28 32  |,5...!.:.3:.'.(2|
00000a00  36 29 3b 53 24 3b 22 20  34 20 6f 66 20 35 22 3b  |6);S$;" 4 of 5";|
00000a10  3a fb 32 0d 01 ea 4c f1  27 27 27 89 28 37 29 22  |:.2...L.'''.(7)"|
00000a20  2d 20 2d 20 2d 20 2d 20  2d 20 2d 20 2d 20 48 20  |- - - - - - - H |
00000a30  49 20 4a 20 4b 20 4c 20  4d 22 27 27 27 89 28 37  |I J K L M"'''.(7|
00000a40  29 22 4e 20 4f 20 2d 20  2d 20 2d 20 2d 20 2d 20  |)"N O - - - - - |
00000a50  2d 20 2d 20 2d 20 58 20  59 20 5a 22 3a fb 31 0d  |- - - X Y Z":.1.|
00000a60  01 f4 23 f1 27 27 27 22  20 20 22 3b 41 24 27 27  |..#.'''"  ";A$''|
00000a70  27 22 20 20 22 3b 42 24  27 27 27 22 20 20 22 3b  |'"  ";B$'''"  ";|
00000a80  43 24 0d 01 fe 32 f5 41  4e 53 24 3d be 3a fd 41  |C$...2.ANS$=.:.A|
00000a90  4e 53 24 3d 22 59 22 84  41 4e 53 24 3d 22 4e 22  |NS$="Y".ANS$="N"|
00000aa0  3a e7 41 4e 53 24 3d 22  59 22 8c 54 3d 54 2b 38  |:.ANS$="Y".T=T+8|
00000ab0  8b 54 3d 54 0d 02 08 10  d4 31 2c 2d 31 30 2c 31  |.T=T.....1,-10,1|
00000ac0  37 35 2c 35 0d 02 12 21  db 3a fb 33 3a f1 27 89  |75,5...!.:.3:.'.|
00000ad0  28 32 36 29 3b 53 24 3b  22 20 35 20 6f 66 20 35  |(26);S$;" 5 of 5|
00000ae0  22 3b 3a fb 32 0d 02 1c  4c f1 27 27 27 89 28 37  |";:.2...L.'''.(7|
00000af0  29 22 2d 20 2d 20 2d 20  2d 20 2d 20 2d 20 2d 20  |)"- - - - - - - |
00000b00  2d 20 2d 20 2d 20 2d 20  2d 20 2d 22 27 27 27 89  |- - - - - -"'''.|
00000b10  28 37 29 22 2d 20 2d 20  50 20 51 20 52 20 53 20  |(7)"- - P Q R S |
00000b20  54 20 55 20 56 20 57 20  58 20 59 20 5a 22 3a fb  |T U V W X Y Z":.|
00000b30  31 0d 02 26 23 f1 27 27  27 22 20 20 22 3b 41 24  |1..&#.'''"  ";A$|
00000b40  27 27 27 22 20 20 22 3b  42 24 27 27 27 22 20 20  |'''"  ";B$'''"  |
00000b50  22 3b 43 24 0d 02 30 34  f5 41 4e 53 24 3d be 3a  |";C$..04.ANS$=.:|
00000b60  fd 41 4e 53 24 3d 22 59  22 84 41 4e 53 24 3d 22  |.ANS$="Y".ANS$="|
00000b70  4e 22 3a e7 41 4e 53 24  3d 22 59 22 8c 54 3d 54  |N":.ANS$="Y".T=T|
00000b80  2b 31 36 8b 54 3d 54 20  0d 02 3a 10 d4 31 2c 2d  |+16.T=T ..:..1,-|
00000b90  31 30 2c 31 37 35 2c 35  0d 02 44 05 db 0d 02 4e  |10,175,5..D....N|
00000ba0  22 f1 8a 31 30 2c 33 29  22 59 6f 75 20 77 65 72  |"..10,3)"You wer|
00000bb0  65 20 74 68 69 6e 6b 69  6e 67 20 6f 66 3a 22 0d  |e thinking of:".|
00000bc0  02 58 3b e2 31 2c 31 30  2c 2d 38 2c 38 2c 30 2c  |.X;.1,10,-8,8,0,|
00000bd0  31 30 2c 30 2c 31 32 36  2c 30 2c 30 2c 2d 31 32  |10,0,126,0,0,-12|
00000be0  36 2c 2d 31 32 36 2c 31  32 36 2c 31 32 36 3a d4  |6,-126,126,126:.|
00000bf0  31 2c 31 2c 31 35 30 2c  32 30 0d 02 62 6b e7 20  |1,1,150,20..bk. |
00000c00  54 2b 36 34 3e 39 30 84  54 2b 36 34 3c 36 35 3a  |T+64>90.T+64<65:|
00000c10  f1 8a 31 33 2c 35 29 22  49 27 6d 20 63 6f 6e 66  |..13,5)"I'm conf|
00000c20  75 73 65 64 21 21 21 22  8a 32 2c 31 31 29 22 57  |used!!!".2,11)"W|
00000c30  65 72 65 20 79 6f 75 20  70 72 65 73 73 69 6e 67  |ere you pressing|
00000c40  20 74 68 65 20 59 2f 4e  20 63 6f 72 72 65 63 74  | the Y/N correct|
00000c50  6c 79 3f 22 8b 20 f1 8a  31 39 2c 38 29 3b bd 28  |ly?". ..19,8);.(|
00000c60  54 2b 36 34 29 0d 02 6c  22 fb 32 3a f1 8a 31 32  |T+64)..l".2:..12|
00000c70  2c 31 35 29 22 41 6e 6f  74 68 65 72 20 67 6f 20  |,15)"Another go |
00000c80  28 59 2f 4e 29 22 3b 0d  02 76 20 e7 be 3d 22 59  |(Y/N)";..v ..="Y|
00000c90  22 8c db 3a ef 32 38 2c  30 2c 33 31 2c 33 39 2c  |"..:.28,0,31,39,|
00000ca0  30 3a e5 8d 64 52 40 0d  02 80 0f e3 5a 3d 31 b8  |0:..dR@.....Z=1.|
00000cb0  38 35 30 3a ed 5a 0d 02  8a 0a 2a 46 58 34 2c 30  |850:.Z....*FX4,0|
00000cc0  0d 02 94 20 eb 36 3a ef  32 33 3b 38 32 30 32 3b  |... .6:.23;8202;|
00000cd0  30 3b 30 3b 30 3b 3a d7  22 24 2e 4d 45 4e 55 22  |0;0;0;:."$.MENU"|
00000ce0  0d 02 9e 05 e0 0d 02 a8  15 dd 20 f2 53 43 28 58  |.......... .SC(X|
00000cf0  2c 59 2c 41 24 2c 43 2c  4e 29 0d 02 b2 0c 42 24  |,Y,A$,C,N)....B$|
00000d00  3d 41 24 2b 41 24 0d 02  bc 0d e3 20 41 3d 31 20  |=A$+A$..... A=1 |
00000d10  b8 20 4e 0d 02 c6 07 43  3d 31 0d 02 d0 12 e3 20  |. N....C=1..... |
00000d20  53 3d 31 20 b8 20 a9 20  41 24 20 20 0d 02 da 18  |S=1 . . A$  ....|
00000d30  f1 20 8a 58 2c 59 29 3b  c1 42 24 2c 53 2c a9 20  |. .X,Y);.B$,S,. |
00000d40  41 24 29 20 0d 02 e4 1b  e7 a6 2d 32 35 36 3c 3e  |A$) ......-256<>|
00000d50  31 20 8c 20 e3 41 3d 31  b8 31 30 30 3a ed 41 0d  |1 . .A=1.100:.A.|
00000d60  02 ee 09 ed 20 53 20 20  0d 02 f8 05 e1 0d ff     |.... S  .......|
00000d6f