Messages

16

Общие вопросы / работает только если все верно .... а оно не всегда так помогите пжж

« on: July 01, 2017, 09:26:03 PM »

Code: (clickermann) [Select]

GETSCREEN  ($xx+491,$yy-57,$xx+713,$yy+622)  //(908,50, 1130,729)
         IF_PICTURE_IN ($xx+491,$yy-57,$xx+713,$yy+622, "на ос.bmp", -1, 70)// если нашли то запоминаем где она
            LOGWRITE (" на ос")
            $x= $_return1
            $y= $_return2
            GETSCREEN ($x-549,$y-27, $x-501,$y+20)
            IF_PICTURE_IN ($x-549,$y-27, $x-501,$y+20, "нек на стр.bmp", -1, 70)// если вот это подтвердилось то  все дальше работает а если нет то не работает зависает((( из за того что на страницы эта кнопка может быть несколько раз а кликер ищет с ЛВУ и получаеться что он возвращается искать картинку и о5 натыкаеться на ту же но она не подходит нам как сделать чтоб если не подошла он кординаты запомнил и уже ее пропускал
               LOGWRITE ("это то что нам нада")
               m_move($x+RND(-5,5),$y+RND(-5,5))
               LCLICK($_xmouse,$_ymouse)
               m_move($x+500+RND(-5,5),$y+RND(-5,5))
             
               $time1 = $_time_t + 10
               WHILE($time1 > $_time_t)
                  GETSCREEN ($xx+501,$yy+449,$xx+722,$yy+588) //(918,556, 1139,695)
                  COLORMODE(6, $xx+501,$yy+449,$xx+722,$yy+588)
                  IF_PICTURE_IN ($xx+501,$yy-449,$xx+722,$yy+588, "нек б.bmp", -1, 70)
                     $time1 = 0
                     LOGWRITE ("нашли б")
                     m_move($_return1+RND(-2,2), $_return2+RND(-2,2))
                     LCLICK($_xmouse,$_ymouse)
                     
                     
                     $time2 = $_time_t + 10
                     WHILE($time2 > $_time_t)
                        GETSCREEN ($xx-25,$yy+328,$xx+280,$yy+537)//(399,465, 679,644)
                        IF_PICTURE_IN ($xx-25,$yy+328,$xx+280,$yy+537, "нап.bmp", -1, 70)
                         
                           $time2 = 0
                           m_move($_return1+RND(-2,2), $_return2+RND(-2,2))
                           LCLICK($_xmouse,$_ymouse)
                           WAITMS(rnd(1500,1700))
                        ELSE
                           LOGWRITE ("не нашли нап")
                           WAITMS(50)
                        END_IF
                     END_CYC
                  ELSE
                     LOGWRITE ("не нашли б")
                     WAITMS(50)
                  END_IF
               END_CYC
               
            ELSE
               
               LOGWRITE ("это не нек ")// нужно запомнить кординыты и игнорить 
               GOTO(skip)
            END_IF

17

Общие вопросы / Сделать как то болле удобно для редактирования

« on: May 31, 2017, 07:16:16 PM »

[spoiler]

Code: (clickermann) [Select]

