« previous next »
Pages: [1]

Author Topic: вопрос с как записать что бы...  (Read 5760 times)

0 Members and 1 Guest are viewing this topic.

дед иван

  • Освоившийся
  • **
  • Posts: 53
    • View Profile
вопрос с как записать что бы...
« on: October 07, 2015, 09:59:56 PM »
есть скрипт:
Code: (clickermann) [Select]
GETSCREEN
IF_PICTURE_IN 23,367, 1340,513, "3333.bmp", -1, 80)
   KEYSTRING("33")
   WAITMS(100)
   MCLICK($_xmouse,$_ymouse)
   
   WAITMS(100)
   
   
   
   GETSCREEN                                                                                           //как написать чтобы строки
   COLORMODE(7)                                                                                     //
   
   IF_PICTURE_IN (23,367, 1340,513, "Безымянный1.bmp", -1, 80)           //
      KEYDOWN(72)                                                                                     //
      do:                                                                                                      //
      $check = 0                                                                                           //
      WHILE($check = 0)                                                                             //
         GETSCREEN                                                                                    //
         COLORMODE(7)                                                                             //
         IF_PICTURE_IN (23,367, 1340,513, "Безымянный.bmp", -1, 80)      //
            $check = 1                                                                                 //
            KEYUP(72)                                                                                       //
           
           
         ELSE                                                                                              //
            goto(do)                                                                                 //
         END_IF                                                                                //
      END_CYC                                                                                //
     
     
     
     
     
      GETSCREEN                                                                                //
      COLORMODE(7)                                                                                //
     
      IF_PICTURE_IN (23,367, 1340,513, "Безымянный1.bmp", -1, 80)
         KEYDOWN(71)                                                                                //
         doo:
         $check = 0                                                                                //
         WHILE($check = 0)                                                                                //
            GETSCREEN                                                                                //
            COLORMODE(7)                                                                                //
            IF_PICTURE_IN (23,367, 1340,513, "Безымянный.bmp", -1, 80)                                                                                //
               $check = 1                                                                                //
               KEYUP(71)                                                                                //
               
               
            ELSE                                                                                //
               goto(doo)                                                                                 //
            END_IF                                                                                //
         END_CYC                                                                                //выполнялись до техпор пока не выполнитса условие ниже
         
         GETSCREEN                                                               //вот это условие
         COLORMODE(7)
         IF_PICTURE_IN (23,367, 1340,513, "777.bmp", -1, 80)
            KEYSTRING("  ")
            WAITMS(100)
            KEYSTRING("tt")
            WAITMS(100)
           
         END_IF
         
         
      END_IF
   END_IF
END_IF
END_IF
END_IF
« Last Edit: October 08, 2015, 07:03:15 AM by Oraven »
Logged

дед иван

  • Освоившийся
  • **
  • Posts: 53
    • View Profile
Re: вопрос с как записать что бы...
« Reply #1 on: October 07, 2015, 10:16:03 PM »
имено так кроме 1 картинки которою я неотмечал//
« Last Edit: October 07, 2015, 10:17:53 PM by дед иван »
Logged

дед иван

  • Освоившийся
  • **
  • Posts: 53
    • View Profile
Re: вопрос с как записать что бы...
« Reply #2 on: October 07, 2015, 10:23:58 PM »
спасибо
Logged

дед иван

  • Освоившийся
  • **
  • Posts: 53
    • View Profile
Re: вопрос с как записать что бы...
« Reply #3 on: October 07, 2015, 11:31:23 PM »
нет она нажымает при нахождении одной  картинки а отпускает при нахождении 2 картинки
Logged

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: вопрос с как записать что бы...
« Reply #4 on: October 08, 2015, 07:35:51 AM »
Смысл цикла WHILE($check = 0)
Code: (clickermann) [Select]
do:                                                                                                      //
$check = 0                                                                                           //
WHILE($check = 0)                                                                             //
   GETSCREEN                                                                                    //
   COLORMODE(7)                                                                             //
   IF_PICTURE_IN (23,367, 1340,513, "Áåçûìÿííûé.bmp", -1, 80)      //
      $check = 1                                                                                 //
