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

скрипт просто убивает животное =\
хотя написано что ето скрипт на веретенарию (нада чтобы он бил животное на половине хп его лечил подлечивался сам если нада)