Nightrider

Auteur: Olment - 06 mei 2009 - 13:50 - Gekeurd door: Rik - Hits: 4589 - Aantal punten: (0 stemmen)

Dit is een script dat de lampjes van je num lock, caps lock en scroll lock aan en uit laat gaan net zoals bij de nightrider.

* Zet het in een notepad en sla het op als <titel>.vbs
* Zet alle lampjes eerst uit voordat je het script draait
* Om het script af te sluiten, beindig het process: wscript.exe
* Je gaat er "breezer" door typen

Code:

vbscript code - Bekijk de code zonder highlighting - Klap code in

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

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

Download code (.txt)

Stemmen

Niet ingelogd.

Reacties

Post een reactie

Lees de reacties (5)