Page 1 of 1

Подправте маленькии скриптец

Posted: 2005-09-27 20:14:53
by -=WOLVERINE=-

Code: Select all

sub main()
Uo.FindType('0x0000','0xffff','ground')
UO.MoveItem("finditem","-1","backpack")
UO.Ignore("finditem")
UO.IgnoreReset()
wait(2000)
end if
end sub


Вот накалякал тут скриптец: суть его в том чтобы собирать вещи с земли (заданныи тип ) в моем случае он собирает вещи...Но!
Он собирает только один раз, тоесть собирает одну вещь этого типа и останавливаеться....как зделать так чтобы он останавливался только после того как собрал все вещи этого типа?

Posted: 2005-09-27 20:16:38
by Leo

Posted: 2005-09-27 21:05:53
by -=WOLVERINE=-
Leo wrote:https://yoko.uokit.com/viewtopic.php?p=29438#29438

это не то...к сожалению :(

Posted: 2005-09-28 02:05:10
by Destruction
Зацикливание без циклов невозможно -)

Три варианта вечного цикла:
1.

Code: Select all

repeat
Your code
until false

2.

Code: Select all

while true
Your code
wend

3.

Code: Select all

for i=1 to 0
Your code
next

Posted: 2005-09-28 11:59:30
by -=WOLVERINE=-
Destruction wrote:Зацикливание без циклов невозможно -)

Три варианта вечного цикла:
1.

Code: Select all

repeat
Your code
until false

2.

Code: Select all

while true
Your code
wend

3.

Code: Select all

for i=1 to 0
Your code
next

Это конечно хорошо ...но мне нужно чтоб он останавливался после того как забрал все вещи данного типа :) ну или цвета но это не так и важно 6)

Posted: 2005-09-28 12:09:43
by Leo

Posted: 2005-09-28 12:22:08
by -=WOLVERINE=-
Leo wrote:https://yoko.uokit.com/viewtopic.php?t=3056

Лева читаи выше...про терминеит я знаю...а вот сделать так чтоб закрывалс крипт послде того как все сбагрит с земли я не могу:(

Posted: 2005-09-28 12:24:30
by Leo

Code: Select all

if UO.FindCount()==0
UO.Exec("terminate 'Название процедуры'")
endif

Posted: 2005-09-28 12:27:50
by -=WOLVERINE=-
Все всем спасибо я уже сам накалякал и все работает :)

Code: Select all

sub XXXX()
UO.Ignore( 'self' )
UO.Set('finddistance','3')
Repeat
Uo.FindType('0x0000','0xffff','ground')
wait(100)
  UO.Grab( '1', 'finditem' )
  wait(500)
  Until UO.FindCount() == 0
end sub

ПОльзуите кому надо :)