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

0 Members and 2 Guests are viewing this topic.

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #90 on: April 26, 2020, 09:55:47 PM »
я подправил, правильно ли?
Code: (clickermann) [Select]
$check1 = 0 // и если правильно разобрался, то так тоже правильно и должно работать.
WHILE($check1 < 1)
INC($var512,1)
   SWITCH($var512)
      CASE(1)
         MCLICK(400,128)
      CASE(2)
         MCLICK(510,128)
      CASE(3)
         MCLICK(618,128)
      CASE(4)
         MCLICK(721,128)
      CASE(5)
         MCLICK(831,128)
      CASE(6)
         MCLICK(939,128)
      CASE(7)
         MCLICK(185,205)
      CASE(8)
         MCLICK(292,205)
      CASE(9)
         MCLICK(398,205)
      CASE(10)
         MCLICK(504,205)
      CASE(11)
         MCLICK(612,205)
      CASE(12)
         MCLICK(729,205)
      CASE(13)
         MCLICK(729,205)
        $check1 = 1
      DEFAULT
   END_SWITCH
   WAIT(1)
halt

END_CYC не хватает
с переменными порядок? END_CYC потерял после переноса скорее всего.

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #91 on: April 27, 2020, 01:42:58 PM »
Ну теперь порядок.
может быть конфликт CASE(1) в 290 строке? на втором браузере происходит так, доходит до CASE(1), и получается не нажимает MCLICK.
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,$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,$par29)
          ELSE    // если не найдена  11.bmp
             клик(309,724,1000) // сменить главу
          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)
