Home » CEEFAX disks » telesoftware10.adl » 25-10-88/T\SPK03

25-10-88/T\SPK03

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 » telesoftware10.adl
Filename: 25-10-88/T\SPK03
Read OK:
File size: 17A3 bytes
Load address: 0000
Exec address: FFFFFFFF
File contents
The Acorn Speech System  -  by  -  Gordon Horsington
----------------------------------------------------

Module 3. Using the Read and Branch intsruction.
------------------------------------------------

The simple use of the Read and Branch instruction has already been
demonstrated in module 1. This instruction can be very useful when only
one word PHROM is available to the speech processor. If more than one word
PHROM is available then this instruction must not be used because it can
lead to garbled nonsence being spoken and may also crash the speech
processor so that the computer has to be switched off to reset it.

The Acorn speech upgrade kit is supplied with only one word PHROM and
although Texas Instruments produce at least four other 16k word PHROMs
which could be installed in the BBC B, these alternative word PHROMs are
not commonly used. When the alternative word PHROMs are not available the
Read and Branch instruction can be used without any problems.

The Read and Branch instruction is an indirect Load Address instruction
and can only be used if the word PHROM address register has first been
loaded with the address of a pointer in the one available word PHROM. This
pointer must contain the address of the speech data for the word to be
spoken.

The ASCII words and word-parts are the easiest to use with this command
because the address of the associated pointers can be calculated from the
word name. To find the pointer associated with any ASCII word it is only
necessary to multiply the ASCII code by two. For example, the pointer
associated with the word B (ASCII &42) is at &84 (LSB) and &85 (MSB) in
word PHROM A.

In order to speak an ASCII associated word using the Read and Branch
instruction it is necessary to execute the following steps:


1) Read the ASCII word from a table or the keyboard or whatever.

2) Multiply the ASCII code by two to give the pointer address.

3) Transform the pointer address into the five bytes used by the Load
   Address command and load the word PHROM address register with the
   pointer address.

4) Execute the Read and Branch instruction to load the address register
   with the contents of the pointer.

5) Execute the Speak instruction to speak the word.

6) If necessary, go back to 1) and read the next word.


