Author Topic: Скрит перестает работать  (Read 1451 times)

0 Members and 1 Guest are viewing this topic.

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Скрит перестает работать
« on: November 23, 2019, 01:44:43 AM »
Добрый день, накатал себе скрипт для автоматизации, но я в этом ньюфаг поэтому скрипт мусорный и водный

помощи по оптимизации не прошу, комп справляется на ура

но есть вопрос первые дни все работало нормально а теперь не знаю может что изменил и скрипт в рандомное время перестает работать хотя паузы не стоит, он просто не делает скрин экрана

Code: [Select]
//// 20.11.2019
#name "t"

////////////////////////////////////////////////
//pack1
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start1.bmp")
   IF_PIXEL_IN(155,130, 155,130, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("Uggfd")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek001")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("1"), 35,32)
      WNDSIZE(WNDFIND("1"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop1.bmp")
   WHILE(PXL (195,104) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(250,43)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack2
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start2.bmp")
   IF_PIXEL_IN(422,130, 422,130, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("Udfgdfgtreytry")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek002")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("2"), 291,33)
      WNDSIZE(WNDFIND("2"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop2.bmp")
   WHILE(PXL (447,112) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(503,43)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack3
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start3.bmp")
   IF_PIXEL_IN(675,117, 675,117, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCrnert")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek003")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("3"), 548,32)
      WNDSIZE(WNDFIND("3"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop3.bmp")
   WHILE(PXL (709,109) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(762,44)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack4
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start4.bmp")
   IF_PIXEL_IN(920,110, 920,110, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCtyjtyjty")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek004")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("4"), 805,33)
      WNDSIZE(WNDFIND("4"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop4.bmp")
   WHILE(PXL (978,94) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1013,43)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack5
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start5.bmp")
   IF_PIXEL_IN(1176,112, 1176,122, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCwFRr457")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek005")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("5"), 1062,32)
      WNDSIZE(WNDFIND("5"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop5.bmp")
   WHILE(PXL (1224,109) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1275,41)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack6
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start6.bmp")
   IF_PIXEL_IN(160,320, 160,320, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("U234435Q")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek006")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("6"), 35,235)
      WNDSIZE(WNDFIND("6"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop6.bmp")
   WHILE(PXL (200,310) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(246,247)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack7
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start7.bmp")
   IF_PIXEL_IN(430,325, 430,325, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UC37k67k67CQ")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek007")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("7"), 292,234)
      WNDSIZE(WNDFIND("7"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop7.bmp")
   WHILE(PXL (460,303) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(508,248)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack8
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start8.bmp")
   IF_PIXEL_IN(675,320, 675,320, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UC567567BMjYSaw")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek008")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("8"), 549,234)
      WNDSIZE(WNDFIND("8"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop8.bmp")
   WHILE(PXL (710,310) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(760,245)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack9
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start9.bmp")
   IF_PIXEL_IN(920,320, 920,320, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCQiKHRV45645-Q")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek009")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("9"), 805,234)
      WNDSIZE(WNDFIND("9"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop9.bmp")
   WHILE(PXL (975,300) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1018,244)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack10
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start10.bmp")
   IF_PIXEL_IN(1210,317, 1210,317, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCzvj0w5645KOqBQ")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek010")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("10"), 1062,235)
      WNDSIZE(WNDFIND("10"), 245, 170)
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop10.bmp")
   WHILE(PXL (1223,306) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1273,247)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack23
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start23.bmp")
   IF_PIXEL_IN(695,916, 695,916, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UC78778A")
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("2000")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek023")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("23"), 549,841)
      WNDSIZE(WNDFIND("23"), 245, 170)
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("1000")
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop23.bmp")
   WHILE(PXL (725,906) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(755,853)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack24
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start24.bmp")
   IF_PIXEL_IN(928,906, 928,906, 1907997)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("UCzo87978qQT8Mg")
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("2000")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek024")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("24"), 806,842)
      WNDSIZE(WNDFIND("24"), 245, 170)
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("1000")
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop24.bmp")
   WHILE(PXL (970,902) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1016,853)
END_IF

WAITMS(1500)
////////////////////////////////////////////////

////////////////////////////////////////////////
//pack25
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "start25.bmp")
   IF_PIXEL_IN(1203,923, 1203,923, 4802889)
      WAITMS(1000)
      LCLICK(1523,148)
      WAITMS(500)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("U6868689")
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("2000")
      WAITMS(1000)
      LCLICK(1699,147)
      WAITMS(1000)
      LCLICK(1650,220)
      WAITMS(1000)
      KEYSTRING("kek025")
      WAITMS(1000)
      LCLICK(1100,510)
      WAITMS(1000)
      LCLICK(1552,345)
      WAITMS(2000)
      WNDPOS(WNDFIND("25"), 1062,841)
      WNDSIZE(WNDFIND("25"), 245, 170)
      WAITMS(1000)
      LCLICK(1637,285)
      KEYDOWN (#CTRL)
      WAITMS (50)
      KEYPRESS (#A)
      KEYUP (#CTRL)
      WAITMS(1000)
      KEYSTRING("1000")
   END_IF
END_IF

IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop25.bmp")
   WHILE(PXL (1238,906) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(1287,849)
END_IF

WAITMS(1500)
////////////////////////////////////////////////
« Last Edit: November 23, 2019, 01:52:54 AM by gogodanse »

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Скрит перестает работать
« Reply #1 on: November 23, 2019, 04:09:51 AM »
Заметил что перестает работать только на дедике

На основном пк работает без проблем


А вообще как я понял уважаемый @Oraven эксперт по оптимизации- поможете мне с вариантами ?
« Last Edit: November 23, 2019, 04:12:48 AM by gogodanse »

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Скрит перестает работать
« Reply #2 on: November 23, 2019, 01:12:03 PM »
Понял что скрит останавливается на том моменте когда не может найти картинку start6.bpm тоесть эта та картинка которой нету на экране !!!!!!

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Скрит перестает работать
« Reply #3 on: November 23, 2019, 01:29:35 PM »
GETSCREEN где?

Code: (clickermann) [Select]
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop1.bmp")
   WHILE(PXL (195,104) ! 0)
      WAITMS (500)
   END_CYC
   LCLICK(250,43)
END_IF

Если цикл WHILE начнется то уже никогда не закончится, ведь нет команды обновления снимка экрана, он так и будет анализировать снимок с последнего GETSCREEN

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Скрит перестает работать
« Reply #4 on: November 23, 2019, 01:47:34 PM »
на счет оптимизации, вот...

Code: (clickermann) [Select]
SUB(pack, $im1, $x1,$y1, $colr1, $l, $p, $okno, $x2,$y2, $x3,$y3, $x4,$y4)
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, $im1)
      IF(PXL($x1,$y1) = $colr1)
         WAITMS(1000)
         LCLICK(1523,148)
         WAITMS(500)
         KEYDOWN (#CTRL)
         WAITMS (50)
         KEYPRESS (#A)
         KEYUP (#CTRL)
         WAITMS(1000)
         KEYSTRING($l)
         WAITMS(1000)
         LCLICK(1699,147)
         WAITMS(1000)
         LCLICK(1650,220)
         WAITMS(1000)
         KEYSTRING($p)
         WAITMS(1000)
         LCLICK(1100,510)
         WAITMS(1000)
         LCLICK(1552,345)
         WAITMS(2000)
         WNDPOS(WNDFIND($okno), $x2,$y2)
         WNDSIZE(WNDFIND($okno), 245, 170)
      END_IF
   END_IF
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "stop1.bmp")
      WHILE(PXL ($x3,$y3) ! 0)
         WAITMS (500)
         GETSCREEN
      END_CYC
      LCLICK($x4,$y4)
   END_IF
   
   WAITMS(1500)
END_SUB

//pack
pack("start1.bmp",155,130,4802889,"Uggfd","kek001","1",35,32, 195,104, 250,43)
pack("start2.bmp",422,130,1907997,"Udfgdfgtreytry","kek002","2",291,33, 447,112, 503,43)
// и тд.

gogodanse

  • Освоившийся
  • **
  • Posts: 58
    • View Profile
Re: Скрит перестает работать
« Reply #5 on: November 23, 2019, 03:14:27 PM »
Спасибо то что нужно ! лучший  :-*