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.


Topics - Hito

Pages: 1 ... 3 4 [5] 6 7
61
Ребят, условия такие. Мне надо заюзать определенную кнопку и вычислить, через какое время, после этого, в определенных координатах появится определенный цвет. Вот пример:

Code: (clickermann) [Select]
KEYPRESS(#A)
// Тут команду, которая начала бы отсчет миллисекунд
WAITMS(300)
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      $check = 1
      // Тут команду, которая закончила бы отсчет миллисекунд и вывела бы результат в лог.
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYC
HALT

Как это намутить?

62
Ребят, тут вопрос возник (мне его задают уже второй раз) - на каком языке у нас вообще пишутся скрипты для кликермана?

63
Общие вопросы / Подскажите
« on: November 07, 2014, 01:51:26 AM »
Ребят, вот пример скрипта:

Code: (clickermann) [Select]
GETSCREEN
IF((PXL(571,64) = 4539822)&(PXL(506,757) = 4539822))
   BEEP(800,200)
   WAITMS(500)
END_IF

Как его правильно построить, чтобы он искал цвет в двух разных местах и при нахождении в одном из двух мест, срабатывал BEEP?
В данном варианте сигнал срабатывает только когда скрипт находит цвет в первых координатах.

64
Ребят, у меня такой вопрос - как при помощи флагов намутить себе в скрипте такие переключатели, чтобы можно было включать и отключать подпрограммы? Ну, например... Запустил я кликер и мне в этот раз нужна 1 и 2 подпрограмма, а третья не нужно, чтоб она срабатывала.

Code: (clickermann) [Select]
$1 - 1
$2 - 1
$3 - 0

SUB(1)
   //////////
END_SUB

SUB(2)
   //////////
END_SUB

SUB(3)
   //////////
END_SUB

Как сделать - подскажите плиз. У меня че-то голова опять дымится...))

65
Общие вопросы / Как сделать?
« on: October 28, 2014, 10:44:10 PM »
Code: (clickermann) [Select]
IF($time < $_time_t)
   /////////////////
   $time = $_time_t + 60 // Ребят, как сделать так, чтобы таймер был не по секундам, а по миллисекундам?
END_IF

66
Первое видео - http://www.youtube.com/watch?v=rcOIQJLHH5E&feature=youtu.be

Второе видео - http://www.youtube.com/watch?v=_4ca7FI7-lQ&feature=youtu.be

