Бот-фарм В Grepolis, Помогите упростить скрипт Опции

[Arome]

Есть такая браузерная игрушка. Это, примерно, аналог травиана и войны племен.
(если кому интересно, напишите мне свое мыло, я сделаю вам приглашение - и вам проще будет и мне бонус (IMG:style_emoticons/default/biggrin.gif) )
В ней помимо накопления ресурсов через производственные постройки, которые производят определенное количество в час, есть возможность сбора ресов с нейтральных поселений, расположенных на одном с вашим городом острове и обозначенных особыми флажками.

На сегодняшний день у меня скрипт настроен на кликание в эти поселения за счет фиксированных координат. Однако этот способ имеет некоторые минусы, в первую очередь, связанные с необходимостью постоянной и четкой оцентровки расположения необходимого изображения на экране.
И зачастую происходят сбои и, как следствие, промахи кликов.

Читая форум я уже понял, что можно использовать Findcolor, но тут возникает проблема:
как я понял, это команда позволяет найти всего 1 объект в заданной области, в то время как у меня в этой области бывает до 8-ми объектов, и в каждый необходимо кликнуть по очереди (самая большая проблема заключается в том, что на каждом острове эти объекты расположены в самых различных позициях). Если я не прав и есть возможность найти и зафиксировать несколько объектов заданного цвета, так чтобы их можно было потом прокликать, подскажите как.

Я так же нашел упоминание функции Findimage. Однако не нашел никакой инструкции по применению.
Учитывая, что все необходимые мне объекты обозначены одинаковыми флажками, я предполагаю, что можно использовать изображения этих флажков для идентификации объектов.

[AciD DrEaM]

Вот мой скрипт. К сожалению с поиском картинок не разобрался и сделал все по цветам и координатам. Добавил всевозможные проверки на лаги и баги так что скрипт работает без перебоев целыми днями.
Для простоты понятия добавил описания. По принципу первой деревни разбираться и с остальными.
Просьба к тому кто шарит в поиске по картинкам помочь упростить скрипт.


set #max 15
set #MaxChe 8

// Обновление страницы, закрытие окна ежедневного подарка и окна города
:Reload
set #Circ 0
set #Che 0
send f5
wait 3000
//Координаты и цвет обеих рамок(ежедневного подарка,окна города).Любая точка на рамке
while_not 890, 192 2767173 or 863, 264 2371899
//Координаты и цвет точки на монетах на кнопке информации острова(Посреди острова кнопка его инфы,брать цвет и координаты именно с монет)
If 931, 418 8223866
goto Vil1
end_if
wait 1000
set #Circ #Circ + 1
if #Circ > #Max
goto Reload
end_if
end_while
set #Circ 0
//Закрыть окно подарка
move 1081, 266
left 1081, 266
wait 1000
//ЗАкрыть окно города
move 1212, 192
left 1212, 192
wait 1000


:Vil1
//Координаты и цвет флажка(готовности фарма) деревни
if 734, 472 4353423
// клик по деревне
move 725, 464
left 725, 464
wait 1000
//клик по фарм
move 733, 474
left 733, 474
wait 500
//Проверка на лаг или баг странички. Координаты и цвет рамки фарма. Любая точка на рамке
while_not 732, 532 3096653
wait 500
set #Che #Che + 1
if #Che > #MaxChe
goto Reload
end_if
end_while
set #Che 0
call Farm
end_if


:Vil2
if 802, 499 4221835
move 781, 484
left 781, 484
wait 1000
move 788, 481
left 788, 481
wait 500
while_not 732, 532 3096653
wait 500
set #Che #Che + 1
if #Che > #MaxChe
goto Reload
end_if
end_while
set #Che 0
call Farm
end_if

:Vil3
if 982, 521 3890295
move 964, 503
left 964, 503
wait 1000
move 962, 497
left 962, 497
wait 500
while_not 732, 532 3096653
wait 500
set #Che #Che + 1
if #Che > #MaxChe
goto Reload
end_if
end_while
set #Che 0
call Farm
end_if

:Vil4
if 1080, 441 4285311
move 1065, 421
left 1065, 421
wait 1000
move 1073, 428
left 1073, 428
wait 500
while_not 732, 532 3096653
wait 500
set #Che #Che + 1
if #Che > #MaxChe
goto Reload
end_if
end_while
set #Che 0
call Farm
end_if


:Vil5
if 1122, 494 4747406
move 1103, 475
left 1103, 475
wait 1000
move 1114, 483
left 1114, 483
wait 500
while_not 732, 532 3096653
wait 500
set #Che #Che + 1
if #Che > #MaxChe
goto Reload
end_if
end_while
set #Che 0
call Farm
end_if


:Vil6
if 1046, 504 2769491
move 1028, 490
left 1028, 490
wait 1000
move 1037, 489
left 1037, 489
wait 500
while_not 732, 532 3096653
wait 500
set #Che #Che + 1
if #Che > #MaxChe
goto Reload
end_if
end_while
set #Che 0
call Farm
end_if

//Ожидание до следующего фарма
:Wait
//Координаты и цвет флажков готовности фарма всех дерефушек
while_not 739, 475 4351872 or 802, 499 4221835 or 978, 519 1847100 or 1081, 441 4747406 or 1121, 493 4087415 or 1045, 502 4748435
set #Circ #Circ + 1
if #Circ > #Max
goto Reload
end_if
//Проверка на баг странички:Координаты и цвет точки флага готовности к фарму и точки на флаге не готовности к фарму(Если не то или не то-то баг)
if_not 727, 491 4607061 or 738, 476 4747406
goto Reload
end_if
wait 10000
end_while
set #Circ 0
goto Vil1

//Процедура фарма. Координаты кнопки фарма в окне фарма которая вам необходима.(5 минут итд...)
proc Farm
move 737, 569
Left 737, 569
wait 1000
end_proc

end_script