Using this algorithm it is possible to speak a list of ASCII associated
words from word PHROM A. For example, the list 123456 will be spoken as
"one two three four five six" and the list [pjtks as "start pressing the
keys". The demonstration program BRANCH can speak up to 255 words or
word-parts using the simple loop in lines 70 to 150 and the subroutine
'branch' in lines 190 to 510. It uses an end-of-text marker byte (&FF) at
the end of a string of ASCII bytes to exit from the loop.

The subroutine branch first makes sure that the byte in the accumulator
is in the range from &20 to &7F. If it is outside this range it does not
have an ASCII associated word. The accumulator is then multiplied by two
to give the pointer address associated with the word. Because the range of
characters is limited to the range from &20 to &7F, the pointer address is
always less than &100. The most significant byte of the pointer address is
always &00.

The pointer address is transformed into the five bytes required by the
Load Address command. The first two of these bytes have to be calculated,
but, because the most significant byte of the address is always zero and
the word PHROM number is always &0F, the last three bytes used with the
Load Address command are always &40, &4C and &43.

After loading the word PHROM address register with the address of the
ASCII associated word pointer, the Read and Branch command is sent to the
speech processor. This command loads the word PHROM address register with
the contents of the pointer so that the address register then points to
the start of speech data for the ASCII associated word. Sending the Speak
command speaks the word and a return is made from the subroutine.

Load and run the program BRANCH. It will speak the words "six plus eight
minus five is nine". You can alter the word list in line 170 to experiment
with the speech it produces.


   10 REM: BRANCH
   20 osbyte=&FFF4
   30 DIM mcode &200
   40 FORpass=0TO2STEP2
   50 P%=mcode
   60 [       OPT pass
   70         LDX #0
   80 .loop
   90         LDA data,X
  100         BMI return
  110         JSR branch
  120         INX
  130         BNE loop
  140 .return
  150         RTS
  160 .data
  170         EQUS "6+8-5=9"
  180         EQUB &FF      \ end of data byte
  190 .branch
  200         CMP #ASC(" ") \ ASCII 32
  210         BCC return    \ return if less than 32
  220         CMP #ASC("~")+1 \ ASCII 128
  230         BCS return    \ return if greater than 127
  240         ASL A         \ multiply accumulator by 2
  250         PHA           \ temporary store for accumulator
  260         AND #&F       \ LS nybble for Load Address
  270         ORA #&40      \ Load Address command
  280         TAY           \ command into Y register
  290         LDA #&9F      \ write to speech processor
  300         JSR osbyte
  310         PLA           \ pull temporary store
  320         AND #&F0      \ isolate next nybble
  330         LSR A
  340         LSR A
  350         LSR A
  360         LSR A
  370         ORA #&40      \ Load Address command
  380         TAY           \ command into Y register
  390         LDA #&9F      \ write to speech processor
  400         JSR osbyte
  410         LDY #&40      \ third byte must be #&40
  420         JSR osbyte
  430         LDY #&4C      \ fourth byte must be #&4C
  440         JSR osbyte
  450         LDY #&43      \ fifth byte must be #&43
  460         JSR osbyte
  470         LDA #&9F      \ write to speech processor
  480         LDY #&30      \ read and branch command
  490         JSR osbyte    \ send read byte command
  500         LDY #&50      \ speak command
  510         JMP osbyte    \ speak the word and return
  520 ]
  530 NEXT
  540 CALL mcode
00000000  54 68 65 20 41 63 6f 72  6e 20 53 70 65 65 63 68  |The Acorn Speech|
00000010  20 53 79 73 74 65 6d 20  20 2d 20 20 62 79 20 20  | System  -  by  |
00000020  2d 20 20 47 6f 72 64 6f  6e 20 48 6f 72 73 69 6e  |-  Gordon Horsin|
00000030  67 74 6f 6e 0d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |gton.-----------|
00000040  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000060  2d 2d 2d 2d 2d 2d 2d 2d  2d 0d 0d 4d 6f 64 75 6c  |---------..Modul|
00000070  65 20 33 2e 20 55 73 69  6e 67 20 74 68 65 20 52  |e 3. Using the R|
00000080  65 61 64 20 61 6e 64 20  42 72 61 6e 63 68 20 69  |ead and Branch i|
00000090  6e 74 73 72 75 63 74 69  6f 6e 2e 0d 2d 2d 2d 2d  |ntsruction..----|
000000a0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000000c0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 0d 0d 54 68  |------------..Th|
000000d0  65 20 73 69 6d 70 6c 65  20 75 73 65 20 6f 66 20  |e simple use of |
000000e0  74 68 65 20 52 65 61 64  20 61 6e 64 20 42 72 61  |the Read and Bra|
000000f0  6e 63 68 20 69 6e 73 74  72 75 63 74 69 6f 6e 20  |nch instruction |
00000100  68 61 73 20 61 6c 72 65  61 64 79 20 62 65 65 6e  |has already been|
00000110  0d 64 65 6d 6f 6e 73 74  72 61 74 65 64 20 69 6e  |.demonstrated in|
00000120  20 6d 6f 64 75 6c 65 20  31 2e 20 54 68 69 73 20  | module 1. This |
00000130  69 6e 73 74 72 75 63 74  69 6f 6e 20 63 61 6e 20  |instruction can |
00000140  62 65 20 76 65 72 79 20  75 73 65 66 75 6c 20 77  |be very useful w|
00000150  68 65 6e 20 6f 6e 6c 79  0d 6f 6e 65 20 77 6f 72  |hen only.one wor|
00000160  64 20 50 48 52 4f 4d 20  69 73 20 61 76 61 69 6c  |d PHROM is avail|
00000170  61 62 6c 65 20 74 6f 20  74 68 65 20 73 70 65 65  |able to the spee|
00000180  63 68 20 70 72 6f 63 65  73 73 6f 72 2e 20 49 66  |ch processor. If|
00000190  20 6d 6f 72 65 20 74 68  61 6e 20 6f 6e 65 20 77  | more than one w|
000001a0  6f 72 64 0d 50 48 52 4f  4d 20 69 73 20 61 76 61  |ord.PHROM is ava|
000001b0  69 6c 61 62 6c 65 20 74  68 65 6e 20 74 68 69 73  |ilable then this|
000001c0  20 69 6e 73 74 72 75 63  74 69 6f 6e 20 6d 75 73  | instruction mus|
000001d0  74 20 6e 6f 74 20 62 65  20 75 73 65 64 20 62 65  |t not be used be|
000001e0  63 61 75 73 65 20 69 74  20 63 61 6e 0d 6c 65 61  |cause it can.lea|
000001f0  64 20 74 6f 20 67 61 72  62 6c 65 64 20 6e 6f 6e  |d to garbled non|
00000200  73 65 6e 63 65 20 62 65  69 6e 67 20 73 70 6f 6b  |sence being spok|
00000210  65 6e 20 61 6e 64 20 6d  61 79 20 61 6c 73 6f 20  |en and may also |
00000220  63 72 61 73 68 20 74 68  65 20 73 70 65 65 63 68  |crash the speech|
00000230  0d 70 72 6f 63 65 73 73  6f 72 20 73 6f 20 74 68  |.processor so th|
00000240  61 74 20 74 68 65 20 63  6f 6d 70 75 74 65 72 20  |at the computer |
00000250  68 61 73 20 74 6f 20 62  65 20 73 77 69 74 63 68  |has to be switch|
00000260  65 64 20 6f 66 66 20 74  6f 20 72 65 73 65 74 20  |ed off to reset |
00000270  69 74 2e 0d 0d 54 68 65  20 41 63 6f 72 6e 20 73  |it...The Acorn s|
00000280  70 65 65 63 68 20 75 70  67 72 61 64 65 20 6b 69  |peech upgrade ki|
00000290  74 20 69 73 20 73 75 70  70 6c 69 65 64 20 77 69  |t is supplied wi|
000002a0  74 68 20 6f 6e 6c 79 20  6f 6e 65 20 77 6f 72 64  |th only one word|
000002b0  20 50 48 52 4f 4d 20 61  6e 64 0d 61 6c 74 68 6f  | PHROM and.altho|
000002c0  75 67 68 20 54 65 78 61  73 20 49 6e 73 74 72 75  |ugh Texas Instru|
000002d0  6d 65 6e 74 73 20 70 72  6f 64 75 63 65 20 61 74  |ments produce at|
000002e0  20 6c 65 61 73 74 20 66  6f 75 72 20 6f 74 68 65  | least four othe|
000002f0  72 20 31 36 6b 20 77 6f  72 64 20 50 48 52 4f 4d  |r 16k word PHROM|
00000300  73 0d 77 68 69 63 68 20  63 6f 75 6c 64 20 62 65  |s.which could be|
00000310  20 69 6e 73 74 61 6c 6c  65 64 20 69 6e 20 74 68  | installed in th|
00000320  65 20 42 42 43 20 42 2c  20 74 68 65 73 65 20 61  |e BBC B, these a|
00000330  6c 74 65 72 6e 61 74 69  76 65 20 77 6f 72 64 20  |lternative word |
00000340  50 48 52 4f 4d 73 20 61  72 65 0d 6e 6f 74 20 63  |PHROMs are.not c|
00000350  6f 6d 6d 6f 6e 6c 79 20  75 73 65 64 2e 20 57 68  |ommonly used. Wh|
00000360  65 6e 20 74 68 65 20 61  6c 74 65 72 6e 61 74 69  |en the alternati|
00000370  76 65 20 77 6f 72 64 20  50 48 52 4f 4d 73 20 61  |ve word PHROMs a|
00000380  72 65 20 6e 6f 74 20 61  76 61 69 6c 61 62 6c 65  |re not available|
00000390  20 74 68 65 0d 52 65 61  64 20 61 6e 64 20 42 72  | the.Read and Br|
000003a0  61 6e 63 68 20 69 6e 73  74 72 75 63 74 69 6f 6e  |anch instruction|
000003b0  20 63 61 6e 20 62 65 20  75 73 65 64 20 77 69 74  | can be used wit|
000003c0  68 6f 75 74 20 61 6e 79  20 70 72 6f 62 6c 65 6d  |hout any problem|
000003d0  73 2e 0d 0d 54 68 65 20  52 65 61 64 20 61 6e 64  |s...The Read and|
000003e0  20 42 72 61 6e 63 68 20  69 6e 73 74 72 75 63 74  | Branch instruct|
000003f0  69 6f 6e 20 69 73 20 61  6e 20 69 6e 64 69 72 65  |ion is an indire|
00000400  63 74 20 4c 6f 61 64 20  41 64 64 72 65 73 73 20  |ct Load Address |
00000410  69 6e 73 74 72 75 63 74  69 6f 6e 0d 61 6e 64 20  |instruction.and |
00000420  63 61 6e 20 6f 6e 6c 79  20 62 65 20 75 73 65 64  |can only be used|
00000430  20 69 66 20 74 68 65 20  77 6f 72 64 20 50 48 52  | if the word PHR|
00000440  4f 4d 20 61 64 64 72 65  73 73 20 72 65 67 69 73  |OM address regis|
00000450  74 65 72 20 68 61 73 20  66 69 72 73 74 20 62 65  |ter has first be|
00000460  65 6e 0d 6c 6f 61 64 65  64 20 77 69 74 68 20 74  |en.loaded with t|
00000470  68 65 20 61 64 64 72 65  73 73 20 6f 66 20 61 20  |he address of a |
00000480  70 6f 69 6e 74 65 72 20  69 6e 20 74 68 65 20 6f  |pointer in the o|
00000490  6e 65 20 61 76 61 69 6c  61 62 6c 65 20 77 6f 72  |ne available wor|
000004a0  64 20 50 48 52 4f 4d 2e  20 54 68 69 73 0d 70 6f  |d PHROM. This.po|
000004b0  69 6e 74 65 72 20 6d 75  73 74 20 63 6f 6e 74 61  |inter must conta|
000004c0  69 6e 20 74 68 65 20 61  64 64 72 65 73 73 20 6f  |in the address o|
000004d0  66 20 74 68 65 20 73 70  65 65 63 68 20 64 61 74  |f the speech dat|
000004e0  61 20 66 6f 72 20 74 68  65 20 77 6f 72 64 20 74  |a for the word t|
000004f0  6f 20 62 65 0d 73 70 6f  6b 65 6e 2e 0d 0d 54 68  |o be.spoken...Th|
00000500  65 20 41 53 43 49 49 20  77 6f 72 64 73 20 61 6e  |e ASCII words an|
00000510  64 20 77 6f 72 64 2d 70  61 72 74 73 20 61 72 65  |d word-parts are|
00000520  20 74 68 65 20 65 61 73  69 65 73 74 20 74 6f 20  | the easiest to |
00000530  75 73 65 20 77 69 74 68  20 74 68 69 73 20 63 6f  |use with this co|
00000540  6d 6d 61 6e 64 0d 62 65  63 61 75 73 65 20 74 68  |mmand.because th|
00000550  65 20 61 64 64 72 65 73  73 20 6f 66 20 74 68 65  |e address of the|
00000560  20 61 73 73 6f 63 69 61  74 65 64 20 70 6f 69 6e  | associated poin|
00000570  74 65 72 73 20 63 61 6e  20 62 65 20 63 61 6c 63  |ters can be calc|
00000580  75 6c 61 74 65 64 20 66  72 6f 6d 20 74 68 65 0d  |ulated from the.|
00000590  77 6f 72 64 20 6e 61 6d  65 2e 20 54 6f 20 66 69  |word name. To fi|
000005a0  6e 64 20 74 68 65 20 70  6f 69 6e 74 65 72 20 61  |nd the pointer a|
000005b0  73 73 6f 63 69 61 74 65  64 20 77 69 74 68 20 61  |ssociated with a|
000005c0  6e 79 20 41 53 43 49 49  20 77 6f 72 64 20 69 74  |ny ASCII word it|
000005d0  20 69 73 20 6f 6e 6c 79  0d 6e 65 63 65 73 73 61  | is only.necessa|
000005e0  72 79 20 74 6f 20 6d 75  6c 74 69 70 6c 79 20 74  |ry to multiply t|
000005f0  68 65 20 41 53 43 49 49  20 63 6f 64 65 20 62 79  |he ASCII code by|
00000600  20 74 77 6f 2e 20 46 6f  72 20 65 78 61 6d 70 6c  | two. For exampl|
00000610  65 2c 20 74 68 65 20 70  6f 69 6e 74 65 72 0d 61  |e, the pointer.a|
00000620  73 73 6f 63 69 61 74 65  64 20 77 69 74 68 20 74  |ssociated with t|
00000630  68 65 20 77 6f 72 64 20  42 20 28 41 53 43 49 49  |he word B (ASCII|
00000640  20 26 34 32 29 20 69 73  20 61 74 20 26 38 34 20  | &42) is at &84 |
00000650  28 4c 53 42 29 20 61 6e  64 20 26 38 35 20 28 4d  |(LSB) and &85 (M|
00000660  53 42 29 20 69 6e 0d 77  6f 72 64 20 50 48 52 4f  |SB) in.word PHRO|
00000670  4d 20 41 2e 0d 0d 49 6e  20 6f 72 64 65 72 20 74  |M A...In order t|
00000680  6f 20 73 70 65 61 6b 20  61 6e 20 41 53 43 49 49  |o speak an ASCII|
00000690  20 61 73 73 6f 63 69 61  74 65 64 20 77 6f 72 64  | associated word|
000006a0  20 75 73 69 6e 67 20 74  68 65 20 52 65 61 64 20  | using the Read |
000006b0  61 6e 64 20 42 72 61 6e  63 68 0d 69 6e 73 74 72  |and Branch.instr|
000006c0  75 63 74 69 6f 6e 20 69  74 20 69 73 20 6e 65 63  |uction it is nec|
000006d0  65 73 73 61 72 79 20 74  6f 20 65 78 65 63 75 74  |essary to execut|
000006e0  65 20 74 68 65 20 66 6f  6c 6c 6f 77 69 6e 67 20  |e the following |
000006f0  73 74 65 70 73 3a 0d 0d  0d 31 29 20 52 65 61 64  |steps:...1) Read|
00000700  20 74 68 65 20 41 53 43  49 49 20 77 6f 72 64 20  | the ASCII word |
00000710  66 72 6f 6d 20 61 20 74  61 62 6c 65 20 6f 72 20  |from a table or |
00000720  74 68 65 20 6b 65 79 62  6f 61 72 64 20 6f 72 20  |the keyboard or |
00000730  77 68 61 74 65 76 65 72  2e 0d 0d 32 29 20 4d 75  |whatever...2) Mu|
00000740  6c 74 69 70 6c 79 20 74  68 65 20 41 53 43 49 49  |ltiply the ASCII|
00000750  20 63 6f 64 65 20 62 79  20 74 77 6f 20 74 6f 20  | code by two to |
00000760  67 69 76 65 20 74 68 65  20 70 6f 69 6e 74 65 72  |give the pointer|
00000770  20 61 64 64 72 65 73 73  2e 0d 0d 33 29 20 54 72  | address...3) Tr|
00000780  61 6e 73 66 6f 72 6d 20  74 68 65 20 70 6f 69 6e  |ansform the poin|
00000790  74 65 72 20 61 64 64 72  65 73 73 20 69 6e 74 6f  |ter address into|
000007a0  20 74 68 65 20 66 69 76  65 20 62 79 74 65 73 20  | the five bytes |
000007b0  75 73 65 64 20 62 79 20  74 68 65 20 4c 6f 61 64  |used by the Load|
000007c0  0d 20 20 20 41 64 64 72  65 73 73 20 63 6f 6d 6d  |.   Address comm|
000007d0  61 6e 64 20 61 6e 64 20  6c 6f 61 64 20 74 68 65  |and and load the|
000007e0  20 77 6f 72 64 20 50 48  52 4f 4d 20 61 64 64 72  | word PHROM addr|
000007f0  65 73 73 20 72 65 67 69  73 74 65 72 20 77 69 74  |ess register wit|
00000800  68 20 74 68 65 0d 20 20  20 70 6f 69 6e 74 65 72  |h the.   pointer|
00000810  20 61 64 64 72 65 73 73  2e 0d 0d 34 29 20 45 78  | address...4) Ex|
00000820  65 63 75 74 65 20 74 68  65 20 52 65 61 64 20 61  |ecute the Read a|
00000830  6e 64 20 42 72 61 6e 63  68 20 69 6e 73 74 72 75  |nd Branch instru|
00000840  63 74 69 6f 6e 20 74 6f  20 6c 6f 61 64 20 74 68  |ction to load th|
00000850  65 20 61 64 64 72 65 73  73 20 72 65 67 69 73 74  |e address regist|
00000860  65 72 0d 20 20 20 77 69  74 68 20 74 68 65 20 63  |er.   with the c|
00000870  6f 6e 74 65 6e 74 73 20  6f 66 20 74 68 65 20 70  |ontents of the p|
00000880  6f 69 6e 74 65 72 2e 0d  0d 35 29 20 45 78 65 63  |ointer...5) Exec|
00000890  75 74 65 20 74 68 65 20  53 70 65 61 6b 20 69 6e  |ute the Speak in|
000008a0  73 74 72 75 63 74 69 6f  6e 20 74 6f 20 73 70 65  |struction to spe|
000008b0  61 6b 20 74 68 65 20 77  6f 72 64 2e 0d 0d 36 29  |ak the word...6)|
000008c0  20 49 66 20 6e 65 63 65  73 73 61 72 79 2c 20 67  | If necessary, g|
000008d0  6f 20 62 61 63 6b 20 74  6f 20 31 29 20 61 6e 64  |o back to 1) and|
000008e0  20 72 65 61 64 20 74 68  65 20 6e 65 78 74 20 77  | read the next w|
000008f0  6f 72 64 2e 0d 0d 0d 55  73 69 6e 67 20 74 68 69  |ord....Using thi|
00000900  73 20 61 6c 67 6f 72 69  74 68 6d 20 69 74 20 69  |s algorithm it i|
00000910  73 20 70 6f 73 73 69 62  6c 65 20 74 6f 20 73 70  |s possible to sp|
00000920  65 61 6b 20 61 20 6c 69  73 74 20 6f 66 20 41 53  |eak a list of AS|
00000930  43 49 49 20 61 73 73 6f  63 69 61 74 65 64 0d 77  |CII associated.w|
00000940  6f 72 64 73 20 66 72 6f  6d 20 77 6f 72 64 20 50  |ords from word P|
00000950  48 52 4f 4d 20 41 2e 20  46 6f 72 20 65 78 61 6d  |HROM A. For exam|
00000960  70 6c 65 2c 20 74 68 65  20 6c 69 73 74 20 31 32  |ple, the list 12|
00000970  33 34 35 36 20 77 69 6c  6c 20 62 65 20 73 70 6f  |3456 will be spo|
00000980  6b 65 6e 20 61 73 0d 22  6f 6e 65 20 74 77 6f 20  |ken as."one two |
00000990  74 68 72 65 65 20 66 6f  75 72 20 66 69 76 65 20  |three four five |
000009a0  73 69 78 22 20 61 6e 64  20 74 68 65 20 6c 69 73  |six" and the lis|
000009b0  74 20 5b 70 6a 74 6b 73  20 61 73 20 22 73 74 61  |t [pjtks as "sta|
000009c0  72 74 20 70 72 65 73 73  69 6e 67 20 74 68 65 0d  |rt pressing the.|
000009d0  6b 65 79 73 22 2e 20 54  68 65 20 64 65 6d 6f 6e  |keys". The demon|
000009e0  73 74 72 61 74 69 6f 6e  20 70 72 6f 67 72 61 6d  |stration program|
000009f0  20 42 52 41 4e 43 48 20  63 61 6e 20 73 70 65 61  | BRANCH can spea|
00000a00  6b 20 75 70 20 74 6f 20  32 35 35 20 77 6f 72 64  |k up to 255 word|
00000a10  73 20 6f 72 0d 77 6f 72  64 2d 70 61 72 74 73 20  |s or.word-parts |
00000a20  75 73 69 6e 67 20 74 68  65 20 73 69 6d 70 6c 65  |using the simple|
00000a30  20 6c 6f 6f 70 20 69 6e  20 6c 69 6e 65 73 20 37  | loop in lines 7|
00000a40  30 20 74 6f 20 31 35 30  20 61 6e 64 20 74 68 65  |0 to 150 and the|
00000a50  20 73 75 62 72 6f 75 74  69 6e 65 0d 27 62 72 61  | subroutine.'bra|
00000a60  6e 63 68 27 20 69 6e 20  6c 69 6e 65 73 20 31 39  |nch' in lines 19|
00000a70  30 20 74 6f 20 35 31 30  2e 20 49 74 20 75 73 65  |0 to 510. It use|
00000a80  73 20 61 6e 20 65 6e 64  2d 6f 66 2d 74 65 78 74  |s an end-of-text|
00000a90  20 6d 61 72 6b 65 72 20  62 79 74 65 20 28 26 46  | marker byte (&F|
00000aa0  46 29 20 61 74 0d 74 68  65 20 65 6e 64 20 6f 66  |F) at.the end of|
00000ab0  20 61 20 73 74 72 69 6e  67 20 6f 66 20 41 53 43  | a string of ASC|
00000ac0  49 49 20 62 79 74 65 73  20 74 6f 20 65 78 69 74  |II bytes to exit|
00000ad0  20 66 72 6f 6d 20 74 68  65 20 6c 6f 6f 70 2e 0d  | from the loop..|
00000ae0  0d 54 68 65 20 73 75 62  72 6f 75 74 69 6e 65 20  |.The subroutine |
00000af0  62 72 61 6e 63 68 20 66  69 72 73 74 20 6d 61 6b  |branch first mak|
00000b00  65 73 20 73 75 72 65 20  74 68 61 74 20 74 68 65  |es sure that the|
00000b10  20 62 79 74 65 20 69 6e  20 74 68 65 20 61 63 63  | byte in the acc|
00000b20  75 6d 75 6c 61 74 6f 72  0d 69 73 20 69 6e 20 74  |umulator.is in t|
00000b30  68 65 20 72 61 6e 67 65  20 66 72 6f 6d 20 26 32  |he range from &2|
00000b40  30 20 74 6f 20 26 37 46  2e 20 49 66 20 69 74 20  |0 to &7F. If it |
00000b50  69 73 20 6f 75 74 73 69  64 65 20 74 68 69 73 20  |is outside this |
00000b60  72 61 6e 67 65 20 69 74  20 64 6f 65 73 20 6e 6f  |range it does no|
00000b70  74 0d 68 61 76 65 20 61  6e 20 41 53 43 49 49 20  |t.have an ASCII |
00000b80  61 73 73 6f 63 69 61 74  65 64 20 77 6f 72 64 2e  |associated word.|
00000b90  20 54 68 65 20 61 63 63  75 6d 75 6c 61 74 6f 72  | The accumulator|
00000ba0  20 69 73 20 74 68 65 6e  20 6d 75 6c 74 69 70 6c  | is then multipl|
00000bb0  69 65 64 20 62 79 20 74  77 6f 0d 74 6f 20 67 69  |ied by two.to gi|
00000bc0  76 65 20 74 68 65 20 70  6f 69 6e 74 65 72 20 61  |ve the pointer a|
00000bd0  64 64 72 65 73 73 20 61  73 73 6f 63 69 61 74 65  |ddress associate|
00000be0  64 20 77 69 74 68 20 74  68 65 20 77 6f 72 64 2e  |d with the word.|
00000bf0  20 42 65 63 61 75 73 65  20 74 68 65 20 72 61 6e  | Because the ran|
00000c00  67 65 20 6f 66 0d 63 68  61 72 61 63 74 65 72 73  |ge of.characters|
00000c10  20 69 73 20 6c 69 6d 69  74 65 64 20 74 6f 20 74  | is limited to t|
00000c20  68 65 20 72 61 6e 67 65  20 66 72 6f 6d 20 26 32  |he range from &2|
00000c30  30 20 74 6f 20 26 37 46  2c 20 74 68 65 20 70 6f  |0 to &7F, the po|
00000c40  69 6e 74 65 72 20 61 64  64 72 65 73 73 20 69 73  |inter address is|
00000c50  0d 61 6c 77 61 79 73 20  6c 65 73 73 20 74 68 61  |.always less tha|
00000c60  6e 20 26 31 30 30 2e 20  54 68 65 20 6d 6f 73 74  |n &100. The most|
00000c70  20 73 69 67 6e 69 66 69  63 61 6e 74 20 62 79 74  | significant byt|
00000c80  65 20 6f 66 20 74 68 65  20 70 6f 69 6e 74 65 72  |e of the pointer|
00000c90  20 61 64 64 72 65 73 73  20 69 73 0d 61 6c 77 61  | address is.alwa|
00000ca0  79 73 20 26 30 30 2e 0d  0d 54 68 65 20 70 6f 69  |ys &00...The poi|
00000cb0  6e 74 65 72 20 61 64 64  72 65 73 73 20 69 73 20  |nter address is |
00000cc0  74 72 61 6e 73 66 6f 72  6d 65 64 20 69 6e 74 6f  |transformed into|
00000cd0  20 74 68 65 20 66 69 76  65 20 62 79 74 65 73 20  | the five bytes |
00000ce0  72 65 71 75 69 72 65 64  20 62 79 20 74 68 65 0d  |required by the.|
00000cf0  4c 6f 61 64 20 41 64 64  72 65 73 73 20 63 6f 6d  |Load Address com|
00000d00  6d 61 6e 64 2e 20 54 68  65 20 66 69 72 73 74 20  |mand. The first |
00000d10  74 77 6f 20 6f 66 20 74  68 65 73 65 20 62 79 74  |two of these byt|
00000d20  65 73 20 68 61 76 65 20  74 6f 20 62 65 20 63 61  |es have to be ca|
00000d30  6c 63 75 6c 61 74 65 64  2c 0d 62 75 74 2c 20 62  |lculated,.but, b|
00000d40  65 63 61 75 73 65 20 74  68 65 20 6d 6f 73 74 20  |ecause the most |
00000d50  73 69 67 6e 69 66 69 63  61 6e 74 20 62 79 74 65  |significant byte|
00000d60  20 6f 66 20 74 68 65 20  61 64 64 72 65 73 73 20  | of the address |
00000d70  69 73 20 61 6c 77 61 79  73 20 7a 65 72 6f 20 61  |is always zero a|
00000d80  6e 64 0d 74 68 65 20 77  6f 72 64 20 50 48 52 4f  |nd.the word PHRO|
00000d90  4d 20 6e 75 6d 62 65 72  20 69 73 20 61 6c 77 61  |M number is alwa|
00000da0  79 73 20 26 30 46 2c 20  74 68 65 20 6c 61 73 74  |ys &0F, the last|
00000db0  20 74 68 72 65 65 20 62  79 74 65 73 20 75 73 65  | three bytes use|
00000dc0  64 20 77 69 74 68 20 74  68 65 0d 4c 6f 61 64 20  |d with the.Load |
00000dd0  41 64 64 72 65 73 73 20  63 6f 6d 6d 61 6e 64 20  |Address command |
00000de0  61 72 65 20 61 6c 77 61  79 73 20 26 34 30 2c 20  |are always &40, |
00000df0  26 34 43 20 61 6e 64 20  26 34 33 2e 0d 0d 41 66  |&4C and &43...Af|
00000e00  74 65 72 20 6c 6f 61 64  69 6e 67 20 74 68 65 20  |ter loading the |
00000e10  77 6f 72 64 20 50 48 52  4f 4d 20 61 64 64 72 65  |word PHROM addre|
00000e20  73 73 20 72 65 67 69 73  74 65 72 20 77 69 74 68  |ss register with|
00000e30  20 74 68 65 20 61 64 64  72 65 73 73 20 6f 66 20  | the address of |
00000e40  74 68 65 0d 41 53 43 49  49 20 61 73 73 6f 63 69  |the.ASCII associ|
00000e50  61 74 65 64 20 77 6f 72  64 20 70 6f 69 6e 74 65  |ated word pointe|
00000e60  72 2c 20 74 68 65 20 52  65 61 64 20 61 6e 64 20  |r, the Read and |
00000e70  42 72 61 6e 63 68 20 63  6f 6d 6d 61 6e 64 20 69  |Branch command i|
00000e80  73 20 73 65 6e 74 20 74  6f 20 74 68 65 0d 73 70  |s sent to the.sp|
00000e90  65 65 63 68 20 70 72 6f  63 65 73 73 6f 72 2e 20  |eech processor. |
00000ea0  54 68 69 73 20 63 6f 6d  6d 61 6e 64 20 6c 6f 61  |This command loa|
00000eb0  64 73 20 74 68 65 20 77  6f 72 64 20 50 48 52 4f  |ds the word PHRO|
00000ec0  4d 20 61 64 64 72 65 73  73 20 72 65 67 69 73 74  |M address regist|
00000ed0  65 72 20 77 69 74 68 0d  74 68 65 20 63 6f 6e 74  |er with.the cont|
00000ee0  65 6e 74 73 20 6f 66 20  74 68 65 20 70 6f 69 6e  |ents of the poin|
00000ef0  74 65 72 20 73 6f 20 74  68 61 74 20 74 68 65 20  |ter so that the |
00000f00  61 64 64 72 65 73 73 20  72 65 67 69 73 74 65 72  |address register|
00000f10  20 74 68 65 6e 20 70 6f  69 6e 74 73 20 74 6f 0d  | then points to.|
00000f20  74 68 65 20 73 74 61 72  74 20 6f 66 20 73 70 65  |the start of spe|
00000f30  65 63 68 20 64 61 74 61  20 66 6f 72 20 74 68 65  |ech data for the|
00000f40  20 41 53 43 49 49 20 61  73 73 6f 63 69 61 74 65  | ASCII associate|
00000f50  64 20 77 6f 72 64 2e 20  53 65 6e 64 69 6e 67 20  |d word. Sending |
00000f60  74 68 65 20 53 70 65 61  6b 0d 63 6f 6d 6d 61 6e  |the Speak.comman|
00000f70  64 20 73 70 65 61 6b 73  20 74 68 65 20 77 6f 72  |d speaks the wor|
00000f80  64 20 61 6e 64 20 61 20  72 65 74 75 72 6e 20 69  |d and a return i|
00000f90  73 20 6d 61 64 65 20 66  72 6f 6d 20 74 68 65 20  |s made from the |
00000fa0  73 75 62 72 6f 75 74 69  6e 65 2e 0d 0d 4c 6f 61  |subroutine...Loa|
00000fb0  64 20 61 6e 64 20 72 75  6e 20 74 68 65 20 70 72  |d and run the pr|
00000fc0  6f 67 72 61 6d 20 42 52  41 4e 43 48 2e 20 49 74  |ogram BRANCH. It|
00000fd0  20 77 69 6c 6c 20 73 70  65 61 6b 20 74 68 65 20  | will speak the |
00000fe0  77 6f 72 64 73 20 22 73  69 78 20 70 6c 75 73 20  |words "six plus |
00000ff0  65 69 67 68 74 0d 6d 69  6e 75 73 20 66 69 76 65  |eight.minus five|
00001000  20 69 73 20 6e 69 6e 65  22 2e 20 59 6f 75 20 63  | is nine". You c|
00001010  61 6e 20 61 6c 74 65 72  20 74 68 65 20 77 6f 72  |an alter the wor|
00001020  64 20 6c 69 73 74 20 69  6e 20 6c 69 6e 65 20 31  |d list in line 1|
00001030  37 30 20 74 6f 20 65 78  70 65 72 69 6d 65 6e 74  |70 to experiment|
00001040  0d 77 69 74 68 20 74 68  65 20 73 70 65 65 63 68  |.with the speech|
00001050  20 69 74 20 70 72 6f 64  75 63 65 73 2e 0d 0d 0d  | it produces....|
00001060  20 20 20 31 30 20 52 45  4d 3a 20 42 52 41 4e 43  |   10 REM: BRANC|
00001070  48 0d 20 20 20 32 30 20  6f 73 62 79 74 65 3d 26  |H.   20 osbyte=&|
00001080  46 46 46 34 0d 20 20 20  33 30 20 44 49 4d 20 6d  |FFF4.   30 DIM m|
00001090  63 6f 64 65 20 26 32 30  30 0d 20 20 20 34 30 20  |code &200.   40 |
000010a0  46 4f 52 70 61 73 73 3d  30 54 4f 32 53 54 45 50  |FORpass=0TO2STEP|
000010b0  32 0d 20 20 20 35 30 20  50 25 3d 6d 63 6f 64 65  |2.   50 P%=mcode|
000010c0  0d 20 20 20 36 30 20 5b  20 20 20 20 20 20 20 4f  |.   60 [       O|
000010d0  50 54 20 70 61 73 73 0d  20 20 20 37 30 20 20 20  |PT pass.   70   |
000010e0  20 20 20 20 20 20 4c 44  58 20 23 30 0d 20 20 20  |      LDX #0.   |
000010f0  38 30 20 2e 6c 6f 6f 70  0d 20 20 20 39 30 20 20  |80 .loop.   90  |
00001100  20 20 20 20 20 20 20 4c  44 41 20 64 61 74 61 2c  |       LDA data,|
00001110  58 0d 20 20 31 30 30 20  20 20 20 20 20 20 20 20  |X.  100         |
00001120  42 4d 49 20 72 65 74 75  72 6e 0d 20 20 31 31 30  |BMI return.  110|
00001130  20 20 20 20 20 20 20 20  20 4a 53 52 20 62 72 61  |         JSR bra|
00001140  6e 63 68 0d 20 20 31 32  30 20 20 20 20 20 20 20  |nch.  120       |
00001150  20 20 49 4e 58 0d 20 20  31 33 30 20 20 20 20 20  |  INX.  130     |
00001160  20 20 20 20 42 4e 45 20  6c 6f 6f 70 0d 20 20 31  |    BNE loop.  1|
00001170  34 30 20 2e 72 65 74 75  72 6e 0d 20 20 31 35 30  |40 .return.  150|
00001180  20 20 20 20 20 20 20 20  20 52 54 53 0d 20 20 31  |         RTS.  1|
00001190  36 30 20 2e 64 61 74 61  0d 20 20 31 37 30 20 20  |60 .data.  170  |
000011a0  20 20 20 20 20 20 20 45  51 55 53 20 22 36 2b 38  |       EQUS "6+8|
000011b0  2d 35 3d 39 22 0d 20 20  31 38 30 20 20 20 20 20  |-5=9".  180     |
000011c0  20 20 20 20 45 51 55 42  20 26 46 46 20 20 20 20  |    EQUB &FF    |
000011d0  20 20 5c 20 65 6e 64 20  6f 66 20 64 61 74 61 20  |  \ end of data |
000011e0  62 79 74 65 0d 20 20 31  39 30 20 2e 62 72 61 6e  |byte.  190 .bran|
000011f0  63 68 0d 20 20 32 30 30  20 20 20 20 20 20 20 20  |ch.  200        |
00001200  20 43 4d 50 20 23 41 53  43 28 22 20 22 29 20 5c  | CMP #ASC(" ") \|
00001210  20 41 53 43 49 49 20 33  32 0d 20 20 32 31 30 20  | ASCII 32.  210 |
00001220  20 20 20 20 20 20 20 20  42 43 43 20 72 65 74 75  |        BCC retu|
00001230  72 6e 20 20 20 20 5c 20  72 65 74 75 72 6e 20 69  |rn    \ return i|
00001240  66 20 6c 65 73 73 20 74  68 61 6e 20 33 32 0d 20  |f less than 32. |
00001250  20 32 32 30 20 20 20 20  20 20 20 20 20 43 4d 50  | 220         CMP|
00001260  20 23 41 53 43 28 22 7e  22 29 2b 31 20 5c 20 41  | #ASC("~")+1 \ A|
00001270  53 43 49 49 20 31 32 38  0d 20 20 32 33 30 20 20  |SCII 128.  230  |
00001280  20 20 20 20 20 20 20 42  43 53 20 72 65 74 75 72  |       BCS retur|
00001290  6e 20 20 20 20 5c 20 72  65 74 75 72 6e 20 69 66  |n    \ return if|
000012a0  20 67 72 65 61 74 65 72  20 74 68 61 6e 20 31 32  | greater than 12|
000012b0  37 0d 20 20 32 34 30 20  20 20 20 20 20 20 20 20  |7.  240         |
000012c0  41 53 4c 20 41 20 20 20  20 20 20 20 20 20 5c 20  |ASL A         \ |
000012d0  6d 75 6c 74 69 70 6c 79  20 61 63 63 75 6d 75 6c  |multiply accumul|
000012e0  61 74 6f 72 20 62 79 20  32 0d 20 20 32 35 30 20  |ator by 2.  250 |
000012f0  20 20 20 20 20 20 20 20  50 48 41 20 20 20 20 20  |        PHA     |
00001300  20 20 20 20 20 20 5c 20  74 65 6d 70 6f 72 61 72  |      \ temporar|
00001310  79 20 73 74 6f 72 65 20  66 6f 72 20 61 63 63 75  |y store for accu|
00001320  6d 75 6c 61 74 6f 72 0d  20 20 32 36 30 20 20 20  |mulator.  260   |
00001330  20 20 20 20 20 20 41 4e  44 20 23 26 46 20 20 20  |      AND #&F   |
00001340  20 20 20 20 5c 20 4c 53  20 6e 79 62 62 6c 65 20  |    \ LS nybble |
00001350  66 6f 72 20 4c 6f 61 64  20 41 64 64 72 65 73 73  |for Load Address|
00001360  0d 20 20 32 37 30 20 20  20 20 20 20 20 20 20 4f  |.  270         O|
00001370  52 41 20 23 26 34 30 20  20 20 20 20 20 5c 20 4c  |RA #&40      \ L|
00001380  6f 61 64 20 41 64 64 72  65 73 73 20 63 6f 6d 6d  |oad Address comm|
00001390  61 6e 64 0d 20 20 32 38  30 20 20 20 20 20 20 20  |and.  280       |
000013a0  20 20 54 41 59 20 20 20  20 20 20 20 20 20 20 20  |  TAY           |
000013b0  5c 20 63 6f 6d 6d 61 6e  64 20 69 6e 74 6f 20 59  |\ command into Y|
000013c0  20 72 65 67 69 73 74 65  72 0d 20 20 32 39 30 20  | register.  290 |
000013d0  20 20 20 20 20 20 20 20  4c 44 41 20 23 26 39 46  |        LDA #&9F|
000013e0  20 20 20 20 20 20 5c 20  77 72 69 74 65 20 74 6f  |      \ write to|
000013f0  20 73 70 65 65 63 68 20  70 72 6f 63 65 73 73 6f  | speech processo|
00001400  72 0d 20 20 33 30 30 20  20 20 20 20 20 20 20 20  |r.  300         |
00001410  4a 53 52 20 6f 73 62 79  74 65 0d 20 20 33 31 30  |JSR osbyte.  310|
00001420  20 20 20 20 20 20 20 20  20 50 4c 41 20 20 20 20  |         PLA    |
00001430  20 20 20 20 20 20 20 5c  20 70 75 6c 6c 20 74 65  |       \ pull te|
00001440  6d 70 6f 72 61 72 79 20  73 74 6f 72 65 0d 20 20  |mporary store.  |
00001450  33 32 30 20 20 20 20 20  20 20 20 20 41 4e 44 20  |320         AND |
00001460  23 26 46 30 20 20 20 20  20 20 5c 20 69 73 6f 6c  |#&F0      \ isol|
00001470  61 74 65 20 6e 65 78 74  20 6e 79 62 62 6c 65 0d  |ate next nybble.|
00001480  20 20 33 33 30 20 20 20  20 20 20 20 20 20 4c 53  |  330         LS|
00001490  52 20 41 0d 20 20 33 34  30 20 20 20 20 20 20 20  |R A.  340       |
000014a0  20 20 4c 53 52 20 41 0d  20 20 33 35 30 20 20 20  |  LSR A.  350   |
000014b0  20 20 20 20 20 20 4c 53  52 20 41 0d 20 20 33 36  |      LSR A.  36|
000014c0  30 20 20 20 20 20 20 20  20 20 4c 53 52 20 41 0d  |0         LSR A.|
000014d0  20 20 33 37 30 20 20 20  20 20 20 20 20 20 4f 52  |  370         OR|
000014e0  41 20 23 26 34 30 20 20  20 20 20 20 5c 20 4c 6f  |A #&40      \ Lo|
000014f0  61 64 20 41 64 64 72 65  73 73 20 63 6f 6d 6d 61  |ad Address comma|
00001500  6e 64 0d 20 20 33 38 30  20 20 20 20 20 20 20 20  |nd.  380        |
00001510  20 54 41 59 20 20 20 20  20 20 20 20 20 20 20 5c  | TAY           \|
00001520  20 63 6f 6d 6d 61 6e 64  20 69 6e 74 6f 20 59 20  | command into Y |
00001530  72 65 67 69 73 74 65 72  0d 20 20 33 39 30 20 20  |register.  390  |
00001540  20 20 20 20 20 20 20 4c  44 41 20 23 26 39 46 20  |       LDA #&9F |
00001550  20 20 20 20 20 5c 20 77  72 69 74 65 20 74 6f 20  |     \ write to |
00001560  73 70 65 65 63 68 20 70  72 6f 63 65 73 73 6f 72  |speech processor|
00001570  0d 20 20 34 30 30 20 20  20 20 20 20 20 20 20 4a  |.  400         J|
00001580  53 52 20 6f 73 62 79 74  65 0d 20 20 34 31 30 20  |SR osbyte.  410 |
00001590  20 20 20 20 20 20 20 20  4c 44 59 20 23 26 34 30  |        LDY #&40|
000015a0  20 20 20 20 20 20 5c 20  74 68 69 72 64 20 62 79  |      \ third by|
000015b0  74 65 20 6d 75 73 74 20  62 65 20 23 26 34 30 0d  |te must be #&40.|
000015c0  20 20 34 32 30 20 20 20  20 20 20 20 20 20 4a 53  |  420         JS|
000015d0  52 20 6f 73 62 79 74 65  0d 20 20 34 33 30 20 20  |R osbyte.  430  |
000015e0  20 20 20 20 20 20 20 4c  44 59 20 23 26 34 43 20  |       LDY #&4C |
000015f0  20 20 20 20 20 5c 20 66  6f 75 72 74 68 20 62 79  |     \ fourth by|
00001600  74 65 20 6d 75 73 74 20  62 65 20 23 26 34 43 0d  |te must be #&4C.|
00001610  20 20 34 34 30 20 20 20  20 20 20 20 20 20 4a 53  |  440         JS|
00001620  52 20 6f 73 62 79 74 65  0d 20 20 34 35 30 20 20  |R osbyte.  450  |
00001630  20 20 20 20 20 20 20 4c  44 59 20 23 26 34 33 20  |       LDY #&43 |
00001640  20 20 20 20 20 5c 20 66  69 66 74 68 20 62 79 74  |     \ fifth byt|
00001650  65 20 6d 75 73 74 20 62  65 20 23 26 34 33 0d 20  |e must be #&43. |
00001660  20 34 36 30 20 20 20 20  20 20 20 20 20 4a 53 52  | 460         JSR|
00001670  20 6f 73 62 79 74 65 0d  20 20 34 37 30 20 20 20  | osbyte.  470   |
00001680  20 20 20 20 20 20 4c 44  41 20 23 26 39 46 20 20  |      LDA #&9F  |
00001690  20 20 20 20 5c 20 77 72  69 74 65 20 74 6f 20 73  |    \ write to s|
000016a0  70 65 65 63 68 20 70 72  6f 63 65 73 73 6f 72 0d  |peech processor.|
000016b0  20 20 34 38 30 20 20 20  20 20 20 20 20 20 4c 44  |  480         LD|
000016c0  59 20 23 26 33 30 20 20  20 20 20 20 5c 20 72 65  |Y #&30      \ re|
000016d0  61 64 20 61 6e 64 20 62  72 61 6e 63 68 20 63 6f  |ad and branch co|
000016e0  6d 6d 61 6e 64 0d 20 20  34 39 30 20 20 20 20 20  |mmand.  490     |
000016f0  20 20 20 20 4a 53 52 20  6f 73 62 79 74 65 20 20  |    JSR osbyte  |
00001700  20 20 5c 20 73 65 6e 64  20 72 65 61 64 20 62 79  |  \ send read by|
00001710  74 65 20 63 6f 6d 6d 61  6e 64 0d 20 20 35 30 30  |te command.  500|
00001720  20 20 20 20 20 20 20 20  20 4c 44 59 20 23 26 35  |         LDY #&5|
00001730  30 20 20 20 20 20 20 5c  20 73 70 65 61 6b 20 63  |0      \ speak c|
00001740  6f 6d 6d 61 6e 64 0d 20  20 35 31 30 20 20 20 20  |ommand.  510    |
00001750  20 20 20 20 20 4a 4d 50  20 6f 73 62 79 74 65 20  |     JMP osbyte |
00001760  20 20 20 5c 20 73 70 65  61 6b 20 74 68 65 20 77  |   \ speak the w|
00001770  6f 72 64 20 61 6e 64 20  72 65 74 75 72 6e 0d 20  |ord and return. |
00001780  20 35 32 30 20 5d 0d 20  20 35 33 30 20 4e 45 58  | 520 ].  530 NEX|
00001790  54 0d 20 20 35 34 30 20  43 41 4c 4c 20 6d 63 6f  |T.  540 CALL mco|
000017a0  64 65 0d                                          |de.|
000017a3
25-10-88/T\SPK03.m0
25-10-88/T\SPK03.m1
25-10-88/T\SPK03.m2
25-10-88/T\SPK03.m4
25-10-88/T\SPK03.m5