Yoko

All sides of Injection
It is currently 2025-12-26 01:07:54

All times are UTC+02:00




Post new topic  Reply to topic  [ 9 posts ] 
Author Message
PostPosted: 2004-07-09 05:16:58 
Offline

Joined: 2004-04-18 01:33:19
Posts: 39
Прошу Вас, написать скрипт чтоб лутал из сумок которые на земле лежат. Еслеб он еще лутал сначало арморы а потом банки, этого былоб достаточно. Я думаю это невозможно! Но все-таки заранее благодарем вам за помощь или за то что вы хотели помочь человеку, который сидит на мобеме и нечего не лутает а бегает он на ровне со всеми!Еще раз спосибо добрые люди!


--------------------------------------------------------------------------------------
Да вознаградится добрата человеческая!


Top
   
 Post subject:
PostPosted: 2004-07-09 06:40:39 
Offline
Expert!
User avatar

Joined: 2004-05-31 09:31:51
Posts: 838
http://yoko.netroof.net/forum/viewtopic.php?t=478

в свое время написал это, почитай....мож придумаешь чего


Top
   
 Post subject: !!
PostPosted: 2004-07-10 01:33:16 
Offline

Joined: 2004-04-18 01:33:19
Posts: 39
Этож он из твоей сумки сбрасывает в другой бек пек а мне надо 4тоб он из сумки на земле! И хотяб лутал армор,банки,реги, амулеты?
Есле не трудно напиши плизз очень прошу! задрался уже токо просераю а слутать не че немогу:(, а ты сам знаешь как на оскоме ценятся армы:)Очень прошу я недадумаюсь как написть столь сложный макрос!
Заранее благодарен!!!


Top
   
 Post subject:
PostPosted: 2004-07-10 14:47:18 
Offline

Joined: 2004-05-22 16:29:37
Posts: 19
sub Loot()
VAR WaitTime=500
VAR Exit=0, i
DIM Loot[16]


Loot[0]=0x19B7 ; ore
Loot[1]=0x0EED ; gp
Loot[2]=0x0F7B ; BM
Loot[3]=0x0F7A ; BP
Loot[4]=0x0F84 ; GA
Loot[5]=0x0F85 ; GI
Loot[6]=0x0F86 ; MR
Loot[7]=0x0F88 ; NS
Loot[8]=0x0F8C ; SA
Loot[9]=0x0F8D ; SS
Loot[10]=0x0F87 ; Eyes of newt
Loot[11]=0x0E76 ; Bag
Loot[12]=0x09B0 ; Pounch
Loot[13]=0x0F09 ; mana
Loot[14]=0x0E34 ; Blanc Scroll
Loot[15]=0x0F3F ; Arrow


UO.UseObject('lastcorpse')

if UO.GetQuantity('lastcorpse') then

wait(50)
endif
UO.SetReceivingContainer('0x40E4FB35') ; loot store bag

For i=0 to 15
UO.FindType(Loot[i],-1,'ground')
if UO.GetQuantity('finditem') then
UO.Grab(STR(0),'finditem')
wait(WaitTime)
endif

if UO.GetQuantity('lastcorpse') then
UO.FindType(Loot[i],-1,'lastcorpse')
if UO.GetQuantity('finditem') then
if Loot[i]==0x1078 then
UO.WaitTargetObject('finditem')
UO.UseType('0x0F9E')
else
UO.Grab(STR(0),'finditem')
endif
wait(WaitTime)
endif
endif
next

UO.UnSetReceivingContainer()
end sub


Top
   
 Post subject: !!
PostPosted: 2004-07-11 23:02:04 
Offline

Joined: 2004-04-18 01:33:19
Posts: 39
Прекрасный скрипт токо вот немогу понять в следующем-помогите есле не сложно пожалуйста!
Что вот это такое-DIM Loot[16]?
UO.SetReceivingContainer('0x40E4FB35') ; loot store bag - это сумка из каторой лутать?
if Loot[i]==0x1078 then - что это такое
UO.UseType('0x0F9E') - и вот это?
Заранее благодарен!!!


Top
   
 Post subject: !!
PostPosted: 2004-07-11 23:35:33 
Offline

Joined: 2004-04-18 01:33:19
Posts: 39
Попробовал пишет receivingcontainer? что он хо4ет??


Top
   
 Post subject:
PostPosted: 2004-07-11 23:53:29 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Удали эту строку и не парься. Нужна она чтоб весь хлам сыпался в определенный мешочек. Если надо так, то кинь на него инфо и подставь в скрипт его сериал.


Top
   
 Post subject: !!
PostPosted: 2004-07-12 00:07:23 
Offline

Joined: 2004-04-18 01:33:19
Posts: 39
Теперь пишет You can't see the target??


Top
   
 Post subject: !!
PostPosted: 2004-07-13 01:24:29 
Offline

Joined: 2004-04-18 01:33:19
Posts: 39
Ну помогите!


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 9 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 4 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