Помогите с ходилкой!!!

[UOman]

Вобщем маза в том она точно не подходит хелп не допираю чего не хватает )

Code: Select all

Sub go()
GotoXY(x,y) 
end sub


Sub Numb(num) 
if num>=0 then 
return num 
else 
return num*(-1) 
end if 
end sub 



Sub GotoXY(x,y) 
var myX,myY,lastX=0,lastY=0,i,halt=0,z,r=0 
for i=1 to 60 
myX=uo.getX(); 
myY=uo.getY(); 
if LastX==myX and LastY==myY then 
halt=halt+1 
else 
halt=0 
end if 
if halt>=10 then 
if uo.GetDir()==1 then 
for z=0 to 8 
uo.Press(40) 
next 
end if 
if uo.GetDir()==3 then 
for z=0 to 8 
uo.Press(37) 
next 
end if 
if uo.GetDir()==5 then 
for z=0 to 8 
uo.Press(38) 
next 
end if 
if uo.GetDir()==7 then 
for z=0 to 8 
uo.Press(39) 
next 
end if 
halt=15 
end if 
if Numb(x-myX)<=1 and Numb(y-myY)<=2 then 
return 1 
end if 
if x<=myX then 
if y<=myY then 
for z=0 to 3 
uo.Press(38) 
next 
else 
for z=0 to 3 
uo.Press(37) 
next 
end if 
else 
if y<=myY then 
for z=0 to 3 
uo.Press(39) 
next 
else 
for z=0 to 3 
uo.Press(40) 
next 
end if 
end if 
lastX=myX 
lastY=myY 
wait(200) 
next 
return 0 
end sub 

[Scripts Writer]

Телепаты в отпуске.

Сложно назвать это ходилкой.

Code: Select all

Sub GotoXY(x,y) 
var myX,myY,lastX=0,lastY=0,i,halt=0,z,r=0 
for i=1 to 60 
myX=uo.getX(); 
myY=uo.getY(); 
if LastX==myX and LastY==myY then 

Особенно судя по этому отрывку. Возможно:

Code: Select all

myX=uo.getX(); 
myY=uo.getY(); 

В скобках следует указать объект к которому нужно идти?

laststatus или же object

Code: Select all

myX=uo.getX('laststatus'); 
myY=uo.getY('laststatus'); 

[Destruction]

Code: Select all

myX=uo.getX(); 
myY=uo.getY(); 

Судя по названиям переменных, тут всё верно..

PS: А телепатов и правда нету.

[UOman]

Вот вот дело то в том что мне надо подходить к определённому предмету и просто по координатам )

[Scripts Writer]

Юзай SuperWalk() -Savage. Находишь предмет который тебе нужен, и она к нему идёт довольно не плохо.

[DerMeister =)]

&pathfind(dx,dy)