Yoko

All sides of Injection
It is currently 2024-03-29 17:29:49

All times are UTC+02:00




Post new topic  Reply to topic  [ 2 posts ] 
Author Message
PostPosted: 2013-09-26 21:02:18 
Offline

Joined: 2012-07-27 23:43:14
Posts: 249
народ помогите пожалуйста! вот скрипт для продажы вещей, которые в кучу не складываютца:
Code:
sub SellToVendor()
var tProduct = '0x1086'      ;тип товара
var cProduct = '0x0000'      ;цвет товара
var sellListName = 'Necklace'   ;название листа продажи
var ms = 25         ;кол-во поскольку будем продавать
var addDealy = 500      ;если не успевает продавать, увеличьте эту цифру
var bd = ms*350+addDealy   ;system. don't tuch
   UO.Print('Кому продавать будем?')
   UO.addobject('vend')
   while uo.Targeting()
      wait(200)
   wend
   if UO.GetSerial('vend') == UO.GetSerial('self') or UO.GetSerial('vend') == '0x00000000' or UO.GetSerial('vend') == UO.GetSerial('backpack') then
      UO.Print('Промазал(а) - отключаюсь.')
   end if   
   uo.set('maxsell',str(ms))
   UO.UseObject('backpack')   
   uo.set('buydelay',str(bd))
   CheckLag()   
   while UO.Count(tProduct,cProduct) > 0
      if UO.Count(tProduct,cProduct) < ms then
         bd = UO.Count(tProduct,cProduct)*350+addDealy
         uo.set('buydelay',str(bd))
         CheckLag()
      end if
      uo.sell(sellListName,UO.GetName('vend'))
      CheckLag()
      if UO.InJournal("You have nothing I'm interested in") then
         return
      end if
      UO.Say('! <GUARDS> ')
   wend
   uo.set('buydelay','0')
end sub

sub CheckLag()
   UO.DeleteJournal()
   UO.Click('backpack')
   repeat
      wait(50)
   until UO.InJournal('backpack')
end sub


У меня так получаетца, когда хочу продать вещи - клиент крашитца. В чем может быть проблема?


Top
   
PostPosted: 2013-09-27 08:52:25 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
Code:
sub checklag() 
   repeat
      UO.DeleteJournal()
      UO.Click('backpack')
   until backpack()==1
endsub
sub backpack()
   var n
   for n=0 to 200
      if uo.injournal('a backpack') then
         return 1
      endif
      wait(200)
   next
endsub


Либо TWI включен

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 2 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] and 21 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