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 - Otlichnii_paren

Pages: [1] 2
1
Спасибо и в прям все оказалось проще чем я думал

2
Общие вопросы / Рандомное имя переменной
« on: February 08, 2023, 08:54:44 PM »
Доброе времени суток. Сломал голову перерыл форум, нашел подходящие решения, но через костыли типа RNDFROM() . Должен же быть вариант по проще для реализации подобного кода, нужно обращение к рандомному имени переменной:
Code: [Select]
$var1="текст1..."
$var2="текст2..."
$var3="текст3..."
...
WAIT(1)

print($var(rnd(1,3)))

Или какая ни будь команда преобразующая строку "$var1" в имя переменной $var1. Или ткните пальцем на тему на форуме, если я в упор не вижу очевидного. Спасибо.

3
Спасибо, я внедрил максимальную ставку не много иначе но почему в моем скрипте не работает первый цикл, он же зациклен сам в себя, должен бесконечно крутить, но почему то после первого же круга останавливается . Или как вообще реализовать цикл в цикле если внутри второго цикла if. Как я понял из-за этого не хочет нормально работать

4
Добрый вечер, у меня возникла проблема с зацикливанием скрипта.

$var=1
$varz=5
$a=1
FOR($a=0,$a<5, -1)
$stav=2,5
FOR($var ,$var=1, 0)
     GETSCREEN
      COLORMODE(3)
      IF_PICTURE_IN (843, 867, 1091,959, "chernoe.bmp", -1, 100)
         WAITMS(50)
          $var=0
      else
         $stav=$stav*2
         RDown(953,992)
         waitms(105 + $S_CORR)
         RUp(953,992)
         KEYSTRING (StrConcat( "Рулетка" )  )
         WAIT(1)
         KEYPRESS(#ENTER)
         WAIT(5)
         KEYSTRING (StrConcat( $stav , " на чёрное " )  )
         WAIT(1)
         KEYPRESS(#ENTER)
         WAIT(5)
         KEYSTRING (StrConcat( "Крутить" )  )
         WAIT(1)
         KEYPRESS(#ENTER)
         WAIT(1)
                  IF($varz < $stav )
                      WAITMS(1000)
            $varz=$stav
            print($varz)
            else
          END_IF
         WAIT(rnd(20 , 30))
      END_IF
   END_CYC
      $var=1
   $stav=2,5
      FOR($var ,$var=1, 0)
         GETSCREEN
      COLORMODE(3)
      IF_PICTURE_IN (843, 867, 1091,959, "krasnoe.bmp", -1, 100)
         WAITMS(50)
         $var=0
      else
         $stav=$stav*2
         RDown(953,992)
         waitms(105 + $S_CORR)
         RUp(953,992)
         KEYSTRING (StrConcat( "Рулетка" )  )
         WAIT(1)
         KEYPRESS(#ENTER)
         WAIT(5)
         KEYSTRING (StrConcat( $stav , " на красное " )  )
         WAIT(1)
         KEYPRESS(#ENTER)
         WAIT(5)
         
         KEYSTRING (StrConcat( "Крутить" )  )
         WAIT(1)
         KEYPRESS(#ENTER)
         WAIT(1)
                  IF($varz < $stav )
           WAITMS(1000)
            $varz=$stav
            print($varz)
            else
         END_IF
         WAIT(rnd(20 , 30))
      END_IF
   END_CYC
 end_cyc

halt
что я делаю не так. Почему не получается просто зациклить на мертво скрипт?

5
ARRCONCAT()
А что это за подпрограмма?
И каким методом нахождения количества зеленых камней лучше пользоваться чтоб получить данные их наличия и расположения для создания матрицы?
Примерно понял каким методом вести подсчет скоплений, надо будет вечерок по сидеть, под разобраться. вспомнить начальные классы математики))

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

https://yadi.sk/d/r9wgOd6gd9ZgyA
не сжатый вариант картинок

7
https://yadi.sk/d/r9wgOd6gd9ZgyA
не сжатые, если слишком часто обращаться к сожалению кликер начинает тормозить и на мертво зависает. Нужна обработка с минимальным количеством обращений к картинке. Я пробовал извартиться по всякому даже оптимизация не дает результатов.




8
Добрый день. Озадачился таким вопросом анализирования и распознования одинковых элементов в картинке и действовать исходя из количества элементов друг от друга, ну или количества на один взятый участок. Проще говоря что-то вроде шариков ромбов квадратов расположенных по разному (на картинке будет видно). Да понятно можно решить этот вопрос просто сделав снимки нужных элементов (на данный момент так у меня и работает бот). Но это как то долго вариантов уж слишком много и вообще решения вопроса в лоб. Трудности возникают именно с тем чтоб про анализировать картинку. Пробовал анализировать через расстояние, пробовал разбивать картинку на части, но код получался в 500 строк и то не работал. На чем вообще основано исчезновение шариков в таких играх как цветные линии.
Нужно именно чтоб скрипт проанализировав картинку кликал по одному из тех элементов которые в большем количестве идут друг за другом по горизонтали или вертикали, как зеленые квадратики на второй картинке. Если лень заморачиваться хотя бы подскажите в какую сторону капать.
Не надо не двигать их ниче, просто клик.... Возможно решение лежит на поверхности но в школе информатику я плохо учил...

9
Общие вопросы / Re: ЗАМЕНА СКРИПТА
« on: March 14, 2020, 11:20:26 PM »
...
#include "ваш скрипт.cms"
Можно по подробнее об этом с синтаксисом, в справке не нашел инфы, желательно с примером? А то я мучаюсь каждый раз интеграцией скриптов друг в друга создавая новые, зачем? если есть команда которая просто будет подгружать нужный в данный момент скрипт и берет ли он изображения для if_picture_in с той папки с который был подгружен скрипт или нужно копировать все в ту папку с которой был запущен основной скрипт?

10
Использование / Re: Метро 2033
« on: March 12, 2020, 04:01:43 PM »
Дуже дивна ігрова тактика; дарувати подарунки VIP, зазвичай подарунки отсилат у відповідь тим, хто регулярно надсилає вам і їх завжди не вистачає.
Обшукувати їх теж марнотратство, адже обшукувати потрібно новачків і отримувати за це золото, а не ту мелочевку, що ви збираєте.
Можно по русски, ни слова не понял. Если есть какие то предложения формулируйте их пожалуйста так чтоб их поняли еще кто ни будь кроме вас. СПасибо)

11
Использование / Метро 2033
« on: March 12, 2020, 12:39:01 PM »
Может плохо искал, но по конкретному названию темы не нашел. Говорилось что полно скриптов и ботов для данной игрухи. Написал простенький скрипт который запускать нужно раз в день очень полезен на начальных этапах и когда есть друзья.
Естественно картинка под свой лад выставляйте ибо у меня на 2х машинах работало норм на 3ей приходилось заново скринить элементы изоборажения. Что касается картинки pid.bmp это маленький кусочек из слова vip 2-3 пикселя из буквы v. Скрипт пробегает по друзьям у которых в данный момент vip заходит обыскивает дарит бесплатный подарок закрывая при этом окно отправить уведомление если таковое выскакивает, кто хоть чуть чуть шарит разберется. Да можно доработать вписать более адекватную остановку после 10 обысков или подарков а не тот банальный вариант который я сделал))) но писалось все на коленке) закинул архив кому интересно какие именно элементы изображения я скринил.

