Игра

[Viktor77]

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

Code: (clickermann) [Select]

SETKBLAYOUT(WNDFIND("yandex",0), 1033) //несменивает язык
Функция WNDFIND возвращает HWND первого попавшегося окна в заголовке которого есть слово yandex. Вполне возможно что окно не то, или вообще не найдено.

Запись в лог развеит эти непонятки.

Code: (clickermann) [Select]

$hw = WNDFIND("yandex",0)
LOGWRITE ("HWND yandex: ", $hw) // можно увидеть какой именно HWND возвращается.
IF($hw > 0) // если возвращается не 0 то значит окно найдено
   SETKBLAYOUT($hw, 1033)
END_IF

тут уже не работает, 77 картинку выполняет определенное количество раз, а как только картинка 77 меняет цвет, и становится картинка 78, не останавливает действие.

В твоем случаи 78 будет искать только если до этого найдена 77, и только 1 раз.

В этом случаи 78 будет искать если 77 не найдено сколько угодно раз.

Code: (clickermann) [Select]

$check1 = 0
WHILE($check1 = 0)
   GETSCREEN(365,200, 898,646)
   IF_PICTURE_IN (365,200, 898,646, "77.bmp", -1, 100)
      клик($_return1, $_return2,1000)
   ELSE
      IF_PICTURE_IN (365,200, 898,646, "78.bmp", -1, 100)
         LOGWRITE ("не найдена 78")
         move($_return1, $_return2)
         $check1 = 1
         LOGWRITE ("найдена 78")
         WAITMS(2000)
      ELSE
         WAITMS(100)
      END_IF
   END_IF
END_CYC

HWND yandex: 0

[Oraven]

HWND yandex: 0

Что и требовалось доказать, окно не найдено.

[Viktor77]

HWND yandex: 0

Что и требовалось доказать, окно не найдено.

все происходит в одном окне, и тут то пишет текст

Code: (clickermann) [Select]

SETKBLAYOUT(WNDFIND("Clickermann",0), 1049)
WAITMS(50)
SETKBLAYOUT(WNDFIND("yandex",0), 1049)
WAITMS(50)
LCLICK(73,737)  // 0
KEYSTRING("текст")
WAITMS(50)
а тут получается окно не найдено

Code: (clickermann) [Select]

SETKBLAYOUT(WNDFIND("Clickermann",0), 1033)// меняет язык
WAITMS(50)
SETKBLAYOUT(WNDFIND("yandex",0), 1033) //несменивает язык
$hw = WNDFIND("yandex",0)

[Viktor77]

HWND yandex: 0

Что и требовалось доказать, окно не найдено.

на данный момент и тут не находит, пишет латинскими буквами

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)
картинка(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("yandex",0), 1049) //1033 En или 1049 Ru
WAITMS(50)
KEYSTRING("текст1")
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)
KEYSTRING("текст2")
WAITMS(50)
картинка(0,636, 437,757,"34.bmp",2,2,2000)
$time = $_time_t + 720 // таймер на 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)
HALT

[Viktor77]

HWND yandex: 0

Что и требовалось доказать, окно не найдено.

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

[Oraven]

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

Прежде получи точный текст заголовка браузера. Это можно сделать с помощью менеджера окон на основной форме кликера, или вот таким кодом.
Наведи мышь на заголовок окна и запусти кликер

Code: (clickermann) [Select]

LOGWRITE(HGETTEXT(HGET($_xmouse,$_ymouse)))
LOGSHOW (1, 100,100)
HALT
Может там Yandex написано.

[Viktor77]

координаты разные.

работает до 173 строки, а дальше выполняет HALT, но не выполняется весь скрипт. подскажите вся загвоздка в команде $var666, ниже нужно сменить название? 

[Viktor77]

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

Прежде получи точный текст заголовка браузера. Это можно сделать с помощью менеджера окон на основной форме кликера, или вот таким кодом.
Наведи мышь на заголовок окна и запусти кликер

Code: (clickermann) [Select]

LOGWRITE(HGETTEXT(HGET($_xmouse,$_ymouse)))
LOGSHOW (1, 100,100)
HALT
Может там Yandex написано.

18:57:10 Maverick (film) - Wikipedia - Яндекс.Браузер
проверял на любой вкладке пишет название вкладки - Яндекс.Браузер

[Oraven]

координаты разные.

работает до 173 строки, а дальше выполняет HALT, но не выполняется весь скрипт. подскажите вся загвоздка в команде $var666, ниже нужно сменить название?

Что еще за WHILE($var666 < 777)?
Ты понимаешь что пишешь? У тебя выше строка 167 $var666=7777 а потом идет условие цикла WHILE($var666 < 777) которое конечно не выполнится потому что $var666 равна 7777 что конечно больше чем 777

Используй нормальные понятия, например

Code: (clickermann) [Select]

