Author Topic: Трофейная рыбалка  (Read 8162 times)

0 Members and 1 Guest are viewing this topic.

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #15 on: June 11, 2018, 12:36:23 AM »
совершенно не хотел вас обидеть. я не скрывал лог с окончанием. скрипт на самом деле выполняет все свои функции. до тех пор пока попадается большая рыба, и обрывается леска тогда удочка становится в положение перед забросом и все...

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #16 on: June 11, 2018, 10:27:00 AM »

увелил время все равно  после обрыва не переходит в начало

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #17 on: June 11, 2018, 11:41:07 AM »

Посмотрите что вы делаете при обрыве и впишите дополнительные команды ниже строки "леска оборвалась".
Сейчас я стараюсь, как могу,  не писать ничего кроме готового кода, так как любую другую помощь школота принимает за поучения...
вписать после"леска оборвалась" или после end_if

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #18 on: June 11, 2018, 02:41:07 PM »
 :D все работает отлично.... спасибо... ;D

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #19 on: June 17, 2018, 09:08:10 PM »
И снова здравствуйте.... сталкнулся ещё с одной проблемой. проблема не кликермана а игры. рыба которую ловлю не ловится все время. и если удочка стоит заброшенной долго то когда снова начинает клевать у меня не клюет надо пере забросить удочку.
помогите поставить условие ... если в течении 25 минут поклевки не произойдет
Code: (clickermann) [Select]
LOGWRITE ("Начинаю цикл")
$check = 0
WHILE($check = 0) // цикл ожидания
   GETSCREEN (629,418,694,478)
   IF_PICTURE_IN (629,418,694,478, "ввв.bmp", -1, 100)   //определение пикселя  кивка донки в зоне поклевки
      $check = 1 // выход из цикла ожидания поклёвки
то долно стработать подтяжка лески
Code: (clickermann) [Select]
LDOWN(783,247)
waitms(50)
MOVE(1214,509)// вывожу курсор за границы экрана игры
wait(10)
lUp(1214,509)// перестаю зажимать ЛКМ
waitms(250)
цикл прервется и вернеться в самое начало на заброс удочки
Code: (clickermann) [Select]
LOGWRITE ("Начало")
MOVE(567,289)
WAIT(1)
lDown(783,247)
waitms(1400)
lUp(783,247)
waitms(3835)// заброс донки полет нормальный

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #20 on: June 18, 2018, 10:18:24 AM »
гляньте плиз чо я тут на воял)))
Code: (clickermann) [Select]
LOGWRITE ("Начало")
MOVE(567,289)
WAIT(1)
lDown(783,247)
waitms(1400)
lUp(783,247)
waitms(3835)// заброс донки полет нормальный

