хилинг на ульей
Posted: 2008-08-09 20:32:43
тупит и останавливается. он даже не начинается. нужно вручную делать меньше 20 хп. он отхиливается и останавливается. типы пропесал правильно, улей темболеЕ)
Code: Select all
sub Train_Heal()
; Attacking bees until hp=20, and then heal yourself.
; Get clean bandages from Sunduk, and move bloody
; bandage to Sunduk
var Bee=0x40948461
var Sunduk=0x40E1EB33
var Bandage=0x0E21
var BBandage=0x0E20
var life, k
while not uo.Dead()
while uo.life > 20
uo.UseObject(Bee)
wait(450)
repeat
wait(100)
until uo.InJournal('backpack')
wend
if uo.Count(Bandage) then
while uo.life < uo.str && uo.Count(Bandage)>0
k=0
uo.Bandageself()
uo.DeleteJournal()
life=uo.life
repeat
wait(100)
k=k+1
until uo.life <> life || uo.InJournal('помогли|кладете') || k>100
wend
uo.FindType(BBandage,'-1','backpack')
if uo.FindCount() then
uo.moveitem('finditem','all',Sunduk)
wait(750)
end if
else
uo.FindType(Bandage,'-1',Sunduk)
if uo.FindCount() then
uo.moveitem('finditem','250')
wait(750)
end if
end if
wend
end sub