Page 1 of 1

Парни помогите пожалуйста настроить

Posted: 2006-03-21 13:15:48
by GrandMaster Ranger
Заранее спасибо большое.
Мне нужно
1. чар стоит бьет найтмара кулаком
2. при определенном хп он начинает хилиться бинтами с пола
3. хавает

вроде все просто, но не тут то было. можете пожалуйста вырезать из моего скрипта лишнее и исправить где что нужно... скрипт выдает ошибку в строчке, которой не сущесвтует :(

Code: Select all

sub main() 
var checkHP = 80
   UO.Set('finddistance','2')
   UO.Set('distance','2')
      While not uo.Dead()
      begin:
      wait(2000)
      if uo.getHP() < checkhp then
      UO.findtype('0x0E21','0x0578','ground')
      wait(1500)
      UO.WaitTargetSelf()
      uo.usefromground('finditem')
            wait(3000)
               UO.ServerPrint(".hungry")
         Wait(1000)
         If uo.inJournal('hungry at all') Then
            uo.usetype( '0x097B')
         end if
      wend
   wend
end sub

Re: Парни помогите пожалуйста настроить

Posted: 2006-03-21 19:13:15
by SLAK

Code: Select all

sub main() 
var checkHP = 80
   UO.Set('finddistance','2')
   UO.Set('distance','2')
     While not uo.Dead()
      if uo.getHP() < checkhp then
      UO.WaitTargetSelf()
      UO.findtype('0x0E21','0x0578','ground')
       if uo.findcount() then
        UO.WaitTargetSelf()
        uo.usefromground('finditem')
        wait(3000)
       else
        uo.print("bandage not found, script is stoped")
        return
       end if
      end if
         UO.ServerPrint(".hungry")
         Wait(1000)
         If uo.inJournal('hungry at all') Then
            uo.usetype( '0x097B')
            wait(1000)
         end if
     wend
end sub


что-то типа такого