Keyboard Light - Disco Light

Instrcuctions:
*paste any of the two above codes in notepad
*Save as "AnyFileName".vbs
*Run the file

*to stop, launch task manager and then under "Processes" end wscript.exe

These codes when executed makes your Caps, Num, Scroll lock keys flash..
very kewlll...i hav tried it...

1 .This piece of code makes ur keyboard a live disco...


Set wshShell =wscript.CreateObject("WScript.Shell")
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....


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