sub bladespirit1() 
var spirit = '0x023E', spiritid 
while true 
   uo.findtype(spirit,-1,'ground') 
   if uo.findcount() > 0 then 
      spiritid = uo.getserial('finditem') 
      uo.warmode(true) 
      uo.attack(spiritid) 
      wait(5000) 
   else 
      if uo.gethp() < uo.str then 
         uo.bandageself() 
         wait(3000) 
                        sword() 
      endif 
   endif 
wend 
endsub 

sub bladespirit2() 
while not uo.Dead() 
repeat 
if uo.mana > 20 then 
                placecast() 
               else 
               repeat 
                 uo.warmode(false) 
                    uo.useskill("Meditation") 
                    wait(3000) 
               until uo.mana >=28 
              endif 
wait(55000) 
until uo.InJournal('World is') 
wait(130000) 
wend 
end sub 

Sub placecast() 
uo.waittargettile(6042, 1793, 1568, 251) #поменять координаты(,infotile) 
wait(500) 
UO.Exec("cast 'Blade Spirits'") 
wait(6000) 
end sub 

sub sword()   ; Одевание щита и оружия 
Var Svord='0x0F5' ;Тип оружия, используемый вами 
Var Shield='0x1B76' ;Тип оружия, используемый вами 
UO.Equipt('Lhand',Shield) 
wait(1000) 
UO.Equipt('Rhand',Svord) 
wait(100) 
end sub

uo.waittargettile(6042, 1793, 1568, 251) #поменять координаты(,infotile)

uo.waittargetobject(object)