Author Topic: 4.9...error  (Read 3555 times)

0 Members and 1 Guest are viewing this topic.

MIG29

  • Освоившийся
  • **
  • Posts: 45
    • View Profile
4.9...error
« on: March 23, 2014, 05:55:11 PM »
Здравствуйте все, привет Джони. Несколько месяцев не открывал к-мен.
4.9 (буилд 005).

Разогнался уже писать, но не пойму что происходит  :o. Вот вырезал кусок кода, кликер залипает(что то активно вычесляет), но не "перестаёт отвечать".

Code: (clickermann) [Select]
// Hunter 2 lvl
// Author: fia
// Version: 1.0 (23.03.2014)

#name "Hunter 2 lvl"

sub(fight)
////åñëè ïåðâûé áîé////
while($first = 0)
break("Âìåøàéñÿ â áîé!")

 getscreen
 if_picture_in(0,0,$_xmax,$_ymax,"hp.bmp")
 $hx = $_return1
 $hy = $_return2
 $first = 999
 $inc_x = rnd(0,15)
 $inc_y = rnd(0,15)
 print("Ïåðâûé áîé óäà÷íî çàïèñàí.")
   else
   wait(3)
   end_if
end_cyc
///////////////////////////////
 // if(pxl($hx+65+$inc_x,$hy+244+$inc_y) > 11900715)
 //îáû÷íûé
 // if(pxl($hx+18+$inc_x,$hy+244+$inc_y) > 2976916)
 //\\//\\//\\//\\//\\//\\//\\//\\
ready:
waitms(450)
getscreen

//Ìîùüíûé óäàð:
if(pxl($hx+65+$inc_x,$hy+244+$inc_y) > 11900715)
move4($hx+65+$inc_x,$hy+244+$inc_y,rnd(5,8),999,20,50)//ñ íàæàòèåì

/////æäàëêà
 $step_wait = $_ms
 $during = rnd(1500,2500)
 $minimumOfRandom = 1//ñïåðâà äâèãàåì , ïîòîì íåò

  while(($_ms - $step_wait) < $during)
  waitms(100)

  $RandomMouseMoveAfterHit = rnd($minimumOfRandom,10)
  if($RandomMouseMoveAfterHit = 1)
  move4($_xmouse+rnd(-100,100),$_ymouse+rnd(-100,100),rnd(5,8),0,0,0)
  $minimumOfRandom = 2 //ïåðåñòàòü äóìàòü ÷òî íàäî äâèãàòü =)
  end_if

  end_cyc//êîíåö æäàëêè/////
end_if

//ïðîñòîé óäàð:
if(pxl($hx+18+$inc_x,$hy+244+$inc_y) > 2976916)
move4($hx+18+$inc_x,$hy+244+$inc_y,rnd(5,8),999,20,50)//ñ íàæàòèåì

/////æäàëêà
 $step_wait = $_ms
 $during = rnd(1500,2500)
 $minimumOfRandom = 1//ñïåðâà äâèãàåì , ïîòîì íåò

  while(($_ms - $step_wait) < $during)
  waitms(100)

  $RandomMouseMoveAfterHit = rnd($minimumOfRandom,10)
  if($RandomMouseMoveAfterHit = 1)
  move4($_xmouse+rnd(-100,100),$_ymouse+rnd(-100,100),rnd(5,8),0,0,0)
  $minimumOfRandom = 2 //ïåðåñòàòü äóìàòü ÷òî íàäî äâèãàòü =)
  end_if

  end_cyc//êîíåö æäàëêè/////
end_if

goto(ready) 
end_sub

sub(move4,$move_end_x,$move_end_y,$move_speed,$click,$wait_min,$wait_max)
   //$MOVE_SPEED = rnd(5,12)
   $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)
   //LOGWRITE ("dist  ",$dist)
   //LOGWRITE ("MOVE_SPEEDVAR  ",$MOVE_SPEEDVAR)
 
   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
 
   $MOVE_i=0
   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) //îêîí÷àòåëüíî â çàäàííóþ òî÷êó

//êëèêíóòü ìûøêîé
if($click!0)
waitms(rnd($wait_min,$wait_max))
lclick($_xmouse,$_ymouse)
end_if

end_sub

fight()///////ПО ИДЕЕ ЭТО ЕДИНСТВЕННО МЕСТО СКРИПТА (БЕЗ УЧЕТА ПОДПРОГРАММ)
//move4($hx,$hy,rnd(5,12),999,20,100)


