Home » CEEFAX disks » telesoftware8.adl » 30-07-88/INTRO

30-07-88/INTRO

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » CEEFAX disks » telesoftware8.adl
Filename: 30-07-88/INTRO
Read OK:
File size: 1207 bytes
Load address: FFFF0E00
Exec address: FFFF802B
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10REM"�*****************
   20REM"�*�WORDBOX INTRO�*
   30REM"�*****************
   40MODE7:PROCoff
   50PROCchars
   60PROCscreen
   70VDU31,8,17,132,28,10,24,30,22,135
   80IF PAGE>&1100 THEN PAGE=&1100
   90CHAINtitle$
  100DEF PROCchars
  110X=RND(-TIME)
  120VDU 23,224,255,128,152,152,128,128,128,152
  130VDU 23,225,255,1,25,25,1,1,1,25
  140VDU 23,226,152,128,128,128,152,152,128,255
  150VDU 23,227,25,1,1,1,25,25,1,255
  160VDU 23,228,255,128,152,152,128,128,128,129
  170VDU 23,229,255,1,25,25,1,1,1,129
  180VDU 23,230,129,128,128,128,152,152,128,255
  190VDU 23,231,129,1,1,1,25,25,1,255
  200VDU 23,232,255,128,128,128,128,128,128,129
  210VDU 23,233,129,1,1,1,1,1,1,255
  220VDU 23,234,255,128,152,152,128,128,128,128
  230VDU 23,235,255,1,1,1,1,1,1,1
  240VDU 23,236,128,128,128,128,128,128,128,255
  250VDU 23,237,1,1,1,1,25,25,1,255
  260VDU 23,238,255,1,1,1,1,1,1,129
  270VDU 23,239,129,128,128,128,128,128,128,255
  280VDU 23,240,255,1,25,25,1,1,1,1
  290VDU 23,241,128,128,128,128,152,152,128,255
  300ENDPROC
  310DEFPROCoff:VDU23;11,0;0;0;0:ENDPROC
  320DEFPROCscreen
  330PROCpiccy
  340RESTORE
  350REPEAT ans=GET-48:UNTIL ans>0 AND ans<4
  360IF ans=3 title$="WORDBOX":ENDPROC
  370IF ans=2 title$="WBDATA":ENDPROC
  380PROCinst:GOTO330
  390ENDPROC
  400DEFPROCinst
  410CLS:PROCheader
  420PROCprint(6,8,6)
  430PROCprint(10,13,5)
  440PROCprint(15,18,4)
  450PROCprint(20,21,1)
  460PROCwait
  470CLS:PROCheader
  480PROCprint(6,8,3)
  490PROCprint(11,13,2)
  500PROCprint(16,17,5)
  510PROCprint(19,21,6)
  520PROCwait:CLS:PROCheader
  530PROCprint(6,7,6)
  540PROCprint(9,11,2)
  550PROCprint(13,14,1)
  560PROCprint(16,17,5)
  570PROCwait:CLS:PROCheader
  580PROCprint(6,6,1)
  590PROCprint(8,10,2)
  600PROCprint(12,14,3)
  610PROCprint(16,18,5)
  620PROCprint(20,21,1)
  630PROCwait:CLS
  640ENDPROC
  650DEFPROCheader
  660FORl=2TO3
  670PRINTTAB(10,l)CHR$157CHR$151TAB(12,l)CHR$141CHR$130"Instructions."TAB(30,l)CHR$156
  680NEXT
  690ENDPROC
  700DEFPROCprint(low,high,colr)
  710FOR row=low TO high
  720READ data$
  730PRINTTAB(0,row)CHR$(128+colr)data$
  740NEXT
  750ENDPROC
  760DATA" You simply have to work out the hidden"
  770DATA"proverb, message, quotation etc. which"
  780DATA"is in the word box."
  790DATA" Firstly ten dice will be rolled to set"
  800DATA"a rate for each correct letter. A"
  810DATA"second chance to roll the dice is"
  820DATA"offered but can be refused."
  830DATA"  You will then have to select a letter"
  840DATA"which you think occurs in the word box."
  850DATA"For�EACH�occurrence of the letter, the"
  860DATA"rate will be added to your total."
  870DATA"If your selected letter is not in the"
  880DATA"wordbox, your turn will end."
  890DATA"  After you have correctly selected a"
  900DATA"letter you have the choice of three"
  910DATA"keys to press."
  920DATA"  'C' to continue"
  930DATA"  'B' to buy a vowel"
  940DATA"  'S' if you have solved the wordbox"
  950DATA"Press 'C' to set a new rate and select"
  960DATA"another letter."
  970DATA"Pressing 'B' will take 10% off your"
  980DATA"total, but gives you the choice of any"
  990DATA"vowel not already used."
 1000DATA"  When you decide that you have solved"
 1010DATA"the wordbox press 'S'."
 1020DATA"  A bonus will be offered for each"
 1030DATA"correctly entered letter, but only the"
 1040DATA"missing letters are required."
 1050DATA"Any mistake will end your turn and the"
 1060DATA"correct letter will be entered."
 1070DATA"All remaining unused letters are shown"
 1080DATA"in the block at the top of the screen."
 1090DATA"               TACTICS"
 1100DATA"  Solving the wordbox is, of course,"
 1110DATA"essential. Reference to the clue just"
 1120DATA"below the wordbox MAY help."
 1130DATA" Once you have the answer, you may"
 1140DATA"increase your total by 'C'ontinuing,"
 1150DATA"but any mistake may cost dearly."
 1160DATA" 'B'uying vowels is cheaper the earlier"
 1170DATA"they are bought in  the round, but"
 1180DATA"could help your opponent considerably."
 1190DATA"If you have no data of your own, press"
 1200DATA"return when asked for the file name."
 1210DEFPROCwait
 1220*FX21
 1230PRINTTAB(9,24)CHR$136"Any key when ready";:IFGET
 1240ENDPROC
 1250DEFPROCpiccy
 1260CLS
 1270PRINT"����                                �"
 1280PRINT"����                                �"
 1290PRINT"��� 굠������� ������    �"
 1300PRINT"��� 굴����������굢���    �"
 1310PRINT"�� ���������������굠���    �"
 1320PRINT"��� ���������� ������    �"
 1330PRINT"��� ��������������� ������������    �"
 1340PRINT"�� ������������������������������   �"
 1350PRINT"��������������������������������    �"
 1360PRINT"��       �����������������          �"
 1370PRINT"���           �� BY                 �"
 1380PRINT"����   ��     �� BY                 �"
 1390PRINT"����     �� �JOE RHODES.            �"
 1400PRINT"����      � �JOE RHODES.            �"
 1410PRINT"����      ����������������          �"
 1420PRINT"���                                 �"
 1430PRINT"����                                �"
 1440PRINT"��     ��Which do you require       �"
 1450PRINT"����                                �"
 1460PRINT"��        �1)�Instructions          �"
 1470PRINT"�� �      �2)�Data maker            �"
 1480PRINT"�� �      �3)�Game                  �"
 1490PRINT"�� �                                �"
 1500PRINT"�� �                                �"
 1510PRINT"����                               ��";
 1520ENDPROC

