Yoko

Posted: **2006-04-02 23:57:32**

я вот пробовал этот скрипт использовать
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
кто нибудь подскажите из за чего это может быть?

Posted: **2006-04-03 05:54:11**

Code: Select all

DIM Loot[16]

Code: Select all

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: Select all

For i=0 to 24

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

Posted: **2006-04-03 08:39:31**

Нужно просто внимательно прочитать первые три урока