Pc Inteligente agregar voz en SO

[GhostLT]

Hola a todos, me imagino que han visto la pelicula de Iron Man y pues me intriga escuchar que la PC responde a lo que tu le consultas y me gustaria saber si existe una forma de agregar librerias o algo asi de ciertos programas que leen texto como por ejemplo
Text Aloud
Loquendo
Dragon Naturally Speaking

Todo esto creado desde visual studio empezando por encender la pc y que me diga que deseo hacer hoy o que deseo buscar etc etc

Por adelantado gracias por sus ides y documentare toda la info posible...

[BlackZeroX]

hay un post de *PsYkE1* (unas dos a 4 paginas atrás) donde hace algo similar, solo qué lo qué escribes, usando algunas librerías del S.O.(Te lee lo escrito)!¡.

Dulces Lunas!¡.

[GhostLT]

si se llama el objeto Sapi.spVoice y un pequeño ejemplo

Código (vbnet) [Seleccionar] Expandir

' ////////////////////////////////////////////////////////////////
' // *Autor: *PsYkE1* (miguelin.majo@gmail.com)                 //
' // *Podeis agrandar o reducir el codigo, siempre y cuando se  //
' // respete la autoria y se me comuniquen esos cambios.        //
' // *Agradecimientos a BlackZeroX                              //
' // *Visita http://foro.rthacker.net                           //
' ////////////////////////////////////////////////////////////////
Option Explicit
Public Sub Computer_Talk(ByVal sText As String, Optional ByVal lVelocity As Long = 0)
    If lVelocity < -10 Or lVelocity > 10 Then Exit Sub
    Dim oTalkComputer As Object
    Set oTalkComputer = CreateObject("Sapi.spVoice")
    If oTalkComputer Is Nothing Then Exit Sub
    With oTalkComputer
        .Rate = lVelocity
        .Speak sText
    End With
    Set oTalkComputer = Nothing
End Sub

Gracias!!!