$check = 0 // задаем переменной значение 0
WHILE($check = 0) // цикл выполняется если эта переменная равна 0
   GETSCREEN(910,220, 970,270)
   IF_PIXEL_IN(910,220, 970,270, 16777215)
      $check = 1 // если хотим прекратить цикл, меняем значение переменной
   END_IF
END_CYC
Таким образом у нас $check у нас работает как переключатель, когда 0 цикл выполняется когда 1 не выполняется. А не эти твои 7777

Чтобы цикл начал работать нужно добавить:

Code: (clickermann) [Select]

$var666 = 0 // чтоб переменная стала меньше 777
WHILE($var666 < 777)

[Oraven]

18:57:10 Maverick (film) - Wikipedia - Яндекс.Браузер
проверял на любой вкладке пишет название вкладки - Яндекс.Браузер

Тык чего ж ты yandex ищешь когда тебе надо искать Яндекс.Браузер?!

Code: (clickermann) [Select]

SETKBLAYOUT(WNDFIND("Яндекс.Браузер",0), 1049) //1033 En или 1049 Ru

[Viktor77]

координаты разные.

работает до 173 строки, а дальше выполняет HALT, но не выполняется весь скрипт. подскажите вся загвоздка в команде $var666, ниже нужно сменить название?

Что еще за WHILE($var666 < 777)?
Ты понимаешь что пишешь? У тебя выше строка 167 $var666=7777 а потом идет условие цикла WHILE($var666 < 777) которое конечно не выполнится потому что $var666 равна 7777 что конечно больше чем 777

Используй нормальные понятия, например

Code: (clickermann) [Select]

$check = 0 // задаем переменной значение 0
WHILE($check = 0) // цикл выполняется если эта переменная равна 0
   GETSCREEN(910,220, 970,270)
   IF_PIXEL_IN(910,220, 970,270, 16777215)
      $check = 1 // если хотим прекратить цикл, меняем значение переменной
   END_IF
END_CYC
Таким образом у нас $check у нас работает как переключатель, когда 0 цикл выполняется когда 1 не выполняется. А не эти твои 7777

Чтобы цикл начал работать нужно добавить:

Code: (clickermann) [Select]

$var666 = 0 // чтоб переменная стала меньше 777
WHILE($var666 < 777)

так все работает, но это для одного акк, а в файле для 6-7. и не работает

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)
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)
halt

[Viktor77]

координаты разные.

работает до 173 строки, а дальше выполняет HALT, но не выполняется весь скрипт. подскажите вся загвоздка в команде $var666, ниже нужно сменить название?

Что еще за WHILE($var666 < 777)?
Ты понимаешь что пишешь? У тебя выше строка 167 $var666=7777 а потом идет условие цикла WHILE($var666 < 777) которое конечно не выполнится потому что $var666 равна 7777 что конечно больше чем 777

Используй нормальные понятия, например

Code: (clickermann) [Select]

$check = 0 // задаем переменной значение 0
WHILE($check = 0) // цикл выполняется если эта переменная равна 0
   GETSCREEN(910,220, 970,270)
   IF_PIXEL_IN(910,220, 970,270, 16777215)
      $check = 1 // если хотим прекратить цикл, меняем значение переменной
   END_IF
END_CYC
Таким образом у нас $check у нас работает как переключатель, когда 0 цикл выполняется когда 1 не выполняется. А не эти твои 7777

Чтобы цикл начал работать нужно добавить:

Code: (clickermann) [Select]

$var666 = 0 // чтоб переменная стала меньше 777
WHILE($var666 < 777)

тоесть нужно перед WHILE($var666 < 777), обнулять переменную? не именно $var666, не важно как название переменной, нужно всегда обнулять, правильно понял?

[Viktor77]

координаты разные.

работает до 173 строки, а дальше выполняет HALT, но не выполняется весь скрипт. подскажите вся загвоздка в команде $var666, ниже нужно сменить название?

Что еще за WHILE($var666 < 777)?
Ты понимаешь что пишешь? У тебя выше строка 167 $var666=7777 а потом идет условие цикла WHILE($var666 < 777) которое конечно не выполнится потому что $var666 равна 7777 что конечно больше чем 777

Используй нормальные понятия, например

Code: (clickermann) [Select]

$check = 0 // задаем переменной значение 0
WHILE($check = 0) // цикл выполняется если эта переменная равна 0
   GETSCREEN(910,220, 970,270)
   IF_PIXEL_IN(910,220, 970,270, 16777215)
      $check = 1 // если хотим прекратить цикл, меняем значение переменной
   END_IF
END_CYC
Таким образом у нас $check у нас работает как переключатель, когда 0 цикл выполняется когда 1 не выполняется. А не эти твои 7777

Чтобы цикл начал работать нужно добавить:

Code: (clickermann) [Select]

$var666 = 0 // чтоб переменная стала меньше 777
WHILE($var666 < 777)

я подправил, правильно ли?

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

[Oraven]

Ну теперь порядок.

[Oraven]

я подправил, правильно ли?

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 не хватает