Anything and all.
Moderators: Murderator+ , Murderator
-=WOLVERINE=-
Posts: 66 Joined: 2004-05-27 18:19:17
Contact:
Post
by -=WOLVERINE=- » 2005-09-27 20:14:53
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
Вот накалякал тут скриптец: суть его в том чтобы собирать вещи с земли (заданныи тип ) в моем случае он собирает вещи...Но!
Он собирает только один раз, тоесть собирает одну вещь этого типа и останавливаеться....как зделать так чтобы он останавливался только после того как собрал все вещи этого типа?
Leo
Expert!
Posts: 791 Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:
Post
by Leo » 2005-09-27 20:16:38
[url=http://drw.ru/][img]http://userbars.ru/data/media/14/drw_proud.gif[/img][/url]
-=WOLVERINE=-
Posts: 66 Joined: 2004-05-27 18:19:17
Contact:
Post
by -=WOLVERINE=- » 2005-09-27 21:05:53
Leo wrote: https://yoko.uokit.com/viewtopic.php?p=29438#29438
это не то...к сожалению
Destruction
Junior Expert
Posts: 3221 Joined: 2004-06-24 22:08:56
Post
by Destruction » 2005-09-28 02:05:10
Зацикливание без циклов невозможно -)
Три варианта вечного цикла:
1.
2.
3.
-=WOLVERINE=-
Posts: 66 Joined: 2004-05-27 18:19:17
Contact:
Post
by -=WOLVERINE=- » 2005-09-28 11:59:30
Destruction wrote: Зацикливание без циклов невозможно -)
Три варианта вечного цикла:
1.
2.
3.
Это конечно хорошо ...но мне нужно чтоб он останавливался после того как забрал все вещи данного типа
ну или цвета но это не так и важно 6)
Leo
Expert!
Posts: 791 Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:
Post
by Leo » 2005-09-28 12:09:43
[url=http://drw.ru/][img]http://userbars.ru/data/media/14/drw_proud.gif[/img][/url]
-=WOLVERINE=-
Posts: 66 Joined: 2004-05-27 18:19:17
Contact:
Post
by -=WOLVERINE=- » 2005-09-28 12:22:08
Leo wrote: https://yoko.uokit.com/viewtopic.php?t=3056
Лева читаи выше...про терминеит я знаю...а вот сделать так чтоб закрывалс крипт послде того как все сбагрит с земли я не могу:(
Leo
Expert!
Posts: 791 Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:
Post
by Leo » 2005-09-28 12:24:30
Code: Select all
if UO.FindCount()==0
UO.Exec("terminate 'Название процедуры'")
endif
Last edited by
Leo on 2005-09-28 12:44:01, edited 1 time in total.
[url=http://drw.ru/][img]http://userbars.ru/data/media/14/drw_proud.gif[/img][/url]
-=WOLVERINE=-
Posts: 66 Joined: 2004-05-27 18:19:17
Contact:
Post
by -=WOLVERINE=- » 2005-09-28 12:27:50
Все всем спасибо я уже сам накалякал и все работает
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
ПОльзуите кому надо