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 
что-то типа такого