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

Помогите с командой UO.buy + uo.getName( "vendor")
http://forum.yoko.com.ua/viewtopic.php?f=20&t=15884		 Page 1 of 2
Author:  Fistashka [ 2010-10-04 06:47:40 ]
Post subject:  Помогите с командой UO.buy + uo.getName( "vendor")
вот есть скрипт
тока в нем косяк когда он делает буй он пишет это не на сфере а просто с левого боку
Code:
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:
 UO.buy('Blanki' + uo.getName( "vendor" ))
Author:  Irina E [ 2010-10-04 18:36:57 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Code:
UO.buy('Blanki',uo.getName( "vendor" ))
uo.msg(uo.GetName('finditem')+ ' bye guards')
Author:  Fistashka [ 2010-10-05 02:43:20 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
спс выручил
Author:  Fistashka [ 2010-10-05 13:28:24 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
теперь у меня токая проблема я забил одного вендора в эспере другова в брите как зделать чтобы когда я покупал в брите он не орал втарой раз буй так как там нету этого вендора?

Code:
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
Author:  Irina E [ 2010-10-06 04:54:27 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Code:
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 вендора так задоно у тебя
Author:  Fistashka [ 2010-10-06 07:00:26 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Irina E wrote:
Code:
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 вендора так задоно у тебя




ну а вот как зделать чтобы он кричал тока того вендора которого видит?
Author:  Mirage [ 2010-10-06 08:40:11 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
if uo.getName( Vendor[i] ) == "Nikolay" then
или вот так (вроде работает как автор хочет)

Code:
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:
Author:  Fistashka [ 2010-10-07 03:18:59 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Mirage wrote:
if uo.getName( Vendor[i] ) == "Nikolay" then
или вот так (вроде работает как автор хочет)

Code:
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:

ты про какую девушку говоришь?))))))
чета ты тут перемудрил наверно у меня теперь даже буй не пишет ))))))))
Author:  Irina E [ 2010-10-07 07:43:58 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Code:
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

сечас пробуй
Author:  Fistashka [ 2010-10-07 09:26:51 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Irina E wrote:
Code:
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

сечас пробуй

эх нет не как просто запускается и вырубается
Author:  Mirage [ 2010-10-07 15:22:56 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Если ты изменишь ID НПС то я думаю заработает точно так как и у меня работает ;)

на расстоянии нескольких экранов стоят несколько НПС.
когда подходишь к 2 из списка то у них совершается покупка Когда подходишь к тем кто не в списке то скрипт заканчивает работу.
Author:  Fistashka [ 2010-10-07 17:31:21 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Mirage wrote:
Если ты изменишь ID НПС то я думаю заработает точно так как и у меня работает ;)

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

ты думаешь я совсем глупый человек?))))))) кобуто я с вашими ID скрипт тестил )))))
Author:  Kynep [ 2010-10-07 21:11:13 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
TWI включи.
Author:  Fistashka [ 2010-10-08 03:34:33 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Kynep wrote:
TWI включи.

если я правильно понел тви это трек ворелд итем то он включен не могу понять в чем косяк
Author:  Savage [ 2010-10-08 08:24:52 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
А зачем кричать байв клиенте? Что команда ,buy blanki не отрабатывает? Тогда вообще нет смысла покупать командой инжекта.
Author:  Fistashka [ 2010-10-08 13:54:15 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Savage wrote:
А зачем кричать байв клиенте? Что команда ,buy blanki не отрабатывает? Тогда вообще нет смысла покупать командой инжекта.

она отрабатывает но в этом скрипте каторый переделали чтобы он кричал тока когда видет вендора она не работает он вобще вендоров не видет и не кричит
Author:  Mirage [ 2010-10-08 16:32:46 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
у меня с такими строками работает все
Code:
            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")

МБ шард не поддерживает. Или какаято своя система закупки.
Author:  Fistashka [ 2010-10-08 17:28:46 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
Mirage wrote:
у меня с такими строками работает все
Code:
            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")

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


да поддерживает он! у меня скрипт на скупку просто он вендоров по ID не видит по чему не знаю я хотел просто зделать поиск я вот делал несколько срывал с разных скриптов а он один хер не видит так вот просто летаю и пишу буй тока так не эфиктивно старый вендор не забивается и когда он прилетает в 2 раз в этот город он пытается купить у него же
Author:  Fistashka [ 2010-10-08 17:39:56 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
вот с этим скриптом он у меня трекает Менов и Воменов
Code:
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:
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
Author:  Fistashka [ 2010-10-09 07:24:20 ]
Post subject:  Re: Помогите с командой UO.buy + uo.getName( "vendor")
все топ умер паходу (
Page 1 of 2 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/