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:
There are Two Scripts


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 open taskmanager and go to processes end a process called “wscript.exe”. For best results, keep all the LEDs “Off” before starting the script.