bue---sail

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
MAZDAY
Posts: 28
Joined: 2005-01-11 12:13:58

bue---sail

Post by MAZDAY »

народ помогите плиз....напишите скрипт чтоб чар сначала продавал а
потом сразуже покупал шмот...ID=0x40061A46 Type=0x0DF8
плизззз.....очень нужно!!!! :idea: :arrow:
CONDOMchick
Posts: 362
Joined: 2005-04-23 20:18:57

Post by CONDOMchick »

bue---sail


buy---sell :roll:
Dragon World. [since 2004]
MAZDAY
Posts: 28
Joined: 2005-01-11 12:13:58

Post by MAZDAY »

ну без приколов...
бай сеил просто команды а вот как сделать чтоб чар именно то что нуно продавал???
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Code: Select all

sub buyy()
 uo.Buy('Имя buy list'a (->Main->Buy/Sell->Create')
 wait(1000)
 uo.Say('bye')
 wait(1000)
end sub



Если постоянно скупать, зацыкливай.



Code: Select all

sub SellToVendor() 
var tProduct = '0x1085'      ;тип товара
var cProduct = '0x0000'      ;цвет товара
var sellListName = 'neck'   ;название листа продажи
var ms = 5         ;кол-во поскольку будем продавать
var addDealy = 50      ;если не успевает продавать, увеличьте эту цифру
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
   wend
   uo.set('buydelay','0')
end sub

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


На продажу.
п.с.
На домне маза чтоли новая открыта?? )) скупать-продовать. гг
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Это я на домне мазу устроил - летал на скрипте, скупал реги и бланки - рисовал скролы, которые продавал - кстате до сих пор прибыльно -)
MAZDAY
Posts: 28
Joined: 2005-01-11 12:13:58

Post by MAZDAY »

а что такое имя бай листа????
LordTom
Posts: 256
Joined: 2006-02-03 11:32:16
Location: ND
Contact:

развал задней оси

Post by LordTom »

Я занимаюсь с Данилкой почти год. Знает слова, кое-что понимает, знает слова приветствия-прощания, как зовут, как дела Я особо не увлекаюсь, пока. Galya Chilli, что за школа? Просто, я занима
Post Reply