Автокликер Clickermann :: Форум
Основной раздел => Общие вопросы => Topic started by: gogodanse on November 23, 2019, 01:44:43 AM
-
Добрый день, накатал себе скрипт для автоматизации, но я в этом ньюфаг поэтому скрипт мусорный и водный
помощи по оптимизации не прошу, комп справляется на ура
но есть вопрос первые дни все работало нормально а теперь не знаю может что изменил и скрипт в рандомное время перестает работать хотя паузы не стоит, он просто не делает скрин экрана
//// 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)
////////////////////////////////////////////////
-
Заметил что перестает работать только на дедике
На основном пк работает без проблем
А вообще как я понял уважаемый @Oraven эксперт по оптимизации- поможете мне с вариантами ?
-
Понял что скрит останавливается на том моменте когда не может найти картинку start6.bpm тоесть эта та картинка которой нету на экране !!!!!!
-
GETSCREEN где?
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
-
на счет оптимизации, вот...
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)
// и тд.
-
Спасибо то что нужно ! лучший :-*