precise steering v2

#Requires AutoHotkey v2.0
#SingleInstance

SetKeyDelay -1, 1
A_HotkeyInterval := 0
SendMode "input"
CoordMode "tooltip", "screen"

keys := ["Numpad0", "2", "3", "4", "5"]
ak1 := 0
ak2 := 0
lastAk := 0

sortAk() {
    global
    if (ak1 > ak2) {
        temp := ak2
        ak2 := ak1
        ak1 := temp
    }
}

#R::reload
#UseHook 1

*Numpad0:: {
    global
    set := 0
    if (ak1 == 0) {
        ak1 := 1
        set := 1
    } else if (ak2 == 0) {
        ak2 := 1
        set := 2
        sortAk()
    }

    lastAk := 1
    Send "{Numpad0}"
    KeyWait "Numpad0"

    Send "{5}"
    lastAk := 0
    if (set == 1) {
        ak1 := 0
    } else if (set == 2) {
        ak2 := 0
    }
}

*2:: {
    global
    set := 0
    if (ak1 == 0) {
        ak1 := 2
        set := 1
    } else if (ak2 == 0) {
        ak2 := 2
        set := 2
        sortAk()
    }

    lastAk := 2
    Send "{2}"
    KeyWait "2"

    Send "{5}"
    lastAk := 0
    if (set == 1) {
        ak1 := 0
    } else if (set == 2) {
        ak2 := 0
    }
}
*3:: {
    global
    set := 0
    if (ak1 == 0) {
        ak1 := 3
    } else if (ak2 == 0) {
        ak2 := 3
    }
    set := sortAk()

    lastAk := 3
    Send "{3}"
    KeyWait "3"

    Send "{5}"
    lastAk := 0
    if (set == 1) {
        ak1 := 0
    } else if (set == 2) {
        ak2 := 0
    }
}
*4:: {
    global
    set := 0
    if (ak1 == 0) {
        ak1 := 4
    } else if (ak2 == 0) {
        ak2 := 4
    }
    set := sortAk()

    lastAk := 4
    Send "{4}"
    KeyWait "4"

    Send "{5}"
    lastAk := 0
    if (set == 1) {
        ak1 := 0
    } else if (set == 2) {
        ak2 := 0
    }
}
*5:: {
    global
    set := 0
    if (ak1 == 0) {
        ak1 := 5
    } else if (ak2 == 0) {
        ak2 := 5
    }
    set := sortAk()

    lastAk := 5
    Send "{5}"
    KeyWait "5"

    Send "{5}"
    lastAk := 0
    if (set == 1) {
        ak1 := 0
    } else if (set == 2) {
        ak2 := 0
    }
}

*Left:: {
    global
    Send "{Left down}"
    if (ak1 > 0 && lastAk != ak1) {
        Send keys[ak1]
    }
    KeyWait "Left"
    if (ak2 > 0) {
        Send keys[ak2]
    } else {
        Send "{Left up}"
    }
}

*Right:: {
    global
    Send "{Right down}"
    if (ak1 > 0 && lastAk != ak1) {
        Send keys[ak1]
    }
    KeyWait "Left"
    if (ak2 > 0) {
        Send keys[ak2]
    } else {
        Send "{Right up}"
    }
}

setTimer(info, 50)
info() {
    tooltip "ak1: " ak1 "`nak2: " ak2, 10, 10
}