Reconocedor de voz para activar botones

[Riago]

Quisiera saber si existe alguna manera de reconocer la voz para dar
una instrucción o algo similar.
Mi idea es crear algo como para discapacitados que pueda reconocer la
voz ejecutar algo sencillo y lo pueda hacer
a través de nuestro ZORRO.
Tengo un sistema médico que guarda imágenes, vídeos y documentos y
deseo crear un módulo para hospitales
en los cuales reconozca la voz y pueda realizar alguna de estas
funciones, sin necesidad del teclado, por supuesto ya
implementé el teclado en pantalla para Touchscreen, pero lo mejor
sería reconocer la voz.
Como dije, lo quiero orientar a la discapacidad, pero más que nada es
para que pueda presentarlo como opción
laboral a discapacitados, pues ningún medico o asistente tiene tiempo
de cargar vídeos o imágenes, y con este modulo
creo, se podría crear una opción laboral de fácil manejo.
Si alguien ha realizado algo similar o me puede orientar esperaré su
ayuda.

[Mauricio Molinero,]

Hola Riago,

Aqui hay algo de informacion..
http://www.aksel.com/whitepapers/sapi.htm

Saludos!

Mauricio R. Molinero,

[Riago]

Gracias Mauricio, ese material yo lo tenía, y no consigo realizar
algún tipo de captura para identificar lo que deseo para que con la
voz pueda ejecutar algo.
de todos modos gracias por tu aporte y tu apoyo. y por sobre todo por
haber respondido tan rapido.

un abrazo.

On 16 ago, 09:21, "Mauricio Molinero," <pipi...@gmail.com> wrote:
> Hola Riago,
>

> Aqui hay algo de informacion..http://www.aksel.com/whitepapers/sapi.htm
>
> Saludos!
>
> Mauricio R. Molinero,

[Douglas Sánchez Guillén]

Hola el truco esta pasar primero el la voz a texto, hace poco hice un sistema de Control de fila, claro es texto a voz especificamente para control de Turnos en ves de hacer fila, pues, mejor esperar sentaditos.

Pero antes estuve viendo algo de lo que tu kieres especificamente en este link yo uso windows vista, en una de mis laptop y pues veo

que ya lo trae integrado algo e incluso le hablo a mi maquina y funciona solo hay que saber hablarle si, sino pues ni caso le hace a uno, por ejemplo no le digo escutar acceso directo sino que mostrar escritorio, luego el nombre de icono.

Deberias empezar por alli probar con vfp y windows vista algun componene trae o dll a la cual al rato pueda que le pases parametro.

yo me conecto vfpo con una aplicacion que se llama  textaloud, y por medio de el hago hablar a vfp con voces ingles español profesionales ambos.   esos mismo fabricantes pueda que tengan algo investiga por alli, si se puede te lo aseguro, pero si wn vista que es de los master de microsoft hay sus inconsistencia, ummm pues al rato con el zorro se cayga algunas palabras que no esten en el vocablo de la sistema.

Espero te sirva mi consejo, yo por aca voy a checar mi almacen y si encuentro algo te lo publico...

Saludes

Douglas  Sánchez 

From Nicaragua.

--
Ing. Douglas Sánchez Guillén

      Consultor Informatico

Movistar: 505 8759 - 5342

Claro: 505 88495476

[Mauricio Molinero,]

Hola Riago,

Aqui hay un ejemplo en Python de reconocimiento de voz, donde se
cargan inclusive una lista de palabras, tal vez alguien del foro te
ayude a pasarlo a VFP.

http://surguy.net/articles/speechrecognition.xml

Saludos!

Mauricio R. Molinero,

[Victor Espina]

Riago, una rapida busquea en google por [speech to text using sapi -"text to speech"] arrojo varios links relacionados con lo que necesitas. En particular, este link tiene la explicacion detallada y codigo fuente de una pequena aplicacion que hace text-to-speech y speech-to-text usando SAPI y C#, todo gratuito:

http://www.codeproject.com/KB/audio-video/SAPI.aspx

Para mas informacion sobre SAPI y sus posibilidades, mira los links indicados en este post:

http://stackoverflow.com/questions/4184274/convert-an-audio-input-to-text-with-sapi

Entiendo que lo que buscas es para VFP, pero si logras hacerlo funcionar en C#, siempre puedes crear un DLL con C# que luego puedas instanciar en VFP y hacer lo que necesites. 

Espero esta informacion te sea de utilidad

Saludos

Victor Espina

[Douglas Sánchez Guillén]

Hablando dll le dejeo este Link de microsoft el cual funciona al 100

http://msdn.microsoft.com/es-es/library/ms554855.aspx

saludes

[Douglas Sánchez Guillén]

