« previous next »
Pages: 1 2 3 [4] 5 6 7

Author Topic: Игра  (Read 92185 times)

0 Members and 1 Guest are viewing this topic.

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #45 on: April 15, 2020, 04:20:08 AM »
подправил картинку на пиксель, правда возможно команда GETSCREEN там лишняя 39 и 56 строка, прошу помочь
Code: (clickermann) [Select]
#name "Обрезание v2.0"

SUB(клик,$par1,$par2,$par3) // подпрограмма с параметрами
   LCLICK($par1,$par2)
   WAITMS($par3)
END_SUB
SUB(картинка,$par4,$par5,$par6,$par7,$par8,$par9,$par10,$par11)
   GETSCREEN($par4,$par5,$par6,$par7)
   IF_PICTURE_IN ($par4,$par5,$par6,$par7,$par8, -1, 100)
      $check = 1
      клик($_return1+$par9,$_return2+$par10)
      WAITMS($par11)
   END_IF
END_SUB
SUB(ожидание_картинки,$par21,$par22,$par23,$par24,$par25,$par26,$par27,$par28,$par29)
   $check = 0
   WHILE($check = 0)
      GETSCREEN($par21,$par22,$par23,$par24)
      IF_PICTURE_IN ($par21,$par22,$par23,$par24,$par25, -1,$par26)
         $check = 1
         клик($_return1+$par27,$_return2+$par28)
         WAITMS($par29)
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
клик(1271,1002,1000)
DBLCLICK(635,30)
WAIT(30)
клик(64,14,1000)
клик(228,17,1000)
MCLICK(285,128)
WAIT(2)
клик(267,15,3000)
WHILE($var666 < 777)
   GETSCREEN(910,220, 975,270)
   IF_PIXEL_IN(910,220, 975,270, 16777215)
      клик($_return1, $_return2,500)
   END_IF
   WAIT(45)
   GETSCREEN(1057,637, 1134,724)
   IF_PICTURE_IN (1057,637, 1134,724, "12.bmp", - 1, 100)
      клик($_return1+15,$_return2+15,1000)
   ELSE
      $check = 0
      WHILE($check = 0)
         KEYPRESS(#F5)  // обновить страницу
         WAIT(45)
         картинка(1057,637,1134,724,"12.bmp",15,15,1000)
      END_CYC
   END_IF
   WAIT(3)
   GETSCREEN(1010,125, 1279,250)
   IF_PIXEL_IN(1010,125, 1279,250, 16777215)
      клик($_return1, $_return2,500)
   END_IF
   картинка(1004,351,1058,402,"14.bmp",2,2,500)
   клик(557,572,500)
   картинка(528,590,634,637,"15.bmp",2,2,500)
   WAIT(3)
   клик(599,136,1000)
   клик(1106,140,1000)
   клик(995,299,1000)
   клик(938,321,5000)
   клик(1142,189,5000)
   клик(249,499,5000)
   клик(912,676,1000)
   клик(406,295,1000)
   клик(478,768,1000)
   клик(588,615,8000)
   клик(527,298,1000)
   клик(518,480,1000)
   клик(564,695,1000)
   клик(654,298,1000)
   клик(571,420,1000)
   клик(597,610,1000)
   клик(759,448,1000)
   клик(1113,258,1000)
   картинка(352, 72, 914, 460, "1.bmp",15,15, 1000)
   картинка(274, 302, 993, 770, "2.bmp",0,0, 8000)
   ожидание_картинки(274,302,993,770,"3.bmp",90,0,0,1000)
   картинка(274, 302, 993, 770, "4.bmp",0,0, 1000)
   клик(643,450,1000)  // клик между 1
   KEYPRESS(#9)
   WAITMS(1000)
   картинка(274, 302, 993, 770, "5.bmp",0,0, 1000)
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "6.bmp", - 1, 100)
      клик($_return1, $_return2,1000)  // клик по картинке 6
      клик(995,299,1000)  // закрыть
   END_IF
   WAIT(1)
   картинка(352, 76, 914, 460, "7.bmp",15,15,1000)
   
   GETSCREEN(274, 268, 990, 807)
   IF_PICTURE_IN (546, 589, 580, 620, "8.bmp", - 1, 100)//
      клик($_return1+2, $_return2+2,1000)
      клик(567,603,1000)  //
   END_IF
   
   GETSCREEN(274, 268, 990, 807)
   IF_PICTURE_IN (666, 661, 821, 741, "9.bmp", - 1, 100)//
      клик($_return1+5, $_return2+5,1000)
      GETSCREEN(274, 268, 990, 807)
      IF_PICTURE_IN (809, 661, 955, 741, "10.bmp", - 1, 100)//
         клик($_return1+5, $_return2+5,2000)
         картинка(1192, 73, 1279, 155, "11.bmp",5,5,1000)//
      END_IF
   END_IF
   
   WAIT(1)
   KEYPRESS(#B)
   WAIT(3)
   GETSCREEN(3, 75, 865, 792)
   IF_PICTURE_IN (3, 75, 865, 792, "200.bmp", - 1, 100)
      DBLCLICK($_return1+15, $_return2+15)
      WAIT(1)
      клик(595,599,100)  //
   END_IF
   GETSCREEN(3, 75, 865, 792)
   IF_PICTURE_IN (3, 75, 865, 792, "201.bmp", - 1, 100)
      MOVE($_return1+15, $_return2+15)
      WAIT(1)
      IF(FExists(STRCONCAT("E:\files\twin\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
         FCreate(STRCONCAT("E:\files\twin\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin\6-11-2019  на сегодняшний день
      END_IF
      SCREENSHOTFIX(3, 75, 865, 678,STRCONCAT ("E:\files\twin\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
      inc($n)
   END_IF
   клик(864,282,1000)
   клик(1130,144,1000)
   клик(469,735,1000)
   клик(770,732,1000)
   клик(770,732,1000)
   клик(382,17,1000)
   MCLICK(400,128)
   WAIT(1)
   клик(267,15,3000)
END_CYC
Logged

Чольшой Блен

  • Зашел в гости
  • *
  • Posts: 13
    • View Profile
Re:Здесь точно, кто-то лишний!
« Reply #46 on: April 15, 2020, 08:15:02 AM »
после трёхсекундных пауз обновление графики лишним не бывает.
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re:Обрезание v 2.0
« Reply #47 on: April 16, 2020, 11:46:16 AM »
Quote from: kiril on April 14, 2020, 11:43:17 AM
Сам успел сообразить про аккаунт, пока код менял )))
Спасибо за верные замечания, косяк в новой версии устранён.
Просто одновременно куча больших и разнозадачных кодов в работе, голова всё старается сделать по шаблонам, не вдаваясь в мелочи которые всегда легко исправить.  :o
не могу понять, в подпрограмме прописано делать скриншот заданной области, и поиск картинки клик по ней со смещением.  картинку 1 находит кликает по ней, а дальше проскакивает и кликает по картинке 3, снова проскакивает до клика "между 1"
Code: (clickermann) [Select]
SUB(клик,$par1,$par2,$par3) // подпрограмма с параметрами
   LCLICK($par1,$par2)
   WAITMS($par3)
END_SUB
SUB(картинка,$par4,$par5,$par6,$par7,$par8,$par9,$par10,$par11)
   GETSCREEN($par4,$par5,$par6,$par7)
   IF_PICTURE_IN ($par4,$par5,$par6,$par7,$par8, -1, 100)
      $check = 1
      клик($_return1+$par9,$_return2+$par10)
      WAITMS($par11)
   END_IF
END_SUB
SUB(ожидание_картинки,$par21,$par22,$par23,$par24,$par25,$par26,$par27,$par28,$par29)
   $check = 0
   WHILE($check = 0)
      GETSCREEN($par21,$par22,$par23,$par24)
      IF_PICTURE_IN ($par21,$par22,$par23,$par24,$par25, -1,$par26)
         $check = 1
         клик($_return1+$par27,$_return2+$par28)
         WAITMS($par29)
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
картинка(352, 72, 914, 460, "1.bmp",15,15, 1000)
картинка(532, 220, 971, 414, "2.bmp",0,0, 8000)
ожидание_картинки(274, 187, 993, 661,"3.bmp",90,0,0,1000)
картинка(274, 187, 993, 661, "4.bmp",0,0, 1000)
клик(657,341,1000)  // клик между 1
//KEYPRESS(#9)
WAITMS(1000)
картинка(274, 187, 993, 661, "5.bmp",0,0, 1000)
GETSCREEN(274, 187, 993, 661)
IF_PICTURE_IN (274, 187, 993, 661, "6.bmp", - 1, 100)
   клик($_return1, $_return2,1000)  // клик по картинке 6
   клик(995,188,1000)  // закрыть
END_IF
WAIT(1)
Logged

Чольшой Блен

  • Зашел в гости
  • *
  • Posts: 13
    • View Profile
Re: Игра
« Reply #48 on: April 16, 2020, 01:31:28 PM »
Уменьшайте процент совпадения картинок, пересохраните ту, которая не находится.
« Last Edit: April 16, 2020, 01:33:29 PM by Чольшой Блен »
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #49 on: April 16, 2020, 01:51:07 PM »
находятся все картинки, почему то не срабатывает в подпрограмме par11, задержки, если ставить задержку больше ничего не меняет, но если ниже после картинки поставить задержку, все работает
« Last Edit: April 16, 2020, 01:57:54 PM by Viktor77 »
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Обрезание v3.0
« Reply #50 on: April 18, 2020, 02:06:00 PM »
Quote from: kiril on April 16, 2020, 10:31:53 PM
не хватало заявленного параметра, при вызове подпрограммы клик внутри поиска картинок.
ожидание_картинки не сработает, если не будет клика в другой области. там есть else, если не найдена делает клик и те же самые действия.
Code: (clickermann) [Select]
GETSCREEN(352, 72, 914, 460)
IF_PICTURE_IN (352, 72, 914, 460, "1.bmp", - 1, 100)
   LCLICK($_return1+15, $_return2+15)
   WAITMS(1000)
END_IF
GETSCREEN(274, 302, 993, 770)
IF_PICTURE_IN (274, 302, 993, 770, "2.bmp", - 1, 100)
   LCLICK($_return1, $_return2)
   WAIT(8)
END_IF
GETSCREEN(274, 302, 993, 770)
IF_PICTURE_IN (274, 302, 993, 770, "3.bmp", - 1, 90)
   // если найдена
   LCLICK($_return1, $_return2)  // клик по картинке 3
   WAITMS(1000)
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "4.bmp", - 1, 100)
      LCLICK($_return1, $_return2)  //клик по картинке 4
      WAITMS(1000)
   END_IF
   LCLICK(643,450)  // клик между 1
   WAITMS(1000)
   KEYPRESS(#9)
   WAITMS(1000)
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "5.bmp", - 1, 100)
      LCLICK($_return1, $_return2)  //клик по картинке 5
      WAITMS(1000)
   END_IF
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "6.bmp", - 1, 100)
      LCLICK($_return1, $_return2)  // клик по картинке 6
      WAITMS(1000)
      LCLICK(995,299)  // закрыть
      WAITMS(1000)
   END_IF
ELSE
   // если не найдена
   LCLICK(309,724) // сменить главу 7
   WAITMS(1000)
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "3.bmp", - 1, 90)
      // если найдена
      LCLICK($_return1, $_return2)  // клик по картинке 3
      WAITMS(1000)
      GETSCREEN(274, 302, 993, 770)
      IF_PICTURE_IN (274, 302, 993, 770, "4.bmp", - 1, 100)
         LCLICK($_return1, $_return2)  //клик по картинке 4
         WAITMS(1000)
      END_IF
      LCLICK(643,450)  // клик между 1
      WAITMS(1000)
      KEYPRESS(#9)
      WAITMS(1000)
      GETSCREEN(274, 302, 993, 770)
      IF_PICTURE_IN (274, 302, 993, 770, "5.bmp", - 1, 100)
         LCLICK($_return1, $_return2)  //клик по картинке 5
         WAITMS(1000)
      END_IF
      GETSCREEN(274, 302, 993, 770)
      IF_PICTURE_IN (274, 302, 993, 770, "6.bmp", - 1, 100)
         LCLICK($_return1, $_return2)  // клик по картинке 6
         WAITMS(1000)
         LCLICK(995,299)  // закрыть
         WAITMS(1000)
      END_IF
   ELSE
      // если не найдена
      LCLICK(309,724) // сменить главу 6
      WAITMS(1000)
      GETSCREEN(274, 302, 993, 770)
      IF_PICTURE_IN (274, 302, 993, 770, "3.bmp", - 1, 90)
         // если найдена
         LCLICK($_return1, $_return2)  // клик по картинке 3
         WAITMS(1000)
         GETSCREEN(274, 302, 993, 770)
         IF_PICTURE_IN (274, 302, 993, 770, "4.bmp", - 1, 100)
            LCLICK($_return1, $_return2)  //клик по картинке 4
            WAITMS(1000)
         END_IF
         LCLICK(643,450)  // клик между 1
         WAITMS(1000)
         KEYPRESS(#9)
         WAITMS(1000)
         GETSCREEN(274, 302, 993, 770)
         IF_PICTURE_IN (274, 302, 993, 770, "5.bmp", - 1, 100)
            LCLICK($_return1, $_return2)  //клик по картинке 5
            WAITMS(1000)
         END_IF
         GETSCREEN(274, 302, 993, 770)
         IF_PICTURE_IN (274, 302, 993, 770, "6.bmp", - 1, 100)
            LCLICK($_return1, $_return2)  // клик по картинке 6
            WAITMS(1000)
            LCLICK(995,299)  // закрыть
            WAITMS(1000)
         END_IF
      ELSE
         // если не найдена
         LCLICK(309,724) // сменить главу 5
         WAITMS(1000)
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Пришивание v4.0
« Reply #51 on: April 18, 2020, 03:35:53 PM »
Quote from: kiril on April 18, 2020, 02:20:49 PM
;)
цикл выполняет постоянно эти действия без остановки, но  MCLICK в моем скрипте координаты разные
Code: (clickermann) [Select]
WHILE($var666 < 777)
END_CYC
[code=clickermann]
MCLICK(285,128)
MCLICK(400,128)
MCLICK(510,128)
MCLICK(618,128)
MCLICK(721,128)
MCLICK(831,128)
MCLICK(939,128)
MCLICK(185,205)
MCLICK(292,205)
MCLICK(398,205)
MCLICK(504,205)
MCLICK(612,205)
MCLICK(729,205)
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #52 on: April 18, 2020, 06:22:15 PM »
Quote from: kiril on April 18, 2020, 06:05:32 PM
координаты разные.
при этом halt будет работать в конце скрипта? и это только часть скрипта, дальше идет тоже самое только меняется координата
Code: (clickermann) [Select]
клик(1271,1002,1000) //свернуть все окна
DBLCLICK(635,30) // меняется координата
Halt// конечный итог или выключение компьютера
« Last Edit: April 18, 2020, 06:26:08 PM by Viktor77 »
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #53 on: April 18, 2020, 07:00:07 PM »
Quote from: kiril on April 18, 2020, 06:05:32 PM
координаты разные.
помогите разобратся тут, почему стапарится и не идет дальше картинка 548 появляется, но продолжает дальше искать 550, и не переходит на 549.
Code: (clickermann) [Select]
GETSCREEN(875,400, 1225,630)
IF_PICTURE_IN (875,400, 1225,630, "550.bmp", -1, 100)
      клик($_return1+2, $_return2+2,10000)
   GETSCREEN(875,400, 1225,630)
   IF_PICTURE_IN (875,400, 1225,630, "548.bmp", -1, 100)
      move($_return1, $_return2)
   ELSE
   //если не найдена картинка 548, продолжать искать
      $check = 0
      WHILE($check = 0)
         GETSCREEN(875,400, 1225,630)
         IF_PICTURE_IN (875,400, 1225,630, "550.bmp", -1, 100)
         клик($_return1+2, $_return2+2,10000)
         END_IF
         GETSCREEN(875,400, 1225,630)
         IF_PICTURE_IN (875,400, 1225,630, "548.bmp", -1, 100)
            move($_return1, $_return2)
         END_IF
      END_CYC
   END_IF
END_IF
картинка(875,400, 1225,630,"549.bmp",2,2,2000)
картинка(590,560, 695, 597,"562.bmp",2,2,2000)
$time = $_time_t + 600 // таймер на 600 секунд
WHILE($time > $_time_t)   
END_CYC
halt
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #54 on: April 18, 2020, 07:58:51 PM »
Quote from: kiril on April 18, 2020, 07:28:59 PM
я написал вам бесконечный цикл
WHILE($var666 < 777)
END_CYC
после 6000 строк трудно было предположить, что это только небольшая часть и шоу должно продолжаться.
желаете продолжать, в последнем условии SWITCH
напишите волшебную строку
$var666=7777, вместо магической  $var512=0
  CASE(13)
         MCLICK(729,205)
         $var512=0
      DEFAULT
   END_SWITCH
$var666=7777 или $var666=777
« Last Edit: April 22, 2020, 09:48:12 AM by Vint »
Logged

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Игра
« Reply #55 on: April 19, 2020, 02:04:12 PM »
Да без разницы, лишь бы больше 776
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #56 on: April 20, 2020, 09:18:12 PM »
Quote from: kiril on April 18, 2020, 07:28:59 PM
я написал вам бесконечный цикл
WHILE($var666 < 777)
END_CYC
после 6000 строк трудно было предположить, что это только небольшая часть и шоу должно продолжаться.
желаете продолжать, в последнем условии SWITCH
напишите волшебную строку
$var666=7777, вместо магической  $var512=0
  CASE(13)
         MCLICK(729,205)
         $var512=0
      DEFAULT
   END_SWITCH
открывает, и заканчивает действие, не проходя его. можно добавить еще CASE, но незнаю правильно ли это.
CASE(13)
         MCLICK(729,205)
         $var666=7777
      DEFAULT
   END_SWITCH

Code: (clickermann) [Select]
      CASE(13)
         MCLICK(729,205)
      CASE(14)
         MCLICK(729,205)
         $var666=7777
      DEFAULT
   END_SWITCH
   WAIT(1)
END_CYC
клик(382,17,1000)
клик(1257,15,1000)  // закрыть браузер
WAIT(3)
LOGWRITE ("Стоп")
« Last Edit: April 22, 2020, 09:48:50 AM by Vint »
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #57 on: April 21, 2020, 02:15:49 PM »
Quote from: kiril on April 18, 2020, 07:03:24 PM
Нет команды завершения цикла
$check = 1
помогите разобратся, не могу сообразить что в этом условии не так. если 78 найдена, то искать 20-23 картинку, и так искать пока найдена картинка 78, как только не найдена искать картинку 345. картинка 78 может 5 раз быть, может и более.
Code: (clickermann) [Select]
SUB(клик,$par1,$par2,$par3) // подпрограмма с параметрами
   LCLICK($par1,$par2)
   WAITMS($par3)
END_SUB
SUB(даблклик,$par30,$par31,$par32)
   DBLCLICK($par30,$par31)
   WAITMS($par32)
END_SUB
SUB(картинка,$par4,$par5,$par6,$par7,$par8,$par9,$par10,$par11)
   GETSCREEN($par4,$par5,$par6,$par7)
   IF_PICTURE_IN ($par4,$par5,$par6,$par7,$par8, -1, 100)
      $check = 1
      клик($_return1+$par9,$_return2+$par10,$par11)
   END_IF
END_SUB
SUB(картинка_,$par33,$par34,$par35,$par36,$par37,$par38,$par39,$par40)
   GETSCREEN($par33,$par34,$par35,$par36)
   IF_PICTURE_IN ($par33,$par34,$par35,$par36,$par37, -1, 100)
      $check = 1
      даблклик($_return1+$par38,$_return2+$par39,$par40)
   END_IF
END_SUB
SUB(ожидание_картинки,$par21,$par22,$par23,$par24,$par25,$par26,$par27,$par28,$par29)
   $check = 0
   WHILE($check = 0)
      GETSCREEN($par21,$par22,$par23,$par24)
      IF_PICTURE_IN ($par21,$par22,$par23,$par24,$par25, -1,$par26)
         $check = 1
         клик($_return1+$par27,$_return2+$par28,$par29)
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
картинка(334,75, 1028,640,"76.bmp",2,2,2000)
GETSCREEN(690,460,820,550)
IF_PICTURE_IN (690,460,820,550, "78.bmp", - 1, 90)
   move($_return1, $_return2)
   WAITMS(6000)
   картинка(160, 167, 1109, 681, "20.bmp",2,2, 2000)
   картинка(160, 167, 1109, 681, "21.bmp",2,2, 2000)
   картинка(160, 167, 1109, 681, "22.bmp",2,2, 2000)
   картинка(160, 167, 1109, 681, "23.bmp",2,2, 2000)
ELSE
   $check = 0
   WHILE($check = 0)
      GETSCREEN(690,460,820,550)
      IF_PICTURE_IN (690,460,820,550, "78.bmp", - 1, 90)
         WAITMS(2000)
         картинка(1090, 150, 1120, 180, "345.bmp",2,2, 1000)         
      END_IF
   END_CYC
END_IF
halt
Logged

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #58 on: April 21, 2020, 03:06:05 PM »
Quote from: kiril on April 21, 2020, 02:46:56 PM
Code: (clickermann) [Select]
// 21.04.2020
#name "V6.0 помогите разобраться"
SUB(клик,$par1,$par2,$par3) // подпрограмма с параметрами
   LCLICK($par1,$par2)
   WAITMS($par3)
END_SUB
SUB(картинка,$par4,$par5,$par6,$par7,$par8,$par9,$par10,$par11)
   GETSCREEN($par4,$par5,$par6,$par7)
   IF_PICTURE_IN ($par4,$par5,$par6,$par7,$par8, -1, 100)
      $check = 1
      клик($_return1+$par9,$_return2+$par10,$par11)
   END_IF
END_SUB   
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
картинка(334,75, 1028,640,"76.bmp",2,2,2000)
$check = 0
WHILE($check = 0)
   GETSCREEN(690,460,820,550)
   IF_PICTURE_IN (690,460,820,550, "78.bmp", - 1, 90)
      LOGWRITE ("найдена 78")
      move($_return1, $_return2)
      WAITMS(6000)
      картинка(160, 167, 1109, 681, "20.bmp",2,2, 2000)
      картинка(160, 167, 1109, 681, "21.bmp",2,2, 2000)
      картинка(160, 167, 1109, 681, "22.bmp",2,2, 2000)
      картинка(160, 167, 1109, 681, "23.bmp",2,2, 2000)
   ELSE
      LOGWRITE ("искать картинку 345")
      WAITMS(2000)
      картинка(1090, 150, 1120, 180, "345.bmp",2,2, 1000)
   END_IF
END_CYC
LOGWRITE (" Стоп, найдена картинка 345")
HALT
если картинка 78 не найдена то выполнять действие дальше, 345 это действие дальше. его можно и вывести из цикла. а вот чтоб пока есть 78 делало круг, пока есть 78. у меня получается что находит 78, дальше 20, 21, 22, 23 далее находит 345.
« Last Edit: April 21, 2020, 03:08:23 PM by Viktor77 »
Logged

Чольшой Блен

  • Зашел в гости
  • *
  • Posts: 13
    • View Profile
Re: Игра
« Reply #59 on: April 21, 2020, 03:31:38 PM »
зачем-же обманывать, не все в колхозе дураки - мы знаем что такое ELSE!
Если вы не знаете, то почитайте справочку, а потом придумывайте более убедительные сказки про
"дальше 20, 21, 22, 23 далее находит 345"
как говорится " или-или, четвёртого не дано!"
Logged
Pages: 1 2 3 [4] 5 6 7
« previous next »