Преследование
Posted: 2004-07-07 09:45:46
sub FollowHim()
var dx, dy
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
dx=UO.GetX('TOT')-UO.GetX()
dy=UO.GetY('TOT')-UO.GetY()
if dx==0 then
if dy>0 then
UO.Press(35)
else
if dy<0 then
UO.Press(33)
end if
end if
end if
if dx>0 then
if dy>0 then
UO.Press(40)
else
if dy<0 then
UO.Press(39)
else
UO.Press(34)
end if
end if
end if
if dx<0 then
if dy>0 then
UO.Press(37)
else
if dy<0 then
UO.Press(38)
else
UO.Press(36)
end if
end if
end if
wend
end sub
Таргетинг чужой и прилеплен для удобства тестирования.
Недостатки:
- написан для работы в поле;
- припятствия не обходит;
- при хайде цели чар идёт к нулевым координатам;
- при скорости цели больше скорости чара теряем цель;
- скрипт частично зависимый (нельзя писать);
- прочее выясняется ...
Предлагаю по скрипту опрос: кому больше нужен? красным или синим?
var dx, dy
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
dx=UO.GetX('TOT')-UO.GetX()
dy=UO.GetY('TOT')-UO.GetY()
if dx==0 then
if dy>0 then
UO.Press(35)
else
if dy<0 then
UO.Press(33)
end if
end if
end if
if dx>0 then
if dy>0 then
UO.Press(40)
else
if dy<0 then
UO.Press(39)
else
UO.Press(34)
end if
end if
end if
if dx<0 then
if dy>0 then
UO.Press(37)
else
if dy<0 then
UO.Press(38)
else
UO.Press(36)
end if
end if
end if
wend
end sub
Таргетинг чужой и прилеплен для удобства тестирования.
Недостатки:
- написан для работы в поле;
- припятствия не обходит;
- при хайде цели чар идёт к нулевым координатам;
- при скорости цели больше скорости чара теряем цель;
- скрипт частично зависимый (нельзя писать);
- прочее выясняется ...
Предлагаю по скрипту опрос: кому больше нужен? красным или синим?