dancing num lock lights

hello friends this is a vb script which automatically switches off/on the lights on situated on the keyboard........
some days before an idea has came into my mind to make blinking lights by using code and after applying some efforts i succeed.......


here is the code:-

set shell =Creatobject("WScript.Shell") shell.Sendkeys "{capslock}" WScript.sleep 40 shell.Sendkeys"{numlock}" WScript.sleep 50 shell.Sendkeys "{scrolllock}" WScript.sleep 60

now u have to put a vb loop to this code to execute it to a desired time for blinking. and after this put this whole code into notepad and save this with any name but with the extension .vbs

ENJOY MY CREATION

|