Code: (clickermann) [Select]
$krug=0
WHILE($krug < 10)   //сколько переходов по друзьям кликать все ровно сработает пауза при отсутствии активной кнопки "обыскать" примерное число друзей/7 и вписываем. 
 
  GETSCREEN        //поиск вип
colormode(3)
SCANPICTURE ($ARR_SCAN, 0,0, $_xmax,$_ymax, "pib.bmp", -1, 100)
FOR($i=0,$i<ARRSIZE($ARR_SCAN),2)
RCLICK($ARR_SCAN[$i], $ARR_SCAN[$i+1])
   
   WAITMS(rnd(1000 , 5000))
     
  GETSCREEN    //клик по домику
   colormode(3)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "dom.bmp", -1, 100)
   rCLICK($_return1, $_return2)
   MOVE(1619,662)
   WAITMS(rnd(1000 , 5000))
     END_IF
   
     GETSCREEN  //обыскать
 colormode(3)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "обыскать.bmp", -1, 100)

   RCLICK($_return1, $_return2)
   MOVE(1619,662)
   WAITMS(rnd(1000 , 5000))
 else
   halt     // отключает скрипт при отсуствии надписи обыскать

   END_IF
   
   
    GETSCREEN  //пожелания
 colormode(6)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "пожелания.bmp", -1, 100)

   RCLICK($_return1, $_return2)
   MOVE(1619,662)
   WAITMS(rnd(5000 , 10000))
   END_IF
   
     GETSCREEN  //подарить
 colormode(6)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "подарить.bmp", -1, 100)
   RDOWN($_return1, $_return2)
   waitms(1000)
   Rup($_return1, $_return2)
   MOVE(1619,662)
   WAITMS(rnd(2000 , 5000))
    END_IF
   
    GETSCREEN //закрыть оповещение
