Page 1 of 1

Хеал

Posted: 2006-11-12 21:28:18
by -=Morf=-
А есть такой скриптик чтобы можно было указывать кого хелить надо (1,2,3.. человек). А также можно было указывать при каком уровне хп надо хелить :oops:

Posted: 2006-11-12 21:29:28
by -=Morf=-
ааа еще бы такую функцию в этот скрипт, чтобы если в бек паке накаливалось н-ое кол-во бинтов то чар мыл их в указанной миске

Posted: 2006-11-13 04:38:59
by Scripts Writer
НУ смотря как ты хочешь указывать. Насчёт хелинга указывая таргетами с постоянными вопросами: Еще кого то? сомневаюсь. Но а с ИД сейчас напишу. попробую.

Posted: 2006-11-13 04:46:08
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


Не тестировал. Смотри у себя сам.

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

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

ид прописал?

Posted: 2006-11-13 22:54:43
by -=Morf=-
с мытьем бинтов я уже разобрался. Щас самое главное чтобы скрипт работал все время и не выключался после хеала......

Posted: 2006-11-14 04:48:23
by Scripts Writer

Code: Select all

while not uo.Dead() 
 ...
wend

Posted: 2006-11-14 09:02:15
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