Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Controlar Tu S.O. Mediante Voz
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Controlar Tu S.O. Mediante Voz 
 
Pues gracias a Celtilander, (miembro de gambas-es.org), que me paso un código para el reconocimiento de voz, he hecho este programa que es un embrión para controlar tu escritorio (y el sistema operativo en si) con la voz...



Link


Probarlo, y espero vuestros comentarios...

Saludos

NOTA: 20/09/2016
Versión 0.0.2:

Link


Para más detalles:
http://jsbsan.blogspot.com.es/2016/...ontrola-tu.html
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
última edición por jsbsan el Martes, 20 Septiembre 2016, 05:42; editado 2 veces 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
muy bueno, gracias por compartir

ya se me ocurrirá alguna idea para usar el componente.

Saludos.
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
Hola frater jsbsan !

Muy interesante el tu programa. ...como sabes yo soy un partidario de la mezcla de lenguajes..... (pero sin serpientes   )

Bueno, a mi no funciona adecuadamente TrayIcon... no se el porque... y por eso he borrado toda la parte con TrayIcon, usando solo el Formulario.
Tambien he cambiado la sigla de la lengua a italiano.

Entonces probé tu programa, funciona.

Ah... lo señalé en el foro de gambas-it.org !


He visto que el ejecutable speech.sh crea un file audio formato .flac, donde está guardado el audio de la palabra dicha.  Pero las palabras largas son cortadas.
Claro que este no es un gran problema por el programa.
 



 
última edición por vuott el Lunes, 19 Septiembre 2016, 11:12; editado 3 veces 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
Ahora no tengo micro...

Hace años tenía un software de voz que usaba en windows95, venía son la SoundBlaster Awe 32.
Ejecutaba aplicaciones con la voz. Y otra tambien permitía leer textos y cantaba!.  

Aquí os muestro un ejemplo con la aplicación Text Assist. Textole. Es una demo.
Merece la pena verlo y escucharlo, además fijo que os reís con las voces.


Link


El micro que incorporaba está tarjeta de vídeo, permitía recibir los sonidos que estaban cerca, pero no los lejanos.
La verdad es que ver eso por primera vez era realmente interesante.

Si a eso se le añade, que según dictas va escribiendo. Eso ya no era capaz de hacerlo.
Aunque eso estamos un poco más acostumbrado hoy con el sistema androide, internet, Google, etc.

Saludos
 




===================
Gambas Básico
“Lo mejor de los booleanos es que si te equivocas estás a un solo bit de la solución correcta. Anónimo."
 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
Vout:
Citar:
Pero las palabras largas son cortadas.

El script, se puede configurar para que escuche más tiempo (solo escucha 2 segundos, que esta bien para órdenes cortas) y en otros idiomas (esta por defecto en español).

Saludos
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
jsbsan escribió: [Ver mensaje]
El script, se puede configurar para que escuche más tiempo

Sì, yo intuí que fuera así, pero no hay cambio, también poniendo otros valores de la duración.
Pero es claro que este no es una cosa importante por el programa.
 



 
última edición por vuott el Lunes, 19 Septiembre 2016, 21:19; editado 1 vez 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
Me parece estupendo!!!
Hay ciertos campos donde me parece que gambas está flojo, y este con este tipo de ayuda, mejora mucho.
Es probable que hable de más como buen ignorante que soy, pero me parece que sería interesante que se pudiesen instalar componentes de terceros en gambas, que permitiese un uso extendido con funcionalidades como estas, que quizás no deba llevar la versión oficial (igual si lo hace, y estoy hablando de más... pero como dicen en mi tierra, "o falar non ten cancelas"-> hablar no tiene puertas...)
 



 
celtilander - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
Interesante, deja pensando en muchas aplicaciones que podrian incluir un interprete para dictarle los contenidos al programa en ves de escribirlos.

Este código que hice lee en voz alta los textos que se le pase  y tambien se le puede pasar el idioma, por ahi sirve de algo. yo lo use para lleer el texto de un textbox cuando hacia click en el .

