Um pouco de história básica (visual)
Em 1988, a primeira iteração do VBScript ou (Visual Basic Scripting Edition) apareceu e ainda era uma versão muito primitiva do que temos hoje. Ao longo dos anos, a necessidade de uma linguagem de script fácil de usar e leve para a Microsoft aumentou. Por causa disso, a empresa continuou trabalhando nisso e finalmente o liberou para o público em 1996.
É um script simples que usa COM (Component Object Model) para criar, ler, atualizar e excluir arquivos nos sistemas operacionais da Microsoft. Desde que o Windows 98 foi lançado, ele foi instalado em todos os computadores. É altamente versátil devido ao fato de que o ambiente de host do VBScript pode ser incorporado em programas usando o Microsoft Script Control. Ele é usado muitas vezes com os Serviços de Informações da Internet, o Windows Script Host e o Internet Explorer.
Mas isso é o suficiente do jabber técnico. Vamos conversar e aprender como fazer seu computador falar!
VBScripts de uso único
Criar um script básico visual é muito fácil e não requer programas especiais. Embora existam programas que você pode usar para escrever scripts mais avançados, a maioria dos programadores e pessoas que se interessam por escrever scripts usam o Notepad da Microsoft.
Vamos começar o processo abrindo o bloco de notas. Depois de ter aberto o Bloco de notas, tudo o que você precisa fazer é digitar o código a seguir ou simplesmente copiá-lo e colá-lo na janela do bloco de notas. Para alterar o que seu script faz com que o computador diga, simplesmente substitua a seção que diz “Os geeks herdarão a terra” com o que você quiser ouvir.
dim speechobject set speechobject=createobject('sapi.spvoice') speechobject.speak 'The geeks shall inherit the earth'
Encontre um lugar onde você deseja salvar a imagem. Para este exemplo, estou salvando-o em uma pasta vazia no diretório Downloads. A coisa mais importante que você precisa fazer é dar um nome que termine com.vbs. Isso dirá ao computador que você não está salvando um arquivo de texto simples; em vez disso, você está salvando um VBScript. Vamos nomear este exemplo “Geek test.vbs” como mostrado abaixo.
Agora, para pegar o jeito, tente criar mais alguns scripts com qualquer texto que você queira ouvir. Alternativamente, você pode clicar com o botão direito do mouse no VBScript e selecionar a opção “Abrir com…” e então escolher o bloco de notas para editar o texto dentro do mesmo arquivo.
Texto para Escrita em Fala
Agora que você sabe escrever um script de uso único e provavelmente já jogou com ele algumas vezes, você pode estar ficando um pouco entediado. É por isso que vamos aumentar o ritmo.
A próxima coisa que aprenderemos é como criar um script um pouco mais avançado que o script de uso único. Isso criará uma caixa de diálogo na qual você poderá digitar texto e fazer com que ele seja lido pelo seu PC.
Comece abrindo o seu bloco de notas novamente e digitando esse script ou copie-o e cole-o na janela do bloco de notas.
Dim message, sapi message=InputBox('What shall I say, your Geekness?','I speak for you.') Set sapi=CreateObject('sapi.spvoice') sapi.Speak message
Por agora, deixe-nos entrar "Os geeks herdarão a terra", em seguida, pressione o botão "OK" para executar o script e ouvir o seu texto em voz alta.
Saudações Script VBScript
Isso está ficando muito divertido, mas seu computador ainda não está interagindo muito com você. Agora vamos tentar outro script simples que leva em conta a hora do dia, bem como a resposta apropriada para a hora do dia. Esse script lerá o horário do seu computador e, com base nisso, ele será saudado de uma determinada maneira.
Comece abrindo o seu bloco de notas e inserindo este pequeno script. Você pode substituir a seção que tem as saudações do dia com qualquer frase que queira ouvir e substituir Geekmeister pelo seu próprio nome.
Set Sapi = Wscript.CreateObject('SAPI.SpVoice') dim str if hour(time) < 12 then Sapi.speak 'Good Morning Geekmeister ' else if hour(time) > 12 then if hour(time) > 16 then Sapi.speak 'Good evening Geekmeister ' else Sapi.speak 'Good afternoon Geekmeister ' end if end if end if
O roteiro diz que se o relógio ler qualquer coisa antes das 12 horas, é de manhã e que qualquer coisa depois das 12 é tarde; no entanto, ele também tem uma cláusula que diz que, mesmo que seja depois de 12, contanto que o horário seja 16:00 (16:00), torna-se noite.
Script do VBScript da Hora do Dia
Se você quiser ficar um pouco mais avançado e receber tempo, crie um novo bloco de notas e insira este script.
O script pode parecer complicado, mas essencialmente é dizer ao seu computador o que dizer e como dizê-lo com base no tempo exibido no relógio do computador. Você sempre pode substituir o "A hora atual" por qualquer introdução para o tempo que você deseja.
Set Sapi = Wscript.CreateObject('SAPI.SpVoice') Sapi.speak 'The current time is'
if hour(time) > 12 then Sapi.speak hour(time)-12 else if hour(time) = 0 then Sapi.speak '12' else Sapi.speak hour(time) end if end if
if minute(time) < 10 then Sapi.speak 'o' if minute(time) < 1 then Sapi.speak 'clock' else Sapi.speak minute(time) end if else Sapi.speak minute(time) end if
if hour(time) > 12 then Sapi.speak 'P.M.' else if hour(time) = 0 then if minute(time) = 0 then Sapi.speak 'Midnight' else Sapi.speak 'A.M.' end if else if hour(time) = 12 then if minute(time) = 0 then Sapi.speak 'Noon' else Sapi.speak 'P.M.' end if else Sapi.speak 'A.M.' end if end if end if
Agora você só precisa salvar o arquivo como um VBScript como você fez nas etapas anteriores e depois navegar para essa pasta. Se tudo correr bem, você deverá ser capaz de clicar duas vezes nele e ouvir o computador informando a hora.
Saudação de inicialização
Agora que você sabe como fazer seu computador cumprimentá-lo e dizer a você como seria legal se o computador fizesse isso ao ligar o computador. Na verdade, é muito fácil fazer isso se você simplesmente combinar os dois scripts e colocá-los no lugar certo.
Comece abrindo o bloco de notas da Microsoft e copie esse código para a janela. É simplesmente uma cópia de ambos os códigos combinados para você. Lembre-se de que você pode alterar a saudação para "O que está por baixo, Olá Mestre, Saudações, sua altíssima qualidade" ou qualquer coisa que você queira que seu computador diga a você.
Set Sapi = Wscript.CreateObject('SAPI.SpVoice') dim str if hour(time) < 12 then Sapi.speak 'Good Morning Geekmeister ' else if hour(time) > 12 then if hour(time) > 16 then Sapi.speak 'Good evening Geekmeister ' else Sapi.speak 'Good afternoon Geekmeister ' end if end if end if Sapi.speak 'The current time is'
if hour(time) > 12 then Sapi.speak hour(time)-12 else if hour(time) = 0 then Sapi.speak '12' else Sapi.speak hour(time) end if end if
if minute(time) < 10 then Sapi.speak 'o' if minute(time) < 1 then Sapi.speak 'clock' else Sapi.speak minute(time) end if else Sapi.speak minute(time) end if
if hour(time) > 12 then Sapi.speak 'P.M.' else if hour(time) = 0 then if minute(time) = 0 then Sapi.speak 'Midnight' else Sapi.speak 'A.M.' end if else if hour(time) = 12 then if minute(time) = 0 then Sapi.speak 'Noon' else Sapi.speak 'P.M.' end if else Sapi.speak 'A.M.' end if end if end if
Depois de ter copiado todo o código exatamente como está, no bloco de notas, vá em frente e salve-o como “Startup greeting.vbs”. Ele também pode ser chamado como você quiser, mas, para os fins desta demonstração, é mais fácil se estivermos todos na mesma página. Agora que foi salvo, você pode clicar duas vezes no arquivo VBScript para ouvi-lo e lhe dizer a hora.
Se, por algum motivo, isso não funcionar para você, você também pode navegar manualmente para a pasta de inicialização. Você irá primeiro para a pasta onde o seu “Startup greeting.vbs” é salvo e copie-o. O próximo passo é digitar o seguinte caminho no topo de qualquer janela do Explorer e pressionar “Enter”. Você só precisará alterar USERNAME com o nome que você usa para sua conta de computador.
C:UsersUSERNAMEAppDataRoamingMicrosoft WindowsStart MenuProgramsStartup
Quando estiver na pasta de inicialização, basta colar o arquivo vbs e você está pronto para ir. Agora, na próxima vez que você iniciar seu computador e efetuar login, ele deverá cumprimentá-lo automaticamente e informá-lo de que horas são.
- Teste geek
- Cumprimento
- Saudação de inicialização
- Dizer o tempo
- Texto para fala
