Script para assustar os teus amigos!

por **MateusV.** Seg Abr 09, 2012 9:16 pm

MateusV.: Membros; Sexo :
Mensagens : 299
Reputação : 5
Inscrição : 24/11/2011
Idade : 28
Localização : Brasil, PE

Mensagem nº1

Script para assustar os teus amigos!

Mensagem por MateusV. Seg Abr 09, 2012 9:16 pm

Primeiro quero dizer que há pessoas que se podem assustar outras não..

Bom é um Script bem simples o que ele faz? ele PISCA as luzes do seu PC e fazem com que o capslock, o numlock e o scrollck, sejam ativados e desativados toda hora repetidamente.(Alguns PC's não funcionam..)

Obs: O unico modo de parar o codigo é reniciando o PC.

Bom a primeira coisa que têm que fazer é abrir o bloco de notas e digitar estes codigos

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{NUMLOCk}"
wscript.sleep 200
wshshell.sendkeys "{NUMLOCk}"
wscript.sleep 200
wshshell.sendkeys "{NUMLOCk}"
wscript.sleep 200
wshshell.sendkeys "{NUMLOCk}"
wscript.sleep 200
wshshell.sendkeys "{NUMLOCk}"
wscript.sleep 200
wshshell.sendkeys "{NUMLOCk}"
wscript.sleep 300
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 500
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 300
wshshell.sendkeys "{SCROLLLOCK}"
wscript.sleep 200
wshshell.sendkeys "{SCROLLLOCK}"
wscript.sleep 200
wshshell.sendkeys "{SCROLLLOCK}"
wscript.sleep 200
wshshell.sendkeys "{SCROLLLOCK}"
wscript.sleep 200
wshshell.sendkeys "{SCROLLLOCK}"
wscript.sleep 200
wshshell.sendkeys "{SCROLLLOCK}"
loop

Depois de colar o codigo no bloco de notas, você salva (Ctrl + S), mas você tem que salvar como arqui .VBS ou seja, o nome irá ficar assim NOMEQUEVCQUER.VBS

Feito isto, é só você clicar nele e pronto, a magica começa. -qqq