Ставить лайки в контакте, помогите

[wichujanin]

Всем привет!
Хочу написать скрипт, который ставит лайки другим пользователям в контакте.
Делаю так:

Code: [Select]

getscreen
if_picture_in(0, 0, $_xmax, $_ymax, "line.bmp")

keydown(#ctrl)
waitms(50)
lclick($_return1 + 15, $_return2 + 20)

wait(4)
 
keypress(#tab)
waitms(50)
keyup(#ctrl)
wait(2)

wheeldown
waitms(rnd(100,200))                       
wheeldown
waitms(rnd(100,200))
wheeldown
waitms(rnd(100,200))
END_IF
Эта часть работает.
Открывает страницу в новой вкладке, прокручивает вниз.

Потом делаю так:

Code: [Select]

getscreen
if_picture_in(0, 0, $_xmax, $_ymax, "like.bmp")
lclick($_return1, $_return2)
END_IFЕсли отдельно от первой части кода запустить то работает, если вместе то кликает не туда 

Помогите! Как можно улучшить код? Может у кого готовое решение есть?

[Oraven]

Попробуй так

Code: (clickermann) [Select]

getscreen
if_picture_in(0, 0, $_xmax, $_ymax, "like.bmp")
   MOVE($_return1+3, $_return2+3)
   WAITMS(60)
   LCLICK($_return1+3, $_return2+3)
   WAITMS(60)
END_IF

[wichujanin]

Спасибо, заработало! Еще один вопрос:
Есть скрипт состоящий из нескольких условий вида:

getscreen
if_picture_in
  ....
end_if

getscreen
if_picture_in
  ....
end_if

getscreen
if_picture_in
  ....
end_if

Как сделать проверку, что если ни одно из условий не выполняется на странице, то закрываем страницу:
    wait(1)     
    keydown(#ctrl)
    waitms(50)
    keypress(#w)
    waitms(50)
    keyup(#ctrl)
Либо как то сделать проверку сколько кликер находится на одной и той же странице

[Vint]

Спасибо, заработало! Еще один вопрос:
Есть скрипт состоящий из нескольких условий вида:

getscreen
if_picture_in
  ....
end_if

getscreen
if_picture_in
  ....
end_if

getscreen
if_picture_in
  ....
end_if

Как сделать проверку, что если ни одно из условий не выполняется на странице, то закрываем страницу:
    wait(1)     
    keydown(#ctrl)
    waitms(50)
    keypress(#w)
    waitms(50)
    keyup(#ctrl)
Либо как то сделать проверку сколько кликер находится на одной и той же странице

Code: (clickermann) [Select]

getscreen
if_picture_in 1
   ....
else
   getscreen
   if_picture_in 2
      ....
   else
      getscreen
      if_picture_in 3
         ....
      else
         // не найдено ни одной
         wait(1)
         keydown(#ctrl)
         waitms(50)
         keypress(#w)
         waitms(50)
         keyup(#ctrl)
      end_if
   end_if
end_if