These codes when executed makes your Caps, Num, Scroll lock keys flash.. very cool...i have tried it...
1.This piece of code makes ur keyboard a live disco...
Quote
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
2.This one makes it looks like a chain of light....
Quote
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 200
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 100
wshshell.sendkeys "{NUMLOCK}"
wscript.sleep 50
wshshell.sendkeys "{SCROLLLOCK}"
loop
do
wscript.sleep 200
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 100
wshshell.sendkeys "{NUMLOCK}"
wscript.sleep 50
wshshell.sendkeys "{SCROLLLOCK}"
loop
Instrcuctions:
*paste any of the two above codes in notepad, in two different files
*Save as "AnyFileName".vbs
*Run the file
Now how to stop it......
1.click ctrl+alt+delete
2.open task manager
3.open processes tab
4.search wscript.exe
5.click on end process. (See the Screen Shot Below)
I have tested this on XP, should work on Win 7 as well, leave your comments here
Link to Original Post
0 comments:
Post a Comment