Hace que tu Pc Hable sin ningun programa

Con este sencillo truco podrás hacer que tu ordenador repita las frases que desees. Útil para lograr un efecto de audio o simplemente para entretenerte con amigos y compañeros de trabajo. Sigue estos cuatro pasos y comparte la diversión.

Hace que tu Pc Hable sin ningun programa

Pasos

pc


Abre el Bloc de notas: dirígete a Inicio/Programas/Accesorios/Bloc de notas.

programas


Copia el siguiente texto y pégalo en el bloc:
Dim message, sapi
message=[InputBox]("What do you want me to say?","Speak to Me" ) (aquí ai que borrar el espacio entre las comillas y el paréntesis)
Set sapi=[CreateObject]("sapi.spvoice" )( aquí también)
sapi.Speak message

tu


Guarda el archivo como "Speak.vbs" (con la extensión .vbs) y elige una ubicación fácil de encontrar, por ejemplo el Escritorio.

habla


Realiza un doble clic sobre el archivo generado, escribe una frase y diviértete escuchando como la máquina pronuncia las palabras.


Importante

* Dado que el sistema está en inglés, la fonética será la de este idioma: prueba agregar la "h" después de las vocales, por ejemplo "ah", para que las palabras suenen como en castellano.
* Si cuando abres el archivo sale un mensaje de error, tal vez no hayas copiado bien el texto; si el error persiste, a tu sistema operativo puede faltarle la interfase de emulación de voz (SAPI).
* Otra manera de ingresar al emulador, es a través de Inicio/Configuración/Panel de control/Voz: allí podrás, además, cambiar la velocidad de lectura del ordenador.

48 comentarios - Hace que tu Pc Hable sin ningun programa

@Pts_Of_Athrty +3
google/traductor/escribir cualquier mierda/escuchar
@El_gran_novato -2
Que tu computadora te hable...? "Forever Alone".
Nah, mentira: 8uen post...
@ZombineCia +1
funcionó (ahora soy forever alone )
@yivanz
terminando de festejas san solterin no ?
@ZombineCia -1
Santiiy dijo:
ZombineCia dijo: funcionó (ahora soy forever alone )


Obvio que funciona


