Page 1 of 1

Доработка веретенарии

Posted: 2007-02-17 21:27:11
by yxTbl

Code: Select all

var anim='0x00CC' ;тайп животины 
var band='0x0E21' ;бинты 
var color='0x0000' ;цвет животнова

sub veterinar() 
 uo.Set('finddistance','3') 
 uo.FindType(anim,color,'ground') 
 while uo.isNPC('finditem') 
   uo.WarMode(true) 
   uo.Attack('finditem') 
   while uo.GetHP('finditem') > uo.GetMaxHP('finditem')/3 
     wait(500) 
   wend 
   uo.WarMode(false) 
   while uo.GetHP('finditem') <> uo.GetMaxHP('finditem') 
     uo.waittargetobject('finditem') 
     uo.UseType(band) 
     wait(3000) 
   wend 
  sword() 
  wend 
end sub 

sub sword() 
Var Svord='0x0F51' ;оружие  
Var Shield='0x1B76' ;щит 
;UO.Equipt('Lhand',Shield) 
;wait(1000) 
UO.Equipt('Rhand',Svord) 
wait(100) 
end sub
скрипт просто убивает животное =\
хотя написано что ето скрипт на веретенарию (нада чтобы он бил животное на половине хп его лечил подлечивался сам если нада)