#============================================================== 
# 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