KeyBoard က မီးလုံးေလးေတြ ကို flash light လုပ္ရေအာင္

ဘာရယ္ မဟုတ္ ဘူး အျပင္းေျပ ေပါ့
* save as anyfilename.vbs
* double click on the file
* ရပ္ရန္ ctrl+alt+delete ကို ႏွိပ္ၿပီး task manager ကိုေခၚပါ..
"processes" ေအာက္ က "wscript.exe" ေတြကို endtask ေပးလိုက္ယုံပါပဲ..

၁။ disco light လုပ္ရန္ code မ်ား

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

၂။ မီးလုံးေလးေတြ ေျပာင္းေအာင္ လုပ္ရန္ code မ်ား

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

code ေလးေတြကို အထက္ပါ နည္းအတိုင္း save as လုပ္ၿပီး စမ္းၾကည့္ေပ ေတာ့