Сам себе кастуеш убиваеш хилишся....
Code:
Var Svord='0x0F51' ;Тип оружия
Var Shield='0x1B76' ;Тип щита
VAR Banka='0x404420D9' ; ID Банки для мытья бинтов
sub BladeSpirits()
Var spiritid
var spirit = '0x023E'
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
repeat
UO.BandageSelf()
wait(1000)
UO.Arm("1")
until uo.gethp() == uo.str
CheckBandage()
sword()
endif
if uo.mana > 20 then
uo.waittargettile("400",str(uo.getx("self")+1),str(uo.gety("self")+1),str(uo.getz("self")))
uo.cast("Blade Spirit")
wait(5000)
else
While UO.Mana<UO.Int
UO.DeleteJournal()
wait(1000)
UO.Useskill('Meditation')
Repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
Wend
Endif
endif
wend
endsub
sub sword()
UO.Equipt('Lhand',Shield)
wait(2000)
UO.Equipt('Rhand',Svord)
wait(1000)
end sub
sub CheckBandage()
UO.waittargetobject(banka)
UO.usetype(0x0e20)
Wait(1000)
end sub