Yoko

попытался зделать скрипт на отход при маленьком кол-ве хп )) :
sub main()
if uo.hits<70 then
gotoxy(65535,65535,0)
else
gotoxy(1521,1725,0)
end sub
но он не пашет ))
подскажите че надо зделать чтоб допустим при хп меньше 30 чар отходил в сторону стоял там несколько секунд и опять подходил где стоит

Ну ты отойди кда надо и координаты которые показывает игжект забей в скрипт. Потом подойди, опять координаты забей.

gotoxy(1521,1725,0)
Смею предположить что у тебя нету ходилки )

_________________
Все просто.
BETEPAH ™

НЕТ ЧТО ЭТО ?

а что за команду ты тогда пишешь: gotoxy() ? В инжекте нет такой встроенной функции, так что если ты такую хочешь использвать - ее надо написать.

уго
что надо ходилку скачать или можно и без нее ?

пример ходилки-по простому, скрипт для перемещение на заданые координаты по сложному.

sub WalkN(x,y,Target) 
VAR i,StepSucess 
VAR dx,dy,Exit=0 
While Exit<>1    
If Target<>"" Then 
dx=UO.GetX(Target)-UO.GetX() 
dy=UO.GetY(Target)-UO.GetY() 
If UO.GetDistance(Target)<2 Then 
Exit=1 
Endif 
Else 
dx=x-UO.GetX() 
dy=y-UO.GetY() 
UO.Print('Left '+STR(dx)+' steps to target. ') 
If dx==0 AND dy==0 Then 
Exit=1 
Endif 
Endif 
If dx<>0 AND dy<>0 Then 
If dx>0 AND dy>0 Then 
StepSucess=Go(3,40,300)  
If StepSucess==-1 Then 
StepSucess=Go(7,38,300)  
StepSucess=Go(1,39,300)  
If StepSucess==-1 Then 
StepSucess=Go(5,37,300)  
Endif 
Endif 
Endif 
If dx>0 AND dy<0 Then 
StepSucess=Go(1,39,300)  
If StepSucess==-1 Then 
StepSucess=Go(5,37,300)  
StepSucess=Go(3,40,300)  
If StepSucess==-1 Then 
StepSucess=Go(7,38,300)  
Endif 
Endif 
Endif 
If dx<0 AND dy>0 Then 
StepSucess=Go(5,37,300)  
If StepSucess==-1 Then 
StepSucess=Go(1,39,300)  
StepSucess=Go(7,38,300)  
If StepSucess==-1 Then 
StepSucess=Go(3,40,300)  
Endif 
Endif 
Endif 
If dx<0 AND dy<0 Then 
StepSucess=Go(7,38,300)  
If StepSucess==-1 Then 
StepSucess=Go(3,40,300)  
StepSucess=Go(5,37,300)  
If StepSucess==-1 Then 
StepSucess=Go(1,39,300)  
Endif 
Endif 
Endif 
Endif 
If dx<>0 AND dy==0 Then 
If dx>0 Then 
StepSucess=Go(2,34,300)  
If StepSucess==-1 Then 
StepSucess=Go(3,40,300)  
If StepSucess==-1 Then 
StepSucess=Go(1,39,300)  
Endif 
StepSucess=Go(2,34,300)  
Endif 
Endif 
If dx<0 Then 
StepSucess=Go(6,36,300)  
If StepSucess==-1 Then 
StepSucess=Go(7,38,300)  
If StepSucess==-1 Then 
StepSucess=Go(5,37,300)  
Endif 
StepSucess=Go(6,36,300)  
Endif 
Endif 
Endif 
If dx==0 AND dy<>0 Then 
If dy>0 Then 
StepSucess=Go(4,35,300)  
If StepSucess==-1 Then 
StepSucess=Go(3,40,300)  
If StepSucess==-1 Then 
StepSucess=Go(5,37,300) 
Endif 
StepSucess=Go(4,35,300) 
Endif 
Endif 
If dy<0 Then 
StepSucess=Go(0,33,300) 
If StepSucess==-1 Then 
StepSucess=Go(1,39,300) 
If StepSucess==-1 Then 
StepSucess=Go(7,38,300) 
Endif 
StepSucess=Go(0,33,300) 
Endif 
Endif 
Endif 
Wend 
end sub 

sub Go(dir,key,walkwait) 
VAR x,y, OldDir 
x=UO.GetX() 
y=UO.GetY() 
OldDir=UO.GetDir() 
If UO.GetDir()<>dir Then 
UO.Press(key) 
wait(walkwait) 
If UO.GetDir()<>dir Then 
Endif 
Endif 
UO.Press(key) 
wait(walkwait) 
if x==UO.GetX() AND y==UO.GetY() Then 
Endif 
If x==UO.GetX() AND y==UO.GetY() AND OldDir<>UO.GetDir() Then 
UO.Press(key) 
wait(walkwait) 
Endif 
If x==UO.GetX() AND y==UO.GetY() Then 
Endif 
If x==UO.GetX() AND y==UO.GetY() Then 
UO.Print("Stuck. Try move else!") 
return -1 
Else 
return 1 
Endif 
end sub 

Скажу сразу что не помню кто написал.
Пример передвежения выглядет так
WalkN(6030,1248'')

_________________
Все просто.

BETEPAH ™

вот что смог зделать :
sub main()
if uo.hits<70 then
WalkN(1526,1723,20)
weit (3000)
end sub
выдает ошибку Line 2 : Viriable undefined UO-HITS

walkn(x,y,serial)
два варианта юза либо координаты либо сериал объекта. То есть:
walkn(1234,4321,"")
walkn(0,0,"12345678")

нет надо так

sub main()
if uo.hits<70 then 
WalkN(1526,1723,"")
weit (3000)
end sub 

И еще в скрипте надо иметь Ходилку что выложена выше ))

_________________
Все просто.

BETEPAH ™

опять скрипт не запускается выдает туже ошибку
это наверно неможет найти жизни ?

Line 2 : Viriable undefined UO-HITS

if uo.hits<70 then
меняем на
if uo.life<70 then

_________________
Все просто.

BETEPAH ™

sub main()
if uo.life<70 then
WalkN(1523,1725,"")
weit (3000)
WalkN(1526,1722,"")
end sub
теперь пишет Line:8 parse error

wait (3000)

_________________
Все просто.

BETEPAH ™

))))

sub main()
if uo.life<70 then
WalkN(1524,1725,"")
wait(3000)
WalkN(1527,1726,"")
end sub
теперь Line 9: parse error

sub main()
if uo.life<70 then
WalkN(1524,1725,"")
wait(3000)
WalkN(1527,1726,"")
end if
end sub

_________________
Все просто.

BETEPAH ™

запускается токо один раз

sub main()
repeat
wait(3000)
if uo.life<70 then
WalkN(1524,1725,"")
wait(3000)
WalkN(1527,1726,"")
end if
until uo.dead()
end sub

_________________
Все просто.

BETEPAH ™

а при запуске с хп ниже 70 пишет на Line 3 : Function not found-WALKN