Помогите разобраться с ходилкой

Ask for help

Moderators: Murderator+, Murderator

Post Reply
ychenik
Posts: 82
Joined: 2007-07-01 21:23:58

Помогите разобраться с ходилкой

Post by ychenik »

Code: Select all

sub Step(x,y,mx,my,forstep) 
  if uo.GetX('self') <> x then
    if uo.GetY('self') <> y then
      if mx<0 then
        if my<0 then
          uo.Press(40)
          wait(forstep)
        else
          uo.Press(39)
          wait(forstep)
        end if
      else
        if my<0 then
          uo.Press(37)
          wait(forstep)
        else
          uo.Press(38)
          wait(forstep)
        end if
      end if
    else
      if mx<0 then
        uo.Press(34)
        wait(forstep)
      else
        uo.Press(36)
        wait(forstep)
      end if
    end if
  else
    if my<0 then
      uo.Press(35)
      wait(forstep)
    else
      uo.Press(33)
      wait(forstep)
    end if
  end if
end sub

sub Go_To(x,y)
var mx,my,fx,fy
  var xx=x
  var yy=y
  var DistX=0
  var DistY=0
  var forstep=300
 
  repeat
    mx=uo.GetX('self')-x
    my=uo.GetY('self')-y
    fx=mx+x
    fy=my+y
    Step(xx,yy,mx,my,forstep)
  until x==fx+DistX && y==fy+DistY || x==fx-DistX && y==fy+DistY || x==fx+DistX && y==fy-DistY || x==fx-DistX && y==fy-DistY || x==fx && y==fy
end sub


вот сама ходилка, пишу внизу скрипта координаты, например:
Go_To(1149,1678)
Go_To(1149,1684)
чар начинает проходить 1 раз по заданным координатам, как сделать так чтобы он ходил по этим координатам пока я не отроблю скрипт, пробовал вписывать until uo.dead() но не помогает. может не туда вписываю?
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Re: Помогите разобраться с ходилкой

Post by Kynep »

Для начала почитайте Правила раздела, а точнее про то как нужно оформлять свои посты.

Теперь по теме:

Code: Select all

sub walk()
  while not UO.Dead()
    Go_To(1149,1678)
    Go_To(1149,1684)
  wend
end sub


Так не пробовали?
ychenik
Posts: 82
Joined: 2007-07-01 21:23:58

Post by ychenik »

как оформлять читал, квот поставил почему-то не взялось в цитату. по теме спасибо все работает.
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

ychenik wrote:как оформлять читал, квот поставил почему-то не взялось в цитату. по теме спасибо все работает.


Не квот, а

Code: Select all

[code][/code]
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

ychenik wrote:как оформлять читал, квот поставил почему-то не взялось в цитату. по теме спасибо все работает.

Потому, что у вас два открывающих квота..
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
Post Reply