Сдраствуйте, может у ково есть скрипт на простую стрижку овец на шерсть, вот я тут на шел один скрипт но выдет ошибку: может у ково есть или кто поможет.

sub sheep()
uo.ignorereset()
uo.set('finddistance', '3')
repeat
uo.findtype('0x00CF','-1','ground');следует вписать тип овцы
if uo.findcount()>0 then
uo.waittargetobject('finditem')
uo.usetype('0x0F9E');на данный момент вписан тип даггера
uo.ignore('finditem')
endif
wait(100)
until uo.findcount()==0
endsub

вот еше один для инжекта,но там заморочка (Чар бегает по загонуубивает животных, овец стрижёт. лутает) может можно как небудь что изменить что бы просто бегал и стриг!

sub main()
var ZVER
var myx=uo.getx(), myy=uo.gety()
While Uo.Weight <600 or not uo.dead()
ZVER=poisk()
If ZVER>0 then
Gotoxy(uo.getx(ZVER),uo.gety(ZVER),1)
ataka(ZVER)
Loot()
endif
wait(200)
Gotoxy(myx,myy,1)
wend
end sub

Sub Poisk()
DIM An[6]
An[0]= '0x00DF' ;sheep
An[1]= '0x00D1' ;goat
An[2]= '0x00D9' ;dog
An[3]= '0x00C9' ;cat
An[4]= '0x00CB' ; pig
An[5]= '0x00CF' ;sheep
var i
For i = 0 to 5
Uo.Set('finddistance','14')
Uo.ignorereset()
Uo.FindType( An [ i ],'-1','ground')
If Uo.FindCount()>0 then
return Uo.GetSerial('finditem')
end if
next
return 0
end sub


Sub ataka(ID)
Var knife = '0x0F51'
uo.warmode(1)
GoToxy(uo.getx(ID),uo.gety(ID),1)
Uo.WaitTargetObject( ID )
Uo.UseType( knife )
wait(100)
While Uo.GetX(ID)>0 AND UO.GetY(ID)>0
GoToxy(uo.getx(ID),uo.gety(ID),1)
Uo.Attack(ID)
wait(1000)
wend
uo.warmode(0)
end sub

sub Loot()
DIM Lut[2]
Lut[0] = '0x0DF8' ;wool
Lut[1] = '0x1078' ;leather
Var knife = '0x0F51'
Var i
Uo.WaitTargetObject('lastcorpse')
Uo.UseType( knife )
wait(800)
For i = 0 to 1
Uo.FindType( Lut[ i ],'-1','lastcorpse')
While Uo.FindCount()>0
Uo.Grab('0','finditem')
wait(600)
Uo.FindType( Lut[ i ],'-1','lastcorpse')
wend
next
Uo.FindType('0x1078','-1','backpack')
While Uo.Findcount()>0
Uo.WaitTargetObject('finditem')
Uo.UseType('0x0F9E')
wait(600)
Uo.FindType('0x1078','-1','backpack')
wend
end sub

sub gotoxy(x,y,prec)
var ld=0,ldc=0
var dx,dy
var mx,my
var ox,oy,mk,k
#uo.print(">")
#uo.track("1",str(x),str(y))
start:
mx=UO.GetX()
my=UO.GetY()
dx=mx-x
if dx<0 then
dx=0-dx
endif
dy=my-y
if dy<0 then
dy=0-dy
endif
if dy>dx then
dx=dy
end if
if dx<=prec then
return
end if
if not ldc then
uo.print(STR(dx))
end if
if dx<3 then
mk=70
else
mk=15
end if

ox=mx
oy=my
for k=1 to mk
mx=UO.GetX()
my=UO.GetY()
if mx<>ox or my<>oy then
goto sdidapl
end if
wait(10)
next
sdidapl:

mx=UO.GetX()
my=UO.GetY()
dx=mx-x
if dx<0 then
dx=0-dx
endif
dy=my-y
if dy<0 then
dy=0-dy
endif
if dy>dx then
dx=dy
end if

if dx<=prec then
return
end if
if ld==dx then
ldc=ldc+1
if ldc>100 then
uo.print("Can not reach location!")
return
end if
else
ld=dx
end if

if mx==x then
if my==y then
return
endif
if my>y then
#UO.Print("UR")
UO.Press(33)
goto start
endif
#UO.Print("DL")
UO.Press(35)
goto start
end if
if mx<x then
if my>y then
#UO.Print("R")
UO.Press(39)
goto start
endif
if my==y then
#UO.Print("DR")
UO.Press(34)
goto start
endif
#UO.Print("D")
UO.Press(40)
goto start
end if
if my<y then
#UO.Print("L")
UO.Press(37)
goto start
endif
if my==y then
#UO.Print("LU")
UO.Press(36)
goto start
endif
#UO.Print("U")
UO.Press(3
goto start
end sub


Заранее спс..

причем скрипт на инжекте для этого раздела?

Да мне нужен скрипт или ваша помощь что бы скрипт был или работал на инжекте.
Стелс не котируеться нужно быть все время на стреме...

( опять не туда за постил!? извините я не давно стал токо постить)