SUB(z)
   GETSCREEN($xx+590,$yy+59, $xx+630,$yy+77)
   IF_PICTURE_IN ($xx+590,$yy+59, $xx+630,$yy+77, "1.bmp", -1, 80)
      WAITMS(600)
     
   ELSE
     
     
      GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
      IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "2.bmp", -1, 100)
       
         m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
         LCLICK($_xmouse,$_ymouse)
         WAITMS(rnd(400,600))
      ELSE
       
         
         //GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
         IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "3.bmp", -1, 100)
           
            m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
            LCLICK($_xmouse,$_ymouse)
            WAITMS(rnd(400,600))
         ELSE 
           
            // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
            IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "4.bmp", -1, 100)
               IF($_log_log=1)
                  LOGWRITE ("молния")
               END_IF
               m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
               LCLICK($_xmouse,$_ymouse)
               WAITMS(rnd(400,600))
            ELSE
               
               
               // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
               IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "5.bmp", -1, 100)
                 
                  m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                  LCLICK($_xmouse,$_ymouse)
                  WAITMS(rnd(400,600))
               ELSE
                 
                 
                  // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
                  IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "6.bmp", -1, 100)
                     
                     m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                     LCLICK($_xmouse,$_ymouse)
                     WAITMS(rnd(400,600))
                  ELSE
                   
                     // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
                     IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "7.bmp", -1, 100)
                       
                        m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                        LCLICK($_xmouse,$_ymouse)
                        WAITMS(rnd(400,600))
                     ELSE
                       
                        // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
                        IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "8.bmp", -1, 100)
                         
                           m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                           LCLICK($_xmouse,$_ymouse)
                           WAITMS(rnd(400,600))
                        ELSE
                           
                           // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)
                           IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "9.bmp", -1, 100)
                             
                              m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                              LCLICK($_xmouse,$_ymouse)
                              WAITMS(rnd(400,600))
                             
                             
                           ELSE // те что выше было просто клик это делать если уже все что выше перетыкали и больше не нашли
                              //GETSCREEN  ($xx+90,$yy+440, $xx+212,$yy+505)
                             
                              IF_PICTURE_IN($xx+90,$yy+440, $xx+212,$yy+505,"1.1.bmp",-1,80)
                                 WAITMS(rnd(200,500))
                               
                                 m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                                 LCLICK($_xmouse,$_ymouse)
                                 WAITMS(rnd(600,1000))
                               
                                 m_move(RND($xx+280,$xx+374),RND($yy+168,$yy+289))
                                 LCLICK($_xmouse,$_ymouse)
                                 WAITMS(rnd(1600,1800))
                                 
                              else
                               
                                 //GETSCREEN  ($xx+90,$yy+440, $xx+212,$yy+505)
                                 IF_PICTURE_IN($xx+90,$yy+440, $xx+212,$yy+505,"1,2.bmp",-1,80)
                                    WAITMS(rnd(200,500))
                                   
                                    m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                                    LCLICK($_xmouse,$_ymouse)
                                    WAITMS(rnd(600,1000))
                                   
                                    m_move(RND($xx+280,$xx+374),RND($yy+168,$yy+289))
                                    LCLICK($_xmouse,$_ymouse)
                                    WAITMS(rnd(1600,1800))
                                 ELSE
                                   
                                    // GETSCREEN  ($xx+37,$yy+436, $xx+657,$yy+561)//о5 просто клик но если не нашло предедущих
                                    IF_PICTURE_IN ($xx+37,$yy+436, $xx+657,$yy+561, "10.bmp", -1, 100)
                                     
                                       
                                       m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
                                       LCLICK($_xmouse,$_ymouse)
                                       WAITMS(rnd(400,600))
                                       
                                    else
                                       WAITMS(rnd(180,250))
                                     
                                       VRI()
                                    END_IF
                                   
                                 END_IF
                              END_IF
                             
                           END_IF
                        END_IF
                     END_IF
                  END_IF
                 
               END_IF
               
            END_IF
           
         END_IF
         
      END_IF
   END_IF
   
END_SUB[/spoiler]

как это сделать как то более приемлемо для редактирования допустим через массив удобно редактировать но у меня выходит что через массив оно ищет любую из картинок выше если ее нашло то все досвидание а нужно чтоб искало в том порядке  который введешь вот выше все работает как нужно но когда нужно что то убрать или добавить это делать как то не очень удобно да и слишком длинный он   ?? ?хочется чтоб было удобно и красиво

18

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 08:55:57 PM »

все спасибо я понял 
FOR($inf=0, $inf < ARRSIZE($picture1)) это оно само определит сколько там картинок ?)

19

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 07:10:48 PM »

