Page 1 of 1

Healing help plz(OSKOM FREE)

Posted: 2005-06-18 09:55:27
by Dralka
sub Healing()
while not uo.dead()
if uo.life<UO.str then
UO.BandageSelf()
repeat
wait(2000)
until UO.InJournal("You apply")
UO.DeleteJournal()
else
UO.UseType('0x0E20');улье просто играю на оскоме
endif
wend
end sub


скрипт должен юзать улье и тутже класть на себя бандажку(когда юзаеш улье хп отнимается) помогите плз получется что он кладет на себя бинт юзает улье и пытается класть на себя бинт(при етом не хелясь) и кладет кладет и виснет....... помогите плз

Posted: 2005-06-18 10:26:25
by flake
Лови работающий скрипт.

Code: Select all

sub Beehive() 
 Repeat
     UO.UseObject('') ; В кавычки вставить айди улия
     Wait(500)
        While UO.Life < 150
           UO.Bandageself()
           Wait (3000)
        Wend
    Wait(50)     
 Until UO.Dead()
end sub