Scare your friends with a cool trick just with a Notepad

Want some tricks to scare the shit out of your friends ? Try this cool trick just need a notepad for this.
Notepad is inbuilt and one of the most important tool in any OS , so dont sweat you must have it in your computer.
Just copy the codes and follow the steps ...

1: Eject and enter your DVD writer continously.

Paste Bellow Script in Notepad

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

Save it as pc.vbs and send it to your friends.

2: Open Notepad continuously in your friend’s computer.

Paste Bellow Script in Notepad

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

Save it as pc.vbs and send it to your friends.

3: Cycle a message in your friend’s computer.

Paste Bellow Script in Notepad

@ECHO off
:Begin
msg * Hi
msg * Are you having fun?
msg * I am!
msg * Lets have fun together!
msg * Because you have been o-w-n-e-d
GOTO BEGIN

Save it as pc.vbs and send it to your friends.

4: Make Keyboard Keys Type Continuously.

Paste Bellow Script in Notepad

MsgBox “stop me..! if you can”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop

Save it as pc.vbs and send it to your friends.

5: Make your friend angry by doing their keyboard hit Backspace simultaneously whenever they press a key.

Paste Bellow Script in Notepad

MsgBox “Let’s rock and roll”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop

Save it as pc.vbs and send it to your friends.

6: Open Notepad, type anything slowly and freak your friends out.

Paste Bellow Script in Notepad

WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo “
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re “
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? “
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m g”
WScript.Sleep 500
WshShell.SendKeys “ood”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “

Save it as pc.vbs and send it to your friends.

7: Convey a message to your friend and shutdown thier computer.

Paste Bellow Script in Notepad

@echo off
msg * I don’t like you
shutdown -c “Hahahah You are Doomed” -s

Save it as pc.vbs and send it to your friends.

8: Toggle your friend’s Caps Lock button continuously.

Paste Bellow Script in Notepad

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

Save it as pc.vbs and send it to your friends.

9: Hack your friend’s keyboard and make him type “You are a fool” continuously.

Paste Bellow Script in Notepad

Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “You are a fool.”
loop

Save it as pc.vbs and send it to your friends.

10: make your Friend angry by making their keyboard hit Enter contineously whenever they press a key.

Paste Bellow Script in Notepad

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