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

DRW Sell / fishing pole
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2212
Page 1 of 1

Author:  XpyCmuK [ 2004-12-11 01:33:11 ]
Post subject:  DRW Sell / fishing pole

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.

Author:  XpyCmuK [ 2004-12-13 06:52:05 ]
Post subject: 

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

Author:  Bloodmoon [ 2004-12-13 10:32:43 ]
Post subject: 

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

Author:  Leks [ 2004-12-16 04:53:03 ]
Post subject:  Re: DRW Sell / fishing pole

XpyCmuK wrote:
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:
 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

Author:  Sfagnum [ 2004-12-16 09:02:27 ]
Post subject:  Re: DRW Sell / fishing pole

Leks wrote:
Подстраивай под себя и ... короче разбирайся!
ссылку бы положил ;)

Author:  Leks [ 2004-12-19 10:21:14 ]
Post subject:  Re: DRW Sell / fishing pole

Sfagnum wrote:
ссылку бы положил ;)

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

Author:  Sfagnum [ 2004-12-19 16:41:19 ]
Post subject: 

:D

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/