Author Topic: Ребят, опять помощь нужна.  (Read 1956 times)

0 Members and 1 Guest are viewing this topic.

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Ребят, опять помощь нужна.
« on: September 22, 2014, 06:17:20 PM »
Code: (clickermann) [Select]
SUB(mouse_move,$MOVE_END_X,$MOVE_END_Y)
   $MOVE_SPEED = 9  // множитель скорости
   
   $MOVE_Start_X = $_xmouse
   $MOVE_Start_Y = $_ymouse
   $MOVE_X = $MOVE_Start_X
   $MOVE_Y = $MOVE_Start_Y
   
   $dist = DIST($MOVE_END_X,$MOVE_END_Y,$MOVE_Start_X,$MOVE_Start_Y)
   
   $MOVE_SPEEDVAR = INT((SQRT($dist))/$MOVE_SPEED)
   
   IF($MOVE_SPEEDVAR < 1)
      $MOVE_SPEEDVAR = 1
   END_IF
   
   $MOVE_step=($dist-1)/$MOVE_SPEEDVAR
   $MOVE_X_step = ($MOVE_END_X-$MOVE_Start_X)/$MOVE_step
   $MOVE_Y_step = ($MOVE_END_Y-$MOVE_Start_Y)/$MOVE_step
   
   FOR($MOVE_i, $MOVE_i<INT($MOVE_step))
      $MOVE_X = $MOVE_X + $MOVE_X_step
      $MOVE_Y = $MOVE_Y + $MOVE_Y_step
      MOVE(ROUND($MOVE_X,0), ROUND($MOVE_Y,0))
      WAITMS(1)
   END_CYC
   
   MOVE($MOVE_END_X, $MOVE_END_Y)
END_SUB
           
WAIT(1)

$x=1169
$y=24
MOVE($x-RND(300),$y+RND(50))
WAITMS(50)
LDOWN($_xmouse, $_ymouse)
WAITMS(50)
mouse_move($_xmouse+RND(150),$_ymouse)
WAITMS(1000)
LUP($_xmous, $_ymouse)

Почему в конце не отпускает левую клавишу мыши? И еще вопрос - можно ли ЕЩЕ медленнее мышку как-то сделать? Уж очень быстро она шныряет...
« Last Edit: September 22, 2014, 06:30:03 PM by Hito »
Я не ду... Потому и не бу...

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Ребят, опять помощь нужна.
« Reply #1 on: September 22, 2014, 07:32:12 PM »
Code: (clickermann) [Select]
MOVE($x-RND(300),$y+RND(50))
Где второе число в рандоме?
Code: (clickermann) [Select]
RND(100,300)

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Ребят, опять помощь нужна.
« Reply #2 on: September 22, 2014, 08:37:14 PM »
Да вот как то так.
Множитель скорости - это частота точек по которым пройдет курсор, также сильно сбавить скорость можно увеличив задержку на 25 строке. 1-5 мс вполне достаточно

Code: (clickermann) [Select]
SUB(mouse_move,$MOVE_END_X,$MOVE_END_Y)
   $MOVE_SPEED = 6  // множитель скорости
   
   $MOVE_Start_X = $_xmouse
   $MOVE_Start_Y = $_ymouse
   $MOVE_X = $MOVE_Start_X
   $MOVE_Y = $MOVE_Start_Y
   
   $dist = DIST($MOVE_END_X,$MOVE_END_Y,$MOVE_Start_X,$MOVE_Start_Y)
   
   $MOVE_SPEEDVAR = INT((SQRT($dist))/$MOVE_SPEED)
   
   IF($MOVE_SPEEDVAR < 1)
      $MOVE_SPEEDVAR = 1
   END_IF
   
   $MOVE_step=($dist-1)/$MOVE_SPEEDVAR
   $MOVE_X_step = ($MOVE_END_X-$MOVE_Start_X)/$MOVE_step
   $MOVE_Y_step = ($MOVE_END_Y-$MOVE_Start_Y)/$MOVE_step
   
   FOR($MOVE_i, $MOVE_i<INT($MOVE_step))
      $MOVE_X = $MOVE_X + $MOVE_X_step
      $MOVE_Y = $MOVE_Y + $MOVE_Y_step
      MOVE(ROUND($MOVE_X,0), ROUND($MOVE_Y,0))
      WAITMS(3) // скорость
   END_CYC
   
   MOVE($MOVE_END_X, $MOVE_END_Y)
END_SUB

WAIT(1)

$x=1169
$y=24
MOVE($x-RND(300,400),$y+RND(50,100))
WAITMS(50)
LDOWN($_xmouse, $_ymouse)
WAITMS(50)
mouse_move($_xmouse+RND(150,300),$_ymouse)
WAITMS(1000)
LUP($_xmouse, $_ymouse)

HALT

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Ребят, опять помощь нужна.
« Reply #3 on: September 23, 2014, 12:38:34 AM »
Спасибо большое!
Я не ду... Потому и не бу...

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Re: Ребят, опять помощь нужна.
« Reply #4 on: September 23, 2014, 09:52:15 AM »
LUP($_xmous, $_ymouse) не отпускает потому, что в первой переменной пропала буква  е  на конце!

Друг, моя невнимательность не знает границ... Это большой минус в написании скриптов. Но моя упертость больше моей невнимательности )) СУТКАМИ в памперсах буду сидеть у компа, пока нужный скрипт не станет работать правильно. Это не дает мне оставить это дело из-за невнимательности ))))

а летает потому, что используешь стандартную остановку из архива кликера, кто мешает тебе её вручную изменить после того,
как прописал таким быстрым и удобным способом?  не WAITMS(1), а WAITMS(22) илиWAITMS(76). Это ведь совершенно очевидное и секундное дело.

Подпрограмму для медленной мыши не я писал - уважаемый Oraven мне ее написал )) Потому и не знал - где и что в ней менять ))
Я не ду... Потому и не бу...