halt // for single run
if_picture_in - зло

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: 4.9...error
« Reply #1 on: March 23, 2014, 07:17:58 PM »
Здравствуйте все, привет Джони. Несколько месяцев не открывал к-мен.
4.9 (буилд 005).

Разогнался уже писать, но не пойму что происходит  :o. Вот вырезал кусок кода, кликер залипает(что то активно вычесляет), но не "перестаёт отвечать".

Code: (clickermann) [Select]
// Hunter 2 lvl
// Author: fia
// Version: 1.0 (23.03.2014)

#name "Hunter 2 lvl"

sub(fight)
////åñëè ïåðâûé áîé////
while($first = 0)
break("Âìåøàéñÿ â áîé!")

 getscreen
 if_picture_in(0,0,$_xmax,$_ymax,"hp.bmp")
 $hx = $_return1
 $hy = $_return2
 $first = 999
 $inc_x = rnd(0,15)
 $inc_y = rnd(0,15)
 print("Ïåðâûé áîé óäà÷íî çàïèñàí.")
   else
   wait(3)
   end_if
end_cyc
///////////////////////////////
 // if(pxl($hx+65+$inc_x,$hy+244+$inc_y) > 11900715)
 //îáû÷íûé
 // if(pxl($hx+18+$inc_x,$hy+244+$inc_y) > 2976916)
 //\\//\\//\\//\\//\\//\\//\\//\\
ready:
waitms(450)
getscreen

//Ìîùüíûé óäàð:
if(pxl($hx+65+$inc_x,$hy+244+$inc_y) > 11900715)
move4($hx+65+$inc_x,$hy+244+$inc_y,rnd(5,8),999,20,50)//ñ íàæàòèåì

/////æäàëêà
 $step_wait = $_ms
 $during = rnd(1500,2500)
 $minimumOfRandom = 1//ñïåðâà äâèãàåì , ïîòîì íåò

  while(($_ms - $step_wait) < $during)
  waitms(100)

  $RandomMouseMoveAfterHit = rnd($minimumOfRandom,10)
  if($RandomMouseMoveAfterHit = 1)
  move4($_xmouse+rnd(-100,100),$_ymouse+rnd(-100,100),rnd(5,8),0,0,0)
  $minimumOfRandom = 2 //ïåðåñòàòü äóìàòü ÷òî íàäî äâèãàòü =)
  end_if

  end_cyc//êîíåö æäàëêè/////
end_if

//ïðîñòîé óäàð:
if(pxl($hx+18+$inc_x,$hy+244+$inc_y) > 2976916)
move4($hx+18+$inc_x,$hy+244+$inc_y,rnd(5,8),999,20,50)//ñ íàæàòèåì

/////æäàëêà
 $step_wait = $_ms
 $during = rnd(1500,2500)
 $minimumOfRandom = 1//ñïåðâà äâèãàåì , ïîòîì íåò

  while(($_ms - $step_wait) < $during)
  waitms(100)

  $RandomMouseMoveAfterHit = rnd($minimumOfRandom,10)
  if($RandomMouseMoveAfterHit = 1)
  move4($_xmouse+rnd(-100,100),$_ymouse+rnd(-100,100),rnd(5,8),0,0,0)
  $minimumOfRandom = 2 //ïåðåñòàòü äóìàòü ÷òî íàäî äâèãàòü =)
  end_if

  end_cyc//êîíåö æäàëêè/////
end_if

goto(ready) 
end_sub

sub(move4,$move_end_x,$move_end_y,$move_speed,$click,$wait_min,$wait_max)
   //$MOVE_SPEED = rnd(5,12)
   $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)
   //LOGWRITE ("dist  ",$dist)
   //LOGWRITE ("MOVE_SPEEDVAR  ",$MOVE_SPEEDVAR)
 
   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
 
   $MOVE_i=0
   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) //îêîí÷àòåëüíî â çàäàííóþ òî÷êó

//êëèêíóòü ìûøêîé
if($click!0)
waitms(rnd($wait_min,$wait_max))
lclick($_xmouse,$_ymouse)
end_if

end_sub

fight()///////ПО ИДЕЕ ЭТО ЕДИНСТВЕННО МЕСТО СКРИПТА (БЕЗ УЧЕТА ПОДПРОГРАММ)
//move4($hx,$hy,rnd(5,12),999,20,100)


halt // for single run
Как минимум sub(move4) должна быть самой первой.


MIG29

  • Освоившийся
  • **
  • Posts: 45
    • View Profile
Re: 4.9...error
« Reply #2 on: March 23, 2014, 08:52:59 PM »
Да, заработало, пасиб :D
if_picture_in - зло