Хеал
Moderators: Murderator+, Murderator
-
Scripts Writer
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
-
Scripts Writer
- 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
-
Scripts Writer
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
Code: Select all
while not uo.Dead()
...
wendYou 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