Помогите пожалуста со скриптом на резист...

[*Cool*]

Здрасте.. Помогите пожалуста, я в скриптах мало шарю.. Мне дали скрипт, но с таким скриптом очень много растрат. Помогите переписать чтоб 1 скрипт место манок медетировал, а 2скрипт место ГХ хилился бинтами.. За Ранее очень благодарен..

Code: Select all

sub CastArrow() 
while not uo.Dead() 
uo.DeleteJournal() 
while uo.Mana>=10 
if uo.injournal('stay') then
uo.canceltarget()
while not uo.injournal('go')
wait(100)
wend
uo.deletejournal()
else
endif
if uo.life < 10 then
uo.undress()
wait(600)
uo.moveitem('0x4023CD01','0','ground')
endif
UO.Exec("cast 'Magic Arrow'lasttarget") ## Просто юзаем тарегет на типа в кого будем кидать стрелки...
wait(2000)
regcount() 
wend 
uo.warmode(0)
Manadrink() 
wait(1000)
wend 
end sub 

Sub Manadrink() 
UO.FindType('0x0F0E','0x09DF','backpack') 
UO.UseObject('finditem')
end sub 

Sub Regcount()
if UO.BP<10 OR UO.NS<10 then
   uo.findtype('0x0F88','-1','0x40386B28') ## Серийник сундука с Nightshade
     uo.grab('100','finditem' )
 uo.print('Биру Nightshade')
   wait(2000)
   uo.findtype('0x0F7A','-1','0x40386B28') ## Серийник сундука с Black Pearls
     uo.grab('100','finditem' )   
 uo.print('Биру Black Pearls')
wait(2000)
endif
UO.FindType('0x0F0E','0x09DF','backpack')
if uo.findcount('finditem') == 0 then
UO.FindType('0x0F0E','0x09DF','0x40386B28') ##  Сундук с Total Mana
     uo.grab('30','finditem' )
uo.print('Биру Total Mana')
wait(2000)
else
endif
end sub


sub counter()
uo.ignorereset()
var bag
uo.addobject('container')
while uo.targeting()
wait(100)
wend
uo.useobject('container')
wait(200)
var type = '0x0F0E'
uo.findtype(type,'0x09DF','container')
var c = uo.findcount('finditem')
var i,q
q = uo.getquantity('finditem')
if c > 0 then
for i = 1 to c
uo.ignore('finditem')
uo.findtype(type,'0x09DF','container')
q=q+uo.getquantity('finditem')
next
uo.print('Бутылок маны - ' + str(q))
else
uo.print('0')
endif
end sub

Code: Select all

sub Drink()
while not uo.Dead() 
wait(15000) 
repeat
wait(1000)
Until UO.getHP() < 140
Healdrink() 
wend 
end sub

Sub Healdrink() 
UO.FindType('0x0F0E','0x09BB','backpack') 
UO.UseObject('finditem')
end sub

[Scripts Writer]

Code: Select all

Sub Manadrink() 
UO.FindType('0x0F0E','0x09DF','backpack') 
UO.UseObject('finditem') 
end sub

Sub Healdrink() 
UO.FindType('0x0F0E','0x09BB','backpack') 
UO.UseObject('finditem') 
end sub

Менять здесь

[*Cool*]

я не разюераюсь.. Есле моно то надо еще вставить go and stop когда кончается мана и у другого чарах хп