Yoko

Code: Select all

#******************************# 
#*********** 1.01 *************# 
# Cooper & You Must Die # 
#******************************# 
#******************************# 

sub Alchemy() 
var eye='0x0F88' ; Тип Eyes of Newt тут 
var forpotion= 18000 ;Задержка на изготовление 
var potion='0x0F0E' ; Тип Маны тут 
var color='0x0998' ; Цвет Маны тут 
var sunduk='0x402F7A23' ; Откуда брать, и куда складывать 
var bottle='0x0F0E' ;Тип бутылок 
var i 
while not uo.Dead() 
uo.DeleteJournal() 
uo.FindType(eye,'-1','my') 
if uo.GetQuantity('finditem') > 10 then 
uo.FindType(bottle,'-1','my') 
if uo.GetQuantity('finditem') > 10 then 
uo.WaitMenu('What sort of potion do you','Total Mana') тут 
uo.UseType(eye) 
wait(forpotion) 
CheckLag() 
i = 0 
repeat 
wait(100) 
k = k + 1 
until uo.InJournal('You put') OR uo.InJournal('You toss') or (k>50) 
if uo.InJournal('You put') then 
uo.DeleteJournal() 
uo.FindType(potion,color,'backpack') 
CheckLag() 
while uo.FindCount() 
uo.moveitem('finditem','10',sunduk) 
wait(500) 
wend 
end if 
else 
uo.FindType(bottle,'-1',sunduk) 
uo.moveitem('finditem','100') 
wait(1000) 
end if 
else 
uo.FindType(eye,'-1',sunduk) 
uo.moveitem('finditem','100') 
wait(1000) 
end if 
wend 
end sub 

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

Code: Select all

var bottle='0x0F0E' ;Тип бутылок 
var i, k
while not uo.Dead()