Code: Select all
Sub Arrow()
if Not uo.Waiting() then
uo.Exec("cast 'Magic Arrow' last")
end if
if uo.InJournal("cliloc# 0xA3A1") then
uo.Exec("cast 'Magic Arrow' lastattack")
uo.Exec("cast 'Magic Arrow' last")
uo.DeleteJournal()
end if
end sub
Code: Select all
sub fireball()
if not uo.waiting() then
UO.exec("cast 'Fireball' lasttarget")
end if
if (UO.InJournal('cliloc# 0xA3A1') or UO.InJournal('cliloc# 0xAB74')) then
UO.exec("cast 'Fireball' ")
UO.DeleteJournal()
end if
end sub