Healing(self)+equiping shield script
Posted: 2004-08-06 15:39:53
It worked for me. It's fixed version of one of donator of this forum...
Code: Select all
sub Bandageself_and_shield()
VAR Shield=0x410B3D6A #ID of Shield
While UO.Life<UO.STR
UO.DeleteJournal()
UO.WaitTargetSelf()
UO.UseType(0x0e21)
UO.Print("Shield Equiping")
Wait(300)
UO.Useobject(Shield)
repeat
wait(100)
Until UO.InJournal("Chces vytvorit mumii?") or UO.InJournal("You put the bloody bandagess in your pack.") or UO.InJournal("You apply the bandages, but they barely help.")
wend
end sub