Public Sub Record(stxText As String[], stxFiles As String[], stxLang As String[])
  
  Dim intTxt As Integer
  Dim wtcStat As Watch
  Dim strState As String
  Dim strSpechPath As String
  Dim strSpechText As String
  Dim strLanguage As String
  
  For intTxt = 0 To stxText.Max
    
    strSpechPath = stxFiles[intTxt]
    strSpechText = stxText[intTxt]
    
    strLanguage = Lower(stxLang[intTxt])
    
    Select strLanguage
      Case "spanish", "español", "es"
        strLanguage = "es-ES"
      Case "english", "ingés", "en"
        strLanguage = "en-GB"
      Case "french", "francés", "fr"
        strLanguage = "fr-FR"
      Case "italian", "italiano", "it"
        strLanguage = "it-IT"
      Case "german", "alemán", "de"
        strLanguage = "de-DE"
      Case Else
        strLanguage = "es-ES"
    End Select
    
    Try Kill strSpechPath
    
    strRecordState = "Opened"
    
    Exec ["pico2wave", "-l", strLanguage, "-w", strSpechPath, "\"" & strSpechText & "\""]
    Exec ["mplayer", strSpechPath]
    
    If Exist(strSpechPath) = True Then
      wtcStat = New Watch(strSpechPath) As "RecordState"
    Endif
    
    While strRecordState = "Opened"
      Wait 1
    Wend
  Next
  
End

Public Sub Speak(stxFiles As String[])
  
  Dim intTxt As Integer
  Dim wtcSpeak As Watch
  Dim strSpechPath As String
  
  For intTxt = 0 To stxFiles.Max
    
    strSpeakState = "Opened"
    strSpechPath = stxFiles[intTxt]
    
    Exec ["mplayer", strSpechPath]
    
    If Exist(strSpechPath) = True Then
      wtcSpeak = New Watch(strSpechPath) As "SpeakState"
    Endif
    
    While strSpeakState = "Opened"
      Wait 1
    Wend
  Next
  
End

Public Sub RecordState_Open()
  
  strRecordState = "Opened"
  
End

Public Sub RecordState_Close()
  
  strRecordState = "Closed"
  
End

Public Sub SpeakState_Open()
  
  strSpeakState = "Opened"
  
End

Public Sub SpeakState_Close()
  
  strSpeakState = "Closed"
  
End
 

 



 
tincho - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
Tincho:

Gracias por el aporte, una cosa a agregar más  

Por otro lado, ya he subido la versión 0.0.2, explicando con un nuevo video, las acciones que realiza

Comandos reconocidos:
    Terminal
    Consola
    Gimp
    Caja
    Navegador
    Ayuda




Link



Para más detalles:
http://jsbsan.blogspot.com.es/2016/...ontrola-tu.html
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Controlar Tu S.O. Mediante Voz 
 
tincho escribió:  
Este código que hice lee en voz alta los textos que se le pase  y tambien se le puede pasar el idioma
    
    Exec ["pico2wave"......


No usando programa externo con Exec:    

https://www.gambas-es.org/viewtopic.php?f=5&t=3587
 



 
última edición por vuott el Martes, 20 Septiembre 2016, 09:14; editado 1 vez 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
8.00 8 8 1
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Controlar Mediante Puerto Paralelo? zero14 General 5 Sabado, 03 Septiembre 2011, 00:25 Ver último mensaje
codificador
No hay nuevos mensajes Controlar Proceso Del Ftp pittusa General 4 Viernes, 11 Febrero 2011, 05:30 Ver último mensaje
razaAztk
No hay nuevos mensajes Controlar El Evento Scroll netking86 General 3 Domingo, 13 Marzo 2011, 16:36 Ver último mensaje
netking86
No hay nuevos mensajes Controlar Timeout Mysql pctotalsantafe Bases de Datos 4 Lunes, 24 Octobre 2011, 21:29 Ver último mensaje
pctotalsantafe
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario