Author Topic: Скрипт для рыбалки  (Read 21403 times)

0 Members and 1 Guest are viewing this topic.

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Скрипт для рыбалки
« Reply #90 on: March 05, 2020, 08:49:12 AM »
  telegramm @jackson3704

 email 3311368@gmail.com

 либо сибе на гугл диск   и  суда ссылку

РЕБЯТА  что  по  моему вопросу  предыдущее сообщения
если  есть  возможность  объясни  по  скайпу  что  да  как

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Скрипт для рыбалки
« Reply #91 on: March 05, 2020, 10:38:50 AM »
https://youtu.be/20QRl2uCzO4 ЗАПИСАЛ ВИДЕО    ПРОБЛЕМЫ

Ещё бы у тебя не было проблем. Там код рваными кусками.
Выкладывай код. Мало интереса высматривать в видео что там не так.
В начале виде видно строки 35 и 69  - ДВА ELSE в одном условии.

Время 1:22 строка 64, висящий ELSE вообще не откуда.

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


JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Скрипт для рыбалки
« Reply #92 on: March 06, 2020, 10:03:25 PM »
Code: (clickermann) [Select]
SUB(клик, $x, $y) // подпрограмма
   MOVE($x, $y)
   WAITMS(100)
   LCLICK($x, $y)
   WAITMS(100)
   MOVE($_xmax,$_ymax)
   WAITMS(100)
END_SUB


GETSCREEN(541,164, 1249,708)
LOGWRITE ("гринскрин")

// Колормодим левый нижний кончик бегунка, который выскакивает при вытаскивании рыбы.
COLORMODE(5, 301,298, 304,302)
// Проверяем наличие основной кнопки
$count = PXLCRC (858,634, 868,634)
IF($count = 3082149168)
   LOGWRITE ("Нашел забросить")
   
   IF(($_xmouse ! 980)|($_ymouse ! 648))
      MOVE(980,648)
      LOGWRITE ("Мыщь на месте")
     
   else
      // Забросить
      $count = PXLCRC (875,658, 948,658)
      IF($count = 1235531043)
         LOGWRITE ("Забросить  есть")
         
         IF($zabros_time < $_ms)
            // Забрасываем удочку
            LCLICK(980,648)
            $zabros_time = $_ms+1000
         END_IF
      else
         // Тянуть
         IF($count = 3711560520)
            LOGWRITE ("ТЯНУТЬ нашол")
           
            // Середина бегунка
            $count = PXLCRC (905,400, 921,400)
            IF($count = 2763559492)
               LOGWRITE ("середина  бегунка ")
               
               IF($tyanem_on < $_ms)
                  LDOWN(980,648)
               END_IF
            else
               // Красный и оранжевый пиксель бегунка вытягивания рыбы (которые мы колормодили в начале скрипта)   ВОТ ТУТ И  ЗАСТРЯЛ  ШО  ЗА ПИКСЕЛИ  НЕПОЕИМАЮ
               IF_PIXEL_IN(301,298, 304,302, 2047999,2056191) //    Я  ТАК ПОНЯЛ  ДВА ПИКСЕЛЯ ПОДРЯД  ИЩЕМ  НЕДОГОНЯЮ  КАК ИХ ПОЛУЧИТЬ  ДА И  ЕЩЕ С  КОЛОРМОДОМ
                  LUP($_xmouse,$_ymouse)
                  $tyanem_on = $_ms+200
               else                     
                  LDOWN(980,648)                      //
               END_IF
            END_IF
         else
            LUP($_xmouse,$_ymouse)
         END_IF
      END_IF
   END_IF