LOGWRITE ("Начинаю цикл")
$time = $_time_t + 1500 // таймер на 25 минут
WHILE($time > $_time_t) // цикл ожидания
   $check = 0
   WHILE($check = 0) // цикл ожидания
      GETSCREEN (629,418,694,478)
      IF_PICTURE_IN (629,418,694,478, "ввв.bmp", -1, 100)   //определение пикселя  кивка донки в зоне поклевки
         $check = 1 // выход из цикла ожидания поклёвки
         LOGWRITE ("Пиксел найден")
         LCLICK(783,247)    // подсечка
         WAIT(1)
         KEYDOWN(#space)
         LDOWN(783,247)
         waitms(50)
         MOVE(1214,509)// вывожу курсор за границы экрана игры
         waitms(250)
         lUp(1214,509)// перестаю зажимать ЛКМ
         waitms(250)
         IF($time ! 0)
            $time = $_time_t + 300 // таймер на 5 минут
            WHILE($time > $_time_t) // цикл ожидания // ожидаю окно продажи с кнопкой продать
               GETSCREEN (871,681, $_xmax,$_ymax)
               IF_PICTURE_IN (871,681, $_xmax,$_ymax, "sell.bmp", -1, 100)
                  LOGWRITE ("Продать")
                  LCLICK($_return1, $_return2)
                  WAITMS(100)
                  $time=0
                  WAIT(10) // продажа рыб
               ELSE
                  waitms(50)
               END_IF
            END_CYC
            IF($time ! 0)
               LOGWRITE ("леска оборвалась")
            END_IF
         ELSE
            waitms(50)
         END_IF
      END_CYC
      LOGWRITE ("Конец")
     

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Трофейная рыбалка
« Reply #21 on: June 18, 2018, 11:14:28 AM »
Скрипт не верен.
Кстати советую использовать 4.13 версию, она просто не даст запустить такое.
« Last Edit: June 18, 2018, 11:19:57 AM by Oraven »

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #22 on: June 20, 2018, 11:31:36 AM »
скажите можно ли привязать работу кликера к игровому времени   от системного времени оно отличается скоростью
« Last Edit: June 20, 2018, 11:33:16 AM by Karabas »

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #23 on: June 21, 2018, 09:21:08 AM »
Code: (clickermann) [Select]
LOGWRITE ("Начало")
MOVE(567,289)
WAIT(1)
lDown(783,247)
waitms(1400)
lUp(783,247)
waitms(3835)// заброс донки полет нормальный

LOGWRITE ("Начинаю цикл")
$time = $_time_t + 1500
WHILE($time > $_time_t)// цикл ожидания
   GETSCREEN (629,418,694,478)
   IF_PICTURE_IN (629,418,694,478, "ввв.bmp", -1, 100)   //определение пикселя  кивка донки в зоне поклевки
      $time=0// выход из цикла ожидания поклёвки
      LOGWRITE ("Пиксел найден")
      LCLICK(783,247)    // подсечка
      WAIT(1)
      KEYDOWN(#space)
      LDOWN(783,247)
      waitms(50)
      MOVE(1214,509)// вывожу курсор за границы экрана игры
      waitms(250)
      lUp(1214,509)// перестаю зажимать ЛКМ
      waitms(250)
      $time = $_time_t + 300 // таймер на 5 минут
      WHILE($time > $_time_t) // цикл ожидания // ожидаю окно продажи с кнопкой продать
         GETSCREEN (871,681, $_xmax,$_ymax)
         IF_PICTURE_IN (871,681, $_xmax,$_ymax, "sell.bmp", -1, 100)
            LOGWRITE ("Продать")
            LCLICK($_return1, $_return2)
            WAITMS(100)
            $time=0
            WAIT(10) // продажа рыб
         ELSE
            waitms(50)
         END_IF
      END_CYC
      IF($time ! 0)
         LOGWRITE ("леска оборвалась")
      END_IF
   ELSE
    LDOWN(783,247)
      waitms(50)
      MOVE(1214,509)// вывожу курсор за границы экрана игры
      wait(10)
      lUp(1214,509)// перестаю зажимать ЛКМ
      waitms(50)
      END_IF
   END_CYC
   LOGWRITE ("Конец")
   
   
а так?
   почему то не ждет

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Трофейная рыбалка
« Reply #24 on: June 21, 2018, 10:09:33 AM »
Почему переменная во внутреннем и внешнем цикле одинаковая?
$time


Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #25 on: June 21, 2018, 10:44:18 AM »
Code: (clickermann) [Select]
LOGWRITE ("Начало")
MOVE(567,289)
WAIT(1)
lDown(783,247)
waitms(1400)
lUp(783,247)
waitms(3835)// заброс донки полет нормальный

LOGWRITE ("Начинаю цикл")
$time = $_time_t + 1500
WHILE($time > $_time_t)// цикл ожидания
   GETSCREEN (629,418,694,478)
   IF_PICTURE_IN (629,418,694,478, "ввв.bmp", -1, 100)   //определение пикселя  кивка донки в зоне поклевки
      $time=1// выход из цикла ожидания поклёвки
      LOGWRITE ("Пиксел найден")
      LCLICK(783,247)    // подсечка
      WAIT(1)
      KEYDOWN(#space)
      LDOWN(783,247)
      waitms(50)
      MOVE(1214,509)// вывожу курсор за границы экрана игры
      waitms(250)
      lUp(1214,509)// перестаю зажимать ЛКМ
      waitms(250)
      $time = $_time_t + 300 // таймер на 5 минут
      WHILE($time > $_time_t) // цикл ожидания // ожидаю окно продажи с кнопкой продать
         GETSCREEN (871,681, $_xmax,$_ymax)
         IF_PICTURE_IN (871,681, $_xmax,$_ymax, "sell.bmp", -1, 100)
            LOGWRITE ("Продать")
            LCLICK($_return1, $_return2)
            WAITMS(100)
            $time=0
            WAIT(10) // продажа рыб
         ELSE
            waitms(50)
         END_IF
      END_CYC
      IF($time ! 0)
         LOGWRITE ("леска оборвалась")
      END_IF
   ELSE
      waitms(50)
      IF($time ! 0)
         LCLICK(783,247)    // подсечка
         WAIT(1)
         LDOWN(783,247)
         waitms(50)
         MOVE(1214,509)
         WAIT(5)
         LOGWRITE ("вытянул")
      END_IF
     
   END_IF
END_CYC
LOGWRITE ("Конец")

10:42:12 Начало
10:42:18 Начинаю цикл
10:42:24 вытянул
10:42:30 вытянул
10:42:36 вытянул
По поводу одинаковой переменной  тоже думал но из-за не знания сделал так
« Last Edit: June 21, 2018, 10:46:06 AM by Karabas »

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #26 on: June 21, 2018, 11:51:23 AM »
Code: (clickermann) [Select]
LOGWRITE ("Начало")
MOVE(567,289)
WAIT(1)
lDown(783,247)
waitms(1400)
lUp(783,247)
waitms(3835)// заброс донки полет нормальный
 
LOGWRITE ("Начинаю цикл")
$time 1 = $_time_t + 1500
WHILE($time  1 > $_time_t)// цикл ожидания
   GETSCREEN (629,418,694,478)
   IF_PICTURE_IN (629,418,694,478, "ввв.bmp", -1, 100)   //определение пикселя  кивка донки в зоне поклевки
      $time 1=1// выход из цикла ожидания поклёвки
      LOGWRITE ("Пиксел найден")
      LCLICK(783,247)    // подсечка
      WAIT(1)
      KEYDOWN(#space)
      LDOWN(783,247)
      waitms(50)
      MOVE(1214,509)// вывожу курсор за границы экрана игры
      waitms(250)
      lUp(1214,509)// перестаю зажимать ЛКМ
      waitms(250)
      $time 2 = $_time_t + 300 // таймер на 5 минут
      WHILE($time 2 > $_time_t) // цикл ожидания // ожидаю окно продажи с кнопкой продать
         GETSCREEN (871,681, $_xmax,$_ymax)
         IF_PICTURE_IN (871,681, $_xmax,$_ymax, "sell.bmp", -1, 100)
            LOGWRITE ("Продать")
            LCLICK($_return1, $_return2)
            WAITMS(100)
            $time 2 =0
            WAIT(10) // продажа рыб
         ELSE
            waitms(50)
         END_IF
      END_CYC
      IF($time ! 0)
         LOGWRITE ("леска оборвалась")
      END_IF
   ELSE
      waitms(50)
      IF($time ! 0)
         LCLICK(783,247)    // подсечка
         WAIT(1)
         LDOWN(783,247)
         waitms(50)
         MOVE(1214,509)
         WAIT(5)
         LOGWRITE ("вытянул")
      END_IF
 
   END_IF
END_CYC
LOGWRITE ("Конец")
 
а так?
« Last Edit: June 21, 2018, 12:00:56 PM by Karabas »

Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #27 on: June 21, 2018, 12:48:49 PM »
не могу понять где ошибка "цикл ожидания" через 6 секунд переходит в "вытянул"
Code: (clickermann) [Select]
LOGWRITE ("Начало")
MOVE(567,289)
WAIT(1)
lDown(783,247)
waitms(1400)
lUp(783,247)
waitms(3835)// заброс донки полет нормальный

LOGWRITE ("Начинаю цикл")
$time 1 = $_time_t + 100
WHILE($time 1 > $_time_t)// цикл ожидания
   GETSCREEN (629,418,694,478)
   IF_PICTURE_IN (629,418,694,478, "ввв.bmp", -1, 100)   //определение пикселя  кивка донки в зоне поклевки
      $time 1 =1// выход из цикла ожидания поклёвки
      LOGWRITE ("Пиксел найден")
      LCLICK(783,247)    // подсечка
      WAIT(1)
      KEYDOWN(#space)
      LDOWN(783,247)
      waitms(50)
      MOVE(1214,509)// вывожу курсор за границы экрана игры
      waitms(250)
      lUp(1214,509)// перестаю зажимать ЛКМ
      waitms(250)
      $time 2 = $_time_t + 300 // таймер на 5 минут
      WHILE($time 2 > $_time_t) // цикл ожидания // ожидаю окно продажи с кнопкой продать
         GETSCREEN (871,681, $_xmax,$_ymax)
         IF_PICTURE_IN (871,681, $_xmax,$_ymax, "sell.bmp", -1, 100)
            LOGWRITE ("Продать")
            LCLICK($_return1, $_return2)
            WAITMS(100)
            $time 2 =0
            WAIT(10) // продажа рыб
         ELSE
            waitms(50)
         END_IF
      END_CYC
      IF($time 2 ! 0)
         LOGWRITE ("леска оборвалась")
      END_IF
     
   ELSE
      waitms(50)
      IF($time 1! 0)
         LCLICK(783,247)    // подсечка
         WAIT(1)
         LDOWN(783,247)
         waitms(50)
         MOVE(1214,509)
         WAIT(5)
         LOGWRITE ("вытянул")
      END_IF
     
   END_IF
END_CYC
LOGWRITE ("Конец")
12:45:23 Начало
12:45:29 Начинаю цикл
12:45:35 вытянул
12:45:41 вытянул

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Трофейная рыбалка
« Reply #28 on: June 21, 2018, 01:50:38 PM »
$time 1 или $time 2 это одно имя $time + мусор в  виде чисел. Пробелов не должно быть.
$time_1, $time_2 или $time1 или $time2


Karabas

  • Освоившийся
  • **
  • Posts: 90
    • View Profile
Re: Трофейная рыбалка
« Reply #29 on: June 21, 2018, 07:38:52 PM »
спасибо работает ;D