E - Programme de démonstration de la cartouche. Tandy Cartouche de parole/son
Ci-dessous, vous trouverez de brèves informations sur la Cartouche parole/son. Ce périphérique permet à votre ordinateur couleur de parler, de créer des effets sonores complexes et de reproduire de la musique sur 3 canaux indépendants. Il offre de nouvelles possibilités d'intégration de la parole et des effets sonores dans les jeux, les programmes d'enseignement et d'autres applications. Possibilité de programmer des effets sonores et des données vocales.
Programme de démonstration de la cartouche E
Ce programme montre plu si eu rs des possibi lités de la cartou che de parole/son : parole et son simu ltané s, création de musiqu e, effets sonores complex es, u tilisation des comman des et des registres de son , etc.
1 0
R EM
* * * * * * * * * * * * * * * * * * * * * * * * * ** * * *
20 REM
*
P RO G R AMME DE D EMONS T RAT I ON
*
30 REM
* * * * * *
DE CA RTOUCHE
*******
40 REM
* * * * * *
P A R O L E / SON
*******
50 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
60 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
7C1 CLE/� R 5 l 2
80 X =&HFF00 : Y=&HFF7E : Z = &HFF7D
90 D I M P!f:. ( 8 )
1 00 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 1 0 R EM M I SE EN FONCT I ON
1 20 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 30 POKE z , 1 : POKE z , 0
1 40 POKE X + 1 , s 2 : POKE X +3 , 63
1 5 0 PmŒ X + 3S , 60
1 60 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 70 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 80
REM DEF I N I
C H A I NES
DE PAROLE
1 90 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2C10 GOSUB 2890
2 1 0 REM
* * * * * * * * * * * * * * * * * * ***********
220 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
230 REM CHA RGE CHA I NES DE PAROLE
240 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 5 0 P R I NT " LOAD I NG S PE E C H "
260 F O R C= 1 T O 7
270 GOSUE: 3360
280 NE X T C
290 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
300 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3 1 0 REM CHA R G E LE SON
320 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
330 P R I NT " LOAD I NG SOUND "
3412! F O R C= 1 TO 6
3 '5 0 GOt3UI?.. 3490
3612) NE X T C
370 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * � * *
380 REM
* * * * * * * * * * * * * * * * * * * * ** * * * * � * *
45
390 REM E X E CUT I ON DEMO
400 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
4 1 0 P R I NT " DEMON S T RAT I NG "
420 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
430 R E M CHA RGE HORLOGE DE BASE
440 REM
* ** * * * * * * * * * * * * * * * * * * * * * * * * * *
4 5 0 GOSUB 3 1 70
4 6 0 POKE y , &HBF
470 GOSUB 3 1 70
480 POKE Y , 60
490 GOSUB 3 1 70
5 00 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
5 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
5 2 0 REM E X E C TAM PON D E PA ROLE 0
5 30 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
5 40 POKE y , 208
5 5 0 GOSUB 3230
5 60 GOSUB 3030
5 70 GOSUB 3 1 70
5 80 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
5 9 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
600 REM E X E C TAMPON D E PA ROLE 1
6 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
620 POKE Y , 209
630 GOSUB 3030
640 GOSUB 3 1 70
6 5 0 REM
* * * * * * * * * * * ** * * * * * * * * * * * * * * * *
6 6 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
670 REM E X E C TAMPON D E PA ROLE 4
680 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
690 POKE y , 2 1 2
700 GOSUB 3300
7 1 0 GOSUB 3030
720 GOSUB 3 1 70
730 REM
* * * * * * * * * * * * * ** * * * * * * * * * * * * * *
740 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
7 5 0 REM E X E C TAM PON DE SON 0
46
760 REM *****************************
7 70 POKE Y , 2 1 6
780 GOSUB 3230
790 GOSUB 3 1 00
800 GOSUB 3 1 70
8 1 0 REM *****************************
820 REM *****************************
830 REM E X E C TAMPON DE PA ROLE 5
840 REM *****************************
8 5 0 POKE y , 2 1 3
860 GOSUB 3230
870 GOSUB 3030
880 GOSUB 3 1 70
890 REM *************** **************
900 REM *****************************
9 1 0 REM E X E C TAM PON DE SON 1
920 REM *****************************
930 POKE y , 2 1 7
940 GOSUB 3230
95 0 G O S UB 3 1 00
960 GOSUB 3 1 7 0
970 REM
*****************************
980 REM *****************************
990 REM E X E C TAM PON DE P A ROLE 2
1 000 REM ****************************
1 0 1 0 POKE y , 2 1 0
1 020 GOSUB 3030
1 030 GOSUB 3 1 70
1 040 REM *****************************
1 05 0 REM *****************************
1 060 REM E X E C TAMPON DE PA ROLE 4
1 070 REM *****************************
1 080 POKE y , 2 1 2
1 090 GOSUB 3230
1 1 00 GOSUB 3030
1 1 1 0 GOSUB 3 1 70
1 1 20 REM *****************************
1 1 3 0 REM *****************************
1 1 40 REM E X E C TAM PON 3 DE CHA I NE REG
1 1 5 0 REM *****************************
4 7
1 1 6 0 POKE y , 25 1
1 1 7 0 GOSUB 3230
1 1 80 GOSUB 3 1 00
1 1 90 GOSUB 3 1 70
1 200 REM *****************************
1 2 1 0 REM *****************************
1 220 REM E X E C T AM PON 4 DE CHA I N E REG
1 23 0 REM *****************************
1 240 POKE y , 25 2
1 25 0 GOSUB 3230
1 260 GOSUB 3 1 00
1 270 GOSUB 3 1 70
1 280 REM *****************************
1 290 REM ********** *******************
1 300 REM E X E C TAM PON 3 D E CHA I NE REG
1 3 1 0 REM *****************************
1 320 POKE y , 25 1
1 33 0 GOSUB 3230
1 340 GOSUB 3 1 00
1 46 0
1 47 0
1 480
1 490
1 5 00
1 5 1 0
1 5 20
1 5 3 0
1 5 40
1 5 5 0
1 35 0 GOSUB 3 1 70
'
1 360 REM *****************************
1 370
REM
*****************************
1 380
REM E X E C T AM PON 5 DE CHA I NE REG
1 390
REM *****************************
1 400
1 4 1 0
1 420
1 430
1 440
1 45 0
POKE y , 25 3
GOSUB 3230
GOSUB 3 1 00
GOSUB 3 1 70
REM * ****************************
REM *****************************
REM E X E C TAM PON 3 DE CHA I NE REG
REM *****************************
POKE y , 25 1
GOSUB 3230
GOSUB 3 1 00
GOSUB 3 1 70
REM *****************************
REM * ****************************
REM A R RET D U SON
REM * ****************************
48
1 5 60 POKE y , 207
1 5 7 0 GOSUB 3 1 70
1 5 80 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 5 90 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 600 REM E X E C TAM PON 3 DE PA ROLE
1 6 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 620 POKE y , 2 1 1
1 63 0 GOSUB 3230
1 640 GOSUB 3230
1 65 0 GOSUB 3230
1 66 0 GOSUB 3030
1 670 GOSUB 3 1 70
1 680 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 690 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 700 REM E X E C TAMPON 2 D E SON
1 7 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 720 POKE y , 2 1 8
1 730 GOSUB 3 1 00
1 740 GOSUB 3 1 70
1 75 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 760 REM
* ** * * * * * * * * * * * * * * * * * * * * * * * * * *
1 770 REM E X E C TAMPON 7 DE PAROLE
1 780 R E M
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 790 POKE y , 2 1 5
1 800 GOSUB 3 1 70
1 8 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 820 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 8 3 0 REM E X E C TAMPON 3 DE CHA I NE REG
1 8 40 R E M
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 8 5 0 POKE y , 25 1
1 860 G OSUB 3 1 00
1 8 70 GOSUB 3 1 70
1 880 R E M
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 890 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 900 R E M E X E C TAM PON 4 DE CHA I NE REG
1 9 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 920 POKE y , 2 5 2
1 930 G O S U B 3 1 00
1 94 0 GOSUB 3 1 70
49
1 95 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 96 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 97 0 REM E X E C T A M PON 3 DE CHA I NE REG
1 980 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
1 990 POKE y , 25 1
2000 GOSUB 3 1 00
20 1 0 GOSUB 3 1 70
2020 REM
* * ** * * * * * * * * * * * * * * * * * * * * * * * * *
2030 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2040 REM E X E C TAM PON 5 DE CHA I NE REG
2 0 5 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2060 POKE y , 25 3
2070 GOSUB 3 1 00
2080 GOSUB 3 1 70
2090 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 1 00 REM
* ** * * * * * * * * * * * * * * * * * * * * * * * * * *
2 1 1 0 REM E X E C T A M PON 3 DE CHA I NE REG
2 1 20 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 1 30 POKE y , 25 1
2 1 40 GOSUB 3 1 00
2 1 5 0 GOSUB 3 1 70
2 1 60 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 1 70 REM
* * * * * * * * * * * * * ** * * * * * * * * * * * * * *
2 1 80 REM A R RET D U SON
2 1 90 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2200 POKE y , 207
22 1 0 GOSUB 3 1 70
2220 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2230 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2240 REM E X E C T A M PON 6 DE PAROLE
225 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2260 POKE Y , 2 1 4
2270 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2280 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2290 END
2300 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
23 1 0 REM A I R 1
2320 REM COMMANDE MODE DE SON
2330 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2340 DATA 1 1 , 0 , 2 1 4 , 6 , 0 , 0 , 0 , 6
2 3 5 0 DATA 1 1 , 1 , 29 , 4 , 1 1 , 1 , 46 , 4
50
2360 DATA 1 1 ' 1 ' 29 ' LH 1 l ' 1 ' 1 3 ' 1 2
2370 DATA 1 1 , 1 , 29 , 6 , 0 , 0 , 0 , 1 8
2380 DATA l l , 0 , 22 6 , 6 , 0 , 0 , 0 , 6
2390 DATA 1 1 , 0 , 2 1 4 , 6 , 0 , 0 , 0 , 0
2400 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
24 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2420 RE:M A I R :2�
2430 REM COMMANDE MODE D E SON
2440 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
245 0 DATA l 1 , 0 , 2 1 4 , 6 , 0 , 0 , 0 , 0
2460 DATA 1 1 , 0 , 2 1 4 , 1 2 , 0 , 0 , 0 , 0
2470 DATA 1 1 , 0 , 2 1 4 , 1 2 , 0 , 0 , 0 , 0
2480 DATA 1 1 , 1 , 1 3 , 6 , 0 , 0 , 0 , 0
2490 DATA 1 1 , 0 , 25 4 , 1 2 , 0 , 0 , 0 , 0
2 5 00 DATA 1 1 , 1 , 64 i 6 , 0 , 0 , 0 , 0
2 5 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 5 20 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 5 3 0 R E M COU P DE FEU
25 40 REM
COMMANDE MODE DE B RU I T
25 5 0 REM
AVEC ENVEL O P PE
2 5 6 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 5 7 0 DATA 1 5 9 , 1 5 , 1 5 , 1 9 1 , 1 s , 1 s
2 5 8 0 DATA 223 , 1 5 , 1 5 , 99 , 0 , 1 4 , 5
25 90 DATA 0 , 0 , 0 , 0
2600 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
26 1 0 R E M
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2620 REM A C CO R D D E DO
2630 REM R E G I S T R E D I R E C T DE SON
2640 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2 6 5 0 DATA 0 , 1 72 , 1 , 1 , 2 , 93 , 3 , 1
2660 DATA 4 , 29 , 5 , 1 , 6 , 0 , 7 , 5 6
2670 DATA 9 , 9 , 9 , 9 , 1 0 , 9 , 1 1 , 0
2680 DATA 1 2 , 0 , 1 3 , 0
2690 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2700 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
27 1 0 R E M A C CO RD DE FA
2720 REM R E G I S T R E D I R E C T DE SON
2730 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
2740 DATA 0 , 1 72 , 1 , 1 , 2 , 64 , J , 1
2 7 5 0 DATA 4 , 25 4 , 5 , 0 , 6 , 0 , 7 , 5 6
5 1
2760 DATA 9 , 9 , 9 , 9 , 1 0 , 9 , 1 1 , 0
2770 DATA 1 2 , 0 , 1 3 , 0
2780 REM ******************************
2790 REM * *****************************
2800 REM A C CO RD DE S O L
28 1 0 REM REG I ST RE D I R E C T DE SON
2820 REM ******************************
2830 DATA 0 , 1 97 , 1 , 1 , 2 , 1 25 , 3 , 1
2840 DATA 4 , 29 , 5 , 1 , 6 , 0 , 7 , 5 6
2 8 5 0 DATA 9 , 9 , 9 , 9 , 1 0 , 9 , 1 1 , 0
2860 DATA 1 2 , 0 , 1 3 , 0
2870 REM ******************************
2880 REM ******** * * * * ******************
2890 R EM CHA I NES
2900 REM T E X TE - P A ROLE
29 1 0 REM * *****************************
2920 P $ C 1 > = " HE L L O .
.
.
I AM THE COLOR
C O M P U T E R SOUND AND S PE E CH C A RT R I DGE . "
2930 P $ C 2 > = " I CAN NOT ONLY TALK .
.
.
I CAN
ALSO PLAY MELOD I ES . "
2940 P $ ( 3 ) = " I CAN P L A Y CORDS . "
295 0 P $ ( 4 ) = " I CAN MAKE SOUND EFFE CTS .
.
L I KE
TH I S GUNSHOT . "
2960 P $ C S > = " L I KE T H I S . "
2970 PS ( 6 ) = " AND TH I S . "
2980 PS < 7 > = " I HOPE VOU W I LL ENJOY US I NG ME . "
2990 P $ < 8 ) = "
I
CAN P L A '{ CO RDS WH I LE S PEA�ŒYNG . "
3000 RETURN
30 1 0 REM *********** * * **************** *
3020 REM ******************************
3030 REM V E R I F I C A T I ON DE L A PA ROLE
3040 REM ******************************
3 0 5 0 F O R Q= l TO 800 : N E X T Q
3060 I F PEEK C Y > AND 64=0 THEN 3060
3Ql70 RETURN
3080 REM ************ ******************
3090 REM ******************************
3 1 00 REM V E R I F I C A T I ON DU SON
3 1 1 0 REM ******************************
3 1 20 F O R Q= 1 TO 700 : N E X T Q
3 1 30 I F PEEK C Y > AND 32=0 THEN 3 1 30
52
3 1 40
RET U R N
3 1 5 0
REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3 1 60 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3 1 70 REM VE R I F I CAT I ON DU S I GNAL O C CU PE
3 1 80 R EM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3 1 90 IF PEEK C Y > AND 1 28=0 THEN 3 1 90
3200 RETU RN
3 2 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3220 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3230 REM C O U R T DELA I
3240 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3250 GOSUB 3 1 70
3260 F O R 0= 1 TO 800 : NE X T Q
3270 R E T U R N
3 2 8 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3290 REM
* * ** * * * * * * * * * * * * * * * * * * * * * * * * *
3300 REM LONG DELA I
33 1 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3320 F O R Q = 1 TO 6000 : NE X T Q
3330 R E T U RN
3340 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3 3 5 0 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3360 REM CHA RGEMENT D ' UNE CHA I NE
3370 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3380 GOSUB 3 1 70
3390 POKE Y , 1 43 + C
3 400 F O R I = l T O L EN C PS < C > >
34 1 0 GOSUB 3 1 70
3420 POKE Y , AS C C M I DS C P$ C C ) , J , 1 ) )
3430 N E X T I
3440 GOSUB 3 1 70
3 4 5 0 POKE y , 1 3
3460 R E T U R N
3470 R E M
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3480 REM
* * * * ** * * * * * * * * * * * * * * * * * * * * * * *
3490 REM CHA R GEMENT D ' UN SON
3 5 00 REM
* * * * * * * * * * * * * * * * * * * * * * * * * * * * *
3 5 1 0 I F C>2 THEN 3 5 6 0
3 5 20 K=48
3 5 30 GOSUB 3 1 70
53
3 5 4 0 POKE y , 1 5 1 + c
3 5 5 0 GOTO 3600
3 5 60 I F C=3 THEN K = 1 3 : GOTO 35 30
3 5 70 K=28
3 5 80 GOSUB 3 1 70
3 5 9 0 POKE Y , 1 83 + C
3600 F O R I = 1 T O K
36 1 0 READ D
3620 GOSUB 3 1 70
3630 POKE v , n
3640 N E X T I
365 0 GOSUB 3 1 70
3660 POKE y , 25 5
3670 R E T U R N
3 6 8 0 REM
*****************************
3690 REM
*****************************
54

Lien public mis à jour
Le lien public vers votre chat a été mis à jour.
Caractéristiques clés
- Convertit le texte de l'ordinateur en parole
- Joue une harmonie musicale à 3 voix
- Crée des effets sonores complexes
- Programmation possible avec des mémoires tampons de parole et de son