Aproposito este articulo ya le vamos a poner OT en el asunto ya que todos ponemos lenguaje que no es de vfpo, lol.

Este ejemplo esta claro hasta lo voy a ocupar pa mi pero ahorita estoy full de trabajo la proxima semana me propondre hacer algo pero

en vfp9sp2.  segun Micrsoft  Esto es soportado en windows 7, Windows vista SP1, Windows xp sp3. con Server no funciona. almenos creo que sea R2. Aunque esto me imagino que lo kieres para el lado clientes.

Tomado de la Pagina de Microsoft FrameWork 4.0.

system.speech ejemplo 100% ok

Hola, esto es una simple introduccion al reconocimiento de voz en el manejo de aplicaciones bajo Vb.net usando la libreria system.speech, el ejemplo consiste en una calculadora basica(suma y resta) la cual se controla a traves de la voz.
Posteo, porque me interese por este tema y la verda que lo que encrontre por ahi no me resulto de gran ayuda...

enlaze de proyecto
http://www.megaupload.com/?d=XJ11IPM8
------------------------------------------
Funcionando 100% y probado en :
Portatil: ACER Aspire 5741G
Procesador: Intel(R) Core(TM) i5 CPU M 450 @ 2.40GHz 2.40 GHz
RAM: 4 GB
Sistema: 64 Bits
------------------------------------------
Las frases de reconocimiento para la aplicacion

grammar.Append(New Choices("Uno", "Dos", "Tres", "Cuatro", _
"Cinco", "Seis", "Siete", "Ocho", "Nueve", "Cero", "Mas", "Menos", "Del", "Calcular", "Borrar"))
Para el que no quiera bajar el archivo
usando VisualStudio 2008 con .NET Framework 3.5
PASOS
--nuevo proyecto(Aplicacion de Windows Forms)
--crear 2 TextBox (TextBox1,TextBox2)
una vez creados, la propiedad Enable la ponemos a false, esto para los 2 TextBox
--agregar la referencia System.speech 
"Proyecto"/"Agregar referencia..." y buscamos dentro de la pestaña .NET "System.speech"
--sustituir el codigo de la aplicacion por este

    Option
    Explicit
    On
    Imports System.Speech.Recognition
Imports System.Speech.Recognition.SrgsGrammar
PublicClass Form1
 ''VARIABLE PUBLICA OBJETO SPEECHRECOGNIZERPublic recognizer As SpeechRecognizer
 ''VARIABLE PARA REPRODUCIR TEXTOPublic voz AsNew Speech.Synthesis.SpeechSynthesizer
 PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
  ''INICIAMOS LA VARIABLE QUE UTILIZAMOS PARA EL RECONOCIMIENTO
  recognizer = New SpeechRecognizer()
  ''ANADIMOS EVENTOS PARA EL RECONOCIMIENTOAddHandler recognizer.SpeechDetected, AddressOf detectado
  AddHandler recognizer.SpeechRecognitionRejected, AddressOf noreco
  AddHandler recognizer.SpeechRecognized, AddressOf reco
  ''INDICAMOS QUE EL OBJETO ESTE A TRUE=ACTIVADO
  recognizer.Enabled = True''DECLARAMOS OBJETO GRAMMARDim grammar AsNew GrammarBuilder
  ''AÑADIMOS FRASES A RECONOCER
  grammar.Append(New Choices("Uno", "Dos", "Tres", "Cuatro", _
  "Cinco", "Seis", "Siete", "Ocho", "Nueve", "Cero", "Mas", "Menos", "Del", "Calcular", "Borrar"))
  ''CARGAMOS OBJETO GRAMMAR EN OBJETO SPEECHRECOGNIZER
  recognizer.LoadGrammar(New Grammar(grammar))
  System.Windows.Forms.Application.DoEvents()
 EndSub''EVENTOS DE SYSTEM.SPEECH.RECOGNITION''SE DETECTA EL HABLA POR MICROFONOPrivateSub detectado(ByVal sender AsObject, ByVal e As SpeechDetectedEventArgs)
  ''MsgBox(e.AudioPosition.Duration.ToString())EndSubPrivateSub noreco(ByVal sender AsObject, ByVal e As SpeechRecognitionRejectedEventArgs)
  ''MsgBox("No se reconoce el comando de VOZ")
  voz.S***k("Comando no encontrado")
 EndSubPrivateSub reco(ByVal sender AsObject, ByVal e As SpeechRecognizedEventArgs)

  SelectCase e.Result.Text.ToUpper.ToString
   Case"UNO"
    TextBox1.Text &= 1
   Case"DOS"
    TextBox1.Text &= 2
   Case"TRES"
    TextBox1.Text &= 3
   Case"CUATRO"
    TextBox1.Text &= 4
   Case"CINCO"
    TextBox1.Text &= 5
   Case"SEIS"
    TextBox1.Text &= 6
   Case"SIETE"
    TextBox1.Text &= 7
   Case"OCHO"
    TextBox1.Text &= 8
   Case"NUEVE"
    TextBox1.Text &= 9
   Case"CERO"
    TextBox1.Text &= 0
   Case"MAS"If TextBox1.Text.Contains("-") = TrueThen
     operacion("-", "+")
    ElseIf TextBox1.Text.Contains("+") = TrueThen
      operacion("+", "+")
     Else
      TextBox1.Text &= "+"EndIfEndIfCase"MENOS"If TextBox1.Text.Contains("+") = TrueThen
     operacion("+", "-")
    ElseIf TextBox1.Text.Contains("-") = TrueThen
      operacion("-", "-")
     Else
      TextBox1.Text &= "-"EndIfEndIfCase"CALCULAR"If TextBox1.Text.Contains("+") = TrueThen
     operacion("+", "")
    Else
     operacion("-", "")
    EndIfCase"BORRAR"Try
     TextBox1.Text = Strings.Mid(TextBox1.Text, 1, TextBox1.Text.Length - 1)
    Catch ex As Exception
     voz.S***k("Campo vacio")
    EndTryCase"DEL"
    TextBox1.Text = ""
    TextBox2.Text = ""CaseElseEndSelectEndSubPublicFunction operacion(ByVal simbol AsString, ByVal simbolx AsString)
  Dim linea AsStringDim separado(2) AsStringDim suma AsInteger = 0
  linea = TextBox1.Text
  separado = Split(linea, simbol, -1)
  If (simbol = "+") Then
   suma = Convert.ToInt32(separado(0)) + Convert.ToInt32(separado(1))
  Else
   suma = Convert.ToInt32(separado(0)) - Convert.ToInt32(separado(1))
  EndIf
  TextBox2.Text = suma
  TextBox1.Text = suma & simbolx
  ReturnTrueEndFunctionEndClass

