N = 3

г::
    i := 0
    x := 9
    Loop {
        j := 0
        len := StrLen(x)
        Loop {
            count := len - StrLen(j)
            Loop, %count%
                SendPlay, 0
            SendPlay, %j%{Enter}
            ; Sleep, 50
            If (j++ == x)
                Break
        }
        i++
        If (i >= N)
            Break
        x := x * 10 + 9
    }