precise steering v1

#Requires AutoHotkey v2.0
#SingleInstance

A_HotkeyInterval := 0
SendMode "input"
CoordMode "tooltip", "screen"

keys := ["Numpad0", "2", "3", "4", "5"]
akDown := 0

#R::reload
#UseHook 1
*Numpad0:: {
    global
    if (akDown == 0) {
        akDown := 1
    } else {
        Send "{" keys[akDown] " up}"
    }
    sleep 1
    Send "{Numpad0 down}"
    KeyWait "Numpad0"
    Send "{Numpad0 up}"
    if (akDown > 0 && akDown != 1) {
        sleep 1
        Send "{" keys[akDown] " down}"
    } else {
        akDown := 0
    }
}

*2:: {
    global
    if (akDown == 0) {
        akDown := 2
    } else {
        Send "{" keys[akDown] " up}"
    }
    sleep 1
    Send "{2 down}"
    KeyWait "2"
    Send "{2 up}"
    if (akDown > 0 && akDown != 2) {
        sleep 1
        Send "{" keys[akDown] " down}"
    } else {
        akDown := 0
    }
}
*3:: {
    global
    if (akDown == 0) {
        akDown := 3
    } else {
        Send "{" keys[akDown] " up}"
    }
    sleep 1
    Send "{3 down}"
    KeyWait "3"
    Send "{3 up}"
    if (akDown > 0 && akDown != 3) {
        sleep 1
        Send "{" keys[akDown] " down}"
    } else {
        akDown := 0
    }
}
*4:: {
    global
    if (akDown == 0) {
        akDown := 4
    } else {
        Send "{" keys[akDown] " up}"
    }
    sleep 1
    Send "{4 down}"
    KeyWait "4"
    Send "{4 up}"
    if (akDown > 0 && akDown != 4) {
        sleep 1
        Send "{" keys[akDown] " down}"
    } else {
        akDown := 0
    }
}
*5:: {
    global
    if (akDown == 0) {
        akDown := 5
    } else {
        Send "{" keys[akDown] " up}"
    }
    sleep 1
    Send "{5 down}"
    KeyWait "5"
    Send "{5 up}"
    if (akDown > 0 && akDown != 5) {
        sleep 1
        Send "{" keys[akDown] " down}"
    } else {
        akDown := 0
    }
}