Yoko

All sides of Injection
It is currently 2025-12-03 15:43:32

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 2
  [ 21 posts ]  Go to page 1 2 Next
  Print view Previous topic | Next topic 
Author Message
Fistashka
PostPosted: 2010-10-04 06:47:40 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
вот есть скрипт
тока в нем косяк когда он делает буй он пишет это не на сфере а просто с левого боку
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" ))
Top
   
Reply with quote  
Irina E
PostPosted: 2010-10-04 18:36:57 
Offline

Joined: 2009-06-12 20:10:00
Posts: 240
Location: Vasa Smerti(RASToMAN) DRW
Code:
UO.buy('Blanki',uo.getName( "vendor" ))
uo.msg(uo.GetName('finditem')+ ' bye guards')
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-05 02:43:20 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
спс выручил
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-05 13:28:24 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
теперь у меня токая проблема я забил одного вендора в эспере другова в брите как зделать чтобы когда я покупал в брите он не орал втарой раз буй так как там нету этого вендора?

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
Top
   
Reply with quote  
Irina E
PostPosted: 2010-10-06 04:54:27 
Offline

Joined: 2009-06-12 20:10:00
Posts: 240
Location: Vasa Smerti(RASToMAN) DRW
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 вендора так задоно у тебя
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-06 07:00:26 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
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 вендора так задоно у тебя




ну а вот как зделать чтобы он кричал тока того вендора которого видит?
Top
   
Reply with quote  
Mirage
PostPosted: 2010-10-06 08:40:11 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
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:

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-07 03:18:59 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
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:

ты про какую девушку говоришь?))))))
чета ты тут перемудрил наверно у меня теперь даже буй не пишет ))))))))
Top
   
Reply with quote  
Irina E
PostPosted: 2010-10-07 07:43:58 
Offline

Joined: 2009-06-12 20:10:00
Posts: 240
Location: Vasa Smerti(RASToMAN) DRW
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

сечас пробуй
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-07 09:26:51 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
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

сечас пробуй

эх нет не как просто запускается и вырубается
Top
   
Reply with quote  
Mirage
PostPosted: 2010-10-07 15:22:56 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
Если ты изменишь ID НПС то я думаю заработает точно так как и у меня работает ;)

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

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-07 17:31:21 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
Mirage wrote:
Если ты изменишь ID НПС то я думаю заработает точно так как и у меня работает ;)

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

ты думаешь я совсем глупый человек?))))))) кобуто я с вашими ID скрипт тестил )))))
Top
   
Reply with quote  
Kynep
PostPosted: 2010-10-07 21:11:13 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
TWI включи.
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-08 03:34:33 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
Kynep wrote:
TWI включи.

если я правильно понел тви это трек ворелд итем то он включен не могу понять в чем косяк
Top
   
Reply with quote  
Savage
PostPosted: 2010-10-08 08:24:52 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
А зачем кричать байв клиенте? Что команда ,buy blanki не отрабатывает? Тогда вообще нет смысла покупать командой инжекта.
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-08 13:54:15 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
Savage wrote:
А зачем кричать байв клиенте? Что команда ,buy blanki не отрабатывает? Тогда вообще нет смысла покупать командой инжекта.

она отрабатывает но в этом скрипте каторый переделали чтобы он кричал тока когда видет вендора она не работает он вобще вендоров не видет и не кричит
Top
   
Reply with quote  
Mirage
PostPosted: 2010-10-08 16:32:46 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
у меня с такими строками работает все
Code:
            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")

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

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-08 17:28:46 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
Mirage wrote:
у меня с такими строками работает все
Code:
            UO.buy('Blanki',Name)
;            UO.Say(Name+" buy")

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


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


Last edited by Fistashka on 2010-10-08 17:42:20, edited 1 time in total.

Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-08 17:39:56 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
вот с этим скриптом он у меня трекает Менов и Воменов
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
Top
   
Reply with quote  
Fistashka
PostPosted: 2010-10-09 07:24:20 
Offline
User avatar

Joined: 2008-09-18 21:09:33
Posts: 47
все топ умер паходу (
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 2
  [ 21 posts ]  Go to page 1 2 Next

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 10 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