else
   // Закрываем все лишние выскочившие окна
   // Улов1
   $count = PXLCRC (653,114, 673,134)
   IF($count = 2117573021)
      IF($ulov1_time < $_ms)
         клик(663, 124)
         $ulov1_time = $_ms+1000
      END_IF
   else
      // Улов2
      IF($count = 1205236069)
         IF($ulov2_time < $_ms)
            клик(663, 124)
            $ulov2_time = $_ms+1000
         END_IF
      else
         // Задание завершено
         $count = PXLCRC (322,450, 345,463)
         IF($count = 348085353)
            IF($zadanie_time < $_ms)
               клик(332, 454)
               $zadanie_time = $_ms+1000
            END_IF
         else
            // Рыба сорвалась
            $count = PXLCRC (393,417, 408,426)
            IF($count = 2638569478)
               IF($feyk_time < $_ms)
                  клик(401, 421)
                  $feyk_time = $_ms+1000
               END_IF
            else
               // Левл
               $count = PXLCRC (533,125, 550,140)
               IF($count = 3199739223)
                  IF($levl_time < $_ms)
                     клик(542, 132)
                     $levl_time = $_ms+1000
                  END_IF
               else
                 
               END_IF
            END_IF
         END_IF
      END_IF
   END_IF
END_IF



WAITMS(50)
  ВОТ  КОД....   щя  немного не  до кодов   машина  поломалась  ремонтом  полностью  занят )  но  я  пытаюсь
если  есть  возможность  объясни  по  скайпу  что  да  как

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Скрипт для рыбалки
« Reply #93 on: March 07, 2020, 11:04:08 AM »
Code: (clickermann) [Select]
SUB(клик, $x, $y) // подпрограмма
   MOVE($x, $y)
   WAITMS(100)
   LCLICK($x, $y)
   WAITMS(100)
   MOVE($_xmax,$_ymax)
   WAITMS(100)
END_SUB


GETSCREEN(541,164, 1249,708)
LOGWRITE ("гринскрин")

// Колормодим левый нижний кончик бегунка, который выскакивает при вытаскивании рыбы.
COLORMODE(5, 301,298, 304,302)
// Проверяем наличие основной кнопки
$count = PXLCRC (858,634, 868,634)
IF($count = 3082149168)
   LOGWRITE ("Нашел забросить")
   
   IF(($_xmouse ! 980)|($_ymouse ! 648))
      MOVE(980,648)
      LOGWRITE ("Мыщь на месте")
     
   else
      // Забросить
      $count = PXLCRC (875,658, 948,658)
      IF($count = 1235531043)
         LOGWRITE ("Забросить  есть")
         
         IF($zabros_time < $_ms)
            // Забрасываем удочку
            LCLICK(980,648)
            $zabros_time = $_ms+1000
         END_IF
      else
         // Тянуть
         IF($count = 3711560520)
            LOGWRITE ("ТЯНУТЬ нашол")
           
            // Середина бегунка
            $count = PXLCRC (905,400, 921,400)
            IF($count = 2763559492)
               LOGWRITE ("середина  бегунка ")
               
               IF($tyanem_on < $_ms)
                  LDOWN(980,648)
               END_IF
            else
               // Красный и оранжевый пиксель бегунка вытягивания рыбы (которые мы колормодили в начале скрипта)   ВОТ ТУТ И  ЗАСТРЯЛ  ШО  ЗА ПИКСЕЛИ  НЕПОЕИМАЮ
               IF_PIXEL_IN(301,298, 304,302, 2047999,2056191) //    Я  ТАК ПОНЯЛ  ДВА ПИКСЕЛЯ ПОДРЯД  ИЩЕМ  НЕДОГОНЯЮ  КАК ИХ ПОЛУЧИТЬ  ДА И  ЕЩЕ С  КОЛОРМОДОМ
                  LUP($_xmouse,$_ymouse)
                  $tyanem_on = $_ms+200
               else                     
                  LDOWN(980,648)                      //
               END_IF
            END_IF
         else
            LUP($_xmouse,$_ymouse)
         END_IF
      END_IF
   END_IF
else
   // Закрываем все лишние выскочившие окна
   // Улов1
   $count = PXLCRC (653,114, 673,134)
   IF($count = 2117573021)
      IF($ulov1_time < $_ms)
         клик(663, 124)
         $ulov1_time = $_ms+1000
      END_IF
   else
      // Улов2
      IF($count = 1205236069)
         IF($ulov2_time < $_ms)
            клик(663, 124)
            $ulov2_time = $_ms+1000
         END_IF
      else
         // Задание завершено
         $count = PXLCRC (322,450, 345,463)
         IF($count = 348085353)
            IF($zadanie_time < $_ms)
               клик(332, 454)
               $zadanie_time = $_ms+1000
            END_IF
         else
            // Рыба сорвалась
            $count = PXLCRC (393,417, 408,426)
            IF($count = 2638569478)
               IF($feyk_time < $_ms)
                  клик(401, 421)
                  $feyk_time = $_ms+1000
               END_IF
            else
               // Левл
               $count = PXLCRC (533,125, 550,140)
               IF($count = 3199739223)
                  IF($levl_time < $_ms)
                     клик(542, 132)
                     $levl_time = $_ms+1000
                  END_IF
               else
                 
               END_IF
            END_IF
         END_IF
      END_IF
   END_IF
