sub Alchemy() 
var Exit=0,LastTimer

while Exit<>1 
uo.DeleteJournal() 

uo.FindType('0x0F0E',-1,'backpack') ; Бутылки 
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x0F0E','0x0000','0x4004CAE1') ; Контейнер с бутылками (bottle, container) 
wait(1000) 
uo.Grab('500','finditem') 
wait(100) 
end if 
uo.FindType('0x0F88','0x0000','backpack') ; Найт шейд 
if uo.GetQuantity('finditem')<20 then 
uo.FindType('0x0F88','0x0000','0x4004CAE1') ; Найт шейд , Контейнер 
wait(1000) 
uo.Grab('1000','finditem') 
wait(500) 
end if 
LastTimer=uo.Timer() 
uo.WaitMenu('What','(last)') ; Меню 
uo.UseType(0x0F88) ; Найт Шейд

while not uo.InJournal("You put") and not uo.InJournal("You toss the failed") 
wait(500) 
wend 

if uo.InJournal("You toss the failed") then 
repeat 
wait(100) 
until uo.Timer()>=LastTimer+100 ; Время создания даггера  
else 
end sub 

#============================================================== 
# Alchemy(reagent, min_reg, choice) - main alchemi script 
# 
# reagent - type of reagent 
# min_reg - min count reagets to make potion 
# choice - menu choice after using reagents 
# 
# Journal has been deleted!!! 
#-------------------------------------------------------------- 
sub Alchemy(reagent, min_reg, choice) 
while UO.Count('0x0F0E','0x0000')>0 AND UO.Count(reagent)>=min_reg 
UO.DeleteJournal() 
UO.Exec("waitmenu 'What sort of potion do you want to' "+choice) 
UO.UseType(reagent) 
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed") 
wait(300) 
wend 
wend 
end sub 

#============================================================== 
# makega() - toss greater agility potion 
#-------------------------------------------------------------- 
sub makega() 
alchemy('0x0F7B', 3, "'Greater Agility'") 
end sub 


#============================================================== 
# makedp() - toss deadly poison potion 
#-------------------------------------------------------------- 
sub makedp() 
alchemy('0x0F88', 8, "'Deadly Poison'") 
end sub 


#============================================================== 
# makegp() - toss greater poison potion 
#-------------------------------------------------------------- 
sub makegp() 
alchemy('0x0F88', 4, "'Greater Poison'") 
end sub 


#============================================================== 
# makeinvis() - toss invisibility potion 
#-------------------------------------------------------------- 
sub makeinvis() 
alchemy('0x0F91', 4, "'Invisibility'") 
end sub 


#============================================================== 
# maketm() - toss total mana potion 
#-------------------------------------------------------------- 
sub maketm() 
alchemy('0x0F87', 6, "'Total Mana'") 
end sub 


#============================================================== 
# makegh() - toss total mana potion 
#-------------------------------------------------------------- 
sub makegh() 
alchemy('0x0F85', 7, "'Greater Heal'") 
end sub 


#============================================================== 
# makegc() - toss Greater Cure potion 
#-------------------------------------------------------------- 
sub makegc() 
alchemy('0x0F84', 6, "'Greater Cure'") 
end sub 


#============================================================== 
# makess() - toss stoneskin potion 
#-------------------------------------------------------------- 
sub makess() 
alchemy('0x0F85', 1, "'Stoneskin'") 
end sub 


#============================================================== 
# makens() - toss Night Sight potion 
#-------------------------------------------------------------- 
sub makens() 
alchemy('0x0F8D', 2, "'Nightsight'") 
end sub 


#============================================================== 
# makeh() - toss Heal potion 
#-------------------------------------------------------------- 
sub makeh() 
alchemy('0x0F85', 5, "'(2)'") 
end sub 


#============================================================== 
# maketr() - toss total refresh potion 
#-------------------------------------------------------------- 
sub maketr() 
alchemy('0x0F7A', 6, "'Total Refresh'") 
end sub 


#============================================================== 
# makegs() - toss total refresh potion 
#-------------------------------------------------------------- 
sub makegs() 
alchemy('0x0F86', 5, "'Greater Strength'") 
end sub 


#============================================================== 
# makege() - toss total mana potion 
#-------------------------------------------------------------- 
sub makege() 
alchemy('0x0F8C', 10, "'Greater Explosion'") 
end sub