Page 1 of 1

Mis programas FW hablan

PostPosted: Sat Oct 27, 2018 5:37 pm
by Busmatic_wpb
Muy estimados un saludito.
Como siempre agradeciendoles la ayudas y sus aportaciones que sin ellos nos harian falta :shock:


Durante mucho tiempo he buscado como pornerle voces a mis programas , encontre un .exe y trabaja muy bien. Creo una carpeta y deposito el dll y el .exe ahi y por medio de un par de comandos ponemos a repetir textos . Ahora dependiendo del idioma del windows asi hablara a menbos que instales una voz Izabela y listo.

A menos windows 10 viene con 2 voces instaladas (en idioma propio del sistema Oerrativo) que podras ver con los comandos del ejecutable

Ademas de eso se puede bajar una par de voces de mujer o hombre que estan el sitio y aunque este en ingles el SO te habalara en español.

Lo facinante de esto es que en base a un TXT puede crear un .wav entre otras cosillas que al final me cae al pelo pues necesito en determinado momento tener un serie de avisos a los usuarios y en realidad esta muy bien para los que deseamos enviar lecturas completas de archivos de TXT.

Les comento que aunque es de terceros lo veo como una herramienta mas.. Dejo aqui in link que pueden bajar y ahi encontraran la informacion necesaria y en google driv podran bajar la version completa , yo baje solo consola que consta de un ejecutable y una dll que es lo unico que necesitas para ponder ver que tu programas hablen.. dejo un jemplo y el link de descarga abajo.

Espero que les sea util pues a mi en lo personal me cayo de perillas..

hay 2 ARCHIVOS AHI LA VOZ Y EL BALCON BAJA LOS DOS(SI TIENES WINDOWS EN ESPAñOL PUES NADA EDITA LAS VOCES disponibles con la opcion que veras en el ejemplo y mas nada .)

https://drive.google.com/file/d/1oH6Ek7 ... sp=sharing

Ahora miren

/**** ejemplo ****\

Local cTexto := "Bienvenido a FiveWin"

MemoWrit( "repetir.txt",cTexto )

WinExec( "balcon.exe v-100 -n helena -F repetir.txt" ,0)


/*** Descripcion de opciones ****\
/* Elena o David
/* Izavel agregas la voz extra que deje en el link

balcon -l prodras ver la voz que esta instaladas o lista si es mas de una..

v- 100 Volumen
n- Helena tipo por voz autilizar
-F repetir.txt fichero tipo txt a repetir

/*** Descripcion de opciones globales de balcon ****\

Usage: balcon [options ...]

-l : print list of voices
-g : print list of audio output devices
-f <file_name> : input text file
-w <file_name> : output file in WAV format
-n <voice_name> : set voice for speech
-id <integer> : set voice by language code (Locale ID)
-m : print voice parameters
-b <integer> : set audio output device by index
-r <text> : set audio output device by name
-c : use text from clipboard
-t <text> : use text from command line
-i : use text from stdin
-o : write sound data to stdout
-s <integer> : speed of speech (from -10 to 10)
-p <integer> : pitch of speech (from -10 to 10)
-v <integer> : volume of speech (from 0 to 100)
-e <integer> : pause between sentences (in milliseconds)
-a <integer> : pause between paragraphs (in milliseconds)
-d <file_name> : file for pronunciation correction

-k : kill other copies of application
-ka : kill active copy of application
-pr : pause or resume reading by active copy of application
-q : add application to queue
-lrc : create LRC file to display synchronized text in audio players
-srt : create SRT file to display synchronized text in video players
-vs <file_name> : create text file with synchronized visemes
-sub : convert subtitles to speech
-tray : show icon in system tray
-ln <integer> : select line from text file by using of line number
-fr <integer> : output audio sampling frequency in kHz (from 8 to 48)
-bt <integer> : output audio bit depth (8 or 16)
-ch <integer> : output audio channel mode (1 or 2)
-?, -h : print usage information

--encoding <encoding> : set input text encoding (ansi, utf8 or unicode)
--silence-begin <integer> : silence at the beginning (in milliseconds)
--silence-end <integer> : silence at the end (in milliseconds)
--lrc-length <integer> : set max length of text lines in LRC file
--lrc-fname <file_name> : set filename for LRC file
--lrc-enc <encoding> : set encoding for LRC file
--lrc-offset <integer> : time offset for LRC file (in milliseconds)
--lrc-artist <text> : artist (ID tag)
--lrc-album <text> : album (ID tag)
--lrc-title <text> : title (ID tag)
--lrc-author <text> : author (ID tag)
--lrc-creator <text> : creator of LRC file (ID tag)
--srt-length <integer> : set max length of text lines in SRT file
--srt-fname <file_name> : set filename for SRT file
--srt-enc <encoding> : set encoding for SRT file
--raw : output is raw PCM data (headerless)
--ignorelength : omit length of data in WAV header
--sub-format <text> : set format of subtitles
--sub-fit : increase speed to fit time intervals in subtitles
--sub-max <integer> : set max speed of speech for subtitles
--deletefile : delete text file when job is done

-enc <encoding> : set input text encoding (ansi, utf8 or unicode)
-sb <integer> : silence at the beginning (in milliseconds)
-se <integer> : silence at the end (in milliseconds)
-sf : increase speed to fit time intervals in subtitles
-sm <integer> : set max speed of speech for subtitles
-df : delete text file when job is done



*/

