Горячая клавиша создания файла в проводнике Windows 7

Для Windows 11:

#Requires AutoHotkey v2.0

#HotIf WinActive("ahk_class CabinetWClass") || WinActive("ahk_class Progman") || WinActive("ahk_class WorkerW")
!n:: {
    hwnd := WinExist("A")
    FullPath := ""
    for window in ComObject("Shell.Application").Windows {
        try {
            if (window.HWND = hwnd) {
                FullPath := window.Document.Folder.Self.Path
                break
            }
        }
    }
    ; Рабочий стол или путь не найден
    if (FullPath = "" || !DirExist(FullPath))
        FullPath := A_Desktop
    SetWorkingDir(FullPath)
    ib := InputBox(, "New File", "w400 h100")
    if (ib.Result != "OK")
        return
    if (ib.Value = "")
        return
    FileAppend("", ib.Value)
}
#HotIf