Menu Keyboard Language Switch

;==============================================================================================
;Menu Keyboard Language Switch
~MButton::
HowLong = 0
UMDelay = 20
Loop
{
    HowLong ++
    Sleep, 10
    GetKeyState, MButton, MButton, P
    IfEqual, MButton, U, Break
}
IfLess, HowLong, %UMDelay%,
Return
;Keyboard Language Switch Menu
Menu,KLS,Add,En,En
Menu,KLS,Add,He,He
Menu,KLS,Add,El,El
Menu,KLS,Add,Hy,Hy
Menu,KLS,Add,Ru,Ru
Menu,KLS,Add,De,De
Menu,KLS,Add,Ar,Ar
Menu,KLS,Add,Jp,Jp
Menu,KLS,Add,Sy,Sy
Menu,KLS,Add,Sa,Sa
Menu,KLS,Show
return

; Switch the active window's keyboard layout/language to:
En:
ToolTip, English
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x0409,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; English - En
return
He:
ToolTip, Hebrew
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x040d,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Hebrew - He
return
El:
ToolTip, Greek
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x0408,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Greek - El
return
Hy:
ToolTip, Armenian
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x042b,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Armenian - Hy
return
Ru:
ToolTip, Russian
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x0419,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Russian - Ru
return
De:
ToolTip, German
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x0407,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; German - De
return
Ar:
ToolTip, Arabic
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x0401,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Arabic - Ar
return
Jp:
ToolTip, Japanese
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x0411,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Japanese - Jp
return
Sy:
ToolTip, Syriac
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x045A,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Syriac - Sy
return
Sa:
ToolTip, Sanscrit
Sleep, 500
ToolTip
PostMessage, 0x50, 0, 0x044f,, A ; 0x50 is WM_INPUTLANGCHANGEREQUEST. ; Sanscrit - Sa
return

;==============================================================================================