#####################################
Keyboard Light Looks Like Disco & Chain Light
#####################################
Version 7.0 build Scripting 079.0
#####################################
These codes when executed makes your CapsLock, NumLock & ScrollLock keys flash..
This is really very "kewlll"
Instrcuctions:
1) Paste any of the two below codes in notepad.
2) Save it as "disco.vbs" or "chain.vbs" or any file name you want.
3) Extension should be (.vbs)
4) Run the file
5) LETS DANCE!!!!!!!!
6) Disco & Chain WORKS!! :)
Note :
Now, If you want to stop these :
1) Go to "Task Manager"
2) Move to "Process" TAB
3) Find the process named "wscript.exe"
4) Right click on the file and End this process.
ENJOY!
; 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
; - - - - - - - END HERE
########################################################
; 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
; - - - - - - - END HERE
@Hawkee Do we not already have a VBS section?
@sagargulati I think the Visual Basic section is the code category you're looking for. On a side note: Interesting snippet, rather funny to type as it toggles the caps lock.