Best 5 Funny Notepad Tricks

1. Matrix Codin.

 

Open Notepad >  Paste the Following code >  Save it as Matrix.bat

@echo off
color 02
:tricks
echo %random%%random%%random%%random%%random%%random%%random%%random%
goto tricks

2. Keyboard types Automatically

Open Notepad > Paste the Following code > Replace "This is a Virus" with Any Text > Save it as Trick.VBS

This is a Virus. You have been infected.This is a Virus. You have been infected.This is a Virus. You have been infected.This is a Virus. You have been infected.

3. Continuously Eject CD/DVD Tray

Open Notepad > Paste the Following code > Save it as Eject.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

4. Open Notepad Infinitely 

Open Notepad > Paste the Following Code > Save it as NP.Bat

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

5. Make your Computer Talks:   BEST!

Open Notepad > Paste the following code > Save it as Talk.VBS
Launch it > Put the text you want to talk > Click OK


Dim Message, Speak
Message=InputBox("Enter Text to Talk o","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message