Координаты!

kotar · Post by **kotar** » 2005-01-10 02:53:05

Замучился с командой...
чтобы тыкать по определенной ккординате на экране
X=65535 Y=65535 Z=0

kotar · Post by **kotar** » 2005-01-10 08:35:40

подскажите как правильно прописать клик по координате на экране...

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

Edred · Post by **Edred** » 2005-01-10 13:13:45

В инжекте нет инструментов для работы с экранными координатами. Насколько я понял ты хочешь таким образом реализовать хождение? Ничего не получится.

kotar · Post by **kotar** » 2005-01-10 14:31:03

нет, ты ошибся...
таким образом я хотел реализовать скрипт на одевание со столба для PVP_alfa...
sub Dress()
VAR Stolb='0x1183'
UO.UseFromGround(Stolb)
end sub
это тыкать на столб....а как сделать, чтобы тыкал на определынные кнопки в менюшке столба....незнаю(((

BETEPAH · Post by **BETEPAH** » 2005-01-10 14:33:13

kotar wrote:подскажите как правильно прописать клик по координате на экране...

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

Code: Select all

var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
i = mx 0 
j = my-3 
UO.Waittargettile("1341", str(i), str(j), str(mz))

kotar · Post by **kotar** » 2005-01-10 15:41:12

а координаты куда писать?

666Man666 · Post by **666Man666** » 2005-01-10 16:01:55

Играл я там когда-то, вот тибе одевалка... давно я её делал ))

Code: Select all

sub Dress_alfa_man()
While NOT UO.Dead()
var n
Dim Select[3]
    Select[1]='1'  ; Бинты
    Select[2]='12' ; Химия 2
    Select[3]='3'  ; Реги

Dim Item[3]
    Item[1]='0x0E21'
    Item[2]='0x09B0'
    Item[3]='0x0E76'
If UO.GetGlobal('DressMan')<>'yes' Then
   UO.set('norbcalc','1')
   UO.SetGlobal('DressMan','yes')
EndIf
If UO.GetGlobal('DressManCheck')<>'on' Then
   UO.SetGlobal('DressManCheck','on')
      If UO.CountGround('0x0ED4','0x08BB') or UO.CountGround('0x0ED4','0x079B') Then
         If NOT UO.ObjAtLayer('Torso') or UO.Count('0x0EFA')==0 Then ;Проверка на пак
            UO.UseObject('backpack')
            Wait(1000)
         EndIf
         If NOT UO.ObjAtLayer('Torso') Then
            UO.Recall('0x4001361C','3') ; Армор(Кристал)
               REPEAT
                  Wait(300)
               Until UO.ObjAtLayer('Torso')
         EndIf
         If NOT UO.ObjAtLayer('Horse') Then
            UO.Recall('0x40013766','4') ; Зостер
               REPEAT
                  Wait(300)
               Until UO.ObjAtLayer('Horse')
         EndIf
         For n = 1 TO 3
            If UO.Count(Item[n])==0 Then
               UO.Recall('0x40013766',Select[n])
               UO.DeleteJournal()
                  REPEAT
                     Wait(300)
                  Until UO.InJournal("You put")
            EndIf
         Next
         UO.Print('Done!')
      Else
         UO.Print("I don't see equipment stone!")
      EndIf
   UO.SetGlobal('DressManCheck','off')
Else
   UO.Print("Wait")
EndIf
end sub

BETEPAH · Post by **BETEPAH** » 2005-01-11 11:01:07

kotar wrote:а координаты куда писать?

он берет твои координаты и автоматически ожидает прицела в трех тайлах от тебя

admir · Post by **admir** » 2005-01-13 07:46:18

ых да изврат

тыкать в 5 клетках от чара на столб

)))
а ты все время целишься вставать чтоб ровно было ?
useobject есть такая штука

а одевалка
sub menunub()
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(235,188)
wait(200)
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(279,206)
wait(200)
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(211,229)
wait(200)
uo.exec("useobject 0x4000B44E")
wait(500)
UO.LClick(175,242)
wait(200)
uo.exec("useobject 0x4000B44E")
wait(500)
UO.LClick(205,323)
wait(200)
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(211,306)
wait(300)
uo.exec("useobject 0x4000B2E3")
wait(500)
UO.LClick(60,263)
wait(500)
UO.LClick(213,266)
wait(100)
end sub

666Man666 · Post by **666Man666** » 2005-01-13 08:58:16

admir wrote:ых да изврат
тыкать в 5 клетках от чара на столб )))
а ты все время целишься вставать чтоб ровно было ?
useobject есть такая штука
а одевалка
sub menunub()
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(235,188)
wait(200)
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(279,206)
wait(200)
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(211,229)
wait(200)
uo.exec("useobject 0x4000B44E")
wait(500)
UO.LClick(175,242)
wait(200)
uo.exec("useobject 0x4000B44E")
wait(500)
UO.LClick(205,323)
wait(200)
uo.exec("useobject 0x4000B553")
wait(500)
UO.LClick(211,306)
wait(300)
uo.exec("useobject 0x4000B2E3")
wait(500)
UO.LClick(60,263)
wait(500)
UO.LClick(213,266)
wait(100)
end sub

И что это? за макрос такой моднявый

))

Edred · Post by **Edred** » 2005-01-13 20:12:08

Я думаю, это он так с гампами работает...

zolupo · Post by **zolupo** » 2005-01-28 07:16:33

2Man666
лол хочешь сказать у тебя круче макрос?))) ыы

zolupo · Post by **zolupo** » 2005-01-28 07:40:49

котар раскажи как инжект включил на альфе

666Man666 · Post by **666Man666** » 2005-01-28 07:58:43

zolupo wrote:2Man666
лол хочешь сказать у тебя круче макрос?))) ыы

Нет конечно... я же нубь

zolupo · Post by **zolupo** » 2005-01-28 08:01:37

ок ок )) я на альфе тоже нуб)

Porvalo · Post by **Porvalo** » 2005-02-06 15:29:02

666Man666 wrote:Играл я там когда-то, вот тибе одевалка... давно я её делал ))[/code]

Как сделать чтоб ламу покупал. все вроде ясно но не могу число под ламу подобрать и странно что зостр 4 цифра. Вобщем вопрос в том по какому принципу ети цифры получаются (чтоб 2 банки например 12 почемуто)?

Porvalo · Post by **Porvalo** » 2005-02-07 17:05:30

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

BETEPAH · Post by **BETEPAH** » 2005-02-08 09:10:04

,infotile
Эта команда дает инфу о тайле пола на который ты тыкнишь .......его координаты там присетствуют

Porvalo · Post by **Porvalo** » 2005-02-09 15:31:10

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

BETEPAH · Post by **BETEPAH** » 2005-02-09 16:14:01

Так МАН же дал скрипт.