XProfan

- Página 2 -

El dt. Stimmen de el link de Franco wollten se no yo en el Installieren dejar, como wohl el Hauptanwendung (Reader?) fehlt. Hab hier aber auch ni Downloadmöglichkeit para dt. Stimmen, de IBM, debería kompatibel ser, con meiner TTS-Lib funktioniert lo. [...]

bastante unten links son verschiedene Idiomas, auch german. Sind wohl Trialversionen, pero no Einschränkungen.

Hab ahora en me:
[quote:0eb5146c9e]There are 9 voices installed en your system
Voice index = 0 , Voice name = Microsoft Sam
Voice index = 1 , Voice name = Default
Voice index = 2 , Voice name = Gisela
Voice index = 3 , Voice name = Gisela-Tel
Voice index = 4 , Voice name = Matti
Voice index = 5 , Voice name = Max
Voice index = 6 , Voice name = Max-Tel
Voice index = 7 , Voice name = Oma
Voice index = 8 , Voice name = Opa[/quote:0eb5146c9e]
Tal vez findet alguien el link sí nützlich
Weiß ahora pero no, si el Lib de Franco SAPI 4 y 5 unterstützt, o. obs gebraucht se.

Uwe
''Pascal''
Niemeier

¡Hola Personas!

@ Franco: Sí, genau algo como!
Gibts como, wo Si es usted el her hast, todavía mehr? MS hält se seit einiger Tiempo bastante bedeckt con solchen Infos

@ All: In el SAPI-Ayuda se irgendwo beschrieben, como welche Buchstabenkombinationen de SAM ausgesprochen voluntad. Damit debería se doch una Art Wrapper escribir dejar (algo como Tuve damals ya para el C64 y Sam/Reciter gebastelt). Dann muss uno no sólo el ganzen Kram de MS runterladen

SeeYou
Pascal

Frank
Abbing

[quote:28a564f433]El dt. Stimmen de el link de Franco wollten se no yo en el Installieren dejar, como wohl el Hauptanwendung (Reader?) fehlt. Hab hier aber auch ni Downloadmöglichkeit para dt. Stimmen, de IBM, debería kompatibel ser, con meiner TTS-Lib funktioniert lo. [/quote:28a564f433]
Ob el Reader Condición para el Installation el Alemán Stimmen es, blanco Yo no genau. Aunque Yo ihn installiert.

El Alemán Stimmen de IBM encontrar se en me sólo en el SAPI4-Einstellungen, dejar se pero no para el Sprachausgabe nutzen.

[quote:28a564f433]@ Franco: Sí, genau algo como!
Gibts como, wo Si es usted el her hast, todavía mehr? MS hält se seit einiger Tiempo bastante bedeckt con solchen Infos [/quote:28a564f433]
Leider no. Tuve sólo esta Inc-Expediente y una rudimentären, älteren Quellcode gefunden.

Was mich todavía nervt es, dass uno el aktuelle Sprachausgabe no unterbrechen kann. Como Todavía nichts entdeckt. Aber wahrscheinlich gibts como irgendwo una Callback-Möglichkeit. Ein Hilo wäre auch todavía posible. Sobald Yo otra vez Tiempo habe, probier Yo mich más daran.

Frank
Abbing

Bin una Stückchen más gekommen. El Textos voluntad ahora unabhängig vom restlichen Progamm vorgelesen y puede gestoppt voluntad. Hier otra vez una Testprogramm.

demo_2.exe	67 kB

Hochgeladen:	18.06.2006

Ladeanzahl:
		Descargar

Frank
Abbing

So, Tengo el Ganze veces en un Dll umgesetzt y en una Test-Quellcode en XProfan erweitert. Yo hoffe, ihr testet auch fleissig, si überall funktioniert. Wäre doch schade, si dieses Thema auch otra vez einschläft.
En genügend Resonanz voluntad Yo el Dll Stück para Stück erweitern y mehr Características ausstatten. Sieht en el Hinsicht bastante bien de.

