Переделка скрипта MouseClick

[CMEPTHIK]

Есть флеш приложение, где нужно по определенной последовательности нажимать клавиши в зависимости от отображение их в центре экрана.
http://image.jeuxvideo.com/images/wb/d/e/demon-slayer-web-1360592482-001.jpg
Как сделать,чтобы он сам определял последовательность а не писать каждую последовательность отдельно ?
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}{DO WN}{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