Page 1 of 2

Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-04 06:47:40
by Fistashka
вот есть скрипт
тока в нем косяк когда он делает буй он пишет это не на сфере а просто с левого боку

Code: Select all

sub Kupit() 
    uo.addobject("vendor")
while uo.targeting()
    wait( 100 )
wend
if uo.getName( "vendor" ) == "" then
    uo.click( "vendor" )
    checklag()
endif
 
 UO.buy('Blanki' + uo.getName( "vendor" ))

end sub


как тут правельно написать чтобы он писал Buy и ник вендора как сообшения?

Code: Select all

 UO.buy('Blanki' + uo.getName( "vendor" ))

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-04 18:36:57
by Irina E

Code: Select all

UO.buy('Blanki',uo.getName( "vendor" ))
uo.msg(uo.GetName('finditem')+ ' bye guards')

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-05 02:43:20
by Fistashka
спс выручил

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-05 13:28:24
by Fistashka
теперь у меня токая проблема я забил одного вендора в эспере другова в брите как зделать чтобы когда я покупал в брите он не орал втарой раз буй так как там нету этого вендора?

Code: Select all

sub Kupit()
VAR  i
DIM Vendor[2]
Vendor[1]='0x0010aea4'
Vendor[2]='0x00001a40'
For i=1 to 2
if uo.getName( Vendor[i] ) == "" then
    uo.click( Vendor[i] )
wait(500)
UO.buy('Blanki',uo.getName( Vendor[i] ))
wait(500)
endif
next
end sub

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-06 04:54:27
by Irina E

Code: Select all

sub Kupit()
VAR  i
DIM Vendor[2]
Vendor[1]='0x0190'
Vendor[2]='0x0191'
For i=1 to 2
if uo.getName( Vendor[i] ) == "" then
    uo.click( Vendor[i] )
wait(500)
UO.buy('Blanki',uo.getName( Vendor[i] ))
wait(500)
endif
next
end sub


пробуй так правда я хз будет оно работать
потваему скрипту он полюбому будет кричать или искать 2 вендора так задоно у тебя

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-06 07:00:26
by Fistashka
Irina E wrote:

Code: Select all

sub Kupit()
VAR  i
DIM Vendor[2]
Vendor[1]='0x0190'
Vendor[2]='0x0191'
For i=1 to 2
if uo.getName( Vendor[i] ) == "" then
    uo.click( Vendor[i] )
wait(500)
UO.buy('Blanki',uo.getName( Vendor[i] ))
wait(500)
endif
next
end sub


пробуй так правда я хз будет оно работать
потваему скрипту он полюбому будет кричать или искать 2 вендора так задоно у тебя




ну а вот как зделать чтобы он кричал тока того вендора которого видит?

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-06 08:40:11
by Mirage
if uo.getName( Vendor[i] ) == "Nikolay" then
или вот так (вроде работает как автор хочет)

Code: Select all

sub FindVendor() 
   var flag, i, SerialNew, Name
   DIM Vendor[2]
   Vendor[0]='0x0010aea4'
   Vendor[1]='0x00EFCA82'
   uo.Set('finddistance','14')
   For i=0 to 1
      uo.FindType("0x0190","-1","ground")
      if uo.FindCount() then
         SerialNew=UO.GetSerial("finditem")
         If SerialNew<>Vendor[i] Then
            wait(100)
         Else
            UO.Click(SerialNew)
            wait(1000)
            Name=UO.GetName(SerialNew)
            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")
         Endif
      endif
   next
end sub

PS Домашнее задание - сделать для девушки вендора. :mrgreen:

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-07 03:18:59
by Fistashka
Mirage wrote:if uo.getName( Vendor[i] ) == "Nikolay" then
или вот так (вроде работает как автор хочет)

Code: Select all

sub FindVendor() 
   var flag, i, SerialNew, Name
   DIM Vendor[2]
   Vendor[0]='0x0010aea4'
   Vendor[1]='0x00EFCA82'
   uo.Set('finddistance','14')
   For i=0 to 1
      uo.FindType("0x0190","-1","ground")
      if uo.FindCount() then
         SerialNew=UO.GetSerial("finditem")
         If SerialNew<>Vendor[i] Then
            wait(100)
         Else
            UO.Click(SerialNew)
            wait(1000)
            Name=UO.GetName(SerialNew)
            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")
         Endif
      endif
   next
end sub

PS Домашнее задание - сделать для девушки вендора. :mrgreen:

ты про какую девушку говоришь?))))))
чета ты тут перемудрил наверно у меня теперь даже буй не пишет ))))))))

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-07 07:43:58
by Irina E

Code: Select all