Anbei Dll y Profancode.

[quote:cfe4a2392b]@ All: In el SAPI-Ayuda se irgendwo beschrieben, como welche Buchstabenkombinationen de SAM ausgesprochen voluntad. Damit debería se doch una Art Wrapper escribir dejar (algo como Tuve damals ya para el C64 y Sam/Reciter gebastelt). Dann muss uno no sólo el ganzen Kram de MS runterladen [/quote:cfe4a2392b]
Sí, habs gefunden:

[quote:cfe4a2392b]American English Phoneme Representation
This is a brief introduction to the use and implementation of the SAPI phoneme representations.

Symbolic and Numerical Representation
Application developers can create pronunciations for words that are not currently en the lexicon by using the English phonemes represented en the following table. The phoneme set is composed of a symbolic phonetic representation (SYM).

The application developer voluntad be able to enter the SYM representation to create the pronunciation using the XML PRON tag, or by creating a new lexicon entry. Each phoneme entry should be space delimited.

Tag Description
PRON SYM Tag used to insert a pronunciation using symbolic representation.

Example: pronunciation for hello:

<PRON SYM = h eh l ow/>

For improved accuracy, the primary (1), secondary (2) stress markers, and the syllabic markers (-) can be added to the pronunciation.

Example: pronunciation for hello using the primary stress (1) and syllabic (-) markers:

<PRON SYM = h eh - l ow 1/>
American English Phoneme Table
SYM Example PhoneID
- syllable boundary (hyphen) 1
! Sentence terminator (exclamation mark) 2
& word boundary 3
, Sentence terminator (comma) 4
. Sentence terminator (period) 5
? Sentence terminator (question mark) 6
_ Silence (underscore) 7
1 Primary stress 8
2 Secondary stress 9
aa father 10
ae cat 11
ah cut 12
ao dog 13
aw foul 14
ax ago 15
ay bite 16
b big 17
ch chin 18
d dig 19
dh then 20
eh pet 21
él fur 22
ey ate 23
f fork 24
g bien 25
h help 26
ih fill 27
iy feel 28
jh joy 29
k cut 30
l lid 31
m mat 32
n no 33
ng sing 34
ow go 35
oy toy 36
p put 37
r red 38
s sit 39
sh she 40
t talk 41
th thin 42
uh book 43
uw too 44
v vat 45
w with 46
y yard 47
z zap 48
zh pleasure 49 [/quote:cfe4a2392b]
So una Wrapper fände Yo auch vorteilhaft y yo sería dich como gerne unterstützen. ¿Quieres decir que sicher, dass uno Sam así Alemán sprechen dejar podría, sin extra Alemán Stimmen runterladen tener, oder?
Sam es sí en jedenfall überall como ya präsent, wo Windows 2000/XP installiert es, si yo el correcto sehe. Und si yo bastante informiert bin, puede ser el Sprachausgabe manuell en Sam ajustar, bevor uno ellos ausgibt. Somit podría cada el Textos Alemán hören, sin Extra-Installationen vornehmen tener.

Speech.zip	2 kB

Hochgeladen:	18.06.2006

Ladeanzahl:
		Descargar

Michael
Wodrich

[quote:fdf3e8a134]El dt. Stimmen de el link de Franco wollten se no yo en el Installieren dejar, como wohl el Hauptanwendung (Reader?) fehlt. Hab hier aber auch ni Downloadmöglichkeit para dt. Stimmen, de IBM, debería kompatibel ser, con meiner TTS-Lib funktioniert lo.[/quote:fdf3e8a134]
El TTS-Lib bricht sí con el Meldung MS Reader 2.1 No se ha encontrado de. Yo habe also como Suchbegriff ms reader 2.1 en Google eingegeben y habe inmediatamente el Alemán Downloadseite serviert bekommen - 3 MB.
El Stimmen: LH Anna, LH Stefan
Anna hört se así garstig a, also Yo mich para Stefan entschieden y ihn inmediatamente con Pascals Code alimentados. Erste Lesung Ok - zweite es wohl una Eunuch.