colormode(3)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "отмена3.bmp", -1, 100)
   rCLICK($_return1, $_return2)
   WAITMS(rnd(2000, 4000))
END_IF

 
   
   GETSCREEN  //закрыть
 colormode(3)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "Закрыть.bmp", -1, 100)

   RCLICK($_return1, $_return2)
   MOVE(1619,662)
   WAITMS(rnd(1000 , 5000))
   END_IF
   
END_CYC
UNDEFINE($ARR_SCAN)
   
GETSCREEN //переход к след странице друзей
colormode(3)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "следдрузья.bmp", -1, 100)
   RCLICK($_return1, $_return2)
   MOVE(1619,662)
   WAITMS(rnd(10000 , 35000))
   
MOVE(1619,662)
   
   
END_IF

$krug=$krug+1
 
END_CYC 
   
   

halt

12
Quote
RND выбираешь случайную пару  x,y в найденном массиве
Как это реализвать на примере? как впихнуть пару в 1 рандом?

13
В общем такая тема надо кликнуть по первой картинке потом по второй потом по мере прохождения кода по 10ой и т.д. Реализовал это так:

...
GETSCREEN
colormode (3)
SCANPICTURE($ARR_SCAN, 0,0, $_xmax,$_ymax, "ноа.bmp", -1, 100)
$i=0
   rCLICK($ARR_SCAN[$i], $ARR_SCAN[$i+1])
   WAITMS(100)
UNDEFINE($ARR_SCAN)
.....
GETSCREEN
colormode (3)
SCANPICTURE($ARR_SCAN, 0,0, $_xmax,$_ymax, "ноа.bmp", -1, 100)
$i=0,
   rCLICK($ARR_SCAN[$i+2], $ARR_SCAN[$i+3])
   WAITMS(100)
UNDEFINE($ARR_SCAN)
....
Все работает как надо, но может есть более простой вариант исполнения данной задачи?
кликать надо не по порядку, поэтому не циклирую и картинки местами меняются...



И еще вопрос следующий из предыдущего, как более коротко организовать rnd() нажатие на один и те же картинки на странице если их 20-30 ?  отдельно для каждой прописывать sub будет слишком грамоздко. а вгонять координаты в одну переменную вроде нельзя


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

14
а тоесть последующий картинки будут $_return3, return4 я правильно понял этот код?

15
Добрый день господа. Или я криво ищу или поиск не так работает, не могу найти тему с кликом по аналогичным картинкам. Суть в том что надо после поиска и нахождение черех ifpicturein кликнуть не только по первой но и по остальным совпадающим картинкам.... Знаю что была такая тема и обусждалась дайте хотя бы ссылку или кусок кода как это реализовать, спасибо)

Pages: [1] 2