Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Sava

Pages: [1]
1
postmessage($_hwnd, 0x0202, 0x0001, 200 + (200*65536))

Зачем в wParam указывать что лкм все еще нажата если команда идет на поднятие мыши? получается что в очереди сначала поднять кнопку, а потом оставить ее нажатой? в результате картинки по полю таскает ))

2
Эм, советы пропали )) в общем не помогло, если указатель мыши не наведен на окно браузера - не работает...

4
Какие-нибудь примеры решений можете перечислить? Картинки подсвечиваются как при наведении мышки.

5
Всем привет.  Скрипт для браузерки с кликами по картинкам написан и хорошо работает, но в оконном режиме с привязкой к окну видит картинки, но не кликает по ним (ни lclick, ни ldown).
Искал ответ на форуме, но как понял решение найти проблематично. Для работы в оконном режиме с привязкой использовал internet explorer (может быть подскажете более шустрый браузер?). Так вот, может быть кто-то решил проблему с кликами и может мне подсказать?

6
И еще, можно какой-нибудь командой разделить include'ы чтобы они не сливались?

7
Спасибо большое, вечером проверю.
Версия clickermann 4.11.002.

Условие i=0 в for (i=0, i < 10) сразу дает обнуление по завершении цикла?

Не совсем понял про :
Code: (clickermann) [Select]
$isle = 0
FOR($isle=0, $isle < 2)
if_picture_in (0,0,$_xmax,$_ymax,"l_o.bmp")
      $isle = 2
...
 ELSE
      IF($isle = 0)
         logwrite ("острова нет, вторая попытка")
         keypress (#PAGEDOWN)
      ELSE
         logwrite ("остров не обновился, ждем")
      END_IF
      showlog (1)
      wait(1)
   END_IF
END_CYC

$isle < 2  означает что 2 попытки поиска острова? Тогда $isle=2 значит что остров найден? Почему $isle равно именно 2, а не 1? Единица же вроде верность подтверждает...

8
Всем привет.
На одной странице должны выполняться 2 скрипта, один за другим. В случае если условие нахождения картинок выполняется (в общем скрипт трудится, действия совершаются), то все нормально, выполняются один за другим. Как только начинается откат картинок для входа в скрипты, происходит зацикливание на первом (l_o.cms) или на втором (k_o.cms) ... когда как ))
Лог:
[spoiler]
10:23:55 острова нет, вторая попытка
10:23:59 остров не обновился, ждем
10:24:04 охоты нет, вторая попытка
10:24:08 охоты нет, ждем
10:24:13 охоты нет, вторая попытка
10:24:17 охоты нет, ждем
10:24:22 охоты нет, вторая попытка
10:24:26 охоты нет, ждем
10:24:31 охоты нет, вторая попытка
[/spoiler]

Для l_o.cms

Code: (clickermann) [Select]
#include "l_o.cms"
wait (1)
#include "k_o.cms"
wait(1)
#include "d_l.cms"


Code: (clickermann) [Select]
#name "l_o"
#logfile

move (rnd(100,400), rnd(150,700))
waitms(50)


getscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"l_o.bmp")
logwrite ("нашли остров")
showlog (1)
waitms(500)

lclick ($_return1+rnd(40,180), $_return2+rnd(20,40))
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

else
logwrite ("острова нет, вторая попытка")
showlog (1)
keypress (#PAGEDOWN)
wait(1)

getscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"l_o.bmp")
logwrite ("нашли остров")
showlog (1)
waitms(500)

lclick ($_return1+rnd(40,180), $_return2+rnd(20,40))
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

else
logwrite ("остров не обновился, ждем")
showlog (1)
wait(1)
goto(finish)

end_if

end_if


gettscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"l_o_begin.bmp")
waitms(500)

lclick ($_return1+rnd(30,90), $_return2+rnd(12,15))
logwrite ("зашли на остров, начинается бой")
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

end_if

for ($i, $i < 10)

getscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"att_group.bmp")
logwrite ("att")
showlog (1)

lclick ($_return1+10, $_return2+10)
logwrite ("click att - ", $i)
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

end_if

getscreen

if_picture_in (0,0,$_xmax,$_ymax,"N.bmp")
logwrite ("N")
showlog (1)
wait(15)

lclick ($_return1+10, $_return2+10)
logwrite ("click N - ", $i)
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait (1)

else

if_picture_in (0,0,$_xmax,$_ymax,"l_o_end.bmp")
logwrite ("l_o_end see")
showlog (1)

lclick ($_return1+10, $_return2+10)
logwrite ("click l_o_end")
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

end_if

end_if

end_cyc
$i = 0

finish:
wait(1)





Для k_o.cms

Code: (clickermann) [Select]
#name "k_o"
#logfile

move (rnd(100,400), rnd(150,700))
waitms(50)


getscreen

if_picture_in (0,0,$_xmax,$_ymax,"k_o.bmp")
logwrite ("нашли oxoty")
showlog (1)
waitms(500)

lclick ($_return1+rnd(40,180), $_return2+rnd(20,40))
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

else

logwrite ("охоты нет, вторая попытка")
showlog (1)
keypress (#PAGEDOWN)
waitms(50)

getscreen

if_picture_in (0,0,$_xmax,$_ymax,"k_o.bmp")
logwrite ("нашли oxoty")
showlog (1)
waitms(500)

lclick ($_return1+rnd(40,180), $_return2+rnd(20,40))
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

else

logwrite ("охоты нет, ждем")
showlog (1)
goto(finish)

end_if

end_if


getscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"k_o_begin.bmp")


lclick ($_return1+rnd(30,90), $_return2+rnd(12,15))
logwrite ("зашли на oxoty")
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

end_if

getscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"att_group.bmp")
logwrite ("att")
showlog (1)

lclick ($_return1+10, $_return2+10)
  logwrite ("click att - ", $i)
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

end_if

getscreen
waitms(50)

if_picture_in (0,0,$_xmax,$_ymax,"pred.bmp")
logwrite ("pred")
showlog (1)
wait(15)

lclick ($_return1+10, $_return2+10)
logwrite ("охота на хищников")
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait (1)

end_if


for ($i, $i < 20)

getscreen

if_picture_in (0,0,$_xmax,$_ymax,"att_group.bmp")
logwrite ("att")
showlog (1)

lclick ($_return1+10, $_return2+10)
logwrite ("click att - ", $i)
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait (1)

getscreen

if_picture_in (0,0,$_xmax,$_ymax,"pred_next.bmp")
logwrite ("Next")
showlog (1)
wait(15)

lclick ($_return1+10, $_return2+10)
logwrite ("click Next - ", $i)
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait (1)

else

getscreen

if_picture_in (0,0,$_xmax,$_ymax,"l_o_end.bmp")
logwrite ("вижу награду")
showlog (1)

lclick ($_return1+10, $_return2+10)
logwrite ("остров пройден")
showlog (1)
waitms(50)
move (rnd(100,400), rnd(150,700))
wait(1)

end_if

end_if
end_if

end_cyc
$i = 0

finish:


Если можно оптимизировать, улучшить как то написанное, напишите, буду признателен.



Pages: [1]