Keyboard Light Plays

[presh4u]

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


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



Instrcuctions:
*paste any of the two above codes in notepad
*Save as "AnyFileName".vbs
*Run the file
*to stop, launch task manager and then under "Processes" end wscript.exe

 

[thesheild]

Not very useful, unless you mod your keyboard with high powered lights that could light up the room, then it would be freaken sweet.

 

[Pie`]

Heres a tip for you all.

DO NOT MAKE A VBS SCRIPT THAT DOES THIS

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop

The only way to stop it is to turn your pc off + on again, you can't load task manager, you can't type anything you can't ctrl + alt + del you cant do anything but click

 

[Locou]

1. Buy 2000 keyboards.
2. screw them to your ceiling
3. wire them up and use this tut
4. dance like hell


yay a disco

 

[Pie`]

Haha, that's genius! Shame it'd never work ;(

 

[Locou]

shame on god. she should invent a computer with 2000 PS/2 bushes.


miranda im have some setting to turn on/off the keyboardlights, if you recieve a message.

 

[Pie`]

Since when did god become female? Wouldn't that make her a Goddess if god acctually was a SHE ?

 

[Locou]

oh sorry typo.
I meant it.

 

[Lordkil]

Thnx

 

[hot_wired13]

and you can't type while the lights are flashing. that's pretty much the disadvantage.
but otherwise, set it in a loop, and impress your friends!