Show Posts

1

Общие вопросы / Re: Создал раба, для захвата мира, а он не слушается

« on: August 25, 2017, 02:00:59 PM »

Я ей никогда не пользовалась. Спасибо за новое знание

2

Общие вопросы / Re: Создал раба, для захвата мира, а он не слушается

« on: August 24, 2017, 04:34:27 PM »

Quote from: open_78 on August 24, 2017, 02:54:56 PM

Может нужно дальше в код заглянуть? Проверить окончания например...

Молодец! Спасибо. Надо было просто поныть после двух безрезультатных вечеров поиска потеряшки "END_IF", чтобы услышать ту же версию подразумеваемой ошибки, разобрать цепочку условий на блоки и найти бермуд в коде.
Таким образом, теперь мой "Раб" не только послушал, но и услышал.

Ура, товарищи, ура!

3

Общие вопросы / Re: Создал раба, для захвата мира, а он не слушается

« on: August 24, 2017, 02:43:19 PM »

Не надо тему закрывать... Я тут приземлюсь.
Не могу понять свою ошибку. Код:

Code: (clickermann) [Select]

SUB(OPA)
    GETSCREEN
    COLORMODE(7)
    // сканирование здоровья для PvE
    IF_PIXEL_IN($start_X+285,$start_Y-479, $start_X+286,$start_Y-474, 8355839)
        $HP_full=1 
    ELSE
        $HP_full=0
    END_IF
    // сканирование маны для PvP
    IF_PIXEL_IN($start_X+285,$start_Y-459, $start_X+286,$start_Y-454, 16777087)
        $EP_full=1 
    ELSE
        $EP_full=0
    END_IF
END_SUB

// __________ 7.Охота ____________________
WAIT(2)
OPA()
    IF($log=1)
        LOGWRITE("HP_full = ",$HP_full, ", EP_full = ", $EP_full)
    END_IF
WAIT(2)

IF($HP_full=1)
    WORLD()
    WAIT(1)
    IF($world ! 1) //если не в городе (не равно 1)
        MOVE($town_X+RND(0,20),$town_Y+RND(0,15)) // идем в город
        WAIT(RND(2,3))
	LCLICK(-1,-1)

Не могу понять, почему вне зависимости от значения $HP_full (0 или 1) выполняются все последующие действия. Всё определяется верно, альтернатива условия и окончание прописаны. Но он уперто прет в город, если хп не полное... Где я туплю?

4

Прочее / Re: БЕСЕДКА

« on: April 01, 2017, 09:50:47 AM »

Внимание! Лучший ответ

Quote from: Oraven on April 01, 2017, 08:23:17 AM

Вот для этого и нужно заключать код в код
Code: [Select]
COLORMODE( 8 ) COLORMODE(8) COLORMODE(8))

Мои бодания с упрямым слеповатым смайликом произошли при попытке Изменить, ранее написанный
текст. Вносить новые изменения с учетом лучшего ответа уже не буду. Пусть так и висит восьмерка в свободных скобках.

5

Прочее / Re: БЕСЕДКА

« on: March 31, 2017, 03:11:19 PM »

Эх... почему я так же не подумала?

6

Прочее / Re: БЕСЕДКА

« on: March 30, 2017, 05:59:56 PM »

COLORMODE( 8 )
Без пробелов - COLORMODE(

COLORMODE(

) - загадочный режим цветокоррекции

7

Общие вопросы / Re: Закрыть Clickermann

« on: March 18, 2017, 12:22:47 PM »

А я всё слышала, всем расскажу!

8

Общие вопросы / Re: запрет старта второй копия скрипта

« on: March 18, 2017, 12:16:32 PM »

Не понятно. Вы хотя бы примерно изобразите на языке кода, что и при каких условиях у вас должно запускаться первым, а что вторым. Теста нет, чтобы мы его дружно месили.

9

Общие вопросы / Re: как проконтролировать работу скрипта?

« on: March 18, 2017, 11:24:55 AM »

Если вас не устраивает код, который я изложила ранее, то можете сделать чуть иначе:

Code: (clickermann) [Select]

$stop=0
WHILE($stop=0)
   KEYPRESS(#M)
   WAIT(2)
   DBLCLICK(1233,413)
   WAIT(2)
   DBLCLICK(1270,510)
   WAIT(1)
   DBLCLICK(1118,863)
   WAIT(1)
   GETSCREEN
      IF_PICTURE_IN(754,889, 764,897, "search.bmp", -1, 100)
         $stop=1
      ELSE
         SCREENSHOTEX(754,889, 764,897, "Ups_", 0)
         HALT // остановка. пройдите в папку screens и сравните искомое с результатом
      END_IF
END_CYC

Правда при таком раскладе цикл не особо нужен, ибо скрипт у вас скорее всего долгое время будет выполняться ровно до строки 16. Если убрать остановку скрипта, то ваша папка перезахламиться скринами, на которые вы даже внимания не обратите. Если же убрать существование самого цикла, то это не будет соответствовать вашим требованиям, но можете попробовать и так:

Code: (clickermann) [Select]

$log=0
KEYPRESS(#M)
WAIT(2)
DBLCLICK(1233,413)
WAIT(2)
DBLCLICK(1270,510)
WAIT(1)
DBLCLICK(1118,863)
WAIT(1)

GETSCREEN
   IF_PICTURE_IN(754,889, 764,897, "search.bmp", -1, 100)
      IF($log=1)
         LOGWRITE("Усё ништяки.")
      END_IF
   ELSE
      SCREENSHOTEX(754,889, 764,897, "Ups_", 0)
      IF($log=1)
         LOGWRITE("Здесь и сейчас лично я вижу вот это... Твой Clickermann")
      END_IF
   END_IF
HALT

Как-то так. Анализируйте, сравнивайте. Если картинка не соответствует стандартам функции IF_PICTURE_IN или находится не совсем в той области, то на скрине это будет видно. При нейтрализации ошибки SCREENSHOTEX и HALT можно закомментировать или убрать. Тут дело вкуса.

10

Общие вопросы / Re: как проконтролировать работу скрипта?

« on: March 18, 2017, 09:46:54 AM »

Я не совсем поняла, где именно тут подразумевается выполнение скриншота? Вижу поиск картинки. Если картинка найдена, то всё отлично, если нет, то надо выполнять манипуляции с нажатием клавиши и двойными кликами. Верно?
Возможно, это должно выглядеть таким образом. Если ошибаюсь, то местные профи оперативно поправят мой ляп.

Code: (clickermann) [Select]

$stop=0
WHILE($stop=0)
GETSCREEN
   IF_PICTURE_IN(754,889, 764,897, "search.bmp", -1, 100)
      $stop=1
   ELSE
      KEYPRESS(#M)
      WAIT(2)
      DBLCLICK(1233,413)
      WAIT(2)
      DBLCLICK(1270,510)
      WAIT(1)
      DBLCLICK(1118,863)
      WAIT(1)
   END_IF
END_CYC