Existe um recurso interessante no Windows que permite fazer com que o seu computador fale ou fale o que você disser! Esse método aproveita uma API integrada instalada no Windows XP, Vista, 7, 8 e 10 chamada SAPI (Speech Application Programming Interface).
A Microsoft Speech API é usada para o texto recurso de acessibilidade de fala embutido no Windows. Você também pode escrever programas que chamam a API, o que permitiria que seus aplicativos falassem, mas isso é para desenvolvedores.
Apenas fazer seu computador dizer o que você quer é muito fácil, na verdade! Neste artigo, mostrarei como criar um script VBS que receberá uma entrada de texto de um usuário e, em seguida, falará. Também mencionarei como codificar o texto que você quer falar e, em seguida, agendar esse script para ser executado em eventos específicos, como iniciar o Windows ou fazer logoff.
Inserir texto, falar mensagem
Vamos começar com um script simples que irá aparecer uma caixa de diálogo onde você pode digitar o que você quer que o Windows fale. Primeiro, vá em frente e abra o Bloco de Notas.
Etapa 1:Cole o texto a seguir em um novo documento:
Dim message, sapi
message = InputBox (“Digite o texto que você quer falar”, ”Fale isso”)
Definir sapi = CreateObject (“sapi.spvoice”)
mensagem sapi.Speak
Observe que quando você copia o texto do seu navegador e colá-lo no Bloco de Notas, as cotações causam problemas . Antes de salvar o arquivo, você precisa excluir e excluir cada citação (“) e redigitar a citação. No exemplo abaixo, existem seis citações. Ele deve ser parecido com a imagem abaixo.
Agora, quando você for salvar o arquivo, dê um nome a ele, mas certifique-se de também digite .VBSapós o nome. Em seguida, para a caixa Salvar como tipo, escolha Todos os arquivosem vez dos Documentos de texto padrão.
Agora dê um duplo clique no arquivo VBS e você verá uma caixa de entrada onde você pode digitar o texto que você quer falar! Digite alguma coisa e clique em OK.
Se você fez tudo certo, você deve ouvir uma voz masculina ou feminina expressar sua sentença. Se você receber qualquer tipo de mensagem de erro, copie e cole o texto novamente e substitua as citações.
Configurar configurações de voz SAPI
Isso é divertido, mas também podemos configurar nosso pequeno computador falante com diferentes configurações. Podemos mudar o volume, quão rápido ou lento a voz fala e mudar o gênero entre masculino e feminino. Aqui está um código de exemplo onde eu adicionei algumas linhas extras.
Dim mensagem, sapi
message = InputBox (“Digite o texto que você quer falado ”,” Fale isso ”)
Definir sapi = CriarObjeto (“ sapi.spvoice ”)
Definir sapi.Voice = sapi.GetVoices.Item (1)
sapi.Rate = 0
sapi.volume = 100
sapi.Entrar mensagem
A taxa padrão é 0 e o intervalo é de -10 a 10. -10 fará com que a voz fale super devagar e 10 fale super rápido. O volume é padronizado em 100 e o intervalo é de 0 a 100. A linha que começa com Definir sapi.Voicepermitirá que você mude para outra voz, se instalada em seu sistema.
Observe que o número de vozes que você pode escolher depende do sistema operacional. No Windows 7, há apenas uma voz, a Microsoft Anna.
No Windows 10, há duas vozes: Microsoft David e Microsoft Zira como mostrado abaixo.
Se houver apenas uma voz instalada em seu sistema , você tem que mudar o que diz sapi.GetVoices.Item (1)para sapi.GetVoices.Item (0), caso contrário você terá uma mensagem de erro quando você tenta executar o script. Você também pode criar outro documento do Bloco de Notas e colar o código abaixo, que informará quais vozes estão instaladas. Salve como um arquivo .VBS como mostrado acima e execute-o.
Defina VObj = CreateObject (“SAPI.SpVoice”)
Para Cada Voice In VObj.getvoices
I = I + 1
msgbox “” & amp; (I - 1) & amp; ”-” & amp; Voice.GetDescription
Próxima
Até agora, usamos esta caixa de diálogo para inserir texto, mas você também pode simplesmente digitar sua mensagem no arquivo de script. Isso seria útil se você quisesse programar o script para ser executado automaticamente. Obviamente, isso pode ser usado para brincar com seus amigos e familiares e funciona muito bem.
Imagine alguém ligando o computador e ouvindo o computador dizer “Olá John, estou com muito sono, por favor, não não me incomoda hoje! ”quando inicia! Eu posso prometer a você por experiência, que é histérico e você definitivamente deveria tentar.
Para codificar a mensagem, simplesmente mude a última linha para algo assim:
sapi.Speak "Olá John, estou muito cansado hoje!"
Agendar arquivo de script
Agora que você codificou sua mensagem para seu alvo pretendido, você simplesmente precisa executá-lo quando quiser. Se você é especialista em tecnologia, você pode usar um programa como AutoIt, que permitirá que você faça coisas extremas, como executar o arquivo de script quando um determinado programa é aberto ou quando uma janela é maximizada ou minimizada.
Eu não tenho tempo para entender tudo isso neste post, mas por sorte a Microsoft tem um recurso embutido chamado Task Scheduler que permite que você faça coisas bem complicadas com scripts facilmente.
Meu post anterior é detalhado em como agendar um arquivo de script para ser executado quando certos eventos ocorrem no Windows. Se você tiver algum problema para fazer seu script funcionar, sinta-se à vontade para postar um comentário e tentarei ajudar. Aproveite!