Yoko
http://forum.yoko.com.ua/

Проход по данжу
http://forum.yoko.com.ua/viewtopic.php?f=17&t=14594
Page 1 of 1

Author:  Eventualis [ 2009-03-24 01:18:20 ]
Post subject:  Проход по данжу

Может кто нибудь выложить пример скрипта как из 1 точки в данже выйти к выходу по координатам?

Author:  Андрюха из Одессы [ 2009-03-24 01:49:12 ]
Post subject: 

Тебе нужно идти по конкретным координатам или просто из пункта А в пункт Б?
Если второй вариант, то забивай в поиске "ходилка". Читай комментарии и ссылку на понравившуюся пость сюда.

Хотя обычно:
goto xy(x,y,z) - при условии что сама ходилка называется "goto xy" (в скрипте "sub goto xy()" )

Author:  Eventualis [ 2009-03-24 02:21:25 ]
Post subject: 

если в данже извилины то недостаточно goto xy(x,y,z)
надо пример скрипта с списком координат по которым идти нужно, я вроде бы где то видел что координаты в отдельном файле могут лежать

Author:  Андрюха из Одессы [ 2009-03-24 02:52:05 ]
Post subject: 

В таких случаях, я всегда юзаю walker. Проблем с ним никогда не было. Единственное, что скоростью прохода он не радует. Но это пустяки.
Как вариант можно полностью прописывать путь на клавишах (эмулировать нажатия как во всех ходилках).

Author:  korzh [ 2009-03-25 00:42:35 ]
Post subject: 

Если без извратов, то как-то так:)
Code:
sub goMap(map, len)
   for var i = 1 to len - 2 step 2
      goto(map[i], map[i+1], 1) #любая ходилка вида goto(x,y,prec)
   next
endsub

Где map - записанный массив координат вида
Code:
dim map[4]
map[0] = 5096; x1
map[1] = 1222; y1
map[2] = 5110; x2
map[3] = 1230; y2

Author:  Savage [ 2009-03-25 13:47:44 ]
Post subject: 

Используя любую ходилку последовательно вызывай её с новыми координатами до той точки, до которой ходилка доходит без затыков.
Чего тут сложного?
Можно и в массив координаты загнать, но смысла нет. Потому как координаты опорных точек будут постоянными.
Пример:
Code:
sub unload(TempX,TempY)
   SuperWalk(218,1391,'')
   SuperWalk(213,1391,'')
   UO.UseObject('0x6B1625B5')
   SuperWalk(213,1387,'')

   UO.MoveItem('^0x1BDD',-1,'~0x1BDD',uo.GetX('finditem'),uo.GetY('finditem'),uo.GetZ('finditem'))
   CheckLag()

   SuperWalk(213,1391,'')
   UO.UseObject('0x6B1625B5')
   SuperWalk(218,1391,'')
   SuperWalk(TempX,TempY,'')
end sub

чар идёт до угла дома, далее до двери, открывает её, проходит в дом, скидывает логи и назад тем же макаром.

Author:  korzh [ 2009-03-26 00:45:39 ]
Post subject: 

Ну все зависит от сложности марсшрута и расстояния, которое нужно пройти...

Author:  Eventualis [ 2009-03-26 18:25:34 ]
Post subject: 

Спасибо за помощь вроде понял, буду писать... :wink:

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/