Lampu Keyboard Berkedip Disco

Caranya:

1. Buka Notepad
2. Co-Pas kode Berikut 
Set wshShell =wscript.CreateObject("WScript.Shell")
 do
 wscript.sleep 100
 wshshell.sendkeys "{CAPSLOCK}"
 wshshell.sendkeys "{NUMLOCK}"
 wshshell.sendkeys "{SCROLLLOCK}"
 loop
3. Simpan dengan format vbs , mis ; lampu keyboard berkedip.vbs