THREAD(logger, 1)
    IF(ISKEYDOWN(#L) = 1)
        LOGCLEAR
        LOGWRITE ("продали: ", $prodali_1, " раз")
        FOR($inf=0, $inf < 2)// что значит ? $inf это сколько в массиве картинок нужно вписывать или что ?
            LOGWRITE("забрали ", $picture1[$inf], "  ", $drop_shet[$inf], " раз(а)")
        END_CYC
        WAITMS(900)
    END_IF
    WAITMS(100)
END_THREAD

20

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 07:00:06 PM »

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

21

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 06:51:28 PM »

первое нажатия на L воспринимается правильно и выдает инфу а второе уже нет почему то  все масивы как вы сказали перенес в начало убрал все удаления их вот скрин что выдает если второй раз жмякаю[spoiler][/spoiler]

22

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 06:24:14 PM »

Code: (clickermann) [Select]

STRSEPARATE("рец сер,рец зел,рец син,рец фиол,рец жел,рец крас,молот,серп",",",$picture1)
у меня эта строчка была в подпрограмме и оно с каждым разом все дольше думало решилось с помощью его удаления  а если перенести его в начало оно не начнет так же каждый раз все дольше думать или я не правильно понял и когда оно было в подпрограмме то оно каждый раз создавало новый масив при каждом вызове а когда в начало то будет просто его применять ?

23

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 03:37:57 PM »

Code: (clickermann) [Select]

IF($t_ob=0)
$guests = 0
$guest_page = 0
STRSEPARATE("0,0,0,0,0,0,0,0",",",$drop_shet)
 $t_ob=1
END_IF

SUB(дроп)

   STRSEPARATE("рец сер,рец зел,рец син,рец фиол,рец жел,рец крас,молот,серп",",",$picture1)
//тут условия есть
$drop_shet[$drop1] = $drop_shet[$drop1] + 1
  LOGWRITE("забрали ", $picture1[$drop1], "  ", $drop_shet[$drop1], " раз(а)")
//еще условия
INC($prodali_1,1)
               LOGWRITE ("продали: ", $prodali_1, " раз")
   UNDEFINE($picture1)
END_SUB
//кусок скрипта
// и вот выходит что запись в лог идет как нужно но дело в том  что лог автоматом удаляется когда вырастает до какого то предела
IF(ISKEYDOWN(#L)=1) // при нажатии L
   WHILE(ISKEYDOWN(#L)=1) // хотелось бы чтоб при нажатии кнопки выводило все что он забирал и сколько штук
      LOGCLEAR
      LOGWRITE ("продали: ", $prodali_1, " раз")//это показывает потому что эта переменная сразу только к одному привязана
     LOGWRITE("забрали ", $picture1[$drop1], "  ", $drop_shet[$drop1], " раз(а)")// а тут просто 0 выдает что то нужно добавить как то объяснить что именно нужно каждый предмет с его ко-ом показать
      WAIT(3)
       END_CYC
   END_IF


24

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

« on: May 30, 2017, 02:15:32 PM »

извените не знал что так нельзя я просто решил в скрипт сразу не всталять а проверить как работает  спасибо  все работает как нужно

25

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

« on: May 30, 2017, 12:42:52 PM »

Code: (clickermann) [Select]

SUB(mouse_move,$MOVE_END_X,$MOVE_END_Y)
   $MOVE_Start_X = $_xmouse
   $MOVE_Start_Y = $_ymouse
   $MOVE_X = $MOVE_Start_X
   $MOVE_Y = $MOVE_Start_Y
   
   $dist = DIST($MOVE_END_X,$MOVE_END_Y,$MOVE_Start_X,$MOVE_Start_Y)
   $MOVE_step = ($dist-1)/INT(SQRT($dist))
   $MOVE_X_step = ($MOVE_END_X-$MOVE_Start_X)/$MOVE_step
   $MOVE_Y_step = ($MOVE_END_Y-$MOVE_Start_Y)/$MOVE_step
   
   FOR($MOVE_i=0, $MOVE_i < INT($MOVE_step))
      $MOVE_X = $MOVE_X + $MOVE_X_step
      $MOVE_Y = $MOVE_Y + $MOVE_Y_step
      MOVE(INT($MOVE_X) + RND(-2,2), INT($MOVE_Y) + RND(-2,2))
      WAITMS($rnwait) // задержка при движении по точкам
   END_CYC
END_SUB

SUB(m_move,$M_X,$M_Y)
   $rnwait = RND(6,15) // случайная скорость
   $MOVE_MID_X = INT(($_xmouse+$M_X)/2)
   $MOVE_MID_Y = INT(($_ymouse+$M_Y)/2)
   $otx = INT(ABS($_xmouse - $M_X) * 0.12)
   $oty = INT(ABS($_ymouse - $M_Y) * 0.12)
   mouse_move($MOVE_MID_X+RND(-$otx,$otx), $MOVE_MID_Y+RND(-$oty,$oty))
   mouse_move($M_X,$M_Y)
   MOVE($M_X,$M_Y) //Передвинуть окончательно в заданную точку
END_SUB
$guests = 0
$guest_page = 1



SUB(рейтинг)
   GETSCREEN (634,73, 715,173)
   IF_PICTURE_IN (634,73, 715,173, "рейтинг.bmp", -1, 70)
      LOGWRITE ("не тот лвл или счетчик")
      m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
      LCLICK($_xmouse,$_ymouse)
     
      $hranitili = $_time_t + 6
      WHILE($hranitili > $_time_t)
         GETSCREEN  (396,83, 559,165)
         IF_PICTURE_IN (396,83, 559,165, "хранители.bmp", -1, 80)
            $hranitili = 0
            m_move($_return1+RND(-10,10), $_return2+RND(-10,10))
            LCLICK($_xmouse,$_ymouse)
            WAITMS(rnd(500,999))
            $gosti = $_time_t + 10
            //
            IF($guests > 9)
   $guests = 0  // сбрасываем 10 нажатий в гости
   INC($guest_page)  // страница на 1 больше
END_IF
           
            WHILE($gosti > $_time_t)
               // следующая страница $guest_page раз
               FOR($i=0, $i < $guest_page)
                  LCLICK(856,544)
                  WAITMS(1000)
               END_CYC
               
               GETSCREEN(826,132, 971,534)  // что с координатами???
               IF_PICTURE_IN (826,132, 971,534, "в гости.bmp", -1, 80)
                  m_move($_return1 + RND(-10,10), $_return2 + (33*$guests) + RND(-10,10))
                  $gosti=0
                  LCLICK($_xmouse,$_ymouse)
                  WAITMS(rnd(1700,2399))
                 
                  INC($guests)
               ELSE
                  WAITMS(5)
               END_IF
            END_CYC
            //
         ELSE
            WAITMS(50)
         END_IF
      END_CYC
   END_IF
END_SUB
рейтинг() сделал вот так для проверки тычет все время в первую в списке 

26

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

« on: May 30, 2017, 11:30:27 AM »

[spoiler][/spoiler]
спасибо мне кажется 1 вариант подойдет :? обвел кнопочку на след страницу это когда на этой все прошли

27

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

« on: May 30, 2017, 10:55:35 AM »

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

28

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 10:31:56 AM »

мне там кинули с масивом пример я все так и сделал а оно тупить начало...

На то он и пример что примерный  .

о еще вопрос по поводу массива как можно сделать
STRSEPARATE("рецепт рыжий,рецепт зеленый",",",$picture)
чтоб после нахождения в лог выдавало именно то что нашло ?

Code: (clickermann) [Select]

LOGWRITE("нашли ", $picture[$drop2])

а ее можно наращивать? чтоб выдавало что именно нашло и сколько раз к каждой картинки из массива отдельно чтоб считало какой раз именно ее  нашло а так выдает что именно но нет сколько раз я что то вот ту команду куда ее пристраивал INC выдает ошибку  а если вбить другую переменную то будет просто считать сколько раз нашло любую картинку

29

Общие вопросы / Re: где то ошибка или что то забыл не могу понять где

« on: May 30, 2017, 09:58:35 AM »

спасибки

30

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

« on: May 30, 2017, 09:56:59 AM »

заглянте плиз