Переделка скрипта MouseClick - Компьютерный форум OSzone.net

Есть флеш приложение, где нужно по определенной последовательности нажимать клавиши в зависимости от отображение их в центре экрана.

Как сделать,чтобы он сам определял последовательность а не писать каждую последовательность отдельно ?

Код:

Func ___fighting_mode_3x()

    Sleep(1000)

    While 1

            $aPos = MouseGetpos()

        MouseClick("primary", $aPos[0], $aPos[1], 1, 0)

                Sleep(300)

                Send("{UP}{UP}{UP}{DOWN}{UP}{UP}{LEFT}{UP}{UP}{RIGHT}{UP}{DOWN}{DOWN}{UP}{DOWN}{LEFT}{UP}{DOWN}{RIGHT}{UP}{LEFT}{DOWN}{UP}")

                Sleep(300)

            $aPos = MouseGetpos()

        MouseClick("primary", $aPos[0], $aPos[1], 1, 0)

        Send("{DOWN}{UP}{LEFT}{LEFT}{UP}{LEFT}{RIGHT}{UP}{RIGHT}{DOWN}{UP}{RIGHT}{LEFT}{UP}{RIGHT}{RIGHT}{DOWN}{DOWN}{DOWN}{LEFT}{DOWN}{DOWN}")

                Sleep(300)

            $aPos = MouseGetpos()

        MouseClick("primary", $aPos[0], $aPos[1], 1, 0)

        Send("{DOWN}{DOWN}{RIGHT}{DOWN}{LEFT}{LEFT}{DOWN}{LEFT}{RIGHT}{DOWN}{RIGHT}{LEFT}{DOWN}{RIGHT}{RIGHT}{LEFT}{LEFT}{LEFT}{RIGHT}{LEFT}{RIGHT}{RIGHT}{RIGHT}{UP}{UP}")

                Sleep(300)

        WEnd

EndFunc