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

[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]

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

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

Code: Select all

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

Так не пробовали?

[ychenik]

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

[Scripts Writer]

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

Не квот, а

Code: Select all

[code]

[/code]

[Destruction]

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

Потому, что у вас два открывающих квота..