UTILITAIRE -> Son   

Voici un programme qui va permettre à votre CPC de prendre la parole. Et comme ce dernier ne renie pas ses origines anglaises, il possède un accent britannique très prononcé.

Cet outil permet de simuler la voix humaine, sans passer par une étape de numérisation de son.
A noter que le programme binaire de simulation vocale a été hacké du programme "Speech" Superior Software (1986).

Les touches de fonction sont redéfinies comme suit :
f0 = HELLO
f1 = CPC
f2 = LIST
f3 = FIRE
f4 = THE SPEAKER SYSTEM
f5 = 0123456789
f6 = AMSTRAD
f7 = I AM THE NUMBER 1
f8 = NEVER AGAIN
f9 = DISK
f. = Sauver le fichier "SPEAKERL.BAS"

Paru sous forme de listing dans le magazine CPC Infos n° 29 - Février 1991.
Programmation de l'interface Basic : Xavier GROSSETETE
Routine de digitalisation vocale : Superior Software (1986)

Ne fonctionne pas sur les CPC 464.

Modifer le fichier "SPEAKER.BAS" comme suite :

* Appel de la routine
AVANT :

320 CALL &998B,A$

APRES :

320 CALL &998B,@A$

* Information pour utiliser la routine (Facultatif)
AVANT :

1680 print"50 CALL &998B,A$

APRES :

1680 print"50 CALL &998B,@A$

* Information pour sauver le fichier "SPEAKERL.BAS"
AVANT :

1820 print"50 CALL &998B,A$

APRES :

1820 print"50 CALL &998B,@A$

* Clear Input
AVANT :

1740 IF A$="O" OR a$="o" THEN PRINT"Inserer DISK+espace...":CLEAR INPUT:WHILE INKEY$<>" ":WEND:GOSUB 1760:RETURN

APRES :

1740 IF A$="O" OR a$="o" THEN PRINT"Inserer DISK+espace...":CALL &BB03:WHILE INKEY$<>" ":WEND:GOSUB 1760:RETURN

* Problème d'affichage pour le "@" suite a la correction ALL CPC, qui est redéfini en flèche montante.
AVANT :

680 SYMBOL 64,24,36,66,129,231,36,36,60

APRES :

680 REM SYMBOL 64,24,36,66,129,231,36,36,60

Oublie du .BIN dans le listing DATSPEAK.BAS qui génére le fichier ROUTINEP.BIN
AVANT :

30 SAVE"ROUTINEP",B,&C000,&206E

APRES :

30 SAVE"ROUTINEP.BIN",B,&C000,&206E