
Хеал
Moderators: Murderator+, Murderator
-
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
-
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
Code: Select all
sub heal()
var bandage='type'
var bloody='type' #type of bloody bandages
var wash='ID' #where'll be bloody bandages cleaned
var i
DIM id[5]
id[0]=' SERIAL '
id[1]=' SERIAL '
id[2]=' SERIAL '
id[3]=' SERIAL '
id[4]=' SERIAL '
for i = 0 to 4
if uo.GetHp(id[i]) <> uo.GetMaxHp(id[i]) then
while uo.GetHp(id[i]) < uo.GetMaxHp(id[i]) # Heal until MaxHp
uo.WaitTargetObject(id[i])
uo.UseType(bandage)
wait(3500)
wend
else
uo.FindType(bloody,'-1','backpack')
if uo.Count(bloody) > 100 then #When we'll clean bloody bandages(qua)
uo.WaitTargetObject(wash)
uo.UseObject('finditem')
wait(250)
end if
end if
next
end sub
Не тестировал. Смотри у себя сам.
-=Morf=- wrote:таксь скрипт пашед, но после того как он вылечил обоих чаров, он останавливаецо и приходицо снова запускать.
И еще , чтобы чар мыл на нашем сервере нужно дабл клик на грязный бинт и на миску с водой
а то он так не моет что то или я делаю чо не так?
ид прописал?
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
-
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
Code: Select all
while not uo.Dead()
...
wend
You Must Die wrote:Code: Select all
while not uo.Dead()
...
wend
да не мучай ты его

Code: Select all
sub heal()
var bandage='type'
var bloody='type' #type of bloody bandages
var wash='ID' #where'll be bloody bandages cleaned
var i
DIM id[5]
id[0]=' SERIAL '
id[1]=' SERIAL '
id[2]=' SERIAL '
id[3]=' SERIAL '
id[4]=' SERIAL '
while 1==1
for i = 0 to 4
if uo.GetHp(id[i]) <> uo.GetMaxHp(id[i]) then
while uo.GetHp(id[i]) < uo.GetMaxHp(id[i]) # Heal until MaxHp
uo.WaitTargetObject(id[i])
uo.UseType(bandage)
wait(3500)
wend
else
uo.FindType(bloody,'-1','backpack')
if uo.Count(bloody) > 100 then #When we'll clean bloody bandages(qua)
uo.WaitTargetObject(wash)
uo.UseObject('finditem')
wait(250)
end if
end if
next
wend
end sub