Re: Mis programas FW hablan

PostPosted: Sat Oct 27, 2018 9:34 pm
by cmsoft
Gracias por el aporte... Lo investigare para un proyecto de llamador de turnos que tengo...
Muchas gracias!

Re: Mis programas FW hablan

PostPosted: Sat Oct 27, 2018 9:49 pm
by cnavarro
Gracias por el aporte
En Windows 10, esto funciona sin instalar nada, no puedo probarlo en anteriores versiones

Code: Select all  Expand view


   oBj   := CreateObject("SAPI.SpVoice")
   oBj:Speak("FiveWin 32 bits para Harbour ha terminado de construir")

 


Evidentemente, si lo enlazamos con esto
viewtopic.php?f=6&t=35640#p212328
conseguiremos que hable otro ordenador remoto

Re: Mis programas FW hablan

PostPosted: Sun Oct 28, 2018 2:07 am
by Busmatic_wpb
Gracias conpadre,
Si yo lo he usado pero hay que instalar algunas cosillas y son un poco pezadas, pero la verdad una opcion mas nos facilita, este asunto no se instala solo copias una par de archivos y lo parametrisas y listo.

Tiene cosas increibles como crear .wav al vuelo desde un archivo de TxT , leer archivos de texto y muchas cosillas por ahi que nos pueden de ser de ayuda.
. saludes.

Re: Mis programas FW hablan

PostPosted: Sun Oct 28, 2018 1:31 pm
by cnavarro
Solo he añadido otra posibilidad, no es comparable, y la descripción de características de tu recomendación es impresionante
Sobre todo me ha llamado la atención lo de poder enviar desde el portapapeles el contenido a reproducir.

Re: Mis programas FW hablan

PostPosted: Sun Oct 28, 2018 10:19 pm
by Busmatic_wpb
Compadres listeros, Saludes ..

De las otras cosillas que he encotrado y he subido a link una voz mas de izabela esta en español y lo alucinate de esta es que no importa el idiama que este el windows pues esta voz esta en español y aunque el Windows este ente en ingles no pasa nada se va derecho en español. Asi que me va de maravillas, otra cosilla que he tenido que hacer es ponerle un .15 segundos entre cada mensaje pues aveces se brinca al proximo pues no se como controlar el Winexec para saber si termino o no reproducir.
Tambien este Balcon puede reproducir documentos entero en .txt para que quieran leer poemas de amor mientras le dan a la Santa tacla..

Espero que esto les caiga de pelos. pue ami me va muy bien

Re: Mis programas FW hablan

PostPosted: Mon Dec 17, 2018 1:16 pm
by TOTOVIOTTI
Hola..
podrás poner un ejemplito @busmatic_wpb de esto que dices?
Muchas gracias
Roberto

Re: Mis programas FW hablan

PostPosted: Mon Dec 17, 2018 1:47 pm
by Busmatic_wpb
Estimado buen dia.
arriba esta el ejemplo y donde bajarlo.
Si se te hace dificil dime una hora en la noche y nos conectamos.