[Tutorial]Creaza un critical Virus:X
Pagina 1 din 1
[Tutorial]Creaza un critical Virus:X
scrie u asta in notepad )
@echo off
color 0A
Echo ------------------------------------------------------------
Echo Do you want to wipe your computer of all data ? (y/n)
PAUSE >nul
A:
Echo ------------------------------------------------------------
Echo Are you sure you want to delete all data?
PAUSE >nul
color F0
Echo ---------------------
color 40
Echo Deleting all Data ...
ping localhost
dir /s
color F0
Echo ---------------------
color 40
echo Deleting all Data ...
ping localhost
ping localhost >nul
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo ------------------------------YOU JUST WHIPED YOUR COMPUTER DATA !-------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
color 05
Echo -------------------------------------------------------------------------------
Echo ------------------------------------JUS KIDDING -------------------------------
Echo -----------------------------------By alltutorials.canadian-forum.com------------------------------
PAUSE >nul
tot .bat .. sau .cmd asta de sus :-> Smile)
msgbox "Sa te vad daca sti sa ma rogi frumos sa iti las calculatorul in pace"
Set kader = WScript.CreateObject("SAPI.SpVoice")
kader.Speak "computer infected"
msgbox"O sa iti deschid primele 10 porturi...apoi o sa iti dezactivez firewall..si ma mai gandesc",,"Nuca"
msgbox"Gata,te-ai ars!!!",,"Nuca"
kader.Speak "1, 2, 3"
kader.Speak "opening port number 1 "
kader.Speak "opening port number 2"
kader.Speak "opening port number 3"
kader.Speak "opening port number 4"
kader.Speak "opening port number 5"
kader.Speak "opening port number 6"
kader.Speak "opening port number 7"
kader.Speak "opening port number 8"
kader.Speak "opening port number 9"
kader.Speak "opening port number 10"
kader.Speak "all 10 sistem ports are opened"
msgbox"In momentul de fata ai la calculator cela mai importante 10 de porturi deschise",,"Nuca"
msgbox "Acuama iti dezactivez protectia calculatorului",,"Nuca"
kader.Speak "starting proces"
kader.speak " "
kader.Speak "disabling antivirus"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak " "
kader.speak "antivirus disabled"
kader.speak " "
kader.Speak "disabling firewall"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak "firewall disabled"
kader.speak "operation completed"
msgbox" Incep infectarea calculatorului gazda",,
kader.Speak "Extracting viruses"
kader.Speak "extracting Trad3r.trojan"
kader.Speak " "
kader.Speak "loading"
kader.Speak "Trad3r.trojan has been succesfull extracted"
msgbox" Ce sa iti fac daca ai suparat pe cine nu trebuia "
kader.Speak "anyway your personal computer will be functionable only 10 more seconds"
kader.Speak "say bye to your pc"
kader.Speak "10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0"
kader.Speak "shutdown and saving infected"
kader.Speak " MADE BY ALLTUTORIALS.RO"
Dim wshshell
set wshshell = wscript.Createobject("WScript.Shell")
wshshell.run "shutdown -s -t 30 -c Mas"
asta o faci .vbs
DistreazaTe pe seama prietenilor tai:o
@echo off
color 0A
Echo ------------------------------------------------------------
Echo Do you want to wipe your computer of all data ? (y/n)
PAUSE >nul
A:
Echo ------------------------------------------------------------
Echo Are you sure you want to delete all data?
PAUSE >nul
color F0
Echo ---------------------
color 40
Echo Deleting all Data ...
ping localhost
dir /s
color F0
Echo ---------------------
color 40
echo Deleting all Data ...
ping localhost
ping localhost >nul
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo ------------------------------YOU JUST WHIPED YOUR COMPUTER DATA !-------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
color 05
Echo -------------------------------------------------------------------------------
Echo ------------------------------------JUS KIDDING -------------------------------
Echo -----------------------------------By alltutorials.canadian-forum.com------------------------------
PAUSE >nul
tot .bat .. sau .cmd asta de sus :-> Smile)
msgbox "Sa te vad daca sti sa ma rogi frumos sa iti las calculatorul in pace"
Set kader = WScript.CreateObject("SAPI.SpVoice")
kader.Speak "computer infected"
msgbox"O sa iti deschid primele 10 porturi...apoi o sa iti dezactivez firewall..si ma mai gandesc",,"Nuca"
msgbox"Gata,te-ai ars!!!",,"Nuca"
kader.Speak "1, 2, 3"
kader.Speak "opening port number 1 "
kader.Speak "opening port number 2"
kader.Speak "opening port number 3"
kader.Speak "opening port number 4"
kader.Speak "opening port number 5"
kader.Speak "opening port number 6"
kader.Speak "opening port number 7"
kader.Speak "opening port number 8"
kader.Speak "opening port number 9"
kader.Speak "opening port number 10"
kader.Speak "all 10 sistem ports are opened"
msgbox"In momentul de fata ai la calculator cela mai importante 10 de porturi deschise",,"Nuca"
msgbox "Acuama iti dezactivez protectia calculatorului",,"Nuca"
kader.Speak "starting proces"
kader.speak " "
kader.Speak "disabling antivirus"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak " "
kader.speak "antivirus disabled"
kader.speak " "
kader.Speak "disabling firewall"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak "firewall disabled"
kader.speak "operation completed"
msgbox" Incep infectarea calculatorului gazda",,
kader.Speak "Extracting viruses"
kader.Speak "extracting Trad3r.trojan"
kader.Speak " "
kader.Speak "loading"
kader.Speak "Trad3r.trojan has been succesfull extracted"
msgbox" Ce sa iti fac daca ai suparat pe cine nu trebuia "
kader.Speak "anyway your personal computer will be functionable only 10 more seconds"
kader.Speak "say bye to your pc"
kader.Speak "10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0"
kader.Speak "shutdown and saving infected"
kader.Speak " MADE BY ALLTUTORIALS.RO"
Dim wshshell
set wshshell = wscript.Createobject("WScript.Shell")
wshshell.run "shutdown -s -t 30 -c Mas"
asta o faci .vbs
DistreazaTe pe seama prietenilor tai:o
Subiecte similare
» [Tutorial]Cum sa translatam un tutorial din alta limba in RO.
» [Tutorial]Tutorial Instalare Forum, phpBB
» [Tutorial]Tutorial de facut TV pe net
» [Tutorial]Cum sati configurezi Odc-ul si Dc++
» [Tutorial]Triseaza cu share-ul la dc++
» [Tutorial]Tutorial Instalare Forum, phpBB
» [Tutorial]Tutorial de facut TV pe net
» [Tutorial]Cum sati configurezi Odc-ul si Dc++
» [Tutorial]Triseaza cu share-ul la dc++
Pagina 1 din 1
Permisiunile acestui forum:
Nu puteti raspunde la subiectele acestui forum
|
|