FUENTE:    http://msdn.microsoft.com/es-es/library/gg145021.aspx#1

Saludes...

[Riago]

Gracias Victor, me voy a adentrar en los link que me enviaste, de corazón gracias por tu tiempo.

--
  Ricardo González
Asesorìa Informática
    595 981 139198
    595 991 283631

[Riago]

Basandome en lo que enviaste, estoy intentando pasarlo a VFP, estoy probando con las voces loquendo, pero si tu ya lo hiciste funcionar con TextAloud, me gustaria saber como lo hiciste y si pudiste aplicarlo desde VFP.

Ricardo Gonzalez

Asunción - Paraguay

[Douglas Sánchez Guillén]

Te voy a pasar el formulario que utilizo para configurar las voces ya sea de textaloud o loquendo,,, cualquier vos que sea la podes utilizar desde vfp e incluso las de windows en ingles...

Pero el Caso es que lo que tu kieres es leer la vos desde un microfono, como el de window, y pára eso es el programa que te envie en 

que esta en Visual Basic. http://www.megaupload.com/?d=XJ11IPM8,

Ese link es exclusivamente lo que tu kieres leer botones. me entiendes. yo lo bajo y lo utilizo en VB. y me funciono. tenes que tener sapi 5.1. y framework 3.5 o 4 instalado en tu maaquina si es windows xp, no te va funcionar si tenes el office 2007 instalado ya que no es compatible. o en vista o seven, o xp con office xp. estan hechas las pruebas. si es olo leer texto, esto te funciona hasta en windo 2000, pero reconocer voz es el clavo.

saludes

Douglas

[Francisco Javier zárate]

Alguien pudo hacer funcionar voz a texto en visual fox pro (reconocimiento de voz)?

[Francisco Javier zárate]

Disculpen el doble post pero encontre algo muy interesante en esta pagina http://www.code-magazine.com/articleprint.aspx?quickid=0101071&printmode=true "Add Speech Recognition to your Applications"
que habla sobre como integrar el reconocimiento de voz a foxpro  lastimosamente apenas soy un programador novato y no entiendo demasiado de forms y de interaccion con prg y yo asi como el greador de este "hilo" tambien me gustaria agregarle el reconocimiento de voz (preferiblemente el que ya trae el windows vista/7) a las aplicaciones con las que juego

el tema es: Alguien podria dedicar su tiempo libre a desifrar como hacer un .prg segun esta pagina web?, intente contactando con el creador del tutorial y nada tambien vi alternativas descargables de telephone systems y nada.

Espero que alguien ayude a desentrañar esto, Gracias un abrazo! 

[Fox Learner]

Wow! Que interesante. Sería super decir a un form, con voz tranquila y estandar:

"Sistema, Factura".