�"�*****************
�"�*�WORDBOX INTRO�*
�"�*****************
(�7:�off
2
�chars
<�screen
F#�31,8,17,132,28,10,24,30,22,135
P� �>&1100 � �=&1100
Z�title$
d� �chars
nX=�(-�)
x,� 23,224,255,128,152,152,128,128,128,152
�!� 23,225,255,1,25,25,1,1,1,25
�,� 23,226,152,128,128,128,152,152,128,255
�!� 23,227,25,1,1,1,25,25,1,255
�,� 23,228,255,128,152,152,128,128,128,129
�"� 23,229,255,1,25,25,1,1,1,129
�,� 23,230,129,128,128,128,152,152,128,255
�"� 23,231,129,1,1,1,25,25,1,255
�,� 23,232,255,128,128,128,128,128,128,129
� � 23,233,129,1,1,1,1,1,1,255
�,� 23,234,255,128,152,152,128,128,128,128
�� 23,235,255,1,1,1,1,1,1,1
�,� 23,236,128,128,128,128,128,128,128,255
� � 23,237,1,1,1,1,25,25,1,255
 � 23,238,255,1,1,1,1,1,1,129
,� 23,239,129,128,128,128,128,128,128,255
 � 23,240,255,1,25,25,1,1,1,1
",� 23,241,128,128,128,128,152,152,128,255
,�
6��off:�23;11,0;0;0;0:�
@��screen
J
�piccy
T�
^� ans=�-48:� ans>0 � ans<4
h� ans=3 title$="WORDBOX":�
r� ans=2 title$="WBDATA":�
|�inst:�DJA
��
�
��inst
�
�:�header
��print(6,8,6)
��print(10,13,5)
��print(15,18,4)
��print(20,21,1)
�	�wait
�
�:�header
��print(6,8,3)
��print(11,13,2)
��print(16,17,5)
��print(19,21,6)
�wait:�:�header
�print(6,7,6)
�print(9,11,2)
&�print(13,14,1)
0�print(16,17,5)
:�wait:�:�header
D�print(6,6,1)
N�print(8,10,2)
X�print(12,14,3)
b�print(16,18,5)
l�print(20,21,1)
v�wait:�
��
���header
�
�l=2�3
�:�10,l)�157�151�12,l)�141�130"Instructions."�30,l)�156
��
��
���print(low,high,colr)
�� row=low � high
�� data$
��0,row)�(128+colr)data$
��
��
�.�" You simply have to work out the hidden"
-�"proverb, message, quotation etc. which"
�"is in the word box."
.�" Firstly ten dice will be rolled to set"
 (�"a rate for each correct letter. A"
*(�"second chance to roll the dice is"
4"�"offered but can be refused."
>.�"  You will then have to select a letter"
H.�"which you think occurs in the word box."
R-�"For�EACH�occurrence of the letter, the"
\(�"rate will be added to your total."
f,�"If your selected letter is not in the"
p#�"wordbox, your turn will end."
z,�"  After you have correctly selected a"
�*�"letter you have the choice of three"
��"keys to press."
��"  'C' to continue"
��"  'B' to buy a vowel"
�+�"  'S' if you have solved the wordbox"
�-�"Press 'C' to set a new rate and select"
��"another letter."
�*�"Pressing 'B' will take 10% off your"
�-�"total, but gives you the choice of any"
��"vowel not already used."
�-�"  When you decide that you have solved"
��"the wordbox press 'S'."
�)�"  A bonus will be offered for each"
-�"correctly entered letter, but only the"
$�"missing letters are required."
-�"Any mistake will end your turn and the"
$&�"correct letter will be entered."
.-�"All remaining unused letters are shown"
8-�"in the block at the top of the screen."
B�"               TACTICS"
L+�"  Solving the wordbox is, of course,"
V,�"essential. Reference to the clue just"
`"�"below the wordbox MAY help."
j)�" Once you have the answer, you may"
t+�"increase your total by 'C'ontinuing,"
~'�"but any mistake may cost dearly."
�.�" 'B'uying vowels is cheaper the earlier"
�)�"they are bought in  the round, but"
�-�"could help your opponent considerably."
�-�"If you have no data of your own, press"
�+�"return when asked for the file name."
�
��wait
�	*FX21
�'�9,24)�136"Any key when ready";:�
��
���piccy
��
�,�"����                                �"
,�"����                                �"

,�"��� 굠������ ������    �"
,�"��� 굴����������굢���    �"
,�"�� ������������굠���    �"
(,�"��� ������� ������    �"
2,�"��� ��������������� ������������    �"
<,�"�� ������������������������������   �"
F,�"��������������������������������    �"
P,�"��       �����������������          �"
Z,�"���           �� BY                 �"
d,�"����   ��     �� BY                 �"
n,�"����     �� �JOE RHODES.            �"
x,�"����      � �JOE RHODES.            �"
�,�"����      ����������������          �"
�,�"���                                 �"
�,�"����                                �"
�,�"��     ��Which do you require       �"
�,�"����                                �"
�,�"��        �1)�Instructions          �"
�,�"�� �      �2)�Data maker            �"
�,�"�� �      �3)�Game                  �"
�,�"�� �                                �"
�,�"�� �                                �"
�-�"����                               ��";
��
�
00000000  0d 00 0a 18 f4 22 83 2a  2a 2a 2a 2a 2a 2a 2a 2a  |.....".*********|
00000010  2a 2a 2a 2a 2a 2a 2a 2a  0d 00 14 18 f4 22 83 2a  |********.....".*|
00000020  81 57 4f 52 44 42 4f 58  20 49 4e 54 52 4f 83 2a  |.WORDBOX INTRO.*|
00000030  0d 00 1e 18 f4 22 83 2a  2a 2a 2a 2a 2a 2a 2a 2a  |.....".*********|
00000040  2a 2a 2a 2a 2a 2a 2a 2a  0d 00 28 0b eb 37 3a f2  |********..(..7:.|
00000050  6f 66 66 0d 00 32 0a f2  63 68 61 72 73 0d 00 3c  |off..2..chars..<|
00000060  0b f2 73 63 72 65 65 6e  0d 00 46 23 ef 33 31 2c  |..screen..F#.31,|
00000070  38 2c 31 37 2c 31 33 32  2c 32 38 2c 31 30 2c 32  |8,17,132,28,10,2|
00000080  34 2c 33 30 2c 32 32 2c  31 33 35 0d 00 50 17 e7  |4,30,22,135..P..|
00000090  20 90 3e 26 31 31 30 30  20 8c 20 d0 3d 26 31 31  | .>&1100 . .=&11|
000000a0  30 30 0d 00 5a 0b d7 74  69 74 6c 65 24 0d 00 64  |00..Z..title$..d|
000000b0  0c dd 20 f2 63 68 61 72  73 0d 00 6e 0b 58 3d b3  |.. .chars..n.X=.|
000000c0  28 2d 91 29 0d 00 78 2c  ef 20 32 33 2c 32 32 34  |(-.)..x,. 23,224|
000000d0  2c 32 35 35 2c 31 32 38  2c 31 35 32 2c 31 35 32  |,255,128,152,152|
000000e0  2c 31 32 38 2c 31 32 38  2c 31 32 38 2c 31 35 32  |,128,128,128,152|
000000f0  0d 00 82 21 ef 20 32 33  2c 32 32 35 2c 32 35 35  |...!. 23,225,255|
00000100  2c 31 2c 32 35 2c 32 35  2c 31 2c 31 2c 31 2c 32  |,1,25,25,1,1,1,2|
00000110  35 0d 00 8c 2c ef 20 32  33 2c 32 32 36 2c 31 35  |5...,. 23,226,15|
00000120  32 2c 31 32 38 2c 31 32  38 2c 31 32 38 2c 31 35  |2,128,128,128,15|
00000130  32 2c 31 35 32 2c 31 32  38 2c 32 35 35 0d 00 96  |2,152,128,255...|
00000140  21 ef 20 32 33 2c 32 32  37 2c 32 35 2c 31 2c 31  |!. 23,227,25,1,1|
00000150  2c 31 2c 32 35 2c 32 35  2c 31 2c 32 35 35 0d 00  |,1,25,25,1,255..|
00000160  a0 2c ef 20 32 33 2c 32  32 38 2c 32 35 35 2c 31  |.,. 23,228,255,1|
00000170  32 38 2c 31 35 32 2c 31  35 32 2c 31 32 38 2c 31  |28,152,152,128,1|
00000180  32 38 2c 31 32 38 2c 31  32 39 0d 00 aa 22 ef 20  |28,128,129...". |
00000190  32 33 2c 32 32 39 2c 32  35 35 2c 31 2c 32 35 2c  |23,229,255,1,25,|
000001a0  32 35 2c 31 2c 31 2c 31  2c 31 32 39 0d 00 b4 2c  |25,1,1,1,129...,|
000001b0  ef 20 32 33 2c 32 33 30  2c 31 32 39 2c 31 32 38  |. 23,230,129,128|
000001c0  2c 31 32 38 2c 31 32 38  2c 31 35 32 2c 31 35 32  |,128,128,152,152|
000001d0  2c 31 32 38 2c 32 35 35  0d 00 be 22 ef 20 32 33  |,128,255...". 23|
000001e0  2c 32 33 31 2c 31 32 39  2c 31 2c 31 2c 31 2c 32  |,231,129,1,1,1,2|
000001f0  35 2c 32 35 2c 31 2c 32  35 35 0d 00 c8 2c ef 20  |5,25,1,255...,. |
00000200  32 33 2c 32 33 32 2c 32  35 35 2c 31 32 38 2c 31  |23,232,255,128,1|
00000210  32 38 2c 31 32 38 2c 31  32 38 2c 31 32 38 2c 31  |28,128,128,128,1|
00000220  32 38 2c 31 32 39 0d 00  d2 20 ef 20 32 33 2c 32  |28,129... . 23,2|
00000230  33 33 2c 31 32 39 2c 31  2c 31 2c 31 2c 31 2c 31  |33,129,1,1,1,1,1|
00000240  2c 31 2c 32 35 35 0d 00  dc 2c ef 20 32 33 2c 32  |,1,255...,. 23,2|
00000250  33 34 2c 32 35 35 2c 31  32 38 2c 31 35 32 2c 31  |34,255,128,152,1|
00000260  35 32 2c 31 32 38 2c 31  32 38 2c 31 32 38 2c 31  |52,128,128,128,1|
00000270  32 38 0d 00 e6 1e ef 20  32 33 2c 32 33 35 2c 32  |28..... 23,235,2|
00000280  35 35 2c 31 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  |55,1,1,1,1,1,1,1|
00000290  0d 00 f0 2c ef 20 32 33  2c 32 33 36 2c 31 32 38  |...,. 23,236,128|
000002a0  2c 31 32 38 2c 31 32 38  2c 31 32 38 2c 31 32 38  |,128,128,128,128|
000002b0  2c 31 32 38 2c 31 32 38  2c 32 35 35 0d 00 fa 20  |,128,128,255... |
000002c0  ef 20 32 33 2c 32 33 37  2c 31 2c 31 2c 31 2c 31  |. 23,237,1,1,1,1|
000002d0  2c 32 35 2c 32 35 2c 31  2c 32 35 35 0d 01 04 20  |,25,25,1,255... |
000002e0  ef 20 32 33 2c 32 33 38  2c 32 35 35 2c 31 2c 31  |. 23,238,255,1,1|
000002f0  2c 31 2c 31 2c 31 2c 31  2c 31 32 39 0d 01 0e 2c  |,1,1,1,1,129...,|
00000300  ef 20 32 33 2c 32 33 39  2c 31 32 39 2c 31 32 38  |. 23,239,129,128|
00000310  2c 31 32 38 2c 31 32 38  2c 31 32 38 2c 31 32 38  |,128,128,128,128|
00000320  2c 31 32 38 2c 32 35 35  0d 01 18 20 ef 20 32 33  |,128,255... . 23|
00000330  2c 32 34 30 2c 32 35 35  2c 31 2c 32 35 2c 32 35  |,240,255,1,25,25|
00000340  2c 31 2c 31 2c 31 2c 31  0d 01 22 2c ef 20 32 33  |,1,1,1,1..",. 23|
00000350  2c 32 34 31 2c 31 32 38  2c 31 32 38 2c 31 32 38  |,241,128,128,128|
00000360  2c 31 32 38 2c 31 35 32  2c 31 35 32 2c 31 32 38  |,128,152,152,128|
00000370  2c 32 35 35 0d 01 2c 05  e1 0d 01 36 1a dd f2 6f  |,255..,....6...o|
00000380  66 66 3a ef 32 33 3b 31  31 2c 30 3b 30 3b 30 3b  |ff:.23;11,0;0;0;|
00000390  30 3a e1 0d 01 40 0c dd  f2 73 63 72 65 65 6e 0d  |0:...@...screen.|
000003a0  01 4a 0a f2 70 69 63 63  79 0d 01 54 05 f7 0d 01  |.J..piccy..T....|
000003b0  5e 1e f5 20 61 6e 73 3d  a5 2d 34 38 3a fd 20 61  |^.. ans=.-48:. a|
000003c0  6e 73 3e 30 20 80 20 61  6e 73 3c 34 0d 01 68 1e  |ns>0 . ans<4..h.|
000003d0  e7 20 61 6e 73 3d 33 20  74 69 74 6c 65 24 3d 22  |. ans=3 title$="|
000003e0  57 4f 52 44 42 4f 58 22  3a e1 0d 01 72 1d e7 20  |WORDBOX":...r.. |
000003f0  61 6e 73 3d 32 20 74 69  74 6c 65 24 3d 22 57 42  |ans=2 title$="WB|
00000400  44 41 54 41 22 3a e1 0d  01 7c 0f f2 69 6e 73 74  |DATA":...|..inst|
00000410  3a e5 8d 44 4a 41 0d 01  86 05 e1 0d 01 90 0a dd  |:..DJA..........|
00000420  f2 69 6e 73 74 0d 01 9a  0d db 3a f2 68 65 61 64  |.inst.....:.head|
00000430  65 72 0d 01 a4 11 f2 70  72 69 6e 74 28 36 2c 38  |er.....print(6,8|
00000440  2c 36 29 0d 01 ae 13 f2  70 72 69 6e 74 28 31 30  |,6).....print(10|
00000450  2c 31 33 2c 35 29 0d 01  b8 13 f2 70 72 69 6e 74  |,13,5).....print|
00000460  28 31 35 2c 31 38 2c 34  29 0d 01 c2 13 f2 70 72  |(15,18,4).....pr|
00000470  69 6e 74 28 32 30 2c 32  31 2c 31 29 0d 01 cc 09  |int(20,21,1)....|
00000480  f2 77 61 69 74 0d 01 d6  0d db 3a f2 68 65 61 64  |.wait.....:.head|
00000490  65 72 0d 01 e0 11 f2 70  72 69 6e 74 28 36 2c 38  |er.....print(6,8|
000004a0  2c 33 29 0d 01 ea 13 f2  70 72 69 6e 74 28 31 31  |,3).....print(11|
000004b0  2c 31 33 2c 32 29 0d 01  f4 13 f2 70 72 69 6e 74  |,13,2).....print|
000004c0  28 31 36 2c 31 37 2c 35  29 0d 01 fe 13 f2 70 72  |(16,17,5).....pr|
000004d0  69 6e 74 28 31 39 2c 32  31 2c 36 29 0d 02 08 13  |int(19,21,6)....|
000004e0  f2 77 61 69 74 3a db 3a  f2 68 65 61 64 65 72 0d  |.wait:.:.header.|
000004f0  02 12 11 f2 70 72 69 6e  74 28 36 2c 37 2c 36 29  |....print(6,7,6)|
00000500  0d 02 1c 12 f2 70 72 69  6e 74 28 39 2c 31 31 2c  |.....print(9,11,|
00000510  32 29 0d 02 26 13 f2 70  72 69 6e 74 28 31 33 2c  |2)..&..print(13,|
00000520  31 34 2c 31 29 0d 02 30  13 f2 70 72 69 6e 74 28  |14,1)..0..print(|
00000530  31 36 2c 31 37 2c 35 29  0d 02 3a 13 f2 77 61 69  |16,17,5)..:..wai|
00000540  74 3a db 3a f2 68 65 61  64 65 72 0d 02 44 11 f2  |t:.:.header..D..|
00000550  70 72 69 6e 74 28 36 2c  36 2c 31 29 0d 02 4e 12  |print(6,6,1)..N.|
00000560  f2 70 72 69 6e 74 28 38  2c 31 30 2c 32 29 0d 02  |.print(8,10,2)..|
00000570  58 13 f2 70 72 69 6e 74  28 31 32 2c 31 34 2c 33  |X..print(12,14,3|
00000580  29 0d 02 62 13 f2 70 72  69 6e 74 28 31 36 2c 31  |)..b..print(16,1|
00000590  38 2c 35 29 0d 02 6c 13  f2 70 72 69 6e 74 28 32  |8,5)..l..print(2|
000005a0  30 2c 32 31 2c 31 29 0d  02 76 0b f2 77 61 69 74  |0,21,1)..v..wait|
000005b0  3a db 0d 02 80 05 e1 0d  02 8a 0c dd f2 68 65 61  |:............hea|
000005c0  64 65 72 0d 02 94 0a e3  6c 3d 32 b8 33 0d 02 9e  |der.....l=2.3...|
000005d0  3a f1 8a 31 30 2c 6c 29  bd 31 35 37 bd 31 35 31  |:..10,l).157.151|
000005e0  8a 31 32 2c 6c 29 bd 31  34 31 bd 31 33 30 22 49  |.12,l).141.130"I|
000005f0  6e 73 74 72 75 63 74 69  6f 6e 73 2e 22 8a 33 30  |nstructions.".30|
00000600  2c 6c 29 bd 31 35 36 0d  02 a8 05 ed 0d 02 b2 05  |,l).156.........|
00000610  e1 0d 02 bc 1a dd f2 70  72 69 6e 74 28 6c 6f 77  |.......print(low|
00000620  2c 68 69 67 68 2c 63 6f  6c 72 29 0d 02 c6 14 e3  |,high,colr).....|
00000630  20 72 6f 77 3d 6c 6f 77  20 b8 20 68 69 67 68 0d  | row=low . high.|
00000640  02 d0 0b f3 20 64 61 74  61 24 0d 02 da 1c f1 8a  |.... data$......|
00000650  30 2c 72 6f 77 29 bd 28  31 32 38 2b 63 6f 6c 72  |0,row).(128+colr|
00000660  29 64 61 74 61 24 0d 02  e4 05 ed 0d 02 ee 05 e1  |)data$..........|
00000670  0d 02 f8 2e dc 22 20 59  6f 75 20 73 69 6d 70 6c  |....." You simpl|
00000680  79 20 68 61 76 65 20 74  6f 20 77 6f 72 6b 20 6f  |y have to work o|
00000690  75 74 20 74 68 65 20 68  69 64 64 65 6e 22 0d 03  |ut the hidden"..|
000006a0  02 2d dc 22 70 72 6f 76  65 72 62 2c 20 6d 65 73  |.-."proverb, mes|
000006b0  73 61 67 65 2c 20 71 75  6f 74 61 74 69 6f 6e 20  |sage, quotation |
000006c0  65 74 63 2e 20 77 68 69  63 68 22 0d 03 0c 1a dc  |etc. which".....|
000006d0  22 69 73 20 69 6e 20 74  68 65 20 77 6f 72 64 20  |"is in the word |
000006e0  62 6f 78 2e 22 0d 03 16  2e dc 22 20 46 69 72 73  |box."....." Firs|
000006f0  74 6c 79 20 74 65 6e 20  64 69 63 65 20 77 69 6c  |tly ten dice wil|
00000700  6c 20 62 65 20 72 6f 6c  6c 65 64 20 74 6f 20 73  |l be rolled to s|
00000710  65 74 22 0d 03 20 28 dc  22 61 20 72 61 74 65 20  |et".. (."a rate |
00000720  66 6f 72 20 65 61 63 68  20 63 6f 72 72 65 63 74  |for each correct|
00000730  20 6c 65 74 74 65 72 2e  20 41 22 0d 03 2a 28 dc  | letter. A"..*(.|
00000740  22 73 65 63 6f 6e 64 20  63 68 61 6e 63 65 20 74  |"second chance t|
00000750  6f 20 72 6f 6c 6c 20 74  68 65 20 64 69 63 65 20  |o roll the dice |
00000760  69 73 22 0d 03 34 22 dc  22 6f 66 66 65 72 65 64  |is"..4"."offered|
00000770  20 62 75 74 20 63 61 6e  20 62 65 20 72 65 66 75  | but can be refu|
00000780  73 65 64 2e 22 0d 03 3e  2e dc 22 20 20 59 6f 75  |sed."..>.."  You|
00000790  20 77 69 6c 6c 20 74 68  65 6e 20 68 61 76 65 20  | will then have |
000007a0  74 6f 20 73 65 6c 65 63  74 20 61 20 6c 65 74 74  |to select a lett|
000007b0  65 72 22 0d 03 48 2e dc  22 77 68 69 63 68 20 79  |er"..H.."which y|
000007c0  6f 75 20 74 68 69 6e 6b  20 6f 63 63 75 72 73 20  |ou think occurs |
000007d0  69 6e 20 74 68 65 20 77  6f 72 64 20 62 6f 78 2e  |in the word box.|
000007e0  22 0d 03 52 2d dc 22 46  6f 72 87 45 41 43 48 84  |"..R-."For.EACH.|
000007f0  6f 63 63 75 72 72 65 6e  63 65 20 6f 66 20 74 68  |occurrence of th|
00000800  65 20 6c 65 74 74 65 72  2c 20 74 68 65 22 0d 03  |e letter, the"..|
00000810  5c 28 dc 22 72 61 74 65  20 77 69 6c 6c 20 62 65  |\(."rate will be|
00000820  20 61 64 64 65 64 20 74  6f 20 79 6f 75 72 20 74  | added to your t|
00000830  6f 74 61 6c 2e 22 0d 03  66 2c dc 22 49 66 20 79  |otal."..f,."If y|
00000840  6f 75 72 20 73 65 6c 65  63 74 65 64 20 6c 65 74  |our selected let|
00000850  74 65 72 20 69 73 20 6e  6f 74 20 69 6e 20 74 68  |ter is not in th|
00000860  65 22 0d 03 70 23 dc 22  77 6f 72 64 62 6f 78 2c  |e"..p#."wordbox,|
00000870  20 79 6f 75 72 20 74 75  72 6e 20 77 69 6c 6c 20  | your turn will |
00000880  65 6e 64 2e 22 0d 03 7a  2c dc 22 20 20 41 66 74  |end."..z,."  Aft|
00000890  65 72 20 79 6f 75 20 68  61 76 65 20 63 6f 72 72  |er you have corr|
000008a0  65 63 74 6c 79 20 73 65  6c 65 63 74 65 64 20 61  |ectly selected a|
000008b0  22 0d 03 84 2a dc 22 6c  65 74 74 65 72 20 79 6f  |"...*."letter yo|
000008c0  75 20 68 61 76 65 20 74  68 65 20 63 68 6f 69 63  |u have the choic|
000008d0  65 20 6f 66 20 74 68 72  65 65 22 0d 03 8e 15 dc  |e of three".....|
000008e0  22 6b 65 79 73 20 74 6f  20 70 72 65 73 73 2e 22  |"keys to press."|
000008f0  0d 03 98 18 dc 22 20 20  27 43 27 20 74 6f 20 63  |....."  'C' to c|
00000900  6f 6e 74 69 6e 75 65 22  0d 03 a2 1b dc 22 20 20  |ontinue"....."  |
00000910  27 42 27 20 74 6f 20 62  75 79 20 61 20 76 6f 77  |'B' to buy a vow|
00000920  65 6c 22 0d 03 ac 2b dc  22 20 20 27 53 27 20 69  |el"...+."  'S' i|
00000930  66 20 79 6f 75 20 68 61  76 65 20 73 6f 6c 76 65  |f you have solve|
00000940  64 20 74 68 65 20 77 6f  72 64 62 6f 78 22 0d 03  |d the wordbox"..|
00000950  b6 2d dc 22 50 72 65 73  73 20 27 43 27 20 74 6f  |.-."Press 'C' to|
00000960  20 73 65 74 20 61 20 6e  65 77 20 72 61 74 65 20  | set a new rate |
00000970  61 6e 64 20 73 65 6c 65  63 74 22 0d 03 c0 16 dc  |and select".....|
00000980  22 61 6e 6f 74 68 65 72  20 6c 65 74 74 65 72 2e  |"another letter.|
00000990  22 0d 03 ca 2a dc 22 50  72 65 73 73 69 6e 67 20  |"...*."Pressing |
000009a0  27 42 27 20 77 69 6c 6c  20 74 61 6b 65 20 31 30  |'B' will take 10|
000009b0  25 20 6f 66 66 20 79 6f  75 72 22 0d 03 d4 2d dc  |% off your"...-.|
000009c0  22 74 6f 74 61 6c 2c 20  62 75 74 20 67 69 76 65  |"total, but give|
000009d0  73 20 79 6f 75 20 74 68  65 20 63 68 6f 69 63 65  |s you the choice|
000009e0  20 6f 66 20 61 6e 79 22  0d 03 de 1e dc 22 76 6f  | of any"....."vo|
000009f0  77 65 6c 20 6e 6f 74 20  61 6c 72 65 61 64 79 20  |wel not already |
00000a00  75 73 65 64 2e 22 0d 03  e8 2d dc 22 20 20 57 68  |used."...-."  Wh|
00000a10  65 6e 20 79 6f 75 20 64  65 63 69 64 65 20 74 68  |en you decide th|
00000a20  61 74 20 79 6f 75 20 68  61 76 65 20 73 6f 6c 76  |at you have solv|
00000a30  65 64 22 0d 03 f2 1d dc  22 74 68 65 20 77 6f 72  |ed"....."the wor|
00000a40  64 62 6f 78 20 70 72 65  73 73 20 27 53 27 2e 22  |dbox press 'S'."|
00000a50  0d 03 fc 29 dc 22 20 20  41 20 62 6f 6e 75 73 20  |...)."  A bonus |
00000a60  77 69 6c 6c 20 62 65 20  6f 66 66 65 72 65 64 20  |will be offered |
00000a70  66 6f 72 20 65 61 63 68  22 0d 04 06 2d dc 22 63  |for each"...-."c|
00000a80  6f 72 72 65 63 74 6c 79  20 65 6e 74 65 72 65 64  |orrectly entered|
00000a90  20 6c 65 74 74 65 72 2c  20 62 75 74 20 6f 6e 6c  | letter, but onl|
00000aa0  79 20 74 68 65 22 0d 04  10 24 dc 22 6d 69 73 73  |y the"...$."miss|
00000ab0  69 6e 67 20 6c 65 74 74  65 72 73 20 61 72 65 20  |ing letters are |
00000ac0  72 65 71 75 69 72 65 64  2e 22 0d 04 1a 2d dc 22  |required."...-."|
00000ad0  41 6e 79 20 6d 69 73 74  61 6b 65 20 77 69 6c 6c  |Any mistake will|
00000ae0  20 65 6e 64 20 79 6f 75  72 20 74 75 72 6e 20 61  | end your turn a|
00000af0  6e 64 20 74 68 65 22 0d  04 24 26 dc 22 63 6f 72  |nd the"..$&."cor|
00000b00  72 65 63 74 20 6c 65 74  74 65 72 20 77 69 6c 6c  |rect letter will|
00000b10  20 62 65 20 65 6e 74 65  72 65 64 2e 22 0d 04 2e  | be entered."...|
00000b20  2d dc 22 41 6c 6c 20 72  65 6d 61 69 6e 69 6e 67  |-."All remaining|
00000b30  20 75 6e 75 73 65 64 20  6c 65 74 74 65 72 73 20  | unused letters |
00000b40  61 72 65 20 73 68 6f 77  6e 22 0d 04 38 2d dc 22  |are shown"..8-."|
00000b50  69 6e 20 74 68 65 20 62  6c 6f 63 6b 20 61 74 20  |in the block at |
00000b60  74 68 65 20 74 6f 70 20  6f 66 20 74 68 65 20 73  |the top of the s|
00000b70  63 72 65 65 6e 2e 22 0d  04 42 1d dc 22 20 20 20  |creen."..B.."   |
00000b80  20 20 20 20 20 20 20 20  20 20 20 20 54 41 43 54  |            TACT|
00000b90  49 43 53 22 0d 04 4c 2b  dc 22 20 20 53 6f 6c 76  |ICS"..L+."  Solv|
00000ba0  69 6e 67 20 74 68 65 20  77 6f 72 64 62 6f 78 20  |ing the wordbox |
00000bb0  69 73 2c 20 6f 66 20 63  6f 75 72 73 65 2c 22 0d  |is, of course,".|
00000bc0  04 56 2c dc 22 65 73 73  65 6e 74 69 61 6c 2e 20  |.V,."essential. |
00000bd0  52 65 66 65 72 65 6e 63  65 20 74 6f 20 74 68 65  |Reference to the|
00000be0  20 63 6c 75 65 20 6a 75  73 74 22 0d 04 60 22 dc  | clue just"..`".|
00000bf0  22 62 65 6c 6f 77 20 74  68 65 20 77 6f 72 64 62  |"below the wordb|
00000c00  6f 78 20 4d 41 59 20 68  65 6c 70 2e 22 0d 04 6a  |ox MAY help."..j|
00000c10  29 dc 22 20 4f 6e 63 65  20 79 6f 75 20 68 61 76  |)." Once you hav|
00000c20  65 20 74 68 65 20 61 6e  73 77 65 72 2c 20 79 6f  |e the answer, yo|
00000c30  75 20 6d 61 79 22 0d 04  74 2b dc 22 69 6e 63 72  |u may"..t+."incr|
00000c40  65 61 73 65 20 79 6f 75  72 20 74 6f 74 61 6c 20  |ease your total |
00000c50  62 79 20 27 43 27 6f 6e  74 69 6e 75 69 6e 67 2c  |by 'C'ontinuing,|
00000c60  22 0d 04 7e 27 dc 22 62  75 74 20 61 6e 79 20 6d  |"..~'."but any m|
00000c70  69 73 74 61 6b 65 20 6d  61 79 20 63 6f 73 74 20  |istake may cost |
00000c80  64 65 61 72 6c 79 2e 22  0d 04 88 2e dc 22 20 27  |dearly."....." '|
00000c90  42 27 75 79 69 6e 67 20  76 6f 77 65 6c 73 20 69  |B'uying vowels i|
00000ca0  73 20 63 68 65 61 70 65  72 20 74 68 65 20 65 61  |s cheaper the ea|
00000cb0  72 6c 69 65 72 22 0d 04  92 29 dc 22 74 68 65 79  |rlier"...)."they|
00000cc0  20 61 72 65 20 62 6f 75  67 68 74 20 69 6e 20 20  | are bought in  |
00000cd0  74 68 65 20 72 6f 75 6e  64 2c 20 62 75 74 22 0d  |the round, but".|
00000ce0  04 9c 2d dc 22 63 6f 75  6c 64 20 68 65 6c 70 20  |..-."could help |
00000cf0  79 6f 75 72 20 6f 70 70  6f 6e 65 6e 74 20 63 6f  |your opponent co|
00000d00  6e 73 69 64 65 72 61 62  6c 79 2e 22 0d 04 a6 2d  |nsiderably."...-|
00000d10  dc 22 49 66 20 79 6f 75  20 68 61 76 65 20 6e 6f  |."If you have no|
00000d20  20 64 61 74 61 20 6f 66  20 79 6f 75 72 20 6f 77  | data of your ow|
00000d30  6e 2c 20 70 72 65 73 73  22 0d 04 b0 2b dc 22 72  |n, press"...+."r|
00000d40  65 74 75 72 6e 20 77 68  65 6e 20 61 73 6b 65 64  |eturn when asked|
00000d50  20 66 6f 72 20 74 68 65  20 66 69 6c 65 20 6e 61  | for the file na|
00000d60  6d 65 2e 22 0d 04 ba 0a  dd f2 77 61 69 74 0d 04  |me."......wait..|
00000d70  c4 09 2a 46 58 32 31 0d  04 ce 27 f1 8a 39 2c 32  |..*FX21...'..9,2|
00000d80  34 29 bd 31 33 36 22 41  6e 79 20 6b 65 79 20 77  |4).136"Any key w|
00000d90  68 65 6e 20 72 65 61 64  79 22 3b 3a e7 a5 0d 04  |hen ready";:....|
00000da0  d8 05 e1 0d 04 e2 0b dd  f2 70 69 63 63 79 0d 04  |.........piccy..|
00000db0  ec 05 db 0d 04 f6 2c f1  22 94 9d 93 9a 20 20 20  |......,."....   |
00000dc0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000dd0  20 20 20 20 20 20 20 20  20 20 20 20 20 9c 22 0d  |             .".|
00000de0  05 00 2c f1 22 94 9d 93  9a 20 20 20 20 20 20 20  |..,."....       |
00000df0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000e00  20 20 20 20 20 20 20 20  20 9c 22 0d 05 0a 2c f1  |         ."...,.|
00000e10  22 94 9d 93 20 ea b5 a0  ff e0 bf ef b0 ea bf ef  |"... ...........|
00000e20  b0 ea bf f5 20 ea bf ef  b0 e0 bf ef b0 ea b5 ea  |.... ...........|
00000e30  b5 20 20 20 20 9c 22 0d  05 14 2c f1 22 94 9d 93  |.    ."...,."...|
00000e40  20 ea b5 b4 ff ea b5 ea  b5 ea b5 ea b5 ea b5 eb  | ...............|
00000e50  b4 ea b5 ea b5 ea b5 ea  b5 a2 fd fe a1 20 20 20  |.............   |
00000e60  20 9c 22 0d 05 1e 2c f1  22 94 9d 20 93 ea f5 f5  | ."...,.".. ....|
00000e70  ff ea b5 ea b5 ea bf ff  a0 ea b5 ea b5 ea bf ef  |................|
00000e80  b0 ea b5 ea b5 a0 fa f5  a0 20 20 20 20 9c 22 0d  |.........    .".|
00000e90  05 28 2c f1 22 94 9d 93  20 ea ff eb ff ea b5 ea  |.(,."... .......|
00000ea0  b5 ea b5 eb b4 ea b5 fe  20 ea b5 ea b5 ea b5 ea  |........ .......|
00000eb0  b5 e8 b7 eb b4 20 20 20  20 9c 22 0d 05 32 2c f1  |.....    ."..2,.|
00000ec0  22 94 9d 93 20 aa a5 a0  af a0 af af a0 aa a5 aa  |"... ...........|
00000ed0  a5 aa af a5 20 aa af af  a0 a0 af af a0 aa a5 aa  |.... ...........|
00000ee0  a5 20 20 20 20 9c 22 0d  05 3c 2c f1 22 94 9d 20  |.    ."..<,.".. |
00000ef0  96 ad ad ad ad ad ad ad  ad ad ad ad ad ad ad ad  |................|
00000f00  ad ad ad ad ad ad ad ad  ad ad ad ad ad a5 20 20  |..............  |
00000f10  20 9c 22 0d 05 46 2c f1  22 94 9d 93 9a a0 a0 a0  | ."..F,.".......|
00000f20  a0 a0 a0 a0 a0 a0 a0 a0  a0 a0 a0 a0 a0 a0 a0 a0  |................|
00000f30  a0 a0 a0 a0 a0 a0 a0 a0  a0 20 20 20 20 9c 22 0d  |.........    .".|
00000f40  05 50 2c f1 22 94 9d 20  20 20 20 20 20 20 95 9a  |.P,."..       ..|
00000f50  ed ed ed ed ed ed ed ed  ed ed ed ed ed ed ed 20  |............... |
00000f60  20 20 20 20 20 20 20 20  20 9c 22 0d 05 5a 2c f1  |         ."..Z,.|
00000f70  22 94 9d 93 20 20 20 20  20 20 20 20 20 20 20 82  |"...           .|
00000f80  8d 20 42 59 20 20 20 20  20 20 20 20 20 20 20 20  |. BY            |
00000f90  20 20 20 20 20 9c 22 0d  05 64 2c f1 22 94 9d 93  |     ."..d,."...|
00000fa0  9a 20 20 20 95 ff 20 20  20 20 20 82 8d 20 42 59  |.   ..     .. BY|
00000fb0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000fc0  20 9c 22 0d 05 6e 2c f1  22 94 9d 93 9a 20 20 20  | ."..n,."....   |
00000fd0  20 20 81 8d 20 81 4a 4f  45 20 52 48 4f 44 45 53  |  .. .JOE RHODES|
00000fe0  2e 20 20 20 20 20 20 20  20 20 20 20 20 9c 22 0d  |.            .".|
00000ff0  05 78 2c f1 22 94 9d 93  9a 20 20 20 20 20 20 8d  |.x,."....      .|
00001000  20 81 4a 4f 45 20 52 48  4f 44 45 53 2e 20 20 20  | .JOE RHODES.   |
00001010  20 20 20 20 20 20 20 20  20 9c 22 0d 05 82 2c f1  |         ."...,.|
00001020  22 94 9d 93 9a 20 20 20  20 20 20 95 ed ed ed ed  |"....      .....|
00001030  ed ed ed ed ed ed ed ed  ed ed ed 20 20 20 20 20  |...........     |
00001040  20 20 20 20 20 9c 22 0d  05 8c 2c f1 22 94 9d ed  |     ."...,."...|
00001050  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00001070  20 9c 22 0d 05 96 2c f1  22 94 9d 93 9a 20 20 20  | ."...,."....   |
00001080  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001090  20 20 20 20 20 20 20 20  20 20 20 20 20 9c 22 0d  |             .".|
000010a0  05 a0 2c f1 22 94 9d 20  20 20 20 20 88 86 57 68  |..,."..     ..Wh|
000010b0  69 63 68 20 64 6f 20 79  6f 75 20 72 65 71 75 69  |ich do you requi|
000010c0  72 65 20 20 20 20 20 20  20 9c 22 0d 05 aa 2c f1  |re       ."...,.|
000010d0  22 94 9d 93 9a 20 20 20  20 20 20 20 20 20 20 20  |"....           |
000010e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000010f0  20 20 20 20 20 9c 22 0d  05 b4 2c f1 22 94 9d 20  |     ."...,.".. |
00001100  20 20 20 20 20 20 20 81  31 29 87 49 6e 73 74 72  |       .1).Instr|
00001110  75 63 74 69 6f 6e 73 20  20 20 20 20 20 20 20 20  |uctions         |
00001120  20 9c 22 0d 05 be 2c f1  22 94 9d 20 9a 20 20 20  | ."...,.".. .   |
00001130  20 20 20 81 32 29 87 44  61 74 61 20 6d 61 6b 65  |   .2).Data make|
00001140  72 20 20 20 20 20 20 20  20 20 20 20 20 9c 22 0d  |r            .".|
00001150  05 c8 2c f1 22 94 9d 20  9a 20 20 20 20 20 20 81  |..,.".. .      .|
00001160  33 29 87 47 61 6d 65 20  20 20 20 20 20 20 20 20  |3).Game         |
00001170  20 20 20 20 20 20 20 20  20 9c 22 0d 05 d2 2c f1  |         ."...,.|
00001180  22 94 9d 20 9a 20 20 20  20 20 20 20 20 20 20 20  |".. .           |
00001190  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000011a0  20 20 20 20 20 9c 22 0d  05 dc 2c f1 22 94 9d 20  |     ."...,.".. |
000011b0  9a 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000011c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000011d0  20 9c 22 0d 05 e6 2d f1  22 94 9d 93 9a 20 20 20  | ."...-."....   |
000011e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000011f0  20 20 20 20 20 20 20 20  20 20 20 20 8c 9c 22 3b  |            ..";|
00001200  0d 05 f0 05 e1 0d ff                              |.......|
00001207
30-07-88/INTRO.m0
30-07-88/INTRO.m1
30-07-88/INTRO.m2
30-07-88/INTRO.m4
30-07-88/INTRO.m5