COH 2 AutoHotKey для НЕ классической раскладки

#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.

; ` suspends script
; reenable long beep
; suspend short beep
`::
Suspend
if ( A_IsSuspended )
{
SoundBeep
}
if ( !A_IsSuspended )
{
SoundBeep, 523,850
}
return
; Return enables normal chat
Return::
Suspend
if ( A_IsSuspended )
{
Send {Enter}
}
if ( !A_IsSuspended )
{
Send {Enter}
}
return
+Return::
Suspend
if ( A_IsSuspended )
{
Send +{Enter}
}
if ( !A_IsSuspended )
{
Send +{Enter}
}
return

+w::up
+a::left
+s::down
+d::right
+space::Numpad0
LWin::!.

+f::
SendInput {f 5}
return

MButton::
SendInput {q}
Send {click}
Return

XButton2::
SendInput {r}
Send {LButton}
Return

+XButton2::
SendInput {r}
Send {LButton}
Return

WheelDown::send ^{Tab}
WheelUp::send {Tab}

XButton1::
SendInput {e}
Send {LButton}
Return

____________________

UPD:

Более удобная версия скрипта. В нем не надо зажимать shift для перемещения wasd, по умолчанию wasd отвечают за перемещение камеры, а зажатие шифта отключает скрипт, и вы можете использовать обилки юнитов.

Для того чтобы поставить метку на карте необходимо зажать ctrl + capslock
(это самая последняя строчка, можно ее стереть, но тогда надо будет зажимать ctrl+shift+a и работает так через раз)

P. S. иногда камера залипает и начинает уезжать в одну из сторон, надо просто нажать ту клавишу, в направление которой уезжает камера, я так и не понял как это пофиксить.

_______________

#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.

; ` suspends script
; reenable long beep
; suspend short beep
`::
Suspend
if ( A_IsSuspended )
{
SoundBeep
}
if ( !A_IsSuspended )
{
SoundBeep, 523,850
}
return

; Return enables normal chat
Return::
Suspend
if ( A_IsSuspended )
{
Send {Enter}
}
if ( !A_IsSuspended )
{
Send {Enter}
}
return
+Return::
Suspend
if ( A_IsSuspended )
{
Send +{Enter}
}
if ( !A_IsSuspended )
{
Send +{Enter}
}
return

w::up
a::left
s::down
d::right
space::Numpad0
LWin::!.

+w::
SendInput {w}
return

+a::
SendInput {a}
return

+s::
SendInput {s}
return

+d::
SendInput {d}
return

+f::
SendInput {f 5}
return

MButton::
SendInput {q}
Send {click}
Return

XButton2::
SendInput {r}
Send {LButton}
Return

+XButton2::
SendInput {r}
Send {LButton}
Return

WheelDown::send ^{Tab}
WheelUp::send {Tab}

XButton1::
SendInput {e}
Send {LButton}
Return

+XButton1::
SendInput {e}
Send {LButton}
Return

Capslock::a