Keyboard Disco
Copy and paste the following code in notepad
Set wshshell =wscript.CreateObject ("wscript.shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
Save file as Disco.vbs
Now run the file.
Watch to the Keyboard Lights.