getscreen
GOSUB(Записываем рабочее место Инвенторя)
GOSUB(Читаем рабочее место Инвенторя)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "Нет руды для стали.bmp")
$maxx=5
$i=0
FOR ($i, $i<$maxx)
// I...V Вкладка инвентаря
IF_PICTURE_IN (0,0, $_xmax,$_ymax, STRCONCAT("Вкладка",$i,".bmp"))
MOVE($_return1, $_return2) //наводим на верхний координату вкладки инвенторя
waitms(500)
MOVE($_return1+45, $_return2+17)/наводим на нижнию координату вкладки инвенторя
waitms(500)
dbLCLICK($_return1+23, $_return2+6)// нажимаем в середину вкладки инвенторя
waitms(500)
GOSUB (Найти кристалы)
GOsUB (Найти Руду)
//если нашли кристалы в какой-то вкладке то остановить цикл
END_IF
END_CYC
END_IF