se dieron cuenta que Facebook y Forever alone casi coinciden el las iniciales? (No creo que sea coincidencia :grin
@El_gran_novato +2
ZombineCia dijo:se dieron cuenta que Facebook y Forever alone casi coinciden el las iniciales? (No creo que sea coincidencia :grin

El poder del porro, plasmado en este comentario...
@Kakripr
che em tira error
@elmat5
no me funciona ahora nunca voy a ser foverever alone! =(
@BondeeeH
es muy viejo.............
@yivanz
Santiiy dijo:
yivanz dijo:terminando de festejas san solterin no ?


Tengo novia, y muchos amigos, pase san valentin con ella, pero ahi que compartir, y esto me parecio que para la hora que es sirve para reirse un ratito, al menos te entretiene 5 minutos

men me dejaste sorprendido gracias por contestar de forma serena hay pocos como tu aca en taringa,pd:era joda intento de troll
@X_videokid_X
todo el mundo es forever alone menos yo ):
@osiris033
mo lo colgo el antivirus como script detectado
@El_gran_novato +1
Santiiy dijo:
El_gran_novato dijo:Que tu computadora te hable...? "Forever Alone".
Nah, mentira: 8uen post...


Yo me cago de risa con esto jjajajajja

Mi computadora no sabe putear. Le puse para que diga "La puta que te pario", y me dijo: "La Piuta Keu Te Periou"
@darioampuy -2
desde el windows vista en adelante, el sistema operativo de microsoft incorpora un sistema de reconocimiento de voz y dictado... no es tan exacto como los paquetes de soft dedicado pero con un poco de practica y buena pronunciacion (osea sin hablar como negro cabeza) zafa bastante
@Pts_Of_Athrty
El_gran_novato dijo:
Santiiy dijo:
El_gran_novato dijo:Que tu computadora te hable...? "Forever Alone".
Nah, mentira: 8uen post...


Yo me cago de risa con esto jjajajajja

Mi computadora no sabe putear. Le puse para que diga "La puta que te pario", y me dijo: "La Piuta Keu Te Periou"

pff, asi no tiene gracia :B
@Kakripr
Kakripr dijo:che em tira error


Che logre hacerlo funcar pero escribo y no dice nada
@ElchicoTaringa
Kakripr dijo:
Kakripr dijo:che em tira error
Che logre hacerlo funcar pero escribo y no dice nada

subile el volumen al parlante je
@elmat5
Santiiy dijo:
elmat5 dijo:no me funciona ahora nunca voy a ser foverever alone! =(


Fijate si copiaste bien los codigos y si lo guardaste con la extencion correcta


ah ahi lo arregle , es q en el post aparecen caritas y se reemplaza por otras cosas xd
@Kakripr
ElchicoTaringa dijo:
Kakripr dijo:
Kakripr dijo:che em tira error
Che logre hacerlo funcar pero escribo y no dice nada

subile el volumen al parlante je

no ya esta,estaba cofigurado el sonido q salga al puerto del parlante de la placa madre,yo uso placa de sonido asi que lo configure,ahora escucho

Medio fumado habla
@Haskell123
El_gran_novato dijo:
Santiiy dijo:
El_gran_novato dijo:Que tu computadora te hable...? "Forever Alone".
Nah, mentira: 8uen post...


Yo me cago de risa con esto jjajajajja

Mi computadora no sabe putear. Le puse para que diga "La puta que te pario", y me dijo: "La Piuta Keu Te Periou"

jaja se
@ElchicoTaringa
elmat5 dijo:
Santiiy dijo:
elmat5 dijo:no me funciona ahora nunca voy a ser foverever alone! =(
Fijate si copiaste bien los codigos y si lo guardaste con la extencion correcta
ah ahi lo arregle , es q en el post aparecen caritas y se reemplaza por otras cosas xd

en un post mio de codigos vbs paso lo mismo y tube que dejar un espacio
@SoulHazzard
Santiiy dijo:
elmat5 dijo:no me funciona ahora nunca voy a ser foverever alone! =(


Fijate si copiaste bien los codigos y si lo guardaste con la extencion correcta



Copia el siguiente texto y pégalo en el bloc:
Dim message, sapi
message=[InputBox]("What do you want me to say?","Speak to Me"
Set sapi=[CreateObject]("sapi.spvoice"
sapi.Speak message

fijate que aprece este emoticon " " en 2 ocasiones , el no lo quiso poner como un emoticon sino que es parte del codigo a escribir se escribe esto pero sin el guion ;-)
@El_gran_novato
Santiiy dijo:
El_gran_novato dijo:
Santiiy dijo:
El_gran_novato dijo:Que tu computadora te hable...? "Forever Alone".
Nah, mentira: 8uen post...


Yo me cago de risa con esto jjajajajja

Mi computadora no sabe putear. Le puse para que diga "La puta que te pario", y me dijo: "La Piuta Keu Te Periou"


Es por el idioma, pensa que windows es un sistema operativo basado en el ingles, hay traducciones, pero es imposible traducir una "aplicacion" por asi llamarlo, que ya viene con windows, tendrian que quitarla e incorporar otra...

Si, ya se.. Era un chiste nada mas.. (Chiste horrible y horroroso como yo mismo, lo acepto). Pero me cagaste mas el chiste todavia al explicarlo.
@SoulHazzard
osiris033 dijo:es script panchos

nooo en serio? hay que explicarlo en criollo si la gente no lo entiende
@Kakripr
Santiiy dijo:
SoulHazzard dijo:
Santiiy dijo:
elmat5 dijo:no me funciona ahora nunca voy a ser foverever alone! =(


Fijate si copiaste bien los codigos y si lo guardaste con la extencion correcta



Copia el siguiente texto y pégalo en el bloc:
Dim message, sapi
message=[InputBox]("What do you want me to say?","Speak to Me"
Set sapi=[CreateObject]("sapi.spvoice"
sapi.Speak message

fijate que aprece este emoticon " " en 2 ocasiones , el no lo quiso poner como un emoticon sino que es parte del codigo a escribir se escribe esto pero sin el guion ;-)

ahi puse un espacio y lo aclare gracias por hacermelo saber


a mi me funciono poniendo &quot
@elmat5
Santiiy dijo:
SoulHazzard dijo:
Santiiy dijo:
elmat5 dijo:no me funciona ahora nunca voy a ser foverever alone! =(


Fijate si copiaste bien los codigos y si lo guardaste con la extencion correcta



Copia el siguiente texto y pégalo en el bloc:
Dim message, sapi
message=[InputBox]("What do you want me to say?","Speak to Me"
Set sapi=[CreateObject]("sapi.spvoice"
sapi.Speak message

fijate que aprece este emoticon " " en 2 ocasiones , el no lo quiso poner como un emoticon sino que es parte del codigo a escribir se escribe esto pero sin el guion ;-)

ahi puse un espacio y lo aclare gracias por hacermelo saber


Enrealidad es asi

Copia el siguiente texto y pégalo en el bloc:
Dim message, sapi
message=[InputBox]("What do you want me to say?","Speak to Me" )
Set sapi=[CreateObject]("sapi.spvoice" )
sapi.Speak message

la carita lo hace con esto no se por q " )
@SoulHazzard
Kakripr dijo:
Santiiy dijo:
SoulHazzard dijo:
Santiiy dijo:
elmat5 dijo:no me funciona ahora nunca voy a ser foverever alone! =(


Fijate si copiaste bien los codigos y si lo guardaste con la extencion correcta



Copia el siguiente texto y pégalo en el bloc:
Dim message, sapi
message=[InputBox]("What do you want me to say?","Speak to Me"
Set sapi=[CreateObject]("sapi.spvoice"
sapi.Speak message

fijate que aprece este emoticon " " en 2 ocasiones , el no lo quiso poner como un emoticon sino que es parte del codigo a escribir se escribe esto pero sin el guion ;-)

ahi puse un espacio y lo aclare gracias por hacermelo saber


a mi me funciono poniendo &quot


cierto fue un error mio
@patoclv
nah, me da error
sera q tngo windows 7???
nose pero no sirve anda gil
@angelioo
El_gran_novato dijo:Que tu computadora te hable...? "Forever Alone".
Nah, mentira: 8uen post...


HAHAHAHAHA!!
@lautaro1972
hay algun progama para descargar en el que escribis algo y la compu lo pronuncie?