Page 1 of 1

Healing(self)+equiping shield script

Posted: 2004-08-06 15:39:53
by greenleader
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