Scare your friends and make them believe their computer is ‘Possessed’ with these simple Computer Pranks, most of which only require a notepad.
Scary Notepad Tricks and Pranks
9. Automatically Close and Open CD/DVD ROM
In Notepad, Copy paste the below code and save it as ‘anyname.vbs’
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
You must somehow persuade your friend to open the file or set up a plot to scare your friend with this trick
8. Text to Speech in Notepad – Ghost Voice
You can convert Text to Speech in Notepad. Copy and Paste the below code into Notepad and save it as ‘anything.vbs’
Dim msg, sapi
msg=InputBox(“You are going to Die”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak msg
Change ‘You are going to die’ to any Scary prank you want.
7. Matrix Blood Effect on Notepad
Scare your friends with Matrix style text effect. Copy the code below and save it as ‘anything.bat’.
@echo off
color 04
:start
echo you will die you will die
goto start
6. Auto Shutdown with Warning Message
You can Auto Showdown your friend’s PC with a scary warning alert. Copy the code below and save it as .bat
@echo off
msg * I don’t like you
shutdown -c “You are Going to Die!” -s
5. Make Keyword Type Automatically
Annoy your friend by automatically making keyboard type continuously. Copy the below code and save it as ‘anything.vbs’
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 90
wshshell.sendkeys “You are going to Die.”
loop
4. Scariest Notepad Prank
Copy paste the below code in Notepad and save it as ‘something.vbs’
WScript.Sleep 1700
WScript.Sleep 980
Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hi”
WScript.Sleep 500
WshShell.SendKeys “Ho ”
WScript.Sleep 500
WshShell.SendKeys “, Ya”
WScript.Sleep 500
WshShell.SendKeys “Wha”
WScript.Sleep 500
WshShell.SendKeys “T ”
WScript.Sleep 500
WshShell.SendKeys “Are”
WScript.Sleep 500
WshShell.SendKeys “? ”
WScript.Sleep 500
WshShell.SendKeys “You”
WScript.Sleep 500
WshShell.SendKeys “Going”
WScript.Sleep 500
WshShell.SendKeys “to”
WScript.Sleep 500
WshShell.SendKeys ” do”
WScript.Sleep 500
WshShell.SendKeys “Sca”
WScript.Sleep 500
WshShell.SendKeys “Ry! “
3. Turn Caps Lock On and Off Trick on Notepad
Copy paste the below code into Notepad and save it as ‘something.vbs’. Forward it to your friends and scare them off
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 95
wshshell.sendkeys “{CAPSLOCK}”
loop
2. Press Enter Key Automatically
Copy paste the below code into Notepad and save it as ‘something.vbs’ , Forward it to your friends and scare them off
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 95
wshshell.sendkeys “~(enter)”
loop
1. Send Message Continuously with Notepad
Copy paste the below code into Notepad and save it as ‘something.vbs’ , Forward it to your friends and scare them off
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 95
wshshell.sendkeys “You will Die.”
loop
Comments
Post a Comment
Comment Here... But please don't paste your links here. Thanks