Page 1 of 1
Проблемка
Posted: 2004-11-25 11:30:39
by zarg
Почему то не находит золто когда лутаешь.. подскажите кто знает
Code: Select all
sub Loot()
var i,n
Dim A[6]
A[1] = 0x0EED ;Gold
A[2] = 0x0f7b ;
A[3] = 0x0F90 ;
A[4] = 0x0F7E ;
A[5] = 0x0F80 ;
A[6] = 0x0EED ;
UO.WaitTargetObject("lastcorpse")
UO.useobject (0x402AFAAA );
wait(1000)
i = 1200
FOR n=1 TO 6
uo.findtype(A[n],"-1","lastcorpse")
if uo.findcount() > 0 then
UO.grab(1, "finditem")
uo.print("Found "+str(uo.findcount()))
Wait(i)
END if
next
end sub
вот скрипт
Re: Проблемка
Posted: 2004-11-25 11:58:22
by Sfagnum
zarg wrote:Почему то не находит золто когда лутаешь.. подскажите кто знает
Code: Select all
sub Loot()
var i,n
Dim A[6]
A[1] = "0x0EED" ;Gold
A[2] = "0x0f7b" ;
A[3] = "0x0F90" ;
A[4] = "0x0F7E" ;
A[5] = "0x0F80" ;
A[6] = "0x0EED" ;
UO.WaitTargetObject("lastcorpse")
UO.useobject ("0x402AFAAA" );
wait(1000)
i = 1200
FOR n=1 TO 6
uo.findtype(A[n],"-1","lastcorpse")
if uo.findcount() > 0 then
UO.grab("0", "finditem")
uo.print("Found "+str(uo.findcount()))
Wait(i)
END if
next
end sub
вот скрипт
найди 10 отличий
Re: Проблемка
Posted: 2004-11-25 12:23:44
by AGRS
А еще лучше так:
Code: Select all
sub Loot()
var i,n
Dim A[5]
A[0] = '0x0EED' ;Gold
A[1] = '0x0f7b' ;
A[2] = '0x0F90' ;
A[3] = '0x0F7E' ;
A[4] = '0x0F80' ;
UO.WaitTargetObject("lastcorpse")
UO.useobject (0x402AFAAA );
wait(1000)
i = 1200
FOR n=0 TO 4
uo.findtype(A[n],"-1","lastcorpse")
if uo.findcount() > 0 then
UO.grab("0", "finditem")
uo.print("Found "+str(uo.findcount()))
Wait(i)
END if
next
end sub
Re: Проблемка
Posted: 2004-11-25 14:44:10
by Sfagnum
AGRS wrote:А еще лучше так:
ты эта людей не путай, юзай таки кавычки
Re: Проблемка
Posted: 2004-11-25 19:59:31
by AGRS
Sfagnum wrote:AGRS wrote:А еще лучше так:
ты эта людей не путай, юзай таки кавычки
Я про массив.
Re: Проблемка
Posted: 2004-11-26 09:37:41
by Sfagnum
AGRS wrote:Sfagnum wrote:AGRS wrote:А еще лучше так:
ты эта людей не путай, юзай таки кавычки
Я про массив.
я понял. но есть слепое копирование