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

Ходилка 2
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7877
Page 1 of 1

Author:  klonuk [ 2006-06-05 09:40:01 ]
Post subject:  Ходилка 2

Написал скрипт, но на моем шарде вендора не стоят на месте а бегают как завадные... поэтому пришлось дабавить ходилку за вендором
ипользывал ходилку SuperWalk(X,Y,Serial) , ходилка отличная кроме 1 но когда я ее запукаешь он идет к вендору и встает прямо на него...
на многих шардах в точ чилсе и на моем когда проходишь через кого либо жреться стамина ... и через не скольких таких заходов у чара самина болт ... скрипт сбиваеться... моя задача была написать скрипт чтобы он не подходил ближе к вендору чем на 1 таил .вот он

Code:
sub pp()
VAR Dist
UO.Set ('finddistance','6')
repeat
Uo.FindType('Vendor', '-1', '1')
Dist=Uo.GetDistance ('finditem')
if Dist>1 then
xodilka()
else
wait (1000)
endif
if Dist==1 then
UO.Exec("terminate 'xodilka'")
endif
until Uo.Dead()
End sub

sub xodilka()
SuperWalk(0,0,'Vendor')
end sub



Но встала другая проблема когда запускаеться процендура ходилка ему похуй на все if и он всеровно встает на вендора , прошу помоч как дороботать этот скрипт... чтобы он всетаки остонавливалься когда дистанция до вендора 1 таил.За ранее блогадарен.

Author:  Savage [ 2006-06-05 10:13:07 ]
Post subject: 

Исправь это:
Code:
         If dx==0 AND dy==0 Then
            Exit=1
         Endif

на это:
Code:
         If dx<=1 AND dy<=1 Then
            Exit=1
         Endif

Author:  klonuk [ 2006-06-05 10:21:54 ]
Post subject: 

Savage wrote:
Исправь это:
Code:
         If dx==0 AND dy==0 Then
            Exit=1
         Endif

на это:
Code:
         If dx<=1 AND dy<=1 Then
            Exit=1
         Endif


Code:

  dx=x-UO.GetX()
         dy=y-UO.GetY()
         If dx<=1 AND dy<=1 Then
            Exit=1
         Endif


Нашел исправил, всевроно встает прям в вендора

Author:  Savage [ 2006-06-05 10:27:11 ]
Post subject: 

Тогда замени этот блок на:
Code:
         If UO.GetDistance(Target)<=1 Then
            Exit=1
         Endif

Author:  Savage [ 2006-06-05 10:29:14 ]
Post subject: 

не, это не та ветка а вскрипте уже все предусмотрено должно работать итак:
Code:
      If Target<>"" Then
         dx=UO.GetX(Target)-UO.GetX()
         dy=UO.GetY(Target)-UO.GetY()
;         UO.Print("Target locked!")
         If UO.GetDistance(Target)<2 Then
            Exit=1
         Endif

Author:  klonuk [ 2006-06-05 10:36:42 ]
Post subject: 

Savage wrote:
не, это не та ветка а вскрипте уже все предусмотрено должно работать итак:
Code:
      If Target<>"" Then
         dx=UO.GetX(Target)-UO.GetX()
         dy=UO.GetY(Target)-UO.GetY()
;         UO.Print("Target locked!")
         If UO.GetDistance(Target)<2 Then
            Exit=1
         Endif


Ммм ... и что делатьт?Я попробывал всетки изменить ту вышло следушие если запустить ходилку с дистанциец от вендора в 1 таил то но просто пропустит или подойдет с другой стороны к нему...
Если дистанция болше 1 таилы то опять на вендора

Author:  Savage [ 2006-06-05 10:42:00 ]
Post subject: 

А сколько клеток можно неподходить? Исправь 2 на эту цифру и попробуй.

Author:  klonuk [ 2006-06-05 10:43:09 ]
Post subject: 

Savage wrote:
А сколько клеток можно неподходить? Исправь 2 на эту цифру и попробуй.


Ок шас попробую...

Author:  Savage [ 2006-06-05 10:43:30 ]
Post subject: 

или как вариант, можно в скрипте вычислять координаты цели, уменьшать их на 1 и полученные передавать в ходилку.

Author:  klonuk [ 2006-06-05 10:59:57 ]
Post subject: 

Savage wrote:
или как вариант, можно в скрипте вычислять координаты цели, уменьшать их на 1 и полученные передавать в ходилку.


Примерчик на пиши любой . :idea:

Author:  Savage [ 2006-06-05 11:06:09 ]
Post subject: 

Code:
SuperWalk(UO.GetX('finditem')-1,UO.GetY('finditem')-1,"")


Только если полдучится что тайл с вычесленными координатами непроходимый, будет косяк :)

Author:  klonuk [ 2006-06-05 11:10:04 ]
Post subject: 

Savage wrote:
Code:
SuperWalk(UO.GetX('finditem')-1,UO.GetY('finditem')-1,"")


Только если полдучится что тайл с вычесленными координатами непроходимый, будет косяк :)


шас поробую :roll:

Author:  klonuk [ 2006-06-05 11:12:47 ]
Post subject: 

Ходит как слепой , но не туда куда надо.

Author:  Savage [ 2006-06-05 11:14:41 ]
Post subject: 

Image

Author:  Savage [ 2006-06-05 11:19:14 ]
Post subject: 

А может у тебя ходилка уже кривая? Возьми отсюда:
www.jetta.ru/autoload.sc

Author:  Savage [ 2006-06-05 11:28:49 ]
Post subject: 

Проверяй галочки. потому что ходилка впринципе не может ходить как слепая.

Author:  klonuk [ 2006-06-05 11:36:52 ]
Post subject: 

Savage wrote:
Проверяй галочки. потому что ходилка впринципе не может ходить как слепая.


Нет не ходит , тока с такой ходилькой ( я про строчку ) тока в ровном поле вендора находяться в домах а там ужас сока предметов ))) надо думать ....

Author:  klonuk [ 2006-06-05 12:08:41 ]
Post subject: 

Savage wrote:
Проверяй галочки. потому что ходилка впринципе не может ходить как слепая.



Все настроил не ординарным путем но все же пашет )))
ТОпик можно клоуз.

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