Yoko
http://forum.yoko.com.ua/

Хеал
http://forum.yoko.com.ua/viewtopic.php?f=20&t=9376
Page 1 of 1

Author:  -=Morf=- [ 2006-11-12 21:28:18 ]
Post subject:  Хеал

А есть такой скриптик чтобы можно было указывать кого хелить надо (1,2,3.. человек). А также можно было указывать при каком уровне хп надо хелить :oops:

Author:  -=Morf=- [ 2006-11-12 21:29:28 ]
Post subject: 

ааа еще бы такую функцию в этот скрипт, чтобы если в бек паке накаливалось н-ое кол-во бинтов то чар мыл их в указанной миске

Author:  Scripts Writer [ 2006-11-13 04:38:59 ]
Post subject: 

НУ смотря как ты хочешь указывать. Насчёт хелинга указывая таргетами с постоянными вопросами: Еще кого то? сомневаюсь. Но а с ИД сейчас напишу. попробую.

Author:  Scripts Writer [ 2006-11-13 04:46:08 ]
Post subject: 

Code:
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


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

Author:  -=Morf=- [ 2006-11-13 20:59:57 ]
Post subject: 

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

Author:  Nmy [ 2006-11-13 21:46:10 ]
Post subject: 

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

ид прописал?

Author:  -=Morf=- [ 2006-11-13 22:54:43 ]
Post subject: 

с мытьем бинтов я уже разобрался. Щас самое главное чтобы скрипт работал все время и не выключался после хеала......

Author:  Scripts Writer [ 2006-11-14 04:48:23 ]
Post subject: 

Code:
while not uo.Dead() 
 ...
wend

Author:  GimFlex [ 2006-11-14 09:02:15 ]
Post subject: 

You Must Die wrote:
Code:
while not uo.Dead() 
 ...
wend


да не мучай ты его :)

Code:
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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/