Yoko

All sides of Injection
It is currently 2025-12-16 19:25:25

All times are UTC+02:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
PostPosted: 2006-04-02 23:57:32 
Offline

Joined: 2005-02-06 19:28:02
Posts: 57
я вот пробовал этот скрипт использовать
sub Loot()
VAR WaitTime=700
VAR Exit=0, i
DIM Loot[16]

Loot[0]=0x1400 ; êðèñ
Loot[1]=0x13FE ; êàòàíà
Loot[2]=0x1441 ; Êóòëà
Loot[3]=0x2DB2 ; Êëþõà
Loot[4]=0x1B7B ; êðóãëûé ùèò
Loot[5]=0x1B74 ; êèòå øèò
Loot[6]=0x1B76 ; Êâàäðàòíûé ùèò
Loot[7]=0x1413 ; ! Ãîðæåòêà
Loot[8]=0x1414 ; ! Ïåð÷àòêè
Loot[9]=0x1415 ; ! Òåëî
Loot[10]=0x1410 ; ! 쑌֏
Loot[11]=0x1411 ; ! Íîãè
Loot[12]=0x1412 ; Øëåì
Loot[13]=0x0F09 ; Ìàíêè
Loot[14]=0x0E76 ; ìåøîê #1
Loot[15]=0x0E75 ; Ìåøîê #2
Loot[16]=0x09B0 ; Ìåøîê #3
UO.UseObject('lastcorpse')

UO.SetReceivingContainer('0x40186760') ; loot store bag

For i=0 to 24
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


там немного изменил количество итемов, и сами итемы, было их 25 сначало

так вот, лутать он лутает, только некоторые вещи пропускает , и в конце вылезает эта ошибка -Unhandled exception in parser
кто нибудь подскажите из за чего это может быть?


Top
   
 Post subject:
PostPosted: 2006-04-03 05:54:11 
Offline

Joined: 2006-02-12 08:43:08
Posts: 15
Code:
DIM Loot[16]


Code:
Loot[0]=0x1400 ; êðèñ 
Loot[1]=0x13FE ; êàòàíà
Loot[2]=0x1441 ; Êóòëà
Loot[3]=0x2DB2 ; Êëþõà
Loot[4]=0x1B7B ; êðóãëûé ùèò
Loot[5]=0x1B74 ; êèòå øèò
Loot[6]=0x1B76 ; Êâàäðàòíûé ùèò
Loot[7]=0x1413 ; ! Ãîðæåòêà
Loot[8]=0x1414 ; ! Ïåð÷àòêè
Loot[9]=0x1415 ; ! Òåëî
Loot[10]=0x1410 ; ! 쑌֏
Loot[11]=0x1411 ; ! Íîãè
Loot[12]=0x1412 ; Øëåì
Loot[13]=0x0F09 ; Ìàíêè
Loot[14]=0x0E76 ; ìåøîê #1
Loot[15]=0x0E75 ; Ìåøîê #2
Loot[16]=0x09B0 ; Ìåøîê #3


Пересчитай кол-во забитых итемов.

Code:
For i=0 to 24


Или додумайся на какое число надо изменить 24, или дописывай еще 8 итемов.


Top
   
 Post subject:
PostPosted: 2006-04-03 08:39:31 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
Нужно просто внимательно прочитать первые три урока


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

All times are UTC+02:00


Who is online

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