Хеал

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
-=Morf=-
Posts: 79
Joined: 2006-04-22 20:37:37

Хеал

Post by -=Morf=- »

А есть такой скриптик чтобы можно было указывать кого хелить надо (1,2,3.. человек). А также можно было указывать при каком уровне хп надо хелить :oops:
-=Morf=-
Posts: 79
Joined: 2006-04-22 20:37:37

Post by -=Morf=- »

ааа еще бы такую функцию в этот скрипт, чтобы если в бек паке накаливалось н-ое кол-во бинтов то чар мыл их в указанной миске
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

НУ смотря как ты хочешь указывать. Насчёт хелинга указывая таргетами с постоянными вопросами: Еще кого то? сомневаюсь. Но а с ИД сейчас напишу. попробую.
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

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=-
Posts: 79
Joined: 2006-04-22 20:37:37

Post by -=Morf=- »

таксь скрипт пашед, но после того как он вылечил обоих чаров, он останавливаецо и приходицо снова запускать.
И еще , чтобы чар мыл на нашем сервере нужно дабл клик на грязный бинт и на миску с водой
а то он так не моет что то или я делаю чо не так?
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

-=Morf=- wrote:таксь скрипт пашед, но после того как он вылечил обоих чаров, он останавливаецо и приходицо снова запускать.
И еще , чтобы чар мыл на нашем сервере нужно дабл клик на грязный бинт и на миску с водой
а то он так не моет что то или я делаю чо не так?

ид прописал?
-=Morf=-
Posts: 79
Joined: 2006-04-22 20:37:37

Post by -=Morf=- »

с мытьем бинтов я уже разобрался. Щас самое главное чтобы скрипт работал все время и не выключался после хеала......
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Code: Select all

while not uo.Dead() 
 ...
wend
GimFlex
Expert!
Posts: 766
Joined: 2005-01-07 13:22:19
Contact:

Post by GimFlex »

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
Post Reply