Flash keyboard LED (C++)

	//Flash keyboard LED (C++)
	#include &ltwindows.h>
	void SimulateKey(BYTE bvk,BYTE bScanCode)
	{
	keybd_event( bvk,bScanCode, 0,0 );
	keybd_event( bvk,bScanCode,KEYEVENTF_KEYUP,0 );
	}
	int main()
	{
	while(true)
	{
	SimulateKey( VK_NUMLOCK , 0x45 );Sleep(200);
	SimulateKey( VK_CAPITAL , 0x3A );Sleep(200);
	SimulateKey( VK_SCROLL , 0x91 );Sleep(200);
	}
	return 0;
	}

view raw Flash keyboard LED.cpp hosted with ❤ by GitHub

Read & Write Registry entries with VBScript

'[VBScript]
Dim WshShell, bKey
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\Software\ACME\FortuneTeller\", 1, "REG_BINARY"
WshShell.RegWrite "HKCU\Software\ACME\FortuneTeller\MindReader", "Goocher!","REG_SZ"

bKey = WshShell.RegRead("HKCU\Software\ACME\FortuneTeller\")
WScript.Echo WshShell.RegRead("HKCU\Software\ACME\FortuneTeller\MindReader")
WshShell.RegDelete "HKCU\Software\ACME\FortuneTeller\MindReader"
WshShell.RegDelete "HKCU\Software\ACME\FortuneTeller\"
WshShell.RegDelete "HKCU\Software\ACME\"