$var666 = 0
    WHILE($var666 < 777)
       клик(267,15,3000)
       картинка(910,220,970,270,"1.bmp",2,2,2000)
       GETSCREEN(910,220, 970,270)
       IF_PIXEL_IN(910,220, 970,270, 16777215)
          клик($_return1, $_return2,2000)
       END_IF
       WAIT(30)
       GETSCREEN(1057,637, 1134,724)
       IF_PICTURE_IN (1057,637, 1134,724, "2.bmp", - 1, 100)
          клик($_return1+15,$_return2+15,1000)
       ELSE
          $check = 0
          WHILE($check = 0)
             KEYPRESS(#F5)  // обновить страницу
             WAIT(30)
             картинка(1057,637,1134,724,"2.bmp",15,15,1000)
          END_CYC
       END_IF
       WAIT(3)
       картинка(1135,78,1279,250,"3.bmp",2,2,2000)
       GETSCREEN(1010,125, 1279,250)
       IF_PIXEL_IN(1010,125, 1279,250, 16777215)
          клик($_return1, $_return2,2000)
       END_IF
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(1068,130,1150,160,"7.bmp",2,2,2000)//
       картинка(1068,130,1150,160,"8.bmp",2,2,2000)//
       картинка(1004,351,1058,402,"4.bmp",2,2,2000)
       картинка(541,561,571,591,"32.bmp",10,8,2000)
       картинка(495,427,785,637,"5.bmp",2,2,2000)
       клик(599,136,1000)  //
       картинка(1130,171,1191,222,"15.bmp",2,2,5000)//
       картинка(158,260,1130,830,"16.bmp",2,2,3000)//
       картинка(158,260,1130,830,"17.bmp",2,2,2000)//
       клик(406,295,1000)
       картинка(158,260,1130,830,"18.bmp",2,2,2000)//
       картинка(158,260,1130,830,"19.bmp",2,2,8000)//
       клик(527,298,1000) //
       клик(518,480,1000)//
       клик(564,695,1000)//
       клик(654,298,1000) //
       клик(571,420,1000) //
       картинка(158,260,1130,830,"20.bmp",2,2,2000) //
       картинка(158,260,1130,830,"21.bmp",2,2,2000) //
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(352, 72, 914, 460, "9.bmp",15,15, 1000)
       картинка(274, 302, 993, 770, "10.bmp",0,0, 8000)
       ожидание_картинки(274,302,993,770,"11.bmp",90,0,0,1000)
       картинка(274, 302, 993, 770, "12.bmp",0,0, 1000)
       клик(643,450,1000)  //
       KEYPRESS(#9)
       WAITMS(1000)
       картинка(274, 302, 993, 770, "13.bmp",0,0, 1000)
       GETSCREEN(274, 302, 993, 770)
       IF_PICTURE_IN (274, 302, 993, 770, "14.bmp", - 1, 100)
          клик($_return1, $_return2,1000)  //
       END_IF
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(352, 76, 914, 460, "22.bmp",15,15,1000)
       GETSCREEN(274, 268, 990, 807)
       IF_PICTURE_IN (546, 589, 580, 620, "23.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, "24.bmp", - 1, 100)//
          клик($_return1+5, $_return2+5,1000)
          GETSCREEN(274, 268, 990, 807)
          IF_PICTURE_IN (809, 661, 955, 741, "25.bmp", - 1, 100)//
             клик($_return1+5, $_return2+5,2000)
             картинка(1192, 73, 1279, 155, "26.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, "27.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, "28.bmp", - 1, 100)
          MOVE($_return1+15, $_return2+15)
          WAIT(1)
          IF(FExists(STRCONCAT("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
             FCreate(STRCONCAT("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin1\6-11-2019  на сегодняшний день
          END_IF
          SCREENSHOTFIX(3, 75, 865, 678,STRCONCAT ("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
          inc($n)
       END_IF
       WAIT(1)
       KEYPRESS(#B)
       WAIT(1)
       картинка(1068,130,1150,160,"29.bmp",2,2,2000)//
       картинка(445,315,822,758,"30.bmp",2,2,2000)//
       картинка(445,315,822,758,"31.bmp",2,2,3000)//
       картинка(445,315,822,758,"31.bmp",2,2,3000)//
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       клик(382,17,1000) 
       INC($var512,1)
       SWITCH($var512)
          CASE(1)
             MCLICK(400,128)
          CASE(2)
             MCLICK(510,128)
          CASE(3)
             MCLICK(618,128)
          CASE(4)
             MCLICK(721,128)
          CASE(5)
             MCLICK(831,128)
          CASE(6)
             MCLICK(939,128)
          CASE(7)
             MCLICK(185,205)
          CASE(8)
             MCLICK(292,205)
          CASE(9)
             MCLICK(398,205)
          CASE(10)
             MCLICK(504,205)
          CASE(11)
             MCLICK(612,205)
          CASE(12)
             MCLICK(729,205)
          CASE(13)
             MCLICK(729,205)
             $var666=7777
          DEFAULT
       END_SWITCH
       WAIT(1)
    END_CYC
    клик(382,17,1000)
    клик(1257,15,1000)  // закрыть браузер
    WAIT(3)
клик(1271,1002,1000)
    DBLCLICK(635,30)
    WAIT(30)
    клик(64,14,1000)
    клик(228,17,1000)
    MCLICK(285,128)
    WAIT(2)
$var666 = 0
    WHILE($var666 < 777)
       клик(267,15,3000)
       картинка(910,220,970,270,"1.bmp",2,2,2000)
       GETSCREEN(910,220, 970,270)
       IF_PIXEL_IN(910,220, 970,270, 16777215)
          клик($_return1, $_return2,2000)
       END_IF
       WAIT(30)
       GETSCREEN(1057,637, 1134,724)
       IF_PICTURE_IN (1057,637, 1134,724, "2.bmp", - 1, 100)
          клик($_return1+15,$_return2+15,1000)
       ELSE
          $check = 0
          WHILE($check = 0)
             KEYPRESS(#F5)  // обновить страницу
             WAIT(30)
             картинка(1057,637,1134,724,"2.bmp",15,15,1000)
          END_CYC
       END_IF
       WAIT(3)
       картинка(1135,78,1279,250,"3.bmp",2,2,2000)
       GETSCREEN(1010,125, 1279,250)
       IF_PIXEL_IN(1010,125, 1279,250, 16777215)
          клик($_return1, $_return2,2000)
       END_IF
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(1068,130,1150,160,"7.bmp",2,2,2000)//
       картинка(1068,130,1150,160,"8.bmp",2,2,2000)//
       картинка(1004,351,1058,402,"4.bmp",2,2,2000)
       картинка(541,561,571,591,"32.bmp",10,8,2000)
       картинка(495,427,785,637,"5.bmp",2,2,2000)
       клик(599,136,1000)  //
       картинка(1130,171,1191,222,"15.bmp",2,2,5000)//
       картинка(158,260,1130,830,"16.bmp",2,2,3000)//
       картинка(158,260,1130,830,"17.bmp",2,2,2000)//
       клик(406,295,1000)
       картинка(158,260,1130,830,"18.bmp",2,2,2000)//
       картинка(158,260,1130,830,"19.bmp",2,2,8000)//
       клик(527,298,1000) //
       клик(518,480,1000)//
       клик(564,695,1000)//
       клик(654,298,1000) //
       клик(571,420,1000) //
       картинка(158,260,1130,830,"20.bmp",2,2,2000) //
       картинка(158,260,1130,830,"21.bmp",2,2,2000) //
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(352, 72, 914, 460, "9.bmp",15,15, 1000)
       картинка(274, 302, 993, 770, "10.bmp",0,0, 8000)
       ожидание_картинки(274,302,993,770,"11.bmp",90,0,0,1000)
       картинка(274, 302, 993, 770, "12.bmp",0,0, 1000)
       клик(643,450,1000)  //
       KEYPRESS(#9)
       WAITMS(1000)
       картинка(274, 302, 993, 770, "13.bmp",0,0, 1000)
       GETSCREEN(274, 302, 993, 770)
       IF_PICTURE_IN (274, 302, 993, 770, "14.bmp", - 1, 100)
          клик($_return1, $_return2,1000)  //
       END_IF
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       картинка(352, 76, 914, 460, "22.bmp",15,15,1000)
       GETSCREEN(274, 268, 990, 807)
       IF_PICTURE_IN (546, 589, 580, 620, "23.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, "24.bmp", - 1, 100)//
          клик($_return1+5, $_return2+5,1000)
          GETSCREEN(274, 268, 990, 807)
          IF_PICTURE_IN (809, 661, 955, 741, "25.bmp", - 1, 100)//
             клик($_return1+5, $_return2+5,2000)
             картинка(1192, 73, 1279, 155, "26.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, "27.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, "28.bmp", - 1, 100)
          MOVE($_return1+15, $_return2+15)
          WAIT(1)
          IF(FExists(STRCONCAT("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
             FCreate(STRCONCAT("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin1\6-11-2019  на сегодняшний день
          END_IF
          SCREENSHOTFIX(3, 75, 865, 678,STRCONCAT ("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
          inc($n)
       END_IF
       WAIT(1)
       KEYPRESS(#B)
       WAIT(1)
       картинка(1068,130,1150,160,"29.bmp",2,2,2000)//
       картинка(445,315,822,758,"30.bmp",2,2,2000)//
       картинка(445,315,822,758,"31.bmp",2,2,3000)//
       картинка(445,315,822,758,"31.bmp",2,2,3000)//
       картинка(0,77,1130,830,"6.bmp",2,2,2000)//
       клик(382,17,1000) 
       INC($var512,1)
       SWITCH($var512)
          CASE(1)
             MCLICK(400,128)
          CASE(2)
             MCLICK(510,128)
          CASE(3)
             MCLICK(618,128)
          CASE(4)
             MCLICK(721,128)
          CASE(5)
             MCLICK(831,128)
          CASE(6)
             MCLICK(939,128)
          CASE(7)
             MCLICK(185,205)
          CASE(8)
             MCLICK(292,205)
          CASE(9)
             MCLICK(398,205)
          CASE(10)
             MCLICK(504,205)
          CASE(11)
             MCLICK(612,205)
          CASE(12)
             MCLICK(729,205)
          CASE(13)
             MCLICK(729,205)
             $var666=7777
          DEFAULT
       END_SWITCH
       WAIT(1)
    END_CYC
    клик(382,17,1000)
    клик(1257,15,1000)  // закрыть браузер
    halt

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Игра
« Reply #92 on: April 27, 2020, 02:21:27 PM »
может быть конфликт CASE(1) в 290 строке? на втором браузере происходит так, доходит до CASE(1), и получается не нажимает MCLICK.

У тебя ж уже есть $var512. На 140 строке происходит инкремент переменной +1 а после цикла она так и остается с прежнем значением и продолжает увеличиваться. Значения установленные в CASE не совпадают, выполняется DEFAULT в котором ничего нет, на этом все и заканчивается.

Все что тебе надо, это до цикла написать обнуление всех необходимых переменных.
Причем пиши это на каждый цикл, хуже не станет.
$var512 = 0
$var666 = 0
WHILE($var666 < 777)

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #93 on: April 27, 2020, 03:45:04 PM »
может быть конфликт CASE(1) в 290 строке? на втором браузере происходит так, доходит до CASE(1), и получается не нажимает MCLICK.

У тебя ж уже есть $var512. На 140 строке происходит инкремент переменной +1 а после цикла она так и остается с прежнем значением и продолжает увеличиваться. Значения установленные в CASE не совпадают, выполняется DEFAULT в котором ничего нет, на этом все и заканчивается.

Все что тебе надо, это до цикла написать обнуление всех необходимых переменных.
Причем пиши это на каждый цикл, хуже не станет.
$var512 = 0
$var666 = 0
WHILE($var666 < 777)
задержки не обязательно ставить? или лучше поставить?
Code: (clickermann) [Select]
CASE(1)
             MCLICK(400,128)

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Игра
« Reply #94 on: April 27, 2020, 05:12:53 PM »
задержки не обязательно ставить? или лучше поставить?
Code: (clickermann) [Select]
CASE(1)
             MCLICK(400,128)

После свитча у тебя WAIT(1) чем тебе не задержка?! Тоесть производится  MCLICK и тут же WAIT(1)

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #95 on: April 27, 2020, 06:31:17 PM »
задержки не обязательно ставить? или лучше поставить?
Code: (clickermann) [Select]
CASE(1)
             MCLICK(400,128)

После свитча у тебя WAIT(1) чем тебе не задержка?! Тоесть производится  MCLICK и тут же WAIT(1)
да после MCLICK и тут же WAIT(1) или любая задержка, чтоб не пропустило след команду.

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Игра
« Reply #96 on: April 28, 2020, 12:18:12 PM »
$var512 = 0
$var666 = 0
Давайте уже нормальные, осмысленные имена переменным.
Неужели до сих пор непонятен факт, что часть происходящего трындеца происходит потому, что с ходу непонятно что за переменная $var512, что она делает и где она участвует ещё.
Конечно, скрипт небольшой, но всё таки.


Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #97 on: April 28, 2020, 01:14:40 PM »
$var512 = 0
$var666 = 0
Давайте уже нормальные, осмысленные имена переменным.
Неужели до сих пор непонятен факт, что часть происходящего трындеца происходит потому, что с ходу непонятно что за переменная $var512, что она делает и где она участвует ещё.
Конечно, скрипт небольшой, но всё таки.

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #98 on: April 30, 2020, 01:18:13 AM »
18:57:10 Maverick (film) - Wikipedia - Яндекс.Браузер
проверял на любой вкладке пишет название вкладки - Яндекс.Браузер

Тык чего ж ты yandex ищешь когда тебе надо искать Яндекс.Браузер?!
Code: (clickermann) [Select]
SETKBLAYOUT(WNDFIND("Яндекс.Браузер",0), 1049) //1033 En или 1049 Ru
не работает в 379 строке, F5.
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)
      ELSE    // если не найдена  11.bmp
         клик(309,613,1000) // сменить главу
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
клик(1271,785,1000)
DBLCLICK(261,249)
WAIT(15)
клик(13,15,3000)
картинка(910,218,972,275,"1.bmp",2,2,500)
WAIT(15)
GETSCREEN(910,220, 975,270)
IF_PIXEL_IN(910,220, 975,270, 16777215)
   клик($_return1, $_return2,500)
END_IF
WAIT(15)
GETSCREEN(1057,507, 1134,610)
IF_PICTURE_IN (1057,507, 1134,610, "2.bmp", - 1, 100)
   клик($_return1+15,$_return2+15,1000)
ELSE
   $check = 0
   WHILE($check = 0)
      KEYPRESS(#F5)  // обновить страницу
      WAIT(20)
      картинка(1057,507, 1134,610,"2.bmp",15,15,1000)
   END_CYC
END_IF
WAIT(3)
картинка(1010,125, 1279,250,"3.bmp",2,2,500)
GETSCREEN(1010,125, 1279,250)
IF_PIXEL_IN(1010,125, 1279,250, 16777215)
   клик($_return1, $_return2,500)
END_IF
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
клик(599,136,3000)
картинка(1095,130, 1150,160,"7.bmp",2,2,1000)
картинка(1095,130, 1150,160,"28.bmp",2,2,1000)
картинка(446,203, 822,647,"29.bmp",2,2,1000)
FOR($a=0,$a<2)
   картинка(446,203, 822,647,"30.bmp",2,2,1000)
END_CYC
картинка(0,689, 35,755,"31.bmp",2,2,1000)
картинка(0,636, 437,757,"32.bmp",2,2,1000)
картинка(0,636, 437,757,"33.bmp",2,2,1000)
клик(75,745,500)
SETKBLAYOUT(WNDFIND("Clickermann",0), 1049)
WAITMS(50)
SETKBLAYOUT(WNDFIND("Яндекс.Браузер",0), 1049) //1033 En или 1049 Ru
WAITMS(50)
KEYSTRING("текст1")
WAITMS(50)
картинка(0,636, 437,757,"34.bmp",2,2,2000)
картинка(330,75, 913,471,"35.bmp",2,2,2000)
$time = $_time_t + 180
WHILE($time > $_time_t)
   картинка(214,180, 1060,680,"36.bmp",2,2,1000)
END_CYC
IF($time ! 0)
   // время истекло, картинка не найдена
END_IF
картинка(214,180, 1060,680,"37.bmp",2,2,2000)
картинка(570,180, 641,557,"38.bmp",2,2,2000)
картинка(920,520, 1000,557,"39.bmp",2,2,2000)
картинка(214,180, 1060,680,"40.bmp",2,2,2000)
картинка(214,180, 1060,680,"41.bmp",2,2,2000)
картинка(214,180, 1060,680,"40.bmp",2,2,2000)
картинка(214,180, 1060,680,"41.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)

картинка(1130,171,1191,222,"14.bmp",2,2,5000)
картинка(157,147, 1111,698,"15.bmp",2,2,3000)
картинка(157,147, 1111,698,"16.bmp",2,2,2000)
клик(406,187,1000)
картинка(157,147, 1111,698,"17.bmp",2,2,2000)
картинка(157,147, 1111,698,"18.bmp",2,2,8000)
клик(527,190,1000)
клик(518,364,1000)
клик(564,584,1000)
клик(654,190,1000)
клик(571,310,1000)
картинка(157,147, 1111,698,"19.bmp",2,2,2000)
картинка(157,147, 1111,698,"20.bmp",2,2,2000)
картинка(0,77,1130,830,"6.bmp",2,2,2000)
картинка(1060,440, 1279,510,"42.bmp",140,28,2000)
картинка(1060,440, 1279,510,"42.bmp",140,28,2000)
картинка(334,75, 1028,640,"43.bmp",2,2,2000)
картинка(334,75, 1028,640,"44.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(334,75, 1028,640,"45.bmp",2,2,2000)
картинка(334,75, 1028,640,"46.bmp",2,2,2000)
картинка(334,75, 1028,640,"47.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(697,75, 773,136,"48.bmp",2,2,2000)
клик(420,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(280,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(420,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(280,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(420,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(280,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(420,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(280,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(420,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
клик(280,580,1000)
картинка_(860,340,930,374,"49.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(334,75, 1028,640,"50.bmp",2,2,2000)
картинка(267,178,1000,668,"51.bmp",2,2,2000)
картинка(267,178,1000,668,"52.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(334,75, 1028,640,"53.bmp",2,2,2000)
картинка(199,166, 1070,680,"54.bmp",2,2,2000)
картинка(334,75, 1028,640,"55.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,5000)
картинка(334,75, 1028,640,"56.bmp",2,2,2000)
картинка(210,159, 1055,692,"57.bmp",2,2,2000)
картинка(210,159, 1055,692,"58.bmp",2,2,2000)
картинка(210,159, 1055,692,"60.bmp",2,2,2000)
картинка(210,159, 1055,692,"61.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(334,75, 1028,640,"62.bmp",2,2,2000)
картинка(257,169, 1006,657,"63.bmp",2,2,2000)
картинка(257,169, 1006,657,"64.bmp",2,2,2000)
картинка(257,169, 1006,657,"65.bmp",2,2,2000)
картинка(257,169, 1006,657,"66.bmp",10,75,2000)
картинка(257,169, 1006,657,"67.bmp",2,2,2000)
картинка(257,169, 1006,657,"68.bmp",2,2,2000)
картинка(257,169, 1006,657,"69.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(257,169, 1006,657,"69.bmp",2,2,2000)
картинка(334,75, 1028,640,"70.bmp",2,2,2000)
FOR($b=0,$b<4)
   картинка(182,143, 1074,703,"71.bmp",2,2,1000)
END_CYC
картинка(182,143, 1074,703,"72.bmp",5,5,50)
картинка(182,143, 1074,703,"71.bmp",2,2,30000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(334,75, 1028,640,"73.bmp",2,2,1000)
картинка(245,140, 1015,705,"74.bmp",2,2,1000)
картинка(245,140, 1015,705,"75.bmp",5,5,50)
картинка(245,140, 1015,705,"74.bmp",2,2,50000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
KEYPRESS(#h)
WAITMS(2000)
картинка(162,178, 980,689,"76.bmp",2,2,2000)
$check1 = 0
WHILE($check1 = 0)
   GETSCREEN(365,200, 898,646)
   IF_PICTURE_IN (365,200, 898,646, "77.bmp", -1, 100)
      клик($_return1, $_return2,500)
      LOGWRITE ("найдена 77")
   ELSE
      GETSCREEN(365,200, 898,646)
      IF_PICTURE_IN (365,200, 898,646, "78.bmp", -1, 100)
         move($_return1, $_return2)
         $check1 = 1
         LOGWRITE ("найдена 78")
         WAITMS(500)
      ELSE
         WAITMS(100)
      END_IF
   END_IF
END_CYC
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(162,178, 980,689,"79.bmp",2,2,2000)
картинка(162,178, 980,689,"80.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
картинка(162,178, 980,689,"81.bmp",2,2,2000)
картинка(183,157, 1080,689,"82.bmp",2,2,2000)
картинка(183,157, 1080,689,"83.bmp",2,2,2000)
KEYPRESS(#G)
WAITMS(2000)
картинка(186,160, 1080,691,"84.bmp",2,2,2000)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "85.bmp", -1, 100)
   LCLICK($_return1+15, $_return2+6)
   WAIT(2)
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "86.bmp", -1, 100)
      FOR($b=0,$b<10)
         DBLCLICK($_return1+10, $_return2+100)
         WAITMS(50)
                  IF($b<9)
            WAIT(12)
         END_IF
      END_CYC
   END_IF
END_IF
WAIT(12)
картинка(1182,76, 1272,139,"87.bmp",2,2,2000)
картинка(0,77, 1130,698,"6.bmp",2,2,2000)
WAITMS(1000)
KEYPRESS(#r)
WAITMS(1000)
картинка(170,182, 1099,666,"88.bmp",2,2,2000)
картинка(170,182, 1099,666,"89.bmp",2,2,2000)
картинка(170,182, 1099,666,"90.bmp",2,2,2000)
картинка(170,182, 1099,666,"91.bmp",2,2,2000)
картинка(957,197, 1015,265,"6.bmp",2,2,2000)
KEYPRESS(#r)
WAITMS(1000)
картинка(105,148, 1165,700,"92.bmp",2,2,2000)
картинка(105,148, 1165,700,"93.bmp",2,2,2000)
картинка(105,148, 1165,700,"94.bmp",2,2,2000)
картинка(0,689, 35,755,"31.bmp",2,2,1000)
картинка(0,636, 437,757,"662.bmp",2,2,1000)
картинка(0,636, 437,757,"663.bmp",2,2,1000)
клик(75,745,500)
SETKBLAYOUT(WNDFIND("Clickermann",0), 1049)
WAITMS(50)
SETKBLAYOUT(WNDFIND("Яндекс.Браузер",0), 1049) //1033 En или 1049 Ru
WAITMS(50)
KEYSTRING("текст2")
WAITMS(50)
картинка(0,636, 437,757,"34.bmp",2,2,500)
$check1 = 0
WHILE($check1 = 0)
   GETSCREEN(875,400, 1225,630)
   IF_PICTURE_IN (875,400, 1225,630, "95.bmp", -1, 100)
      клик($_return1, $_return2,5000)
   ELSE
      GETSCREEN(875,400, 1225,630)
      IF_PICTURE_IN (875,400, 1225,630, "96.bmp", -1, 100)
         LOGWRITE ("не найдена 96")
         $check1 = 1
         move($_return1, $_return2)
         LOGWRITE ("найдена 96")
         WAITMS(1000)
      ELSE
         WAITMS(100)
      END_IF
   END_IF
END_CYC
картинка(875,400, 1225,630,"97.bmp",2,2,2000)
клик(75,745,500)
SETKBLAYOUT(WNDFIND("Clickermann",0), 1049)
WAITMS(50)
SETKBLAYOUT(WNDFIND("Яндекс.Браузер",0), 1049) //1033 En или 1049 Ru
WAITMS(50)
KEYSTRING("текст3")
WAITMS(50)
картинка(0,636, 437,757,"34.bmp",2,2,2000)
$time = $_time_t + 720
WHILE($time > $_time_t)
   картинка(590,560, 695, 597,"98.bmp",2,2,2000)
END_CYC
картинка(105,148, 1165,700,"92.bmp",2,2,2000)
картинка(105,148, 1165,700,"93.bmp",2,2,2000)
картинка(105,148, 1165,700,"99.bmp",2,2,2000)
картинка(105,148, 1165,700,"100.bmp",2,2,2000)
картинка(1140,130, 1180,165,"6.bmp",2,2,2000)
KEYPRESS(#r)
WAITMS(1000)
картинка(170,182, 1099,666,"88.bmp",2,2,2000)
картинка(170,182, 1099,666,"101.bmp",2,2,2000)
картинка(170,182, 1099,666,"101.bmp",2,2,2000)
картинка(170,182, 1099,666,"101.bmp",2,2,2000)
картинка(170,182, 1099,666,"101.bmp",2,2,2000)
картинка(170,182, 1099,666,"102.bmp",2,2,2000)
картинка(170,182, 1099,666,"91.bmp",2,2,2000)
картинка(957,197, 1015,265,"6.bmp",2,2,2000)
KEYPRESS(#r)
WAITMS(1000)
картинка(334,75, 1028,640,"8.bmp",2,2,2000)
картинка(274, 187, 993, 661, "9.bmp",0,0, 8000)
ожидание_картинки(274, 187, 993, 661,"10.bmp",90,0,0,1000)
картинка(274, 187, 993, 661, "11.bmp",0,0, 1000)
клик(645,341,1000)
KEYPRESS(#9)
WAITMS(1000)
картинка(274, 187, 993, 661, "12.bmp",0,0, 1000)
картинка(274, 187, 993, 661, "13.bmp",0,0, 1000)
картинка(274, 187, 993, 661, "9.bmp",0,0, 8000)
картинка(0,77,1130,830,"6.bmp",2,2,2000)
картинка(0,77,1130,830,"103.bmp",2,2,2000)
картинка(195,101, 1073,743,"104.bmp",2,2,2000)
картинка(195,101, 1073,743,"105.bmp",40,24,2000)
картинка(1053,84,1093,125,"6.bmp",5,5,2000)
картинка(970,680, 1200,750,"106.bmp",2,2,2000)
$check1 = 0
WHILE($check1 = 0)
   GETSCREEN(158,147, 1106,695)
   IF_PICTURE_IN (158,147, 1106,695,"107.bmp", -1, 100)
      клик($_return1+2, $_return2+2,500)
      LOGWRITE ("найдена 107")
   ELSE
      GETSCREEN(158,147, 1106,695)
      IF_PICTURE_IN (158,147, 1106,695,"108.bmp", -1, 100)
         move($_return1, $_return2)
         $check1 = 1
         LOGWRITE ("найдена 108")
         WAITMS(500)
      ELSE
         WAITMS(100)
      END_IF
   END_IF
END_CYC
картинка(0,77,1130,830,"6.bmp",5,5,2000)
картинка(334,75, 1028,640,"110.bmp",2,2,2000)
$check1 = 0
WHILE($check1 = 0)
   GETSCREEN(690,460,820,550)
   IF_PICTURE_IN (690,460,820,550, "111.bmp", -1, 100)
      LOGWRITE ("найдена 111")
      move($_return1, $_return2)
      WAITMS(2000)
      картинка(160, 167, 1109, 681, "112.bmp",2,2, 2000)
      картинка(160, 167, 1109, 681, "113.bmp",2,2, 2000)
      картинка(160, 167, 1109, 681, "114.bmp",2,2, 2000)
      картинка(160, 167, 1109, 681, "115.bmp",2,2, 2000)
   ELSE
      $check1 = 1
   END_IF
END_CYC
картинка(0,77,1130,830,"6.bmp",2,2,2000)
картинка(352, 72, 914, 460, "21.bmp",15,15,1000)
GETSCREEN(274, 157, 990, 693)
IF_PICTURE_IN (546, 481, 580, 510, "22.bmp", - 1, 100)
   клик($_return1+2, $_return2+2,1000)
   клик(567,494,1000)
END_IF
GETSCREEN(274, 157, 990, 693)
IF_PICTURE_IN (666, 556, 815, 620, "23.bmp", - 1, 100)
   клик($_return1+5, $_return2+5,1000)
   GETSCREEN(274, 157, 990, 693)
   IF_PICTURE_IN (809, 555, 955, 620, "24.bmp", - 1, 100)
      клик($_return1+5, $_return2+5,2000)
      картинка(1192, 73, 1279, 155, "25.bmp",5,5,1000)
   END_IF
END_IF
SETKBLAYOUT(WNDFIND("Clickermann",0), 1033)
WAITMS(50)
SETKBLAYOUT(WNDFIND("Яндекс.Браузер",0), 1033) //1033 En или 1049 Ru
WAITMS(50)
клик(13,15,3000)
KEYPRESS(#F5)
halt
« Last Edit: April 30, 2020, 02:09:10 PM by Viktor77 »

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #99 on: October 12, 2020, 04:14:57 PM »
После свитча у тебя WAIT(1) чем тебе не задержка?! Тоесть производится  MCLICK и тут же WAIT(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,$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,$par29)
      ELSE    // если не найдена  11.bmp
         клик(309,724,2000) // сменить главу
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
клик(1271,1002,2000)
DBLCLICK(635,30)
WAIT(30)
клик(64,14,2000)
клик(228,17,2000)
MCLICK(285,128)
WAIT(2)
$check1 = 0
$check2 = 0
WHILE($check2 < 777)
   клик(267,15,3000)
   картинка(910,220,970,270,"1.bmp",2,2,2000)
   GETSCREEN(910,220, 970,270)
   IF_PIXEL_IN(910,220, 970,270, 16777215)
      клик($_return1, $_return2,2000)
   END_IF
   WAIT(30)
   GETSCREEN(1057,637, 1134,724)
   IF_PICTURE_IN (1057,637, 1134,724, "2.bmp", - 1, 100)
      клик($_return1+15,$_return2+15,2000)
   ELSE
      $check = 0
      WHILE($check = 0)
         KEYPRESS(#F5)  // обновить страницу
         WAIT(30)
         картинка(1057,637,1134,724,"2.bmp",15,15,2000)
      END_CYC
   END_IF
   WAIT(3)
   картинка(1135,78,1279,250,"3.bmp",2,2,2000)
   GETSCREEN(1010,125, 1279,250)
   IF_PIXEL_IN(1010,125, 1279,250, 16777215)
      клик($_return1, $_return2,2000)
   END_IF
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(1068,130,1150,160,"7.bmp",2,2,2000)//
   картинка(1068,130,1150,160,"8.bmp",2,2,2000)//
   картинка(1004,351,1058,402,"4.bmp",2,2,2000)
   картинка(541,561,571,591,"32.bmp",10,8,2000)
   картинка(495,427,785,637,"5.bmp",2,2,2000)
   картинка(583,124,616,156,"33.bmp",2,2,2000)
   картинка(0,77,1130,830,"6.bmp",2,2,2000)
   картинка(1130,171,1191,222,"15.bmp",2,2,5000)//
   картинка(158,260,1130,830,"16.bmp",2,2,3000)//
   картинка(158,260,1130,830,"17.bmp",2,2,2000)//
   клик(406,295,1000)
   картинка(158,260,1130,830,"18.bmp",2,2,2000)//
   картинка(158,260,1130,830,"19.bmp",2,2,8000)//
   клик(527,298,2000) //
   клик(518,480,2000)//
   клик(564,695,2000)//
   клик(654,298,2000) //
   клик(571,420,2000) //
   картинка(158,260,1130,830,"20.bmp",2,2,2000) //
   картинка(158,260,1130,830,"21.bmp",2,2,2000) //
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(352, 72, 914, 460, "9.bmp",15,15, 2000)
   картинка(274, 302, 993, 770, "10.bmp",0,0, 8000)
   ожидание_картинки(274,302,993,770,"11.bmp",90,0,0,1000)
   картинка(274, 302, 993, 770, "12.bmp",0,0, 2000)
   клик(643,450,2000)  //
   KEYPRESS(#9)
   WAITMS(1000)
   картинка(274, 302, 993, 770, "13.bmp",0,0, 2000)
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "14.bmp", - 1, 100)
      клик($_return1, $_return2,2000)  //
   END_IF
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(352, 76, 914, 460, "22.bmp",15,15,2000)
   GETSCREEN(274, 268, 990, 807)
   IF_PICTURE_IN (546, 589, 580, 620, "23.bmp", - 1, 100)//
      клик($_return1+2, $_return2+2,2000)
      клик(567,603,2000)  //
   END_IF
   GETSCREEN(274, 268, 990, 807)
   IF_PICTURE_IN (666, 661, 821, 741, "24.bmp", - 1, 100)//
      клик($_return1+5, $_return2+5,2000)
      GETSCREEN(274, 268, 990, 807)
      IF_PICTURE_IN (809, 661, 955, 741, "25.bmp", - 1, 100)//
         клик($_return1+5, $_return2+5,2000)
         картинка(1192, 73, 1279, 155, "26.bmp",5,5,2000)//
      END_IF
   END_IF
   WAIT(1)
   KEYPRESS(#B)
   WAIT(3)
   GETSCREEN(3, 75, 865, 792)
   IF_PICTURE_IN (3, 75, 865, 792, "27.bmp", - 1, 100)
      DBLCLICK($_return1+15, $_return2+15)
      WAIT(1)
      картинка(357, 166, 866, 681, "34.bmp",5,5,2000)
   END_IF
   GETSCREEN(3, 75, 865, 792)
   IF_PICTURE_IN (3, 75, 865, 792, "28.bmp", - 1, 100)
      MOVE($_return1+15, $_return2+15)
      WAIT(1)
      IF(FExists(STRCONCAT("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
         FCreate(STRCONCAT("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin1\11-10-2020  на сегодняшний день
      END_IF
      SCREENSHOTFIX(3, 75, 865, 678,STRCONCAT ("E:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
      inc($n)
   END_IF
   WAIT(1)
   KEYPRESS(#B)
   WAIT(1)
   картинка(1068,130,1150,160,"29.bmp",2,2,2000)//
   картинка(445,315,822,758,"30.bmp",2,2,2000)//
   картинка(445,315,822,758,"31.bmp",2,2,3000)//
   картинка(445,315,822,758,"31.bmp",2,2,3000)//
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   клик(382,17,2000)
   INC($check1,1)
   SWITCH($check1)
      CASE(1)
         MCLICK(400,128)
      CASE(2)
         MCLICK(510,128)
      CASE(3)
         MCLICK(618,128)
      CASE(4)
         MCLICK(721,128)
      CASE(5)
         MCLICK(831,128)
      CASE(6)
         MCLICK(939,128)
      CASE(7)
         MCLICK(185,205)
      CASE(8)
         MCLICK(292,205)
      CASE(9)
         MCLICK(398,205)
      CASE(10)
         MCLICK(504,205)
      CASE(11)
         MCLICK(612,205)
      CASE(12)
         MCLICK(729,205)
      CASE(13)
         MCLICK(729,205)
         $check2=7777
      DEFAULT
   END_SWITCH
   WAIT(1)
END_CYC
клик(382,17,2000)
клик(1257,15,2000)  // закрыть браузер
WAIT(3)
клик(1271,1002,2000)
DBLCLICK(634,128)
WAIT(30)
клик(64,14,2000)
клик(228,17,2000)
MCLICK(285,128)
WAIT(2)
$check1 = 0
$check2 = 0
WHILE($check2 < 777)
   WAIT(2)
   клик(267,15,3000)
   картинка(910,220,970,270,"1.bmp",2,2,2000)
   GETSCREEN(910,220, 970,270)
   IF_PIXEL_IN(910,220, 970,270, 16777215)
      клик($_return1, $_return2,2000)
   END_IF
   WAIT(30)
   GETSCREEN(1057,637, 1134,724)
   IF_PICTURE_IN (1057,637, 1134,724, "2.bmp", - 1, 100)
      клик($_return1+15,$_return2+15,2000)
   ELSE
      $check = 0
      WHILE($check = 0)
         KEYPRESS(#F5)  // обновить страницу
         WAIT(30)
         картинка(1057,637,1134,724,"2.bmp",15,15,2000)
      END_CYC
   END_IF
   WAIT(3)
   картинка(1135,78,1279,250,"3.bmp",2,2,2000)
   GETSCREEN(1010,125, 1279,250)
   IF_PIXEL_IN(1010,125, 1279,250, 16777215)
      клик($_return1, $_return2,2000)
   END_IF
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(1068,130,1150,160,"7.bmp",2,2,2000)//
   картинка(1068,130,1150,160,"8.bmp",2,2,2000)//
   картинка(1004,351,1058,402,"4.bmp",2,2,2000)
   картинка(541,561,571,591,"32.bmp",10,8,2000)
   картинка(495,427,785,637,"5.bmp",2,2,2000)
   картинка(583,124,616,156,"33.bmp",2,2,2000)
   картинка(0,77,1130,830,"6.bmp",2,2,2000)
   картинка(1130,171,1191,222,"15.bmp",2,2,5000)//
   картинка(158,260,1130,830,"16.bmp",2,2,3000)//
   картинка(158,260,1130,830,"17.bmp",2,2,2000)//
   клик(406,295,2000)
   картинка(158,260,1130,830,"18.bmp",2,2,2000)//
   картинка(158,260,1130,830,"19.bmp",2,2,8000)//
   клик(527,298,2000) //
   клик(518,480,2000)//
   клик(564,695,2000)//
   клик(654,298,2000) //
   клик(571,420,2000) //
   картинка(158,260,1130,830,"20.bmp",2,2,2000) //
   картинка(158,260,1130,830,"21.bmp",2,2,2000) //
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(352, 72, 914, 460, "9.bmp",15,15, 2000)
   картинка(274, 302, 993, 770, "10.bmp",0,0, 8000)
   ожидание_картинки(274,302,993,770,"11.bmp",90,0,0,2000)
   картинка(274, 302, 993, 770, "12.bmp",0,0, 2000)
   клик(643,450,2000)  //
   KEYPRESS(#9)
   WAITMS(2000)
   картинка(274, 302, 993, 770, "13.bmp",0,0, 2000)
   GETSCREEN(274, 302, 993, 770)
   IF_PICTURE_IN (274, 302, 993, 770, "14.bmp", - 1, 100)
      клик($_return1, $_return2,2000)  //
   END_IF
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   картинка(352, 76, 914, 460, "22.bmp",15,15,2000)
   GETSCREEN(274, 268, 990, 807)
   IF_PICTURE_IN (546, 589, 580, 620, "23.bmp", - 1, 100)//
      клик($_return1+2, $_return2+2,2000)
      клик(567,603,2000)  //
   END_IF
   GETSCREEN(274, 268, 990, 807)
   IF_PICTURE_IN (666, 661, 821, 741, "24.bmp", - 1, 100)//
      клик($_return1+5, $_return2+5,2000)
      GETSCREEN(274, 268, 990, 807)
      IF_PICTURE_IN (809, 661, 955, 741, "25.bmp", - 1, 100)//
         клик($_return1+5, $_return2+5,2000)
         картинка(1192, 73, 1279, 155, "26.bmp",5,5,2000)//
      END_IF
   END_IF
   WAIT(1)
   KEYPRESS(#B)
   WAIT(3)
   GETSCREEN(3, 75, 865, 792)
   IF_PICTURE_IN (3, 75, 865, 792, "27.bmp", - 1, 100)
      DBLCLICK($_return1+15, $_return2+15)
      WAIT(1)
      картинка(357, 166, 866, 681, "34.bmp",5,5,2000)
   END_IF
   GETSCREEN(3, 75, 865, 792)
   IF_PICTURE_IN (3, 75, 865, 792, "28.bmp", - 1, 100)
      MOVE($_return1+15, $_return2+15)
      WAIT(1)
      IF(FExists(STRCONCAT("E:\files\twin2\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
         FCreate(STRCONCAT("E:\files\twin2\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin2\11-10-2020  на сегодняшний день
      END_IF
      SCREENSHOTFIX(3, 75, 865, 678,STRCONCAT ("E:\files\twin2\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
      inc($n)
   END_IF
   WAIT(1)
   KEYPRESS(#B)
   WAIT(1)
   картинка(1068,130,1150,160,"29.bmp",2,2,2000)//
   картинка(445,315,822,758,"30.bmp",2,2,2000)//
   картинка(445,315,822,758,"31.bmp",2,2,3000)//
   картинка(445,315,822,758,"31.bmp",2,2,3000)//
   картинка(0,77,1130,830,"6.bmp",2,2,2000)//
   клик(382,17,1000)  //
   INC($check1,1)
   SWITCH($check1)
      CASE(1)
         MCLICK(400,128)
      CASE(2)
         MCLICK(510,128)
      CASE(3)
         MCLICK(618,128)
      CASE(4)
         MCLICK(721,128)
      CASE(5)
         MCLICK(831,128)
      CASE(6)
         MCLICK(939,128)
      CASE(7)
         MCLICK(185,205)
      CASE(8)
         MCLICK(292,205)
      CASE(9)
         MCLICK(398,205)
      CASE(10)
         MCLICK(504,205)
      CASE(11)
         MCLICK(612,205)
      CASE(12)
         MCLICK(729,205)
      CASE(13)
         MCLICK(729,205)
         $check2=7777
      DEFAULT
   END_SWITCH
   WAIT(1)
END_CYC
клик(382,17,2000)
клик(1257,15,2000)  // закрыть браузер
Halt
 
« Last Edit: October 12, 2020, 06:11:47 PM by Vint »

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Игра
« Reply #100 on: October 12, 2020, 06:12:19 PM »
подскажите как можно сделать выполнение работы сценария не мешая основной работе на ПК, а также подгрузку других сценариев?
Использовать виртуальную машину.


Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #101 on: October 13, 2020, 05:27:56 PM »
подскажите как можно сделать выполнение работы сценария не мешая основной работе на ПК, а также подгрузку других сценариев?
Использовать виртуальную машину.
Помогите написать и разобраться чтоб работа была в 2 окна

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Игра
« Reply #102 on: October 15, 2020, 02:23:04 AM »
как мне 2 условия соединить в одно? а также помог разобратся с командами #include "____.cms", через #include можно вызвать другой скрипт?
Code: (clickermann) [Select]
//A_LCLICK
SUB(A_LCLICK, $A_x, $A_y, $A_hwnd)
   postmessage($A_hwnd,0x0201,0x0001,$A_x+($A_y*65536))
   waitms($A_press_delay)
   postmessage($A_hwnd,0x0202,0x0001,$A_x+($A_y*65536))
END_SUB
//A_DBLCLICK
SUB(A_DBLCLICK, $A_x, $A_y, $A_hwnd)
   postmessage($A_hwnd,0x0203,0x0001,$A_x+($A_y*65536))
END_SUB
// A_MCLICK
SUB(A_MCLICK, $A_x, $A_y, $A_hwnd)
   postmessage($A_hwnd,0x0207,0x0010,$A_x+($A_y*65536))
   waitms($A_press_delay)
   postmessage($A_hwnd,0x0208,0x0010,$A_x+($A_y*65536))
END_SUB
//A_MOVE
SUB(A_MOVE, $A_x, $A_y, $A_hwnd)
   postmessage($A_hwnd,0x0200,0,$A_x+($A_y*65536))
END_SUB
//A_GETSCREEN
SUB(A_GETSCREEN, $A_x1, $A_y1, $A_x2, $A_y2, $A_hwnd)
   WNDGETINFO ($A_hwnd, $A_x0, $A_y0, $A_width, $A_height)
   IF($A_x1+$A_y1+$A_x2+$A_y2 = 0)
      $A_x2 = $A_width
      $A_y2 = $A_height
   END_IF
   GETSCREEN($A_x0+$A_x1,$A_y0+$A_y1,$A_x0+$A_x2,$A_y0+$A_y2)
END_SUB
//A_IFPICTUREIN
SUB(A_IFPICTUREIN, $A_x1, $A_y1, $A_x2, $A_y2, $A_file, $A_bgcolor, $A_currency, $A_hwnd)
   WNDGETINFO ($A_hwnd, $A_x0, $A_y0, $A_width, $A_height)
   IF_PICTURE_IN($A_x0+$A_x1,$A_y0+$A_y1,$A_x0+$A_x2,$A_y0+$A_y2, $A_file, $A_bgcolor, $A_currency)
      $A_return1 = $_return1-$A_x0
      $A_return2 = $_return2-$A_y0
   else
      $A_return1 = 0
      $A_return2 = 0
   END_IF
END_SUB
$A_press_delay = 30
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)
      ELSE    // если не найдена  11.bmp
         клик(309,613,1000) // сменить главу
      END_IF
   END_CYC
END_SUB
« Last Edit: October 15, 2020, 03:09:42 AM by Viktor77 »