:PROGRAM ALPHABET.BAS3 :***** MAKE SURE CRT VOLUME IS WAY UP! ******************** :*** THIS PROG. ALSO DEMOSTRATES (LINE 30) HOW SPEECH SYNTH. CAN WORK :*** WHILE AT THE SAME TIME PERFORMING OTHER TASK (IN THIS CASE PRINTING). ' ::SET UP LINKP1 ::VOCABULARY BACKGROUND8(P3 ::THIS VALUE WILL CHANGEH2 I $h<P2 ::USE WORD FROM LISTFP3P3 ::NEXT WORDP  N ::PASS CONTROLU ,Z:PRINT "WORD CODE #: ";I[UI6\ ,,(U),,(U )dP2 ::CHECK STATUSn  N ::PASS CONTROLBx P7 Z ::IF BUSY -LOOPX U , : Uq T  : : Ty I:*****************************************:*****************************************:*****************************************1':SUBROUTINE: SET UP LINKH':SET UP THE LINKm$':BETWEEN SPEECH BIOS AND BASICu.':8' T%()B' D%(a)L' P,TV'P1: P2: P3: P4: P5: P6: P7`'TMP: TP!: TALK: Ij'TP!(T%())t' I 1~' TMP' ITP!,TMP'' I5' SEG PN'P4()()X' SEG^'' 85,139,236,30,139,118,18,139' 28,139,118,16,139,4,138,227' 139,118,14,139,28,139,118,10' 139,52,86,139,118,8,139,12 ' 139,118,12,142,28,94,205,77)' 31,139,118,6,136,4,93,2024( 14,0a::*************************************::*************************************::************************************* N:SUBROUTINE: PASS CONTROL*N:PASS INFORMATION AND4N:CONTROL TO SPEECH BIOS>N:.HNTP!(T%())PRN TP! TALKTP!k\N TP! TALKTP!fN TALK(P1,P2,P3,P4,P5,P6,P7)pN0u:********* DISPLAY ALPHABET TEST *************************5u:FOR U=65 TO 90*:u:PRINT "CODE1 = ";U , CHR$(U) ,,"CODE2 = ";U+32,CHR$(U+32)I?u:FOR Q=1 TO 600 : NEXT QWDu:NEXT UNu:*********************************************************