This video covers many of the sound-specific features and commands available in TI BASIC, Extended BASIC, and assembly language, as well as TI's Speech Synthesizer peripheral. The examples of the computer's sound and speech operations are shown using a combination of a real 4A console and the Classic99 emulator.
We look at:
The computer's sound controller, the TMS9919/SN94624
The tone and noise channels of the sound system
Sound commands and features in BASIC and Extended BASIC
This program demonstrates keeping the music note frequencies in an array and storing a song in an array.
10 CALL CLEAR
20 CALL SOUND(-4000,932,8)
30 REM ** START **
40 PRINT "OOHHHHHHHH..."
50 GOSUB 120
60 DU=100
70 READ Q
80 ON Q+1 GOSUB 290,200,230,260,110
90 PRINT "BLAH ";
100 GOTO 70
110 END
120 REM ** MUSIC **
130 TRT=2^(1/12)
140 DIM NV(73)
150 NV(0)=131
160 FOR A=1 TO 72
170 NV(A)=NV(A-1)*TRT
180 NEXT A
190 RETURN
200 READ N1
210 CALL SOUND(DU,NV(N1),0)
220 RETURN
230 READ N1,N2
240 CALL SOUND(DU,NV(N1),0,NV(N2),0)
250 RETURN
260 READ N1,N2,N3
270 CALL SOUND(DU,NV(N1),0,NV(N2),0,NV(N3),0)
280 RETURN
290 CALL SOUND(DU,4E4,30)
300 RETURN
310 DATA 2,39,3
320 DATA 1,41
330 DATA 3,42,18,22
340 DATA 1,44
350 DATA 2,46,8
360 DATA 1,44
370 DATA 3,42,22,25
380 DATA 1,41
390 DATA 2,39,6
400 DATA 1,42
410 DATA 3,47,18,27
420 DATA 1,42
430 DATA 2,51,11
440 DATA 1,49
450 DATA 3,47,21,27
460 DATA 1,46
470 DATA 2,44,5
480 DATA 1,42
490 DATA 3,41,18,27
500 DATA 1,39
510 DATA 2,38,10
520 DATA 1,47
530 DATA 3,46,18,26
540 DATA 1,41
550 DATA 2,44,10
560 DATA 1,42
570 DATA 3,41,20,22
580 DATA 1,42
590 DATA 2,39,15
600 DATA 0
610 DATA 2,46,10
620 DATA 0
630 DATA 3,51,22,30
640 DATA 0
650 DATA 4
TEIISPEAK (TI BASIC with Speech Synthesizer & Terminal Emulator II inserted)
This program accepts input of words and phrases to speak using the text-to-speech features in the TEII cartridge.
10 CALL CLEAR
20 OPEN #1:"SPEECH",OUTPUT
30 PRINT "TEII SPEECH EXAMPLE"
40 PRINT
50 CALL SOUND(-700,4E4,30)
60 INPUT A$
70 IF A$="" THEN 90
80 G$=A$
90 IF G$="QUIT" THEN 120
100 PRINT #1:G$
110 GOTO 50
120 END
EBSPEAK (TI Extended BASIC with Speech Synthesizer connected)
This program accepts input of words and phrases to speak words and phrases in the Speech Synthesizer's resident vocabulary.
10 CALL CLEAR
30 PRINT "EXT BASIC SPEECH EXAMPLE"
40 PRINT
50 CALL SOUND(-700,4E4,30)
60 INPUT A$
70 IF A$="" THEN 90
80 G$=A$
90 IF G$="QUIT" THEN 120
100 CALL SAY(G$)
110 GOTO 50
120 END
Posted in General on 2019-02-07 07:33:00.
Hits: 347