стратегическая лечилка
Posted: 2005-02-21 16:32:24
включенноы гх и бандажки ,с защитой от лагов,с предупреждением через UO.print о нехватке бандажек и гх,не требует прописвыания серийнеков и тайпов просто выставляем на хоткей и наслаждаемся лечением )))
при хиллинг >70 и наличие гх в паке восстанавливает 80-90 hp сразу
Code: Select all
sub main()
var tmp_weap = "set_tmp"
if uo.life<70 then
dgheal()
end if
if uo.b==0 then
uo.print("WARHING: You haven't bandages")
uo.SetGlobal("__healing__", "0")
uo.exec("terminate HealBandOnce")
else
uo.print("Healing")
# if uo.GetGlobal("__healing__") <> "1" then
# uo.SetGlobal("__healing__", "1")
uo.setarm(tmp_weap)
# uo.exec("bandageself")
uo.waittargetself()
uo.usetype("bandage")
CheckLag()
uo.arm(tmp_weap)
uo.unsetarm(tmp_weap)
# uo.SetGlobal("__healing__", "0")
else
uo.print("already healing.... aborted")
return
end if
end if
end sub
end sub
sub CheckLag()
uo.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub
sub dgheal()
var f=0
if UO.Count("0x0f0e 0x09bb") > 0 then
UO.Exec("usetype 0x0f0e 0x09bb")
VAR healcnt=UO.Count("0x0f0e 0x09bb") - 1
UO.Print(""+STR(healcnt)+" Greater Heal left")
UO.Exec("exec potion_timer")
else
f=1
UO.Print("No Greater Heal Potions Left!")
end if
end sub
при хиллинг >70 и наличие гх в паке восстанавливает 80-90 hp сразу