Subject: Keyboard Disco Light (great trick) Wed Jul 28, 2010 10:06 am
Do you want to see your keyboard lights play disco? Yes, you heard that right! You can make your keyboard LEDs dance, with a simple Visual Basic script. Now, without much ado, let me give you the script.
Copy the following script into a notepad. Then save that file with an extension “.vbs”. Now click on the new file with a script like icon. You see the magic! I am sure you will enjoy seeing them. Here are the codes you need to paste:
This code makes the LEDs to dance randomly. Set wshShell =wscript.CreateObject("WScript.Shell")
do wscript.sleep 100 wshshell.sendkeys "{CAPSLOCK}" wshshell.sendkeys "{NUMLOCK}" wshshell.sendkeys "{SCROLLLOCK}" loop
This code makes the LEDs to dance in a regular manner. 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
To end this disco, you need to end a process called “wscript.exe”. For best results, keep all the LEDs “Off” before starting the script