наверное так
Код
while #a <> 5
set #a findcolor (757,511 1027,621 1 1 (14131307, 11973047, 12765, 75432, 43790) %arr 2 5 0)
end_while
set #a 0 //не обязательно
wait 200 + random (190)
kleft %arr [1 1], %arr [1 2]
wait 230 + random (100)
хотя не так, если нужно чтобы ждал пока не найдет каждый из этих цветов, наверное надо писать отдельный findcolor для каждого