~vkA3 Up::
If (A_PriorKey = "RControl"  && !Mouse)
	{
    WinExist("A")
    ControlGetFocus, CtrlFocus
    PostMessage, 0x50, 0, 0x04190419, %CtrlFocus%
    kbd_msg("RU") 
	}
Mouse := 0	
Return

~vkA2 Up::
If (A_PriorKey = "LControl" && !Mouse)
	{
	WinExist("A")
    ControlGetFocus, CtrlFocus
    PostMessage, 0x050, 0, 0x04070407,%CtrlFocus%
    kbd_msg("DE")
	}
Mouse := 0	
Return

LCtrl & LWin::
If (A_PriorKey = "LControl" && !Mouse)
	{
	WinExist("A")
    ControlGetFocus, CtrlFocus
    PostMessage, 0x050, 0, 0x04090409,%CtrlFocus%
    kbd_msg("EN")
	}
Mouse := 0	
Return



Return


kbd_msg(text)
{
    no_detect_window := -1
    ToolTip, %text%, A_CaretX + 10, A_CaretY - 20
    SetTimer, KbdRemoveToolTip, -1000
    return
    
    KbdRemoveToolTip:
    ToolTip
    no_detect_window := 1
    return
}

#SingleInstance,Force
#NoEnv
AutoTrim,Off
CoordMode,Mouse,Screen
CoordMode,ToolTip
CoordMode,Caret,Screen
DetectHiddenWindows,On
SendMode,Input
SetBatchLines,-1
SetControlDelay,-1
SetKeyDelay,-1
SetTitleMatchMode,2
SetWinDelay,-1



~vkA3 Up::
SwitchInputLayout()
return



RemoveToolTip:
tooltip,,,,3
return


SwitchInputLayout(switch="")
{
  static Locale_RU:=0x04190419, Locale_DE:=0x0407
  ControlGetFocus,CtrlFocus,A
  ControlGet,id,hwnd,,%CtrlFocus%,A
  MouseGetPos,DF_X,DF_Y
  if !id
    ID:=WinExist("A")
  ThreadID:=DllCall("GetWindowThreadProcessId",Ptr,id,Int,0,ptr)
  Locale:=GetLayot(ThreadID)
tooltip,% "LocaleId=" format("0x{:02x}",Locale),0
  if (switch="DE")
    Locale:=Locale_RU
  else if (switch="Rus")
    Locale:=Locale_DE
  sendMessage,0x50,,% Locale=Locale_RU ? Locale_DE : Locale_RU,,ahk_id %ID%
  if (Locale=GetLayot(ThreadID))
  {
    send,{alt down}{shift down}{alt up}{shift up}
    sleep,10
    if (Locale=GetLayot(ThreadID))
    {
      if !isWindowFullScreen()
      {
        ToolTip,Невозможно переключить раскладку.,% A_CaretX=0 ? DF_X : A_CaretX+10,% A_CaretY=0 DF_Y ? : A_CaretY-20,3
        SetTimer,RemoveToolTip,-1100
      }
      return 1
    }
  }
  if !isWindowFullScreen()
  {
    ToolTip,% GetLayot(ThreadID)=Locale_RU ? "Русский" : "Немецкий",% A_CaretX=0 ? DF_X : A_CaretX+10,% A_CaretY=0 DF_Y ? : A_CaretY-20,3
    SetTimer,RemoveToolTip,-1100
  }
}
GetLayot(ThreadID)
{
  return DllCall("GetKeyboardLayout",ptr,ThreadID,ptr)
}

isWindowFullScreen(WinID="")
{
  if !WinID
    WinGet,WinID,id,A
;  WinGet,WinMinMax,MinMax,ahk_id %WinID%
  WinGetPos,WinX,WinY,WinW,WinH,ahk_id %WinID%
;tooltip,% (WinMinMax=0) "`n" WinX "`n" WinY "`n" WinW "`n" WinH
  if ((WinX=0 and WinY=0 and (WinW>=A_ScreenWidth-1 and WinW<=A_ScreenWidth+1) and (WinH>=A_ScreenHeight-1 and WinH<=A_ScreenHeight+1))) ; or WinMinMax!=0)
  {
    WinGetClass,WinClass,ahk_id %WinID%
    WinGet,WinProcessName,ProcessName,ahk_id %WinID%
    SplitPath,WinProcessName,,,WinProcessExt
    if (WinClass!="Progman" and WinClass!="WorkerW" and WinProcessExt!="scr")
      return 1
  }
  return 0
}