Yoko

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() но не помогает. может не туда вписываю?

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

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

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

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

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

Не квот, а

[code][/code]

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

_________________
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.
Skype: d119060