Total Commander + AutoHotKey: Create a folder with the date in the name by Shift + F7

I was bothered to automate the process of creating the current day folder.
And again AutoHotKey helped me.

Script:

DateName = %A_YYYY%-%A_MM%-%A_DD%
SetTitleMatchMode, 2
IfNotExist, %DateName%
{
WinWaitActive, Total Commander
Send, {F7}
WinWait, Total Commander,
Send, %DateName%{HOME}{SHIFTDOWN}{END}{SHIFTUP}
}
else
{
WinWaitActive, Total Commander
Send, %DateName%
}

')
Call the script implemented from the menu "Run"
(
Team D: \ Run \ totalcmd \ ahk \ Create a folder with a date in the name.ahk
% P parameter
)
setting the hotkey in the configuration (S + F7 = cm_UserMenu2).