Y zas! Ver como el sistema empieza a imprimir..

Saludos!

[edgar suarez kummers]

Les comento que yo tengo a DRAGON voice recognition.

Tiene un problemita en uno de los ojitos pero funciona bien.

saludos

Please look my LINKS --- What I offer ---

CLICK my (mi) software offer (oferta)

CLICK para leer acerca del generador de aplicaciones para PLC

CLICK to read about the PLC software generator

edgar suarez kummers

cel: 57-3176992038

--
 
 
 

[Francisco Javier zárate]

yo muchisimo investigue y este es el unico tutorial pero como no se me antoja usar el dragon no mire pero despues de saber que no existe otra manera otra vez no lo use por no saber como hacer....

  Algun genio que nos guie? jeje

[Walter R. Ojeda Valiente]

Vaya, parece interesante hacer una clase que facilite esa tarea.

---

Date: Mon, 22 Oct 2012 13:14:04 -0700
From: javi...@gmail.com
To: publice...@googlegroups.com
Subject: Re: [vfp] Reconocedor de voz para activar botones

--
 
 
 

[edgar suarez kummers]

Yo tengo el DRAGON pero ya les dije que tiene un problemita en un ojito. Funciona muy bien,

Please look my LINKS --- What I offer ---

CLICK my (mi) software offer (oferta)

CLICK para leer acerca del generador de aplicaciones para PLC

CLICK to read about the PLC software generator

edgar suarez kummers

cel: 57-3176992038

--
 
 
 

[Walter R. Ojeda Valiente]

Sí, supongo que el problema que tiene en su ojito es que lo tiene tapado por un parche.

:-)

Saludos.

Walter.

---

From: edgark...@gmail.com
Date: Mon, 22 Oct 2012 20:00:35 -0500

Subject: Re: [vfp] Reconocedor de voz para activar botones

To: publice...@googlegroups.com

--
 
 
 

[edgar suarez kummers]

Me asombra tu poder de deducción Walter

Please look my LINKS --- What I offer ---

CLICK my (mi) software offer (oferta)

CLICK para leer acerca del generador de aplicaciones para PLC

CLICK to read about the PLC software generator

edgar suarez kummers

cel: 57-3176992038

--
 
 
 

[Francisco Javier zárate]

No nos desviemos del tema jaja
y por que no usar el reconocimiento de voz de windows que yo vengo usando desde win vista y no me puedo quejar de todas maneras en caso de que no se pueda anexar y solo quede usar el dragon y bue jaja

walter vas a querer examinar? si queres yo te ayudo a invertigar o traducir (por las dudas)

yo estoy muy emocionado y nadie me dio respuestas (el creador)

[Walter R. Ojeda Valiente]

En este momento estoy pensando en hacer una clase que permita interactuar oralmente con los sistemas, o sea, se le dice:
"Abrir Compras" y el programa lee en una tabla que al recibir esa orden debe hacer un: DO FORM COMPRAS

"Grabar" y entonces sabe que debe hacer: THISFORM.BOTON_GRABAR.CLICK()

La verdad que no tengo idea de si tendrá éxito o no, la gente aún no está acostumbrada a hablare a la computadora, pero parece un desafío interesante y podría implementarla para algún programa pequeño donde el riesgo de ser rechazado por los usuarios no sea tanto. De todas maneras, siempre podrán ejecutar sus tareas de la forma tradicional, con el mouse y el teclado.

Saludos.

Walter.

---

Date: Wed, 24 Oct 2012 09:38:19 -0700
From: javi...@gmail.com
To: publice...@googlegroups.com
Subject: [vfp] Re: Reconocedor de voz para activar botones

--
 
 
 

[Francisco Javier zárate]

Mi idea era compartir para ver si alguien puede hacer funcionar y como que yo no entiendo demasiado de fox pero por casi unico motivo que me intereso programacion fue para hacer aplicaciones con reconocimiento bueno mis intenciones van más  a la parte de ocio y personal pero al creador de  este "hilo" si le es util a nivel comercial

  De todas maneras (Gracias Walter por interesarte en la iniciativa :) ) podrías examinarlo y compartir el codigo más adelante? o creamos un tutorial para este foro.

[Francisco Garcia]

Hola amigos, recien estoy investigando. Lo primero que me llego a la mente es con el reconocimiento de voz de windows grabar una macro que ejecute las combinaciones de tecla ALT+N para mi boton de Nuevo que tengo en mi formulario y listo. En este caso no tienes que programar nada del lado de visual foxpro solo crear los botones con funciones de teclas. Observa este video y te ayudara con lo que te indique. https://youtu.be/msUS8IoGYB8


Saludos.

[sip...@gmail.com]

Enviado desde mi HTCEnviado desde mi HTCsuuqe