Table of Contents
Details #
All scripts have been collected over the years and if available will still contain the creators details, these scripts may run well or not.
Scripts #
Alchemy.sc #
sub main()
var regType = 0x0F88
var potionType = 0x0F0A
var time
Repeat
UO.WaitTargetType(regType)
UO.WaitMenu("Select", "Deadly")
UO.DeleteJournal()
UO.UseType(0x0E9B)
time = 0
Repeat
Wait(200)
time = time + 200
Until UO.InJournal("stop griding") || time > 10000
kegPotions(potionType)
Until UO.SkillVal("Alchemy") > 1050
end sub
sub kegPotions(type)
UO.FindType(type, -1, 'my')
While UO.FindCount() > 0
UO.OnGump('anygump', '0')
UO.WaitTargetType(type)
UO.UseType(0x1940)
Wait(1000)
UO.FindType(type, -1, 'my')
Wend
end sub
Alchemy for others.sc #
sub main()
var regType = 0x0F88 #Nightshade
var potionType = 0x0F0A #Poison Potions
var choice = "Greater" #Menu Choice
var time
Repeat
UO.WaitTargetType(regType)
UO.WaitMenu("Select", choice)
UO.DeleteJournal()
UO.UseType(0x0E9B)
time = 0
Repeat
Wait(200)
time = time + 200
Until UO.InJournal("stop griding") || time > 10000
kegPotions(potionType)
Until FALSE
end sub
sub kegPotions(type)
UO.FindType(type, -1, 'my')
While UO.FindCount() > 0
UO.OnGump('anygump', '0')
UO.WaitTargetType(type)
UO.UseType(0x1940)
Wait(1000)
UO.FindType(type, -1, 'my')
Wend
end sub
alchy-gex.sc #
sub main()
uo.say(".autoloop 1")
start:
UO.Exec("waitmenu 'Select' 'Greater'")
UO.Exec('waittargettype sa')
UO.Exec('usetype mortar')
wait(11000)
#UO.Exec('waittargettype dp')
#UO.Exec('usetype keg')
#wait(2000)
#UO.RClick(118,87)
#wait(2000)
GOTO start
end sub
alchy-simple.sc #
sub main()
uo.say(".autoloop 1")
start:
UO.Exec("waitmenu 'Select' 'Refresh_Full'")
UO.Exec('waittargettype reag')
UO.Exec('usetype mortar')
wait(8000)
GOTO start
end sub
Alchemy greater explosion.sc #
sub main()
var regType = 0x0F8C
var potionType = 0x0F0A
var time
Repeat
UO.WaitTargetType(regType)
UO.WaitMenu("Select", "Greater")
UO.DeleteJournal()
UO.UseType(0x0E9B)
time = 0
Repeat
Wait(200)
time = time + 200
Until UO.InJournal("stop griding") || time > 10000
kegPotions(potionType)
Until FALSE
end sub
sub kegPotions(type)
UO.FindType(type, -1, 'my')
While UO.FindCount() > 0
UO.OnGump('anygump', '0')
UO.WaitTargetType(type)
UO.UseType(0x1940)
Wait(1000)
UO.FindType(type, -1, 'my')
Wend
end sub