Добавлена тема оформления "Clickermann" для кода с подсветкой синтаксиса. Выбирается из выпадающего списка "Код" (рядом с "цвет", "размер" и "шрифт") в режиме редактирования поста. Либо просто BB-тегом "code=clickermann"
Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
GETSCREEN
COLORMODE(8)
SCREENSHOT
IF_PICTURE_IN (0,0, 1100,600, "textures\batl_tren.bmp", -1, 90)
LOGWRITE("изображение batl_tren найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1+50, $_return2-10)
У меня работает нормально. Все находит, на все кнопки жмет.старт и работа по времени лежат на форуме.я много тем посмотрел, но пока не играл эти игры то не совсем понятен алгоритм, так же как и я сейчас Вас прошу.
WAITMS(500)
LOGWRITE("начало боевой подготовки")
GETSCREEN
COLORMODE(8)
SCREENSHOT
IF_PICTURE_IN (0,0, 1100,600, "textures\batl_tren.bmp", -1, 90)
LOGWRITE("изображение batl_tren найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1+50, $_return2-10)
WAIT(8) // зашли в подготовку
// есть 5 целей, которые надо уничтожить, но вторая цель появляется после уничтожения первой
FOR ($i=0, $i<6)
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "textures\target4.bmp", -1, 85)
LOGWRITE("изображение target найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1-83, $_return2) // нажимает на корабли
WAIT(7) //зашли в Инфо Противника
// надо нажать на кнопку
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "textures\sragenie.bmp", -1, 80)
LOGWRITE("изображение sragenie найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1, $_return2) // нажимает на кнопку сражение
WAIT(10) //зашли в расстановку флота
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "textures\sragenie_2ur.bmp", -1, 90)
LOGWRITE("изображение sragenie_2ur найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1, $_return2) // вступаем в бой
WAIT(50) // идет бой
// должна быть проверка
// если Выграли - идем дальше
// если проиграл - оставновка и выход
// пока без проверки, идем дальше
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "textures\2strelki-2.bmp", -1, 82)
LOGWRITE("изображение 2strelki найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1, $_return2) // вышли из просмотра результатов
// там где 5 целей
WAIT(5)
ELSE
LOGWRITE("изображение 2strelki НЕнайдено")
END_IF
ELSE
LOGWRITE("изображение sragenie_2ur НЕнайдено")
END_IF
ELSE
LOGWRITE("изображение sragenie НЕнайдено")
END_IF
ELSE
LOGWRITE("изображение target НЕнайдено")
$i = 10
END_IF
END_CYC
ELSE
LOGWRITE("изображение batl_tren НЕнайдено")
END_IF
LOGWRITE(" конец боевой подготовки")
WAIT(5)
HALTGETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, 1100,600, "textures\CITADEL-2.bmp", -1, 90)
LOGWRITE("изображение Цитадель найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
$sav_X = $_return1
$sav_Y = $_return2
LCLICK($sav_X+230, $sav_Y-56)
WAIT(3)
LCLICK($sav_X+230, $sav_Y+317)
WAIT(3)
LCLICK($sav_X-142, $sav_Y-93)
WAIT(3)
LCLICK($sav_X+512, $sav_Y+177)
WAIT(3)
LCLICK($sav_X+512, $sav_Y+177)
WAIT(3)
LCLICK($sav_X+177, $sav_Y+350)
WAIT(6)
LCLICK($sav_X+57, $sav_Y+363)
WAIT(3)
LCLICK($sav_X+609, $sav_Y-118) //выход
else
LOGWRITE("изображение Цитадель НЕнайдено")
end_IFsub(sbor_prizov)
/== подпрограмма сбор наград в ежедневнике ==//
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, 1100,600, "textures\NAGRADA-2.bmp", -1, 90)
LOGWRITE("изображение награда найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1+10, $_return2)
WAIT(5)
ELSE
LOGWRITE("изображение награда НЕнайдено")
END_IF
WAIT(1)
FOR ($i=0, $i<7)
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0, 0, 1100, 700, "textures\POLUCHIT-4.bmp", -1, 80)
LOGWRITE("изображение ПОЛУЧИТЬ найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1, $_return2)
WAIT(6)
ELSE
LOGWRITE("изображение ПОЛУЧИТЬ НЕнайдено")
$i = 10
END_IF
END_CYC
end_sub
//сама программа
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, 1100,600, "textures\LISTOK-2.bmp", -1, 90) //
LOGWRITE("изображение Листок найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1+10, $_return2+10)
WAIT(5)
ELSE
LOGWRITE("изображение Листок НЕнайдено")
END_IF
//== попадаем на вкладку Бизнес
sbor_prizov()
//== надо попасть на вкладку ФЛОТ
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "textures\FLOT-2.bmp", -1, 90)
LOGWRITE("изображение ФЛОТ найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1, $_return2)
WAIT(3)
ELSE
LOGWRITE("изображение ФЛОТ НЕнайдено")
END_IF
// попадаем на вкладку ФЛОТ
sbor_prizov()
//== надо попасть на вкладку ОПЫТ
GETSCREEN
COLORMODE(8)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "textures\OPIT-2.bmp", -1, 90)
LOGWRITE("изображение ОПЫТ найдено")
LOGWRITE("x: ", $_return1," y: ", $_return2)
LCLICK($_return1, $_return2)
WAIT(3)
ELSE
LOGWRITE("изображение ОПЫТ НЕнайдено")
END_IF
// попадаем на вкладку ОПЫТ
sbor_prizov()
, делаю для себя бот, чтобы не делать очень много однотипных действий. попозже напишу, что хочу от бота, чтобы было понятнее
И подпрограммы целесообразно использовать только при многочисленном повторении куска кода.Это относится только при использовании потоков или вообще?
Если не найдено на каком-то этапе - зачем продолжать? ведь закончились. Выходи из цикла принудительно
Однако, описание подпрограммы должно быть раньше (выше) любого из ее вызовов.Я должен описать все SUB программы, а потом уже скрипт?
