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:
[size=150][i]Dragon World. [since 2004][/i][/size]
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