KEYUP(72)                                                                                       //     
 
   ELSE                                                                                              //
     goto(do)                                                                                 //
   END_IF                                                                                //
END_CYC Повторять поиск пока не найдет картинку. Твои ГОТО здесь не к месту, к тому же выпрыгивать из цикла нельзя.

Вот верный код

Code: (clickermann) [Select]
GETSCREEN
IF_PICTURE_IN 23,367, 1340,513, "3333.bmp", -1, 80)
   KEYSTRING("33")
   WAITMS(100)
   MCLICK($_xmouse,$_ymouse)
   
   WAITMS(100)
   
   $check1 = 0
   WHILE($check1 = 0)
     
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (23,367, 1340,513, "777.bmp", -1, 80)
         $check1 = 1
         KEYSTRING("  ")
         WAITMS(100)
         KEYSTRING("tt")
         WAITMS(100)
         
      ELSE
         
         IF_PICTURE_IN (23,367, 1340,513, "Безымянный1.bmp", -1, 80)
            KEYDOWN(72)
           
            $check = 0
            WHILE($check = 0)
               GETSCREEN
               COLORMODE(7)
               IF_PICTURE_IN (23,367, 1340,513, "Безымянный.bmp", -1, 80)
                  $check = 1
                  KEYUP(72)
                  WAITMS(50)
               ELSE
                  WAITMS(50)
               END_IF
            END_CYC
           
            GETSCREEN
            COLORMODE(7)
            IF_PICTURE_IN (23,367, 1340,513, "Безымянный1.bmp", -1, 80)
               KEYDOWN(71)
               
               $check = 0
               WHILE($check = 0)
                  GETSCREEN
                  COLORMODE(7)
                  IF_PICTURE_IN (23,367, 1340,513, "Безымянный.bmp", -1, 80)
                     $check = 1
                     KEYUP(71)
                     WAITMS(50)
                  ELSE
                     WAITMS(50)
                  END_IF
               END_CYC
               
            END_IF
           
         END_IF
         
      END_IF
      WAITMS(50)
   END_CYC
   
END_IF
WAITMS(50)
Logged

дед иван

  • Освоившийся
  • **
  • Posts: 53
    • View Profile
Re: вопрос с как записать что бы...
« Reply #5 on: October 08, 2015, 10:19:52 PM »
$check1 = 0
WHILE($check1 = 0)
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (505,286,684,371, "777.bmp", 8355711, 80)
      $check1 = 1
      KEYSTRING("  ")
      WAITMS(400)
      KEYSTRING("tt")
      WAITMS(100)
     
   ELSE
     
      IF_PICTURE_IN (23,367, 1340,513, "Безымянный1.bmp", -1, 80)
         KEYDOWN(72)
         
         $check = 0
         WHILE($check = 0)
            GETSCREEN
            COLORMODE(7)
            IF_PICTURE_IN (23,367, 1340,513, "Безымянный.bmp", -1, 80)
               $check = 1
               KEYUP(72)
               
            ELSE
            IF_PICTURE_IN (505,286,684,371, "777.bmp", 8355711, 80)
      $check1 = 1
      KEYSTRING("  ")
      WAITMS(400)
      KEYSTRING("tt")
      WAITMS(100)
            ELSE
                  END_IF     
            END_IF
         END_CYC
         
         GETSCREEN
         COLORMODE(7)
         IF_PICTURE_IN (23,367, 1340,513, "Безымянный1.bmp", -1, 80)
            KEYDOWN(71)
           
            $check = 0
            WHILE($check = 0)
               GETSCREEN
               COLORMODE(7)
               IF_PICTURE_IN (23,367, 1340,513, "Безымянный.bmp", -1, 80)
                  $check = 1
                  KEYUP(71)
                 
               ELSE
             IF_PICTURE_IN (505,286,684,371, "777.bmp", 8355711, 80)
      $check1 = 1
      KEYSTRING("  ")
      WAITMS(400)
      KEYSTRING("tt")
      WAITMS(100)
           ELSE
            END_IF     
               END_IF
            END_CYC
           
         END_IF
         
      END_IF
     
   END_IF
   
END_CYC

END_IF
вот так идеально работает))) спасибо большое
Logged
Pages: [1]
« previous next »