#include <UserGUI.au3>

$bToggle = False
$hGui = GUICreate('Переключение раскладки клавиатуры', 400, 200)
$iButton = GUICtrlCreateButton('Переключение', 10, 10, 120, 28)
GUISetState()
While 1
	Switch GUIGetMsg()
		Case $iButton
			$bToggle = Not $bToggle
			If $bToggle Then
				_WinAPI_LoadKeyboardLayoutEx(0x0409)
			Else
				_WinAPI_LoadKeyboardLayoutEx(0x0419)
			EndIf
		Case -3
			Exit
	EndSwitch
WEnd