输入法设置英文，扩展名隐藏，文件名后添加来自剪贴板的字符串

                                                                        ;

#z::                                                                    ;win+z运行
PreLang := GetLang()
SetEN(0x00000804)
SetNameStamp()
SetLang(PreLang)
return

;获取当前语言，返回当前语言值
GetLang(){
    return DllCall(“GetKeyboardLayout”, UInt)
}

;设置英文模式 0x00000804
SetEN(dwLayout){
    HKL:=DllCall(“LoadKeyboardLayout”, Str, dwLayout, UInt, 0)
    SetLang(HKL)
    return
}

;设置语言模式
SetLang(HKL)
{
    ControlGetFocus,ctl,A
    SendMessage,0x50,0,HKL,%ctl%,A
    return
}

;设置时间戳
SetNameStamp()
{

value := “1”
RegWrite, REG_DWORD,HKEY_CURRENT_USER,Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\,HideFileExt, %Value%
PostMessage,0x111,0x7103,0,SHELLDLL_DefView1,A
;扩展名隐藏
sleep 188
    Send, {F2}{Right}
    Sleep, 100
    Newname := Clipboard
    Send, `_
    Send, % Newname                                ;输出文件名
    Send, {Enter}
    Return
}