Schöne Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

Clemens
Meier

En me dito, allerdings sin Eunuch

Como kommt uno a el otro Stimmen ran? Posesiones alles mögliche intenta. Lo son zwar Trial-Stimmen, download schlappe 70 MB (el lesen hay wohl Romane antes

). Kennt alguien una gute Quelle para Stimmen?

XProfan 9.1; XP SP2; FF; Editpad

Kompilieren Marca Separación

Uwe
''Pascal''
Niemeier

¡Hola Personas!

Posesiones todavía una wenig gebastelt; el Umsetzung el Laute es determinado todavía no vollständig, aber el Principio debería erkennbar ser

Sombrero allerdings una mörderischen Akzent, el Teil...

!
window 50,50-500,200
 $H Windows.ph

proc MultiToWide--------------------------------------------------------------

    parámetros Texto$,Ziel&
    volver ~MultiByteToWideChar(0,0,addr(Texto$),-1,Ziel&,250)
    ENDPROC-----------------------------------------------------------------------

    proc StringToGUID-------------------------------------------------------------

        parámetros GUID$,GUID&
        declarar Temp$
        Temp$=space$(80)
        ~MultiByteToWideChar(1,1,addr(GUID$),-1,addr(Temp$),80)
        external("ole32","CLSIDFromString",addr(Temp$),GUID&)
        ENDPROC-----------------------------------------------------------------------

        proc CallMethod---------------------------------------------------------------

            parámetros IFace&,Method&
            declarar VTable&
            VTable&=long(IFace&,0)
            Method&=long(VTable&,Method&*4)
            caso %pcount=2:volver call( Method&,IFace& )
            caso %pcount=3:volver call( Method&,IFace&,&(3) )
            caso %pcount=4:volver call( Method&,IFace&,&(3),$(4) )
            caso %pcount=5:volver call( Method&,IFace&,&(3),&(4),&(5) )
            ENDPROC-----------------------------------------------------------------------

            proc Sprich-------------------------------------------------------------------

                parámetros a$
                imprimir a$

                whileloop len(a$),1,-1--Leerzeichen einfügen

                    a$=en el$(" ",a$,&bucle+1)

                endwhile

                a$=lower$(a$)
                a$=translate$(a$,"s c h","sh ")
                a$=translate$(a$,"s t","sh t ")
                a$=translate$(a$,"e i ","ay ")
                a$=translate$(a$,"i e ","iy ")
                a$=translate$(a$,"e u ","oy ")
                a$=translate$(a$,"a ","aa ")
                a$=translate$(a$,"e ","eh ")
                a$=translate$(a$,"i ","iy ")
                a$=translate$(a$,"u ","uw ")
                a$=translate$(a$,"o ","ow ")
                a$=translate$(a$,"j ","jh ")
                a$=translate$(a$,"ö ","er ")
                a$=translate$(a$,"ä ","ae ")
                a$=translate$(a$,"ü ","er ")
                a$=translate$(a$," "," 1 ")--Hinter cada Phonem una 1 verlängert el Aussprache
                a$="<lang langid=409><PRON SYM = "+a$+" /></lang>"--LangID $409 = Inglés (Sam)
                MultiToWide(a$,a#)
                CallMethod(ISpVoice&,20,a#,0,0)
                ENDPROC-----------------------------------------------------------------------

                proc SprichEx-----------------------------------------------------------------

                    parámetros a$,b$
                    imprimir a$,b$
                    a$="<context ID =  "+b$+" > "+a$+" </context>"
                    MultiToWide(a$,a#)
                    CallMethod(ISpVoice&,20,a#,0,0)
                    ENDPROC-----------------------------------------------------------------------
                    declarar ISpVoice&,a#
                    dim a#,1024
                    external("ole32","CoInitialize",0)
                    StringToGUID("{96749377-3391-11D2-9EE3-00C04F797396}",a#)
                    StringToGUID("{6C44DF74-72B9-4992-A1EC-EF996E0422D4}",a#+16)
                    external("ole32","CoCreateInstance",a#,0,23,a#+16,addr(ISpVoice&))
                    --Hier se en cada Fall con Sam gesprochen
                    Sprich("guten tag")
                    Sprich("schönes wetter heute")
                    --Hier se el eingestellte Standart-Stimme verwendet
                    --Dies klappt natürlich al Besten con uno Alemán Simme :-(
                    SprichEx("19.06.2006","date_dmy")
                    SprichEx("12:30","time")
                    SprichEx("1234","number_cardinal")
                    SprichEx("1234","number_digit")
                    SprichEx("123/4","number_fraction")
                    SprichEx("12,34","number_decimal")
                    CallMethod(ISpVoice&,2)
                    external("ole32","CoUninitialize")
                    disponer a#

@Roland:
[quote:3a09024a6a]
como podría oder debería Deiner Meinung después de una solche Unterstützung aussehen?
[/quote:3a09024a6a]
Ohne unbescheiden klingen a querer, aber tal vez solltest du el COM-Routinen, el Yo verwende (oder algo vergleichbares) con einbauen. Einfach sólo, así el Personas, que con COM/OLE befassen (voluntad), una gemeinsamen Standart haben.

SeeYou
Pascal

Frank
Abbing

Gut, wies aussieht, se el Dll no mehr benötigt. Yo lugar ellos una. Zumindest podría Yo a una Thema anregen, a el para Profano bisher nichts existierte.

@Pascal: Funktioniert bien! Meinst du, du bekommst el Akzent todavía una wenig fuera?

Kompilieren Marca Separación

Michael
Wodrich

Posesiones todavía ergänzt

SprichEx("Guten Tag. Schönes Wetter heute.","text")

...y lo lief en Anhieb. Como kann Yo cada sólo raten, un alemán Stimme a installieren (Sam müßte eigentlich Schmerzensgeld zahlen, si él se a Alemán Texten vergreift).
Lo se de el (Alemán) Standardstimme alles TOP vorgelesen.

Gracias Pascal - wirklich Klasse.

Schöne Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

Uwe
''Pascal''
Niemeier

¡Hola Personas!

@ Franco:
[quote:503f1884c5]Gut, wies aussieht, se el Dll no mehr benötigt. Yo lugar ellos una. [/quote:503f1884c5]
Das war pero no Sinn el Sache

Im Zweifelsfall son deine dlls anwenderfreundlicher como mi Demos.
Und el COM-Geschichten laufen sí sólo de Profano 7.

@ All: Viel mejor se el Aussprache de Sam probablemente no voluntad. Möchte veces wissen, qué MS se esta pensamiento ha...
Das uno el Alemán Varianten incluso besorgen muss es ya ärgerlich, aber dass uno auch todavía esta EBook-Reader braucht...

Wenn Yo el correcto sehe, son tan auch Características a Reconocimiento de Voz verfügbar, y el son wohl auch a el jeweilige Lingua gebunden

SeeYou
Pascal

20.06.2006 ▲

Frank
Abbing

[quote:fd812a2fd1]Das war pero no Sinn el Sache
Im Zweifelsfall son deine dlls anwenderfreundlicher como mi Demos.
Und el COM-Geschichten laufen sí sólo de Profano 7.[/quote:fd812a2fd1]
Stimmt en efecto otra vez...

Pascal, weisst du, cómo al besten a el Infos kommen kann, welche Lingua el User aktuell eingestellt ha?
Wenn hay Alemán eingestellt es, podría uno el Alemán Stimme auch uso. Ist sólo Sam verfügbar, entonces muss uno eben con el Akzent leben.

20.06.2006 ▲