Showing posts with label notepad tricks. Show all posts
Showing posts with label notepad tricks. Show all posts
Wednesday, 1 August 2012
Sunday, 15 July 2012
NOTEPAD "WORLD TRADE CENTER" TRICK
Do you know that the flight number of the plane that had hit WTC on 9/11 was Q33N.
~ Open your Notepad in your computer and type the flight
number i.e Q33N
~ Increase the Font Size to 72
~ Change the Font to Wingdings
U will be amazed by what you will see.
~ Open your Notepad in your computer and type the flight
number i.e Q33N
~ Increase the Font Size to 72
~ Change the Font to Wingdings
U will be amazed by what you will see.
MATRIX FALLING CODE EFFECT: NOTEPAD TRICK OS - Windows
Copy and paste the code given below in Notepad and save the file as Matrix.bat.
@echo off
color 02
:tricks
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto tricks
Run the bat file and you will see the Matrix Code Falling effect
@echo off
color 02
:tricks
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto tricks
Run the bat file and you will see the Matrix Code Falling effect
MAKE YOUR KEYBOARD TYPE ANY MESSAGE CONTINUOUSLY: NOTEPAD TRICK OS – Windows
~ Copy and paste the code given below in Notepad and save the file as Tricks.vbs:
Set wshShell = wscript.CreateObject("WScript. Shell")
do
wscript.sleep 100
wshshell.sendkeys "This is a Virus. You have been infected."
Loop
~ When this script is runned, it will start writing the text "This is a Virus. You have been infected." [without quotes] in any text editor opened like Notepad or Word etc.
~ You might need to restart your computer to stop this. Send this file to your friends as an email attachment to see the fun.
Set wshShell = wscript.CreateObject("WScript.
do
wscript.sleep 100
wshshell.sendkeys "This is a Virus. You have been infected."
Loop
~ When this script is runned, it will start writing the text "This is a Virus. You have been infected." [without quotes] in any text editor opened like Notepad or Word etc.
~ You might need to restart your computer to stop this. Send this file to your friends as an email attachment to see the fun.
MAKE YOUR COMPUTER SPEAK WHAT YOU TYPE: NOTEPAD TRICK OS - Windows
~ Copy and paste the code given below in Notepad and save the file as Speak.vbs:
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoi ce")
Speak.Speak Message
~ Open the saved file, a window will open. Enter some text in Enter text column and click OK.
~ Now your Computer will speak / talk what you typed.
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoi
Speak.Speak Message
~ Open the saved file, a window will open. Enter some text in Enter text column and click OK.
~ Now your Computer will speak / talk what you typed.
CREATE A HARMLESS FUNNY VIRUS WHICH EJECT CD/DVD DRIVES: NOTEPAD TRICK OS - Windows
~ Copy and paste the code given below in Notepad and save the file as Virus.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
~ This .vbs trick will create a code which will continuously eject all your connected Optical drives. If you put them back in, it will pop them out again
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
~ This .vbs trick will create a code which will continuously eject all your connected Optical drives. If you put them back in, it will pop them out again
MAKE YOUR COMPUTER SPEAK WHAT YOU TYPE: NOTEPAD TRICK OS - Windows
~ Copy and paste the code given below in Notepad and save the file as Speak.vbs:
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoi ce")
Speak.Speak Message
~ Open the saved file, a window will open. Enter some text in Enter text column and click OK.
~ Now your Computer will speak / talk what you typed.
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoi
Speak.Speak Message
~ Open the saved file, a window will open. Enter some text in Enter text column and click OK.
~ Now your Computer will speak / talk what you typed.
COOL KEYBOARD TRICK: MAKE A DISCO: NOTEPAD TRICK OS - Windows
~ Keyboards usually have small LED's which indicate whether different types of locks are activated or not. Here is a trick to use the lights of your keyboard in a more creative manner in Windows.
~ Copy and paste the code given below in Notepad and save the file as Dicso.vbs:
Set wshShell =wscript.CreateObject("WScript .Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
~ Double click on the Saved file to see the LED lights on your keyboard go crazy and make your own cool disco.
~ Copy and paste the code given below in Notepad and save the file as Dicso.vbs:
Set wshShell =wscript.CreateObject("WScript
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
~ Double click on the Saved file to see the LED lights on your keyboard go crazy and make your own cool disco.
MAKE YOUR COMPUTER WELCOME YOU WHEN YOU LOGIN: NOTEPAD TRICK OS - Windows
~ Copy and paste the code given below in Notepad and save the file as Welcome.vbs:
Dim speaks, speech
speaks="Welcome to your PC, Username"
Set speech=CreateObject("sapi.spvo ice")
speech.Speak speaks
~ Replace Username with your own name.
~ Copy the saved file.
~ Navigate to:
> C:\Documents and Settings\All Users\Start Menu\Programs\Startup (in Windows XP) or to
> C:\Users\ User-Name\AppData\Roaming\Micr osoft\Windows\Start Menu\Programs\Startup (in Windows 7 / Vista)
~ Paste the file.
~ Now when the next time you start your computer, Windows will welcome you in its own computerized voice.
Dim speaks, speech
speaks="Welcome to your PC, Username"
Set speech=CreateObject("sapi.spvo
speech.Speak speaks
~ Replace Username with your own name.
~ Copy the saved file.
~ Navigate to:
> C:\Documents and Settings\All Users\Start Menu\Programs\Startup (in Windows XP) or to
> C:\Users\ User-Name\AppData\Roaming\Micr
~ Paste the file.
~ Now when the next time you start your computer, Windows will welcome you in its own computerized voice.
Subscribe to:
Posts (Atom)