sub FindVendor()
   var flag, i, SerialNew, Name
   DIM Vendor[2]
   Vendor[0]='0x0010aea4'
   Vendor[1]='0x00EFCA82'
   uo.Set('finddistance','14')
   For i=0 to 1
      uo.FindType("0x0190","-1","ground")
      if uo.FindCount() then
         SerialNew=UO.GetSerial("finditem")
         If SerialNew<>Vendor[i] Then
            wait(100)
         Else
            UO.Click(SerialNew)
            wait(1000)
            Name=UO.GetName(SerialNew)
            UO.buy('Blanki',Name)
           UO.Say(Name+" buy")
         Endif
      endif
   next
end sub

сечас пробуй

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-07 09:26:51
by Fistashka
Irina E wrote:

Code: Select all

sub FindVendor()
   var flag, i, SerialNew, Name
   DIM Vendor[2]
   Vendor[0]='0x0010aea4'
   Vendor[1]='0x00EFCA82'
   uo.Set('finddistance','14')
   For i=0 to 1
      uo.FindType("0x0190","-1","ground")
      if uo.FindCount() then
         SerialNew=UO.GetSerial("finditem")
         If SerialNew<>Vendor[i] Then
            wait(100)
         Else
            UO.Click(SerialNew)
            wait(1000)
            Name=UO.GetName(SerialNew)
            UO.buy('Blanki',Name)
           UO.Say(Name+" buy")
         Endif
      endif
   next
end sub

сечас пробуй

эх нет не как просто запускается и вырубается

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-07 15:22:56
by Mirage
Если ты изменишь ID НПС то я думаю заработает точно так как и у меня работает ;)

на расстоянии нескольких экранов стоят несколько НПС.
когда подходишь к 2 из списка то у них совершается покупка Когда подходишь к тем кто не в списке то скрипт заканчивает работу.

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-07 17:31:21
by Fistashka
Mirage wrote:Если ты изменишь ID НПС то я думаю заработает точно так как и у меня работает ;)

на расстоянии нескольких экранов стоят несколько НПС.
когда подходишь к 2 из списка то у них совершается покупка Когда подходишь к тем кто не в списке то скрипт заканчивает работу.

ты думаешь я совсем глупый человек?))))))) кобуто я с вашими ID скрипт тестил )))))

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-07 21:11:13
by Kynep
TWI включи.

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-08 03:34:33
by Fistashka
Kynep wrote:TWI включи.

если я правильно понел тви это трек ворелд итем то он включен не могу понять в чем косяк

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-08 08:24:52
by Savage
А зачем кричать байв клиенте? Что команда ,buy blanki не отрабатывает? Тогда вообще нет смысла покупать командой инжекта.

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-08 13:54:15
by Fistashka
Savage wrote:А зачем кричать байв клиенте? Что команда ,buy blanki не отрабатывает? Тогда вообще нет смысла покупать командой инжекта.

она отрабатывает но в этом скрипте каторый переделали чтобы он кричал тока когда видет вендора она не работает он вобще вендоров не видет и не кричит

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-08 16:32:46
by Mirage
у меня с такими строками работает все

Code: Select all

            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")

МБ шард не поддерживает. Или какаято своя система закупки.

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-08 17:28:46
by Fistashka
Mirage wrote:у меня с такими строками работает все

Code: Select all

            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")

МБ шард не поддерживает. Или какаято своя система закупки.


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

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-08 17:39:56
by Fistashka
вот с этим скриптом он у меня трекает Менов и Воменов

Code: Select all

sub CheckingPlayers()
VAR a, b
uo.ignore('self', 'on')
DIM Chars[3]
Chars[0] = '0x0190' #тип игрока мужского пола#
Chars[1] = '0x0191' #тип игрока женского пола#
while not uo.dead()
  for a = 0 to 2
      wait(50)
    endif     
    while val(uo.getglobal('find')) == 1
      wait(50)
    wend
    uo.set('finddistance', '2')
    uo.findtype(Chars[a], '-1', '1')
    if uo.findcount() > 0 then
      return
    else
      wait(500)
    endif
  next
wend
end sub

теперь как сюда вставить вот этот скрипт ну или часть его чтобы он кричал того вендора который есть там по ID в приделах 6 клеток

Code: Select all

sub FindVendor()
   var flag, i, SerialNew, Name
   DIM Vendor[2]
   Vendor[0]='0x0010aea4'
   Vendor[1]='0x00001a40'
   uo.Set('finddistance','6')
   For i=0 to 1
      uo.FindType("0x0191","-1","ground")
      if uo.FindCount() then
         SerialNew=UO.GetSerial("finditem")
         If SerialNew<>Vendor[i] Then
            wait(100)
         Else
            UO.Click(SerialNew)
            wait(1000)
            Name=UO.GetName(SerialNew)
            UO.buy('Blanki',Name)
           UO.Say(Name+" buy")
         Endif
      endif
   next
end sub

и кто не будь вод в этом топике мне помогите! http://forum.yoko.com.ua/viewtopic.php?f=3&t=15887

Re: Помогите с командой UO.buy + uo.getName( "vendor")

Posted: 2010-10-09 07:24:20
by Fistashka
все топ умер паходу (