4
« on: March 28, 2015, 10:23:22 AM »
Все привет!) немножко времени появилось, решил посидеть поиграться с цветом, и понял что бот совсем перестал искать коробки. Вернее он жмякает по карте рандомно, летит туда, там ищет коробки, их нет он летит дальше. А вот во время полетов не ищет их=(
Решил разбираться заново, ссори что сейчас он с goto, мне так легче разбираться)
SUB(mouse_move,$MOVE_END_X,$MOVE_END_Y,$MOVE_CLICK)
$MOVE_SPEED = 2 // ìíîæèòåëü ñêîðîñòè (÷èñëî áîëüøå 0, ÷åì áîëüøå ÷èñëî òåì ìåäëåííåå)
$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=0, $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(RND(3, 8) // ÷åì áîëüøå çàäåðæêà òåì ìåäëåííåå
END_CYC
MOVE($MOVE_END_X, $MOVE_END_Y) //Ïåðåäâèíóòü îêîí÷àòåëüíî â çàäàííóþ òî÷êó
IF($MOVE_CLICK = 1) // êëèê
LDOWN($MOVE_END_X, $MOVE_END_Y)
WAITMS(RND(80,150))
LUP($MOVE_END_X, $MOVE_END_Y)
END_IF
END_SUB
fly:
mouse_move (RND(1020,1341),RND(605,738),0)
LDOWN ($_xmouse, $_ymouse)
WAITMS(RND(80,150))
LUP($_xmouse, $_ymouse)
WAIT(RNDc(7,15))
loot:
GETSCREEN
IF_PIXEL_IN(7,51, 1341,738, 9755391,6199541,16449533,15727869,16252415)
mouse_move ($_return1, $_return2,0)
LDOWN ($_return1, $_return2)
WAITMS(RND(80,150))
LUP($_return1, $_return2)
WAITMS(RND(100,150))
WAIT(RND(3,5)
goto(loot)
else
goto(fly)
END_IF