Author Topic: Помогите разобраться выполнение действия пока условие верно  (Read 1046 times)

0 Members and 1 Guest are viewing this topic.

Hooligan

  • Освоившийся
  • **
  • Posts: 26
    • View Profile
Code: (clickermann) [Select]
SUB(ПОИСК ФОНТАНА)
   сброс()
   на карту()
   сброс()
   
   WAITMS(500)
   MOVE(266,280)
   WAITMS(500)
   LDOWN(266,280)
   WAITMS(500)
   m_move(266,66)
   WAITMS(500)
   LUP(266,66)
   WAITMS(3000)
   
   $time = $_time_t + 15
   WHILE($time > $_time_t)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (150,220, 330,410, "banner free wishes.bmp", -1, 60)
         $time = 0
         WAITMS(500)
         LCLICK($_return1+2, $_return2+5)
         WAITMS(500)
      ELSE
         print("Не нашел картинку")
         сброс()
         WAITMS(500)
      END_IF
   END_CYC
   IF($time ! 0)
      // время истекло, картинка не найдена
   END_IF
END_SUB

//=============================================

SUB(СБОР БЕСПЛАТНЫХ ЖЕЛАНИЙ)
   ПОИСК ФОНТАНА()
   
   $time = $_time_t + 10 // таймер на 10 секунд
   WHILE($time > $_time_t)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (231,420, 354,515, "gold in the fountain.bmp", -1, 60)
         WAITMS(1500)
      ELSE
         IF_PICTURE_IN (231,420, 354,515, "mithril in the fountain.bmp", -1, 60)
            $time = 0
            LCLICK($_return1+50, $_return2)
            WAITMS(500)
         ELSE
            print("Не нашел картинку")
            сброс()
            WAITMS(500)
         END_IF
      END_IF
   END_CYC
   IF($time ! 0)
      // время истекло, картинка не найдена
   END_IF
END_SUB


Суть такова. Нахожу фонтан желаний. Захожу в него. Там есть суточный лимит бесплатных желаний. Количество желаний может быть каждый раз разным. Нужно что производился сбор бесплатных желаний и как только появятся желания за золото цикл прекращался.
Заранее спасибо )
« Last Edit: November 15, 2018, 07:33:16 AM by Hooligan »

Hooligan

  • Освоившийся
  • **
  • Posts: 26
    • View Profile
Code: (clickermann) [Select]
SUB(ФОНТАН)
   сброс()
   на карту()
   сброс()
   
   $time = $_time_t + 10
   WHILE($time > $_time_t)
     
      WAITMS(500)
      MOVE(266,280)
      WAITMS(500)
      LDOWN(266,280)
      WAITMS(500)
      m_move(266,66)
      WAITMS(500)
      LUP(266,66)
      WAITMS(3000)
     
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (150,220, 330,410, "banner free wishes.bmp", -1, 60)
         $time = 0
         WAITMS(500)
         LCLICK($_return1+2, $_return2+5)
         WAITMS(500)
      ELSE
         print("Нет бесплатных желаний в фонтане")
      END_IF
     
      GETSCREEN
      COLORMODE(6)
      повтор сбора:
      IF_PICTURE_IN (231,420, 354,515, "gold in the fountain.bmp", -1, 60)
         WAITMS(2000)
         сброс()
      ELSE
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (355,193, 400,250, "fountain.bmp", -1, 60)
            IF_PICTURE_IN (231,420, 354,515, "mithril in the fountain.bmp", -1, 60)
               LCLICK($_return1+50, $_return2)
               WAITMS(2500)
               goto(повтор сбора)
            ELSE
               print("Не нашел картинку")
               сброс()
               WAITMS(500)
            END_IF
         END_IF
      END_IF
   END_CYC
END_SUB

Чуть подшаманил) Верно ?