Code: (clickermann) [Select]
SUB(sharyi)
   FOR($sharyi,$sharyi<12)
      KEYPRESS(#2) // Шары
      WAITMS(100)
   END_CYC
END_SUB

SUB(krug)
   IF($krug1 < $_time_t)
      KEYPRESS(#3) // Круг
      WAITMS(1000)
      $krug1 = $_time_t + 21
   END_IF
END_SUB

SUB(poisk)
   poisk moba:
   KEYPRESS(#E) // Таргет
   WAITMS(100)
   GETSCREEN
   IF_PIXEL_IN(3,708, 168,837, 14708977,16777215) // Чат
      BEEP(800,200)
      WAITMS(500)
      GOTO(poisk moba)
   Else
      COLORMODE(4)
      IF_PICTURE_IN (745,647, 748,650, "drop.bmp", -1, 100) // Дроп
         KEYPRESS(#F)
         GOTO(poisk moba)
      Else
         COLORMODE(4)
         IF_PICTURE_IN (570,56, 572,71, "prostoy mob.bmp", -1, 100)  // Простой моб
            GOTO(led)
         Else
            COLORMODE(4)
            IF_PICTURE_IN (505,56, 507,71, "elitniy mob.bmp", -1, 100)  // Эллитный моб
               led:
               COLORMODE(4)
               IF_PICTURE_IN (505,847, 507,847, "ledyanaya1.bmp", -1, 100) // Ледяная стрела 1
                  GOTO(aktiv)
               Else
                  COLORMODE(4)
                  IF_PICTURE_IN (505,847, 507,847, "ledyanaya2.bmp", -1, 100) // Ледяная стрела 2
                     aktiv:
                     KEYPRESS(#9)
                     WAITMS(1000)
                  Else
                     GOTO(poisk moba)
                  END_IF
               END_IF
            Else
               GOTO(poisk moba)
            END_IF
         END_IF
      END_IF
   END_IF
END_SUB

GETSCREEN
IF_PIXEL_IN(3,708, 168,837, 14708977,16777215) // Чат
   BEEP(800,200)
   GOTO(chat)
Else
   chat:
   COLORMODE(4)
   IF_PICTURE_IN (308,63, 308,64, "max-hp.bmp", -1, 100)  // Максимум ХП
      COLORMODE(4)
      IF_PICTURE_IN (570,56, 572,71, "prostoy mob.bmp", -1, 100)  // Простой моб
         GOTO(boy)
      Else
         COLORMODE(4)
         IF_PICTURE_IN (505,56, 507,71, "elitniy mob.bmp", -1, 100)  // Эллитный моб
            boy:
            COLORMODE(4)
            IF_PICTURE_IN (505,847, 507,847, "ledyanaya1.bmp", -1, 100) // Ледяная стрела 1
               GOTO(aktiv2)
            Else
               COLORMODE(4)
               IF_PICTURE_IN (505,847, 507,847, "ledyanaya2.bmp", -1, 100) // Ледяная стрела 2
                  aktiv2:
                  krug()
                  sharyi()
               Else
                  sharyi()
               END_IF
            END_IF
         Else
            COLORMODE(4)
            IF_PICTURE_IN (745,647, 748,650, "drop.bmp", -1, 100) // Дроп
               KEYPRESS(#F)
               WAITMS(50)
            Else
               COLORMODE(4)
               IF_PICTURE_IN(55,80, 55,81, "min-mp.bmp", -1, 100) // Минимум МП
                  IF($time < $_time_t)
                     WAIT(1)
                     KEYDOWN(#SHIFT)
                     WAITMS(100)
                     KEYPRESS(#8) // Баф на скорость каста
                     WAITMS(50)
                     KEYUP(#SHIFT)
                     WAITMS(1600)
                     $time = $_time_t + 1700
                  END_IF
                  poisk()
               END_IF
            END_IF
         END_IF
      END_IF
   Else
      slepoy boy:
      BEEP(500,200)
      krug()
      KEYPRESS(#2)
      WAITMS(RND(50,100))
   END_IF
END_IF

67
Использование / Что не так?
« on: October 24, 2014, 11:40:13 PM »
Что не так? Почему ошибка эта вылазит?


68
Прочее / Предложение Johnny
« on: October 08, 2014, 12:21:01 PM »
А почему бы Вам не вести платные вебинары, обучающие языку и алгоритмике скриптов?  :)

69
Общие вопросы / Очередной вопрос...
« on: September 23, 2014, 07:48:46 PM »
Ребят, меня сегодня администрация проверяла на бота:



Хорошо, у меня в макросе на чат прописан сигнал... Но вот, что мне пришло в голову. Админы могут пустить подобное сообщение любого цвета. Как сделать так, чтоб сработал сигнал, если в заданной области будет найден ЛЮБОЙ цвет, кроме черного?

70
Общие вопросы / Ребят, опять помощь нужна.
« on: September 22, 2014, 06:17:20 PM »
Code: (clickermann) [Select]
SUB(mouse_move,$MOVE_END_X,$MOVE_END_Y)
   $MOVE_SPEED = 9  // множитель скорости
   
   $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_SPEEDVAR = INT((SQRT($dist))/$MOVE_SPEED)
   
   IF($MOVE_SPEEDVAR < 1)
      $MOVE_SPEEDVAR = 1
   END_IF
   
   $MOVE_step=($dist-1)/$MOVE_SPEEDVAR
   $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, $MOVE_i<INT($MOVE_step))
      $MOVE_X = $MOVE_X + $MOVE_X_step
      $MOVE_Y = $MOVE_Y + $MOVE_Y_step
      MOVE(ROUND($MOVE_X,0), ROUND($MOVE_Y,0))
      WAITMS(1)
   END_CYC
   
   MOVE($MOVE_END_X, $MOVE_END_Y)
END_SUB
           
WAIT(1)

$x=1169
$y=24
MOVE($x-RND(300),$y+RND(50))
WAITMS(50)
LDOWN($_xmouse, $_ymouse)
WAITMS(50)
mouse_move($_xmouse+RND(150),$_ymouse)
WAITMS(1000)
LUP($_xmous, $_ymouse)

Почему в конце не отпускает левую клавишу мыши? И еще вопрос - можно ли ЕЩЕ медленнее мышку как-то сделать? Уж очень быстро она шныряет...

71
В общем ситуация такая. Персонаж бьет моба и кликер смотрит - присутствует ли пиксель ХП моба. Если присутствует, то продолжает бой. Если цвет ХП моба исчезает, то кликер переводит персонажа в режим тайм-аута. У меня несколько раз кликер перевел персонажа в тайм-аут тогда, когда моб еще не был убит. Я никак не мог понять - в чём дело... В конце концов, после того, как кликер теряет моба, я решил поставить команду, чтоб кликер сделал скрин и вот, что он мне выдал:



Теперь проблема стала ясна и передо мной встала задача - как написать такое условие, в котором, если нужный цвет пикселя не найден, то еще секунду, или две продолжался бы поиск и в случае положительного результата, скрипт продолжался бы - продолжился бы бой, а если нужный цвет так и не найдется за эти две секунды, то макрос переводил бы перса в тайм-аут? Надеюсь, что написал понятно.

72
Общие вопросы / Ребят, помогите плиз... :(
« on: September 09, 2014, 09:04:29 AM »
Почему у меня подпрограммы (klich) и (mikctura) не срабатывают? Всю голову уже сломал...

Code: (clickermann) [Select]
SUB(klich)
   IF($time < $_time_t)
      LOGWRITE ("Клич")
      KEYPRESS(189) // Клич
      WAITMS(1150)
      $time = $_time_t + 45
   END_IF
END_SUB

SUB(mikctura)
   IF($time < $_time_t)
      KEYDOWN (16)
      WAITMS (50)
      KEYDOWN (187) // Микстура
      WAITMS (50)
      KEYUP (187)
      KEYUP (16)
      BEEP(800,200)
      WAITMS(500)
      LOGWRITE ("Микстура")
      $time = $_time_t + 10
   END_IF
END_SUB

SUB(udar)
   LOGWRITE ("Удар")
   GETSCREEN
   IF_PIXEL_IN(803,850, 803,850, 16050845)  // Молот
      KEYPRESS(56)
      WAITMS(1250)
   Else
      GETSCREEN
      IF_PIXEL_IN(711,850, 711,850, 723077)  // Вихрь ударов
         KEYPRESS(54)
         WAITMS(1250)
      Else
         GETSCREEN
         IF_PIXEL_IN(670,850, 670,850, 264226)  // Решающий
            KEYPRESS(53)
            WAITMS(1250)
         Else
            GETSCREEN
            IF_PIXEL_IN(506,850, 506,850, 2102876)  // Адреналин
               KEYPRESS(49)
               WAITMS(650)
            Else
               GETSCREEN
               IF_PIXEL_IN(629,850, 629,850, 4563158)  // Тройной 1
                  KEYPRESS(52)
                  WAITMS(650)
               Else
                  GETSCREEN
                  IF_PIXEL_IN(629,850, 629,850, 733864) // Тройной 2
                     KEYPRESS(52)
                     WAITMS(650)
                  Else
                     GETSCREEN
                     IF_PIXEL_IN(629,850, 629,850, 1526137) // Тройной 3
                        KEYPRESS(52)
                        WAITMS(1200)
                     END_IF
                  END_IF
               END_IF
            END_IF
         END_IF
      END_IF
   END_IF
END_SUB

SUB(slepoy boy)
   slepoy boy:
   LOGWRITE ("Слепой бой")
   WAITMS(1250)
   KEYPRESS(52)
   WAITMS(700)
   KEYPRESS(52)
   WAITMS(700)
   KEYPRESS(52)
   GETSCREEN
   IF_PIXEL_IN(33,62, 33,62, 1930288) // Минимум хп
      LOGWRITE ("В слепом бою у перса не минимум хп")
      GOTO(1)
   Else
      BEEP(800,200)
      LOGWRITE ("В слепом бою у перса нет ХП")
      mikctura()
      klich()
      LOGWRITE ("Зацикливаем слепой бой")
      GOTO(slepoy boy)
   END_IF
END_SUB

SUB(boy)
   boy:
   LOGWRITE ("В бою")
   GETSCREEN
   IF_PIXEL_IN(506,63, 506,63, 4539822) // Моб
      // Если Моб висит на персе, сканируем ХП перса
      LOGWRITE ("Моб на персе")
      GETSCREEN
      IF_PIXEL_IN(33,62, 33,62, 1930288) // Минимум хп
         LOGWRITE ("У перса НЕ минимум ХП")
         // Если ХП перса не минимум, то проверяем ХП под клич
         GETSCREEN
         IF_PIXEL_IN(242,63, 242,63, 3379030) // Хп под клич
            LOGWRITE ("ХП достаточно")
            udar()
         Else
            LOGWRITE ("У перса ХП под клич")
            // Если ХП уменьшилось
            klich()
            udar()
         END_IF
      Else
         // Если минимума ХП у перса нет
         LOGWRITE ("У перса ХП под микстуру")
         mikctura() // Пьем микстуру и снова проверяем ХП
         klich()
         GETSCREEN
         IF_PIXEL_IN(33,62, 33,62, 1930288) // Минимум хп
            LOGWRITE ("Хп прибавилось")
            // Если ХП появилось, то бьем
            udar()
         Else
            LOGWRITE ("ХП не прибавилось - переходим в слепой бой")
            // Если ХП не появилось, переходим в слепой бой
            slepoy boy()
         END_IF
      END_IF
   Else
      LOGWRITE ("В бою моб не найден")
      // Если моб не найден, то проверяем минимальное ХП перса
      GETSCREEN
      IF_PIXEL_IN(33,62, 33,62, 1930288) // Минимум хп
         LOGWRITE ("У перса остались ХП и переходим в пункт 1")
         // Если ХП есть, то переходим в режим отдыха
         GOTO(1)
      Else
         LOGWRITE ("ХП нет - в слепой бой")
         // Если ХП нет, то переходим в слепой бой
         slepoy boy()
      END_IF
   END_IF
   GETSCREEN
   IF_PIXEL_IN(506,63, 506,63, 4539822) // Моб
      LOGWRITE ("Моб на персе - зацикливаем бой")
      GOTO(boy)
   END_IF
END_SUB

LOGWRITE ("1")

1:

GETSCREEN
IF_PIXEL_IN(506,63, 506,63, 4539822) // Моб
   LOGWRITE ("На персе моб - в бой")
   boy()
END_IF

Time Out:

GETSCREEN
IF_PIXEL_IN(749,645, 749,645, 16449535) // Дроп
   LOGWRITE ("Дроп")
   KEYPRESS(70)
   WAITMS(1000)
END_IF
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN (2,44, 320,96, "хп-мп.bmp", -1, 100)
   poisk moba:
   KEYPRESS(69) // Таргет
   WAITMS(1000)
   GETSCREEN
   IF_PIXEL_IN(506,63, 506,63, 4539822) // Моб
      GETSCREEN
      IF_PIXEL_IN(844,850, 844,850, 9025437)  // Лассо
         KEYPRESS(57)
         LOGWRITE ("Лассо")
         WAITMS(1850)
         LOGWRITE ("Переходим в бой")
         boy()
      Else
         // Если лассо не найдено, идем на позицию 1
         GOTO(Time Out)
      END_IF
   Else
      // Если не найден моб, то идем на позицию 1
      GOTO(Time Out)
   END_IF
Else
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (1,83, 353,163, "второе дыхание.bmp", -1, 100)
      LOGWRITE ("Бафы в порядке - МП")
      // Если бафы в порядке, пополняем МП
      IF($time < $_time_t)
         KEYDOWN (16)
         WAITMS (50)
         KEYDOWN (48)
         WAITMS (50)
         KEYUP (48)
         KEYUP (16)
         WAITMS(10000)
         $time = $_time_t + 120
      END_IF
   Else
      LOGWRITE ("Бафы закончились - бафаемся")
      // Если бафы закончились. Бафаемся
      KEYDOWN (16)
      WAITMS (50)
      KEYDOWN (189)
      WAITMS (50)
      KEYUP (189)
      KEYUP (16)
      WAITMS(1300)
      KEYDOWN (16)
      WAITMS (50)
      KEYDOWN (187)
      WAITMS (50)
      KEYUP (187)
      KEYUP (16)
      WAITMS(1300)
   END_IF
END_IF

73
Прочее / Предложение по форуму
« on: September 08, 2014, 06:45:02 PM »
Всем привет! Сразу прошу прощения за мою излишнюю разговорчивость )) Во первых хотел бы от души поблагодарить разработчика "Clickermann"-а за то, что не запер свою программку, а выложил в свободное пользование и потдерживает проект дальнейшими разработками. Я давно пользуюсь этим продуктом и даже я, при всей своей неучености (образование - 8 классов интерната и всё), шаг за шагом открывая для себя возможности этой програмки долгое время, нахожу этот продукт довольно простеньким в обращении и при этом выполняющим довольно сложные задачи. То, что для меня пока все же очень сложен язык самих макросов, это разговор отдельный. Это я скорее отношу не к минусу этой програмки, а к недостаткам своего образования. Дак вот... Так же от души хотелось бы поблагодарить ребят, которые БЕЗВОЗДМЕЗДНО дежурят прям на этом форуме и помогают в освоении "Clickermann"-а таким деревянным людям, как я. Среди них хотелось бы выделить "Oraven"-а, "Vint"-а и в последнее время я еще встречаю "aden"-а - ребят, огромное спасибо за помощь. Я понимаю, что "спасибо не булькает", но... Блин... Ну нет у меня пока возможности поблагодарить никого иначе...:( Вот как освою макросы в совершенстве - как начну рубить бабло на просторах интернета...  ;D Ну ладно. Ближе к делу. Прошу прощения за столь лиричное отступление. Давно просто хотел высказать все это. Касаемо предложений... У меня предложение не столь по самому продукту, сколько по сайту. Но предложение, на мой взгляд, облегчило бы поиск нужной информации тут многим. А там хз - вам видней конечно. Я предлагаю сделать на форуме разделы, относящиеся к популярным играм. В них люди могли бы общаться и обмениваться информацией непосредственно ближе к своему направлению эксплуатации "Clickermann"-а. Вот например, сижу я уже которые сутки, пытаясь состряпать не сложного (по функционалу) бота в игре ArcheAge, а так был бы такой раздел, где я мог бы найти единомышленников, с которыми мог бы обменяться какой-то инфой. Где-то свои, худо-бедно-состряпанные скрипты выложить - где-то чьи-то глянуть. Ну и так далее... Нажеюсь, что вы меня поняли. Спс за внимание и прошу прощения за болтливость :)

74
Ребят, обращаюсь к истинным мастерам )) Если кто не знает - mail.ru около пол года назад открыла проект ArcheAge (это онлайн ММОРПГ). В эту игру играет много состоятельных людей. Несостоятельные там просто много не наиграют. Не буду объяснять всю технологию высасывания денег в этой игре. Хотя сам проект как бы условно-бесплатный. Можно бесплатно войти в игру (не оплачивая вип) и "играть". Так вот... Я в этой игре участвовал в ЗБТ (Закрытое Бета Тестирование). Для этой игры запущено аж ДВАДЦАТЬ ЧЕТЫРЕ сервера. Онлайн около 50.000 После старта ОБТ все сервера были наводнены ботами, высасывающими из игры голду. Боты были довольно умные... Сами анализировали свои ХП и МП, юзали разные банки, скилы и так далее. Бегали по локам, искали мобов, ресались в случае слива и так далее. Как я уже сказал, все эти боты были направлены на одну задачу - высасывание из игры голда (игравое золото). Думаю не стОит объяснять, зачем это надо. Многие дельцы на этом не плохо зарабатывают. Дак вот далее... С этой проблемой разработчики игры разобрались. Они сделали так, чтобы фарм мобов ради наживы был не актуален. Опять же не буду сейчас объяснять - каким образом они это сделали. Там вся фишка в игре в ОР - Очки Работы. Я на некоторое время уходил из игры. Недавно я вновь туда наведался и повстречал знакомого, который все это время продолжал играть. Этот знакомый мне рассказал, что после того, как наплыв рабочих ботов ушел, появился человек, разработавший программку (бота), которая очень не плохо выручала людей в прокачке персонажей. То есть - этот бот все так же анализировал свои ХП и МП, юзал скилы, банки и так далее, но уже не столько ради наживы, сколько ради тупо прокачки персонажа, часами фармя все тех-же мобов. А саму программку этот человек начал продавать пользователям игры. Вернее не программку, а возможность ею пользоваться. Клиент оплачивал 100р в месяц и программка работала этот месяц. Человек не просто сделал эту программку, а создал сайт, на котором периодически выпускал обновления этой программы, улучшая ее. По словам моего знакомого, этой программой пользовалось ОЧЕНЬ много народу в игре и mail встрепенулся. Что-то произошло и сервер, через который работала эта программа, перестал работать, а сайт исчез. Кто-то думает, что mail типа наехал на того человека, но я себе это слабо представляю. А вот то, что mail договорился с тем человеком просто - выплатил ему откат, чтобы он просто прекратил свою деятельность, мне представляется очень хорошо )) 50.000 онлайна... Если хоть 10.000 в месяц выплачивали тому человеку по 100р в месяц... Мммм - сладко ))) Представляю себе и ту сумму, которую проплатил майл тому человеку, чтобы он отказался от своей деятельности на серверах ArcheAge...)) Дак вот ребят... Вы тут такие мастера... Я бы на вашем месте уже раздербанил бы этот mail.ru... :)

75
Использование / Как сделать условие?
« on: September 06, 2014, 09:01:46 AM »
Привет, ребят! Посоветуйте плиз, как сделать условие. Например...
Code: (clickermann) [Select]
GETSCREEN
IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
  LCLICK($_return1, $_return2)
END_IF
WAITMS(100)
Как в этом скрипте сделать так, чтобы если пиксель будет найден и произведен по нему клик 5 раз, то срабатывала бы другая команда? Ну, скажем клик по координате ХХХ...

Pages: 1 ... 3 4 [5] 6 7