Yoko

All sides of Injection
It is currently 2026-01-21 00:39:54

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 18 posts ] 
  Print view Previous topic | Next topic 
Author Message
klonuk
 Post subject: Ходилка 2
PostPosted: 2006-06-05 09:40:01 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Написал скрипт, но на моем шарде вендора не стоят на месте а бегают как завадные... поэтому пришлось дабавить ходилку за вендором
ипользывал ходилку 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 таил.За ранее блогадарен.
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 10:13:07 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Исправь это:
Code:
         If dx==0 AND dy==0 Then
            Exit=1
         Endif

на это:
Code:
         If dx<=1 AND dy<=1 Then
            Exit=1
         Endif
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 10:21:54 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
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


Нашел исправил, всевроно встает прям в вендора
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 10:27:11 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Тогда замени этот блок на:
Code:
         If UO.GetDistance(Target)<=1 Then
            Exit=1
         Endif
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 10:29:14 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
не, это не та ветка а вскрипте уже все предусмотрено должно работать итак:
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
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 10:36:42 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
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 таилы то опять на вендора
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 10:42:00 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
А сколько клеток можно неподходить? Исправь 2 на эту цифру и попробуй.
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 10:43:09 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Savage wrote:
А сколько клеток можно неподходить? Исправь 2 на эту цифру и попробуй.


Ок шас попробую...
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 10:43:30 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
или как вариант, можно в скрипте вычислять координаты цели, уменьшать их на 1 и полученные передавать в ходилку.
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 10:59:57 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Savage wrote:
или как вариант, можно в скрипте вычислять координаты цели, уменьшать их на 1 и полученные передавать в ходилку.


Примерчик на пиши любой . :idea:
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 11:06:09 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Code:
SuperWalk(UO.GetX('finditem')-1,UO.GetY('finditem')-1,"")


Только если полдучится что тайл с вычесленными координатами непроходимый, будет косяк :)
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 11:10:04 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Savage wrote:
Code:
SuperWalk(UO.GetX('finditem')-1,UO.GetY('finditem')-1,"")


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


шас поробую :roll:
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 11:12:47 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Ходит как слепой , но не туда куда надо.
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 11:14:41 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Image
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 11:19:14 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
А может у тебя ходилка уже кривая? Возьми отсюда:
www.jetta.ru/autoload.sc
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2006-06-05 11:28:49 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Проверяй галочки. потому что ходилка впринципе не может ходить как слепая.
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 11:36:52 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Savage wrote:
Проверяй галочки. потому что ходилка впринципе не может ходить как слепая.


Нет не ходит , тока с такой ходилькой ( я про строчку ) тока в ровном поле вендора находяться в домах а там ужас сока предметов ))) надо думать ....
Top
   
Reply with quote  
klonuk
 Post subject:
PostPosted: 2006-06-05 12:08:41 
Offline
User avatar

Joined: 2006-05-23 11:48:22
Posts: 145
Savage wrote:
Проверяй галочки. потому что ходилка впринципе не может ходить как слепая.



Все настроил не ординарным путем но все же пашет )))
ТОпик можно клоуз.
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 18 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 12 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited