Я не спец, но в недавней ветке меня неплохо поднатаскали...
Код
=
set #beliy findcolor (0 0 500 500 1 1 4324535(цвет) %arr)
set #cherny findcolor (0 0 500 500 1 1 764764(цвет) %arr)
wail 1=1
:beliy
wail #beliy = 0
if #beliy > 0
kleft ...
goto cherniy
end_if
end_while
:cherniy
wail #cherny = 0
if #cherny > 0
kleft ...
goto beliy
end_if
end_while
end_while
наверно как-то не так но примерно