DRW Sell / fishing pole

[XpyCmuK]

Ljudi pomagite bednamu Njubu pozhalusta =( Daite pozhalusta script na prodavanije "fishing pole" ! Na DRW shard sas postavili fishku to chto nelzja prodavat' kak obichno mi eta privikli delat' =( Shas nado specalnij scrip , kak mne skozal odin chelovek iz sharda DRW. Esli nezhalko pozhalutsa daite script.Spasibo.

[XpyCmuK]

Da... zdes ktota pomozhet (KONECHNO) !!

[Bloodmoon]

Ты зайди на сайт www.translit.ru .А потом редактни свой пост.А то ничего не понятно.

[Leks]

Ljudi pomagite bednamu Njubu pozhalusta =( Daite pozhalusta script na prodavanije "fishing pole" ! Na DRW shard sas postavili fishku to chto nelzja prodavat' kak obichno mi eta privikli delat' =( Shas nado specalnij scrip , kak mne skozal odin chelovek iz sharda DRW. Esli nezhalko pozhalutsa daite script.Spasibo.

Подстраивай под себя и ... короче разбирайся!

Code: Select all

 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 

[Sfagnum]

Подстраивай под себя и ... короче разбирайся!

ссылку бы положил

[Leks]

ссылку бы положил

Если поиском юзать не умеет, то может и не догодатся как по линку перейти

[Sfagnum]