Yoko

All sides of Injection
It is currently 2025-12-20 15:54:00

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 9 posts ] 
  Print view Previous topic | Next topic 
Author Message
-=WOLVERINE=-
PostPosted: 2005-09-27 20:14:53 
Offline

Joined: 2004-05-27 18:19:17
Posts: 66
Code:
sub main()
Uo.FindType('0x0000','0xffff','ground')
UO.MoveItem("finditem","-1","backpack") 
UO.Ignore("finditem")
UO.IgnoreReset() 
wait(2000)
end if
end sub


Вот накалякал тут скриптец: суть его в том чтобы собирать вещи с земли (заданныи тип ) в моем случае он собирает вещи...Но!
Он собирает только один раз, тоесть собирает одну вещь этого типа и останавливаеться....как зделать так чтобы он останавливался только после того как собрал все вещи этого типа?
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-09-27 20:16:38 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
viewtopic.php?p=29438#29438

_________________
Image
Top
   
Reply with quote  
-=WOLVERINE=-
 Post subject:
PostPosted: 2005-09-27 21:05:53 
Offline

Joined: 2004-05-27 18:19:17
Posts: 66
Leo wrote:
http://forum.yoko.com.ua/viewtopic.php?p=29438#29438

это не то...к сожалению :(
Top
   
Reply with quote  
Destruction
 Post subject:
PostPosted: 2005-09-28 02:05:10 
Offline
Junior Expert
User avatar

Joined: 2004-06-24 22:08:56
Posts: 3220
Зацикливание без циклов невозможно -)

Три варианта вечного цикла:
1.
Code:
repeat
Your code
until false

2.
Code:
while true
Your code
wend

3.
Code:
for i=1 to 0
Your code
next
Top
   
Reply with quote  
-=WOLVERINE=-
 Post subject:
PostPosted: 2005-09-28 11:59:30 
Offline

Joined: 2004-05-27 18:19:17
Posts: 66
Destruction wrote:
Зацикливание без циклов невозможно -)

Три варианта вечного цикла:
1.
Code:
repeat
Your code
until false

2.
Code:
while true
Your code
wend

3.
Code:
for i=1 to 0
Your code
next

Это конечно хорошо ...но мне нужно чтоб он останавливался после того как забрал все вещи данного типа :) ну или цвета но это не так и важно 6)
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-09-28 12:09:43 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
viewtopic.php?t=3056

_________________
Image
Top
   
Reply with quote  
-=WOLVERINE=-
 Post subject:
PostPosted: 2005-09-28 12:22:08 
Offline

Joined: 2004-05-27 18:19:17
Posts: 66
Leo wrote:
http://forum.yoko.com.ua/viewtopic.php?t=3056

Лева читаи выше...про терминеит я знаю...а вот сделать так чтоб закрывалс крипт послде того как все сбагрит с земли я не могу:(
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-09-28 12:24:30 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Code:
if UO.FindCount()==0
UO.Exec("terminate 'Название процедуры'")
endif

_________________
Image


Last edited by Leo on 2005-09-28 12:44:01, edited 1 time in total.

Top
   
Reply with quote  
-=WOLVERINE=-
 Post subject:
PostPosted: 2005-09-28 12:27:50 
Offline

Joined: 2004-05-27 18:19:17
Posts: 66
Все всем спасибо я уже сам накалякал и все работает :)
Code:
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

ПОльзуите кому надо :)
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 9 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 6 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited