Code : Tout sélectionner
NewList voix.s()
NbrVoix = Val(Left(getvoix(),1))
StringVoix$ = Mid(getvoix(),3,Len(getvoix())-2)
For i = 1 To NbrVoix
NomVoix$ = StringField(StringVoix$,i,",")
AddElement(voix())
voix() = NomVoix$
Next
ForEach voix()
Debug voix()
Speak(voix(), "bonjour je suis la voix "+voix() , 100, 1, 100)
Next
oui , la chaine$ retourné c'est d'abord le nombre de voix installé sur le systemAr-S a écrit :Ah bordel tu m'as grillé. Bon je le poste tout de même.
Un petit code qui liste les différents noms des voix dispo et qui dit bonjour avec chacune d'elles
Code : Tout sélectionner
NewList voix.s() NbrVoix = Val(Left(getvoix(),1)) StringVoix$ = Mid(getvoix(),3,Len(getvoix())-2) For i = 1 To NbrVoix NomVoix$ = StringField(StringVoix$,i,",") AddElement(voix()) voix() = NomVoix$ Next ForEach voix() Debug voix() Speak(voix(), "bonjour je suis la voix "+voix() , 100, 1, 100) Next
c'etait un peu fort ...falsam a écrit :Erion à posté sa mise à jour le 20 juillet 2012 alors que toi tu as repris son travail et posté le tout 1 mois plus tard, soit le 22 Aout 2012.
Cette demande étant public, je vais donc répondre en te disant que je n'en ferais rien. En aucune manière je n'ai pu lire sur ces 4 pages que contient ce post que tu faisais référence à un travail que tu avais fait en 2009.Dobro a écrit :@Falsam , je sais que tu as lu le topic , un petit "J'm'excuse" aurai ete bienvenue
Je ne faisais que répondre aux propos de golfy qui apparemment tout comme moi n'avait pas compris qu'on parler de espeak (Ce qui est normal puisque le sujet n'avait pas encore était abordé).Dobro a écrit :@Falsam donner un lien vers un Wrapper qui n'apporte rien de plus qu'une Lib Purebasic (dont le source est donné ici : http://forums.purebasic.com/english/vie ... 55518be52c )
J'ai juste donné un lien ou les sources sont inclus. Ce ne sont pas les tiens c'est vrai, mais Erion a fait un travail lui aussi qu'il a publié bien avant toi (je sais je persiste :p).Golfy a écrit :Par rapport aux histoires de brevet et de codes : que pensez-vous de eSpeak (projet open-source)
Dobro: tu devrais peux-être y jeter un oeil ou y participer ? j'ai vu que tu t'intéressais à SAPI
Sa lib est suivi. Erion a publié une mise à jour en juillet 2012 contrairement à ce que tu dis.Dobro a écrit :pour la petite histoire , c'est lorsque j'ai vu que erion donnais a telecharger son Wrapper sans donner les sources , que j'ai peté les plombs ... aujourd'hui sa lib n'est plus suivi, comme je m'y attendais .... on a failli se retrouver sans possibilités de synthese vocal ... et lorsque j'ai vu la tournure des evenement avec Erion
j'ai donné les sources, pour ne pas que ça recommence
Code : Tout sélectionner
voix$ = "ScanSoft Virginie_Full_22kHz" ; A modifier
hwnd=OpenWindow(0, 0, 0, 80, 20, "Speak", #PB_Window_SystemMenu| #PB_Window_ScreenCentered)
AddWindowTimer(0, 1, 1000)
Repeat
Event = WaitWindowEvent()
Select Event
Case #WM_RBUTTONDOWN
quite = 1
Case #PB_Event_Timer
Select EventTimer()
Case 1
TXT$ = GetClipboardText()
If Len(TXT$)<>0 And TXT$ <> OLD$
OLD$ = TXT$
Speak(voix$, OLD$ , 100, 0.1, 20)
TXT$ = ""
EndIf
EndSelect
EndSelect
Until quite = 1
Endtu debarque depuis 1 ou 2 ans , manisfestement tu n'as doncx aucune idée de qui est le premier ou pas a avoir sortie une librairie ...falsam a écrit :Cette demande étant public, je vais donc répondre en te disant que je n'en ferais rien. En aucune manière je n'ai pu lire sur ces 4 pages que contient ce post que tu faisais référence à un travail que tu avais fait en 2009.Dobro a écrit :@Falsam , je sais que tu as lu le topic , un petit "J'm'excuse" aurai ete bienvenue
prouve qu'en fait j'avais commencé bien avant .....ps : Grand Merci Nico , tu m'avais donné la soluce, mais a l'epoque, mon cerveau n'avait pas encore évolué
@Falsam donner un lien vers un Wrapper qui n'apporte rien de plus qu'une Lib Purebasic
Inutile de péter les plombs pour si peu (1). Le source pour généré la lib est donné avec.pour la petite histoire , c'est lorsque j'ai vu que erion donnais a telecharger son Wrapper sans donner les sources , que j'ai peté les plombs ...
Le code a été mise à jour en juillet 2012Aujourd'hui sa lib n'est plus suivi, comme je m'y attendais ....
là je ne parlais pas d'Erion , tu ne cite pas ma phrase en entier !falsam a écrit :Le code a été mise à jour en juillet 2012Aujourd'hui sa lib n'est plus suivi, comme je m'y attendais ....
http://www.purebasic.fr/english/viewtop ... 18#p385418
et je parlais en fait de Esteban1 !! (d'ailleurs j'en parle dans le message de 2009 )on a deja eu la cas d'un gars qui avait fait une lib pour la Synthese vocal , et qui n'as jamais donné les sources
aujourd'hui sa lib n'est plus suivi, comme je m'y attendais ....
l'avenir m'a donné finalement raison , il a arrêté le développement, et si nous n'avions pas fait nos propres recherche (Nico , Flype, TS-soft inclue )et ce gland de Esteban1 qui veux pas donner les sources de sa lib !! pffff ! quel naze
je dis que d'un point de vue utilisation , ça n'apporte rien de plus ... avec ma librairie une seule ligne de code , pas de ficheir a inclure (Dll)donner un lien vers un Wrapper qui n'apporte rien de plus qu'une Lib Purebasic
il ne m'a pas apparu qu'il fournissait les sources ... mon anglais n'est pas terrible , j'utilise Google Translatepour la petite histoire , c'est lorsque j'ai vu que erion donnais a telecharger son Wrapper sans donner les sources , que j'ai peté les plombs ...
.. tu as la mémoire courte ... et tu n'etais pas la àPour mémoire, je te rappelle que quand tu as tenté de quitter ce forum suite à un autre de tes pétages de plomb,
oui , je revendique , les codes que je postes , restent ma proprieté , j'en fais ce que je veuxtu as effacer la plus grande partie de tes codes dans les tutoriaux par exemple ainsi que que dans des sujets importants de ce forum. On aurait mille fois envie de péter les plombs nous aussi !!!!
ça me va ...
Voila, mon mea culpa est fait. Je peux me remettre en cause quand j'ai déconné. Tu vas surement me répondre mais avant relis bien ce que j'ai dit
ça c'est de tropet remets toi aussi en cause sur le comportement que tu peux avoir avec d'autres utilisateurs de ce forum.
, a aucun moments , mon comportement est incorrecte 