Не переходит дальше,помогите

[sanek83]

Code: (clickermann) [Select]

SUB(vixod)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "vixod.bmp", -1, 95) // ищем выход
         LCLICK($_return1+3, $_return2+3)
         WAIT(1)
         $check = 1
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
END_SUB

SUB(afk)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "afk.bmp", -1, 95) // ставим афк
         LCLICK($_return1+5, $_return2+5)
         WAITMS(50)
         LOGWRITE ("поставил на афк")
         $check = 1
      ELSE
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (0,0, $_xmax,$_ymax, "afk1.bmp", -1, 95) // галка стоит
            WAITMS(50)
            LOGWRITE ("афк включено")
            $check = 1
         END_IF
      ELSE
         WAITMS(50)
         LOGWRITE ("не нашел кнопку")
      END_IF
   END_CYC
END_SUB



$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "mifsrej.bmp", -1, 95) //
      LCLICK($_return1+60, $_return2+10) //
      WAITMS(500)
      LOGWRITE ("нашел сражение")
      $check = 1
      krest2()
     
      FOR($a=0,$a<10)// _______________________________делает 10 раз и застревает не делает суб выход
         $check = 0
         WHILE($check = 0)
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (0,0, $_xmax,$_ymax, "liger.bmp", -1, 95) //
               move($_return1-80, $_return2-80)
               WAITMS(50)
               LCLICK($_return1-80, $_return2-80)
               WAITMS(50)
               LOGWRITE ("нашел лигер")
               $check = 1
               afk() //
            ELSE
               WAITMS(50)
               LOGWRITE ("no картинки лигер")
            END_IF
         END_CYC
      END_CYC
     
      vixod()// _______________________вот сюда не идет
     
   ELSE
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "srajnegorit.bmp", -1, 95) // ищем сражение
         LCLICK($_return1+60, $_return2+10) //
         WAITMS(500)
         LOGWRITE ("сражение не горит")
         $check = 1
         WAITMS(50)
         LOGWRITE ("no картинка сражение не горит")
      END_IF
   ELSE
      WAITMS(50)
   END_IF
END_CYC.......
11:01:06 no картинки лигер
11:01:18 no картинки лигер
11:01:26 нашел лигер
11:02:29 афк включено
11:02:41 no картинки лигер
11:02:50 нашел лигер
11:02:56 афк включено
11:03:08 no картинки лигер
11:04:04 нашел лигер
11:04:10 афк включено
10 раз сделал на суб выход не идет почему то ?
Помогите советом пожалуйста

[Oraven]

Ошибки. Два ELSE в одном условии. Строки 26 34 и 76 87

[sanek83]

я и не знал что нельзя два елзе в одном условии спасибо

[sanek83]

Не судите строго, я не очень разбираюсь.Тут не весь скрипт по этому суб крест нету.
Задумка была такая: заходим в локацию проверяем наличие картинки mifsrej.bmp(Если есть выполняем 10 раз...) если ее нет проверяем наличие другой(srajnegorit.bmp) если горит то выходим, если нет обоих значит не погрузилась повторяем поиск с начало.

[sanek83]

Code: [Select]

SUB(afk)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "afk.bmp", -1, 95) // ñòàâèì àôê
         LCLICK($_return1+5, $_return2+5)
         WAITMS(50)
         LOGWRITE ("ïîñòàâèë íà àôê")
         $check = 1
      ELSE
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (0,0, $_xmax,$_ymax, "afk1.bmp", -1, 95) // ãàëêà ñòîèò
            WAITMS(50)
            LOGWRITE ("àôê âêëþ÷åíî")
            $check = 1
         END_IF
      ELSE
         WAITMS(50)
         LOGWRITE ("íå íàøåë êíîïêó")
      END_IF
   END_CYC
END_SUB
Тут тоже не будет работать?Подскажите пожалуйста.
Мысль такая же если есть то хорошо если нет то проверяем другую(нашли идем дальше) а нету двоих картинок повторяем сначала.

[sanek83]

Спасибо огромное!!!! буду переделывать

[sanek83]

Code: [Select]

GETSCREEN
   COLORMODE(6)
   SCANPICTURE($ARR_SCAN, 0,0, $_xmax,$_ymax, "krest.bmp", -1,95)
   FOR($ARR_NUM=0,$ARR_NUM<ARRSIZE($ARR_SCAN),2)
      LCLICK($ARR_SCAN[$ARR_NUM]+9, $ARR_SCAN[$ARR_NUM+1]+9)   // Клик  на все крестики
      WAITMS(500)
      UNDEFINE($ARR_SCAN)
      END_CYCА можно вот в такой код применить ELSE?

 

Code: [Select]

$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   SCANPICTURE($ARR_SCAN, 0,0, $_xmax,$_ymax, "krest.bmp", -1,95)
   FOR($ARR_NUM=0,$ARR_NUM<ARRSIZE($ARR_SCAN),2)
      LCLICK($ARR_SCAN[$ARR_NUM]+9, $ARR_SCAN[$ARR_NUM+1]+9)   // Клик  на все крестики
      WAITMS(500)
      UNDEFINE($ARR_SCAN)
     
      $check = 1
   ELSE
      WAITMS(50)
   END_CYC
END_CYC
Вот так например?

[open_78]

А можно вот в такой код применить ELSE?

А нафига ? ? ?  Где логика? 

[sanek83]

могут не появиться нужно ждать, если с одной картинкой мне понятно как сделать,а вот если их много сразу появляется и на них всех нужно пронажимать.

[Oraven]

Правильный код

Code: (clickermann) [Select]

$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   SCANPICTURE($ARR_SCAN, 0,0, $_xmax,$_ymax, "krest.bmp", -1,95)
   FOR($ARR_NUM=0,$ARR_NUM<ARRSIZE($ARR_SCAN),2)
      LCLICK($ARR_SCAN[$ARR_NUM]+9, $ARR_SCAN[$ARR_NUM+1]+9)   // Клик  на все крестики
      WAITMS(500)
      $check = 1
   END_CYC
   WAITMS(50)
END_CYC
UNDEFINE($ARR_SCAN)

[sanek83]

Oraven красавчик все робит СПАСИБО!