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