как проверить можно ли сделать шаг в эту сторону?

NiFiGaSebe · Post by **NiFiGaSebe** » 2007-07-14 12:10:45

придумал тока такое

var x=uo.getx()
var y=uo.gety()
uo.press(36) #west
wait(500)
if (x==uo.getx() and y==uo.gety()) then
uo.print('низя сюда идти')
endif

типа запоминаем текущие координаты чара, делаем шаг и сморим изменились координаты чара или нет.
но не нравится задержка эта на шаг, хочу чтоб чар быстро бегал, да и при лагах может спокойно глючить

Scripts Writer · Post by **Scripts Writer** » 2007-07-14 12:32:08

посмотри в ходилках

2бегать он не будет

CONDOMchick · Post by **CONDOMchick** » 2007-07-14 12:37:49

Scripts Writer wrote:
2бегать он не будет

А почему?

Scripts Writer · Post by **Scripts Writer** » 2007-07-14 12:50:54

Потому что это инжект. НА сколько мне известно функции инжекта не позволяют бегать

Rivory · Post by **Rivory** » 2007-07-14 12:55:05

а на сколько мне извесно - позволяют, иначе смысл в так называемых догонялках ? в этих скриптах чар бегает за другим чаром причём ооооочень быстро. Могу выложить одну такую для примера.

Raisefamous · Post by **Raisefamous** » 2007-07-14 12:57:08

Выложи.Посмотрим.

Rivory · Post by **Rivory** » 2007-07-14 13:22:44

Code: Select all

;----------------------------------------------------------------- 
;--------------------------NMY------------------------------------ 
sub chase() 
   If uo.getglobal('chase')=='On' then 
   uo.setglobal ('chase',0) 
   uo.print(' !!! -= Chase Terminated =- !!! ') 
   uo.exec('Terminate chase') 
   else 
   uo.setglobal('chase','On') 
   uo.print(' !!! -= Chasing =- !!! ') 
   endif 

  VAR target 
  target = uo.getserial('lasttarget') 

   while not uo.dead() and target<>"" and uo.getdistance(target) 
    if UO.GetDistance(target)>-1 then 
    uo.say('') 
    Chaser(target) 
    endif 
   wend 

  uo.setglobal('chase',0) 
  uo.print(' !!! -= Chasing ended =- !!! ') 
end sub 
;----------------------------------------------------------------- 
sub Chaser(Target) 
   VAR dx, dy 
While 1 
   If Target<>"" and not uo.dead() Then 
   dx=UO.GetX(Target)-UO.GetX() 
   dy=UO.GetY(Target)-UO.GetY() 
    If UO.GetDistance(Target)<0 Then 
     return 
    Endif 
    else 
     Return 
   Endif 

   If dx<>0 AND dy<>0 Then 
    If dx>0 AND dy>0 Then 
    UO.Press(40) ; DownArrow 
    Endif 

    If dx>0 AND dy<0 Then 
    UO.Press(39) ; RightArrow 
    Endif 

    If dx<0 AND dy>0 Then 
    UO.Press(37) ; LeftArrow 
    Endif 

    If dx<0 AND dy<0 Then 
    UO.Press(38) ; UpArrow 
    Endif 
   Endif 
    
   If dx<>0 AND dy==0 Then 
     If dx>0 Then 
    UO.Press(34) ; PgDown 
    Endif 

    If dx<0 Then 
    UO.Press(36) ; Home key 
    Endif 
   Endif 

   If dx==0 AND dy<>0 Then 
    If dy>0 Then 
    UO.Press(35) ; End 
    Endif 

    If dy<0 Then 
    UO.Press(33) ; PgUp 
    Endif 
   Endif 
Wend 
end sub

бегает, причём оч. даже быстро

Scripts Writer · Post by **Scripts Writer** » 2007-07-14 13:24:28

У тебя работает?

NiFiGaSebe · Post by **NiFiGaSebe** » 2007-07-14 13:25:01

посмарел ходилки, походу без задержки никак не сделать норм обходилку. а без обхода препятствий чар норм бегает)
мона конечно сделать кучу мегапроверок, смотреть тип тайла куда делаешь шаг, смареть стоит ли ктонить в етом тайле, скока у тя стамины итд, но слишком гимора много, проще обходилку с задержкой сделать тада)

Scripts Writer · Post by **Scripts Writer** » 2007-07-14 13:29:05

Смотря для чего. Для мининга или ламбера и пешком нормально будет ходить

Rivory · Post by **Rivory** » 2007-07-14 13:30:36

Scripts Writer wrote:У тебя работает?

да

Scripts Writer · Post by **Scripts Writer** » 2007-07-14 13:36:20

Rivory wrote:
Scripts Writer wrote:У тебя работает?
да

Респект NMY'ю. Пока я отсутствовал видимо написал такую прелесть. Буду знать

Rivory · Post by **Rivory** » 2007-07-14 13:53:37

не он первый по моему. Вроде первую догонялку написал Адмир.. хотя хз

CONDOMchick · Post by **CONDOMchick** » 2007-07-14 14:21:23

Scripts Writer wrote:Потому что это инжект. НА сколько мне известно функции инжекта не позволяют бегать

А если AlwaysRun в клиенте поставить?

Scripts Writer · Post by **Scripts Writer** » 2007-07-14 14:44:14

CONDOMchick wrote:
Scripts Writer wrote:Потому что это инжект. НА сколько мне известно функции инжекта не позволяют бегать
А если AlwaysRun в клиенте поставить?

Незнаю, мне ниразу не нужна была ходилка с бегом за 4 года игры. Кому надо тот проверит

CONDOMchick · Post by **CONDOMchick** » 2007-07-14 14:47:40

Scripts Writer wrote:
CONDOMchick wrote:
Scripts Writer wrote:Потому что это инжект. НА сколько мне известно функции инжекта не позволяют бегать
А если AlwaysRun в клиенте поставить?
Незнаю, мне ниразу не нужна была ходилка с бегом за 4 года игры. Кому надо тот проверит

Я проверял. Бегает.
Например в догонялке - бег нужен.

Ururu · Post by **Ururu** » 2007-07-16 10:34:35

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

для нормального бега нужно определять на несколько тайлов от чара, проходные или нет, для начала нужно переписать всю статику в текстовый файл вот тогда чар будет просто летать

CONDOMchick · Post by **CONDOMchick** » 2007-07-20 00:39:46

Trip(xxxx,yyyy) - Отсюда
Trip(xxxx,yyyy) - До сюда - чар пробежит.