END_IF



WAITMS(50)
  ВОТ  КОД....   щя  немного не  до кодов   машина  поломалась  ремонтом  полностью  занят )  но  я  пытаюсь

Ты похоже логику скрипта вообще не понимаешь... Ты задумайся - оно тебе надо вообще...?
Во первых, 19 строка - "Нашел забросить"... Ты там не "забросить" находишь на самом деле, а просто распознаешь кнопку. А "забросить" она, или "тянуть" - ты узнаешь позже.
Во вторых , 23 строка - "Мыщь на месте"... Это строка у тебя должна быть ниже, после 25 (после else), а там, где она у тебя сейчас, там как раз мышь была не на месте и мы ее двигали.
Ты так сам себя путаешь. Ты, либо пытайся понять алгоритм скрипта изначально, а потом уже будешь ковыряться с пикселями, либо просто забрось это дело.
Дальше скрипт я просто не стал читать - сорри...
Я не ду... Потому и не бу...

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Скрипт для рыбалки
« Reply #94 on: March 14, 2020, 10:55:42 AM »
И так   в   проблемы  на  том  же  месте скрип доходит  до  средина  бегунка...и   тянет  не отпуская     в 14  строке   левый  кончик  может   правй?????   
дето вы  меня   напутали.....
HITO будь  ты  человеком   доведи меня  до конца  ну    не  понимаю  хоть убей.... не    тянит  рыбу  и ппц
Code: (clickermann) [Select]
SUB(клик, $x, $y) // подпрограмма
   MOVE($x, $y)
   WAITMS(100)
   LCLICK($x, $y)
   WAITMS(100)
   MOVE($_xmax,$_ymax)
   WAITMS(100)
END_SUB


GETSCREEN(541,164, 1249,708)
LOGWRITE ("гринскрин")

// Колормодим левый нижний кончик бегунка, который выскакивает при вытаскивании рыбы.
COLORMODE(5, 301,298, 304,302)
// Проверяем наличие основной кнопки
$count = PXLCRC (841,638, 982,638)
IF($count = 2530869496)
   LOGWRITE ("Нашел забросить")
   
   IF(($_xmouse ! 980)|($_ymouse ! 648))
      MOVE(980,648)
      LOGWRITE ("Мыщь на месте")
     
   else
      // Забросить
      $count = PXLCRC (880,666, 928,666)
      IF($count = 2759833793)
         LOGWRITE ("Забросить  есть")
         
         IF($zabros_time < $_ms)
            // Забрасываем удочку
            LCLICK(980,648)
            $zabros_time = $_ms+1000
         END_IF
      else
         // Тянуть
         IF($count = 1383316320)
            LOGWRITE ("ТЯНУТЬ нашол")
           
            // Середина бегунка
            $count = PXLCRC (905,400, 921,400)
            IF($count = 2530178584)
               LOGWRITE ("середина  бегунка ")
               
               IF($tyanem_on < $_ms)
                  LDOWN(980,648)
               END_IF
            else
               // Красный и оранжевый пиксель бегунка вытягивания рыбы (которые мы колормодили в начале скрипта)   ВОТ ТУТ И  ЗАСТРЯЛ  ШО  ЗА ПИКСЕЛИ  НЕПОЕИМАЮ
               IF_PIXEL_IN(301,298, 304,302, 2047999,2056191) //    Я  ТАК ПОНЯЛ  ДВА ПИКСЕЛЯ ПОДРЯД  ИЩЕМ  НЕДОГОНЯЮ  КАК ИХ ПОЛУЧИТЬ  ДА И  ЕЩЕ С  КОЛОРМОДОМ
                  LUP($_xmouse,$_ymouse)
                  $tyanem_on = $_ms+200
               else                     
                  LDOWN(980,648)                      //
               END_IF
            END_IF
         else
            LUP($_xmouse,$_ymouse)
         END_IF
      END_IF
   END_IF
else
   // Закрываем все лишние выскочившие окна
   // Улов1
   $count = PXLCRC (653,114, 673,134)
   IF($count = 2117573021)
      IF($ulov1_time < $_ms)
         клик(663, 124)
         $ulov1_time = $_ms+1000
      END_IF
   else
      // Улов2
      IF($count = 1205236069)
         IF($ulov2_time < $_ms)
            клик(663, 124)
            $ulov2_time = $_ms+1000
         END_IF
      else
         // Задание завершено
         $count = PXLCRC (322,450, 345,463)
         IF($count = 348085353)
            IF($zadanie_time < $_ms)
               клик(332, 454)
               $zadanie_time = $_ms+1000
            END_IF
         else
            // Рыба сорвалась
            $count = PXLCRC (393,417, 408,426)
            IF($count = 2638569478)
               IF($feyk_time < $_ms)
                  клик(401, 421)
                  $feyk_time = $_ms+1000
               END_IF
            else
               // Левл
               $count = PXLCRC (533,125, 550,140)
               IF($count = 3199739223)
                  IF($levl_time < $_ms)
                     клик(542, 132)
                     $levl_time = $_ms+1000
                  END_IF
               else
                 
               END_IF
            END_IF
         END_IF
      END_IF
   END_IF
END_IF



WAITMS(50)
« Last Edit: March 14, 2020, 04:00:12 PM by JacsoN »
если  есть  возможность  объясни  по  скайпу  что  да  как

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Скрипт для рыбалки
« Reply #95 on: March 14, 2020, 09:23:47 PM »
И так   в   проблемы  на  том  же  месте скрип доходит  до  средина  бегунка...и   тянет  не отпуская
Он у тебя и будет тянуть неотпуская, так как он у тебя не видит, что бегунок появился:
Code: (clickermann) [Select]
// Красный и оранжевый пиксель бегунка вытягивания рыбы (которые мы колормодили в начале скрипта)   ВОТ ТУТ И  ЗАСТРЯЛ  ШО  ЗА ПИКСЕЛИ  НЕПОЕИМАЮ
IF_PIXEL_IN(301,298, 304,302, 2047999,2056191) //    Я  ТАК ПОНЯЛ  ДВА ПИКСЕЛЯ ПОДРЯД  ИЩЕМ  НЕДОГОНЯЮ  КАК ИХ ПОЛУЧИТЬ  ДА И  ЕЩЕ С  КОЛОРМОДОМ
Пилять... Левый кончик бегунка! Там, где он красный! Как он появляется, скрипт "видит", что бегунок появился!
И как он его увидит, он начинает ориентироваться на:
Code: (clickermann) [Select]
// Середина бегунка
$count = PXLCRC (905,400, 921,400)
IF($count = 2530178584)
Это чуть правее середины бегунка (данные снимать, пока он серый).
Накуй тебе скрипты писать? Играй в шахматы!
« Last Edit: March 14, 2020, 09:26:06 PM by Hito »
Я не ду... Потому и не бу...

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Скрипт для рыбалки
« Reply #96 on: March 15, 2020, 01:17:30 AM »
спасибо  твои труды  были  не напрасны   у  меня  получилось ! ! !
если  есть  возможность  объясни  по  скайпу  что  да  как

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Скрипт для рыбалки
« Reply #97 on: March 15, 2020, 08:43:47 AM »
спасибо  твои труды  были  не напрасны   у  меня  получилось ! ! !
Если что, прости за наезды... Сам тут форум третировал не раз  :) Просто я человек такой. Сам третирую, а потом ору на других... :-[
Я не ду... Потому и не бу...

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: Скрипт для рыбалки
« Reply #98 on: March 15, 2020, 09:13:13 AM »
все   нормально  ну   я   некоторые  вещи досихпор не  понимаю)) например  SUB   какую  роль  он  тут  играет ))) так  что  тут пол  форума таких))))
если  есть  возможность  объясни  по  скайпу  что  да  как