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.


Messages - loki

Pages: [1] 2
1
происходит так: нет кликов потом кликает когда картинка ушла уже почти к концу области анализа.
если бы пауза была после клика все бы отлично было а то по картинке которая после клика видно что кликнул с запаздыванием

2
Code: (clickermann) [Select]
$toch=94 // точность поиска

// создаем 2 массива и заполняем их нулями

$count_image = 13  // количество картинок
FOR($a=0,$a<$count_image+1)
   $arr_d[$a] = 0
END_CYC

FOR($a=0,$a<$count_image+1)
   $arr_u[$a] = 0
END_CYC

SETTHREAD (down, 1) // запускаем потоки


START: // далее зацикленный скрипт

THREAD(down, 0)
   GETSCREEN
   COLORMODE(5)
   FOR($d=1,$d<ARRSIZE($arr_d))
      IF_PICTURE_IN (760,268,835,714, STRCONCAT("d",$d,".bmp"), -1, $toch)
         LCLICK(1172,317)
         LOGWRITE ("вниз ",$d)
         $arr_d[$d] = 1
         WAITMS(50)
         SCREENSHOTEX(760,268,835,714, STRCONCAT("d",$d,"_"), 0)
         WAIT(90)
         $d=ARRSIZE($arr_d) // выход из цикла
      ELSE
         IF_PICTURE_IN (760,268,835,714, STRCONCAT("u",$d,".bmp"), -1, $toch)
            LCLICK(1167,269)
            LOGWRITE ("вверх ",$d)
            $arr_u[$d] = 1
            WAITMS(50)
            SCREENSHOTEX(760,268,835,714, STRCONCAT("u",$d,"_"), 0)
            WAIT(90)
            $d=ARRSIZE($arr_d) // выход из цикла
         END_IF
      END_IF
   END_CYC
   WAITMS(100)
END_THREAD


THREAD(move, 1)
   MOVE(1073,419)
   MOVE(1070,552)
   LCLICK(1070,552)
   LOGWRITE ("подвигал")
WAIT(300)
END_THREAD

вот вообще весь скрипт

3
запаздывание идет на минуту это очень много

4
эм запаздывает анализ поздно кликает

у меня идея: а если брать контрольную сумму картинки и ее сравнивать с контрольной суммой области анализа если сходиться то уже сравнивать картинку так будет быстрее?

5
нужно знать какая картинка сработала

вроде работает последний вариант сообщение 23 спасибо

6
на экране могут быть все сразу картинки и надо все сразу найти и нажать на одну из 2-х областей (группа картинок 1) либо на другую область ( группа картинок 2). каждый раз когда находит картинку относящаюся к группе 1 или к группе 2 давит на область экрана подходящую соответствующей группе картинок

щас попробую 23 ответ спасибо за участие очень приятно

7
и получаеться первое мое сообщение в которой я последовательно на каждую картинку писал чо делать :-[ или есть какие варианты еще

8
следующий вопрос: когда добавляю для анализа еще картинки, все встает колом, впоть до зависания кликера, как еще оптимизировать процесс? чтоб искать например 100 картинок

9
Общие вопросы / Re: Прошу ткнуть носом в SUB
« on: January 26, 2017, 06:36:08 PM »
а по вопросу я даже и не понял что посоветовать  ;D

10
хотя вот так наверное правда лучше
Code: [Select]

DEFINE($d1,0)
DEFINE($d2,0)
DEFINE($d3,0)
DEFINE($d4,0)
DEFINE($d5,0)
DEFINE($d6,0)
DEFINE($d7,0)

DEFINE($u1,0)
DEFINE($u2,0)
DEFINE($u3,0)
DEFINE($u4,0)
DEFINE($u5,0)
DEFINE($u6,0)
DEFINE($u7,0)

THREAD(down, 1)
   GETSCREEN
   COLORMODE(5)
   FOR($d=1,$d<8)
      IF_PICTURE_IN (771,268,837,673, STRCONCAT("d",$d,".bmp"), 16777215, $toch)
         LCLICK(1169,318)
         LOGWRITE ("âíèç ",$d)
         SETVAR(STRCONCAT("$d",$d), 1)
         WAITMS(50)
         SCREENSHOTEX(771,268,837,673, STRCONCAT("d",$d,"_"), 0)
         WAIT(90)
      else
         FOR($u=1,$u<8)
            IF_PICTURE_IN (771,268,837,673, STRCONCAT("u",$u,".bmp"), 16777215, $toch)
               LCLICK(1174,267)
               LOGWRITE ("ââåðõ ",$u)
               SETVAR(STRCONCAT("$u",$u), 1)
               WAITMS(50)
               SCREENSHOTEX(771,268,837,673, STRCONCAT("u",$u,"_"), 0)
               WAIT(90)
            END_IF
         END_CYC
      END_IF
   END_CYC
   WAITMS(100)
end_thread

значительно быстрее спасибо

11
вот это я балбес спасибо  ::)

все заработало ура

12
извините

Code: [Select]

DEFINE($d1,0)
DEFINE($d2,0)
DEFINE($d3,0)
DEFINE($d4,0)
DEFINE($d5,0)
DEFINE($d6,0)
DEFINE($d7,0)

DEFINE($u1,0)
DEFINE($u2,0)
DEFINE($u3,0)
DEFINE($u4,0)
DEFINE($u5,0)
DEFINE($u6,0)
DEFINE($u7,0)

WAIT(1)

THREAD(d, 1)
   GETSCREEN
   COLORMODE(5)
   FOR($i=1,$i<8)
      IF_PICTURE_IN (771,268,837,673, STRCONCAT("d",$i,".bmp"), 16777215, $toch)
         LCLICK(1169,318)
         LOGWRITE ("âíèç ",$i)
         SETVAR(STRCONCAT("$d",$i), 1)
         SCREENSHOTEX(771,268,837,673, STRCONCAT("d",$i,"_"), 0)
         WAIT(90)
      END_IF
   END_CYC
   WAITMS(100)
end_thread

//ââåðõ
THREAD(u, 1)
   GETSCREEN
   COLORMODE(5)
   FOR($i=1,$i<8)
      IF_PICTURE_IN (771,268,837,673, STRCONCAT("u",$i,".bmp"), 16777215, $toch)
         LCLICK(1174,267)
         LOGWRITE ("ââåðõ ",$i)
         SETVAR(STRCONCAT("$u",$i), 1)
         SCREENSHOTEX(771,268,837,673, STRCONCAT("u",$i,"_"), 0)
         WAIT(90)
      END_IF
   END_CYC
   WAITMS(100)
end_thread


вот никаких изменений кроме второго потока и координат

13
Общие вопросы / Re: Прошу ткнуть носом в SUB
« on: January 26, 2017, 03:58:13 PM »
в старой сборке надо писать gosub в новой просто названия sub а пишется

14
нет нет я уже вариант взял который тут предложили в сообщении №2 от Oraven

извините что не пояснил что от своей версии отказался

все работает немного притормаживает но вот скриншот один и тотже печатает и

еще вот чего возникает иногда картинка ниже

или просит d8.bmp

хотя
Code: [Select]
FOR($i=1,$i<8) с чего хочет 8  :-[

версия проги 4.12.001; дата сборки: 25.03.2016


15
дорогой ты мой человек Oraven а вот еще вопрос?
в конце разве не надо вот так

Code: [Select]
UNDEFINE($d1)
   UNDEFINE($d2)
   UNDEFINE($d3)
   UNDEFINE($d4)
   UNDEFINE($d5)

а то принтскрин один и тот же печатает


Pages: [1] 2