Не пойму в чем дело.

Requests of new features and reports on bugs needs to be fixed

Moderators: Murderator+, Murderator

Post Reply
drozd
Posts: 44
Joined: 2006-08-31 15:05:51

Не пойму в чем дело.

Post by drozd »

Дело в том,что я играю на сфере с инжой и не могу понять почему этот макр хелит моего врага,когда его нет(убегает за экран или в хайд)то хелит меня.Помогите разобраться пожалуйста.


Code: Select all

sub GHeal()
   VAR ManaNeed=11
   VAR ManaNeedScroll=5
   If UO.Life<UO.Str Then
      UO.FindType('0x1F49',-1,'my')
      If UO.FindCount()>0 Then
         If UO.Mana>=ManaNeedScroll Then
            UO.WaitTargetSelf()
            UO.UseObject('finditem')
            UO.Print("C TyaJIeTHoN byMarU!!!")
         Else
            UO.Print("Low mana scroll!!!")
         Endif
Wait (1500)
UO.Attack('lastattack')      
Else
         If UO.Mana>=ManaNeed Then
            UO.Cast('Greater Heal','self')
            UO.Print("Spell!!!")
         Else
            UO.Print("TTUDORbI,III,a 3aBaJIAT,TToPa C'e6OBaTb!!!")
         Endif
      Endif
   Else
      UO.Print("rOpeU,!!!")
   Endif
Wait (2200)
UO.Attack('lastattack')
end sub



Поидде все же правельно,хотя может и ошибаюсь....))
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Разбей скрипт. 3х этажные скрипты никогда не были эффективными
Rivory
Posts: 205
Joined: 2005-01-06 11:49:28

Re: Не пойму в чем дело.

Post by Rivory »

Code: Select all

sub GHeal()
VAR ManaNeed=11
VAR ManaNeedScroll=5
If UO.Life<UO.Str Then
 UO.FindType('0x1F49',-1,'my')
  If UO.FindCount()>0 and UO.Mana>=ManaNeedScroll Then
    UO.WaitTargetObject('self')
    wait(50)
    UO.UseObject('finditem')
    UO.Print("C TyaJIeTHoN byMarU!!!")
    return 1
  Else
    UO.Print("Low mana or no scroll!!!")
  Endif
  Wait (1500)
  UO.Attack('lastattack')      
  If UO.FindCount()>0 and UO.Mana>=ManaNeed Then
    UO.Cast('Greater Heal','self')
    wait(50)
    UO.Print("Spell!!!")
  Else
    UO.Print("TTUDORbI,III,a 3aBaJIAT,TToPa C'e6OBaTb!!!")
  Endif
else
  UO.Print("rOpeU,!!!")
Endif
Wait (2200)
UO.Attack('lastattack')
end sub


немного поправил и сделал более читабельным. пробуй.
admir
Posts: 528
Joined: 2005-01-13 07:20:54

Post by admir »

а примем тут реквест? жаль не модер я
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва
Post Reply