Cara membuat Virus sendiri (keyboard menulis huruf sendiri)

Berikut ini adalah iseng-iseng membuat virus kecil-kecilan. Mengapa kecil-kecilan ? karena jika anda membuat virus dengan skala berat, maka anda akan diproses secara hukum. Meski virus ini kecil-kecilan, tetapi cukup untuk ngerjain temen anda,.
kode-kode berikut kami berikan kepada anda yang doyan ngerjain temennya, Tp, awas !! jangan disalahgunakan untuk ngerjain si BOS ya ? bisa2 anda di pecat !!

Copy Kode berikut ini, dan pastekan pada notepad dengan memilih save as type : All files dan file name assameda.vbs
nama file bergaris bawah diatas bisa anda ganti dengan nama yang lain sesukamu. Tp, ingat,.!! akhiri dengan .vbs
LIHAT GAMBAR BERIKUT
  • Klik kanan, pilih new > text document dan pastekan kode-kodenya

 simpan seperti gambar dibawah ini :



_____________________________________________
Berikut kodenya : 
1. efek : akan mengetik sendiri pada notepad "Kamu belum Mandi, Baunya sapi"
_____________________________________________
WScript.Sleep 18000
WScript.Sleep 1000
do
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "K"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "m"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys ". "
WScript.Sleep 500
WshShell.SendKeys "L"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "m"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "M"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "n"
WScript.Sleep 500
WshShell.SendKeys "d"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "?"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "B"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys "n"
WScript.Sleep 500
WshShell.SendKeys "y"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "s"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "p"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
wscript.sleep 5000
loop
_____________________________________________

Berikut kodenya : 
2. efek : Kode Vbs ini akan membuat user terus mengetikkan kata2 “Kamu emang jelek koq!”
_____________________________________________


Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Kamu emang jelak koq!"
loop
 
_____________________________________________  
Berikut kodenya : 
2. efek : membuat terus menerus menekan tombol “Enter”
_____________________________________________
 
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep  100
wshshell.sendkeys "~(enter)"
loop
Terus tekan backspace:
MsgBox "Balik lagi ah...saltik"
Set wshShell  =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys  "{bs}"
loop
 
Cara menjalankan virusnya :
Klik 2 kali file vbs yang telah disimpan tadi


cara Menghentikannya :
Jangan menggunakan anti virus,. karena virus ini tidak akan terdeteksi,. 
Hanya gunakan CTRL + ALT + DEL dan cari script, kemudian end process.
Berrreeessss,..
(virus ini tidak akan merusak komputer/program anda) hanya iseng, ben ngguyu,. kwakakakk kak.. HANYA iseng !!!

berikan krtik, saran dan komentar anda di bawah ini, dan jangan lupa klik like fanpage facebooknya. Thanks,.

4 comments:

  1. wah kreatif banget mas, boleh nih dicoba untuk iseng.. hehehe.. :P
    oh iya, cara agar tulisannya enter kebawah bagaimana mas ? terima kasih.. ^^

    ReplyDelete
  2. kalo biar mencet spasi terus gimana gan? sama panah kanan

    ReplyDelete
  3. mas..
    aku mau tanya?
    biar ada pesannya gimana?

    ReplyDelete
  4. Woi virusnya gk bisa dimatiin bantu dong

    ReplyDelete

Berikan Komentar anda !