Грамотные люди посмотрите плз

TapakaH · Post by **TapakaH** » 2004-09-26 09:26:56

сваял свой первый скрипт на спарринг. есличто не так сделал поправьте плз

sub spar()
VAR ban='' тип бандажек
VAR bban='' тип кровавых бандажек
VAR tazik=''тип миски
VAR opp='' ID 2го чара

wile NOT UO.Dead()
 UO.Exec("warmode 1")
   wait(100)
    UO.Attack('opp')
     while UO.Life<=60 or UO.GetHP(opp)<=100
      wait(100)
       UO.Exec("warmode 0")
wend
UO.SetArm('CWeapon')
 UO.FindType('ban')
  If UO.GetQuantity('finditem')<=20 Then
   UO.FindType('bban','backpack')
    UO.WaitTargetType('tazik')
     UO.UseObject('finditem')
Endif
while UO.Life=UO.Str 
 UO.DeleteJournal() 
  UO.BandageSelf()  
    wait(500) 
     Until UO.InJournal('put') OR UO.InJournal('help') OR UO.InJournal('cure') 
      Repeat
wend
wile UO.GetHP('opp') == 256
 UO.FindType('ban','backpack')
  UO.WaitTargetType('opp')
   UO.UseObject('finditem')
    repeat
wend
wait(500)
UO.Arm('CWeapon')
wait(100)
wend
end sub

Post by **Yoko** » 2004-09-26 19:24:27

главный критерий это работает он или нет
если он тебя устраивает значит всё в порядке

TapakaH · Post by **TapakaH** » 2004-09-26 22:02:13

Yoko wrote:главный критерий это работает он или нет
если он тебя устраивает значит всё в порядке

Тот не работал, я его чутка передел, но возникла проблема, чар не останавливается когда у второго чара которого бьют хп падает ниже 100

Code: Select all

sub spar()
VAR ban='0x0E21' #тип бандажек
VAR bban='0x0E20' #тип кровавых бандажек
VAR tazik='0x1008'#тип миски
VAR opp='0x0006DC87' #ID 2го чара

while NOT UO.Dead()
 UO.Exec("warmode 1")
   wait(100)
    UO.Attack("opp")
     While UO.Life>=60 or UO.GetHP("opp")>=200
      wait(150)
       UO.GetHP("opp")
       repeat
       wend
       UO.Exec("warmode 0")
        
UO.SetArm('CWeapon')
 UO.FindType('ban')
  If UO.GetQuantity('finditem')<=20 Then
   UO.FindType('bban','backpack')
    UO.WaitTargetType('tazik')
     UO.UseObject('finditem')
Endif
while UO.Life==UO.Str
 UO.DeleteJournal() 
  UO.BandageSelf()
   Repeat
    wait(500) 
     Until UO.InJournal("put") OR UO.InJournal("help") OR UO.InJournal("cure") 
      
wend
 UO.FindType('ban','backpack')
  UO.WaitTargetObject("opp")
   UO.UseObject('finditem')
    repeat
     Until UO.InJournal("dont need")
wait(500)
UO.Arm('CWeapon')
wait(100)
wend
end sub

и вчем беда ума не приложу.

Post by **Yoko** » 2004-09-27 01:53:10

проверь чему именно равняются uo.gethp когда жизнь оппонента падает до нужного уровня