im-select-cn-test.ahk

#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.


; 获取命令行参数的数量
ArgCount := A_Args.Count()

if (ArgCount > 1) {
    MsgBox 命令行参数最多一个, 1为中文, 0为英文, 2为直接切换
    ExitApp, 1
}

; 当前输入法状态
current_IME := IME_GET()

; 打印当前输入法状态
if (ArgCount == 0){
    MsgBox 命令行参数最多一个, 1为中文, 0为英文, 2为直接切换. 当前输入法状态为: %current_IME% 
    ExitApp, 0
}

; 命令行参数的第一个参数下标为1
expect_IME := A_Args[1]

if ((expect_IME == 2) || (expect_IME != current_IME)){
    ; 按下shift切换输入法状态
    Send {Shift} 
}


; 获取输入法的中英文状态
IME_GET(WinTitle="")
;-----------------------------------------------------------
; IMEの状態の取得
;    対象： AHK v1.0.34以降
;   WinTitle : 対象Window (省略時:アクティブウィンドウ)
;   戻り値  1:ON 0:OFF
;-----------------------------------------------------------
{
    ifEqual WinTitle,,  SetEnv,WinTitle,A
    WinGet,hWnd,ID,%WinTitle%
    DefaultIMEWnd := DllCall("imm32\ImmGetDefaultIMEWnd", Uint,hWnd, Uint)

    ;Message : WM_IME_CONTROL  wParam:IMC_GETOPENSTATUS
    DetectSave := A_DetectHiddenWindows
    DetectHiddenWindows,ON
    SendMessage 0x283, 0x005,0,,ahk_id %DefaultIMEWnd%
    DetectHiddenWindows,%DetectSave%
    Return ErrorLevel
}

; 可以设置按键来调试, 如下, 按下a键, 弹出MsgBox消息框, 且在鼠标位置显示文本(ToolTip)
; a::
; xxx := IME_GET()
; MsgBox, 输入法状态 1中文 0英文: %xxx%
; ToolTip,英文
; Sleep,1000
; ToolTip
; Return