Page 1 of 1

Проблемка с лоотом...

Posted: 2006-04-16 18:58:03
by G60
Вот етот скриптик не знаю кого он... Викидовает ошибку. Помогите люди добрые. За ранее блогодарю. :oops:


sub Loot()
VAR i,Exit
DIM Loot[37]


Loot[0]=0x0EED ; gp
Loot[1]=0x0F7B ; BM
Loot[2]=0x0F7A ; BP
Loot[3]=0x0F84 ; GA
Loot[4]=0x0F85 ; GI
Loot[5]=0x0F86 ; MR
Loot[6]=0x0F88 ; NS
Loot[7]=0x0F8C ; SA
Loot[8]=0x0F8D ; SS
Loot[9]=0x1BEF ; Ingi
Loot[10]=0x143E ; Aleba
Loot[11]=0x1406 ; War Mace
Loot[12]=0x1BDD ; Logi
Loot[13]=0x1F4C ; Recalls
Loot[14]=0x0F0E : Shrink
Loot[15]=0x0F87 : Newts
Loot[16]=0x0F78 ; batw
Loot[17]=0x1086 ; Mana Braslet
Loot[18]=0x13B1 ; Bows
Loot[19]=0x13FC ; Crowsbow
Loot[20]=0x0F0E ; Total Manka
Loot[21]=0x0F0E ; Bottle
Loot[22]=0x0F0E ; Great Heal
Loot[23]=0x0E34 ; Blank Scrols
Loot[24]=0x1F5F ; Flame Scrools
Loot[25]=0x0F0E ; Invisibility
Loot[26]=0x1414 ; Armor
Loot[27]=0x1413 ; Armor
Loot[28]=0x1412 ; Armor
Loot[29]=0x1411 ; Armor
Loot[30]=0x1415 ; Armor
Loot[31]=0x1B76 ; Heater Shield
Loot[32]=0x1410 ; Armor
Loot[33]=0x1F52 ; Paralize Scrool
Loot[34]=0x0F3F ; Arrows
Loot[35]=0x0F7D ; Naitmer blood
Loot[36]=0x0F0E ; Total Refresh
Loot[37]=0x0E76 ; Bags

UO.SetReceivingContainer('0x400FE578') ;ID backpacka

For i=0 to 37
Exit=0
repeat
UO.FindType(Loot[i],-1,'lastcontainer')
if UO.GetQuantity('finditem') then
UO.Grab('lastcontainer','finditem')
wait(100)
Else
Exit=1
endif
until Exit==1 OR uo.injournal("loot")
Next
UO.UnSetReceivingContainer()
end sub

Re: Проблемка с лоотом...

Posted: 2006-04-16 19:16:14
by Kynep
Телепаты все еще в отпуске, какую ошибку, что пишет, поподробнее

Posted: 2006-04-16 19:29:37
by flake

Code: Select all

UO.Grab('lastcontainer','finditem') 


Тут телепаты не нужны. Вроде "рабочий" скрипт Купера.
Замени на:

Code: Select all

UO.Grab('all','finditem')

Posted: 2006-04-16 19:55:25
by OxoT_nik
В какой строке ошибка-то?

Posted: 2006-04-16 20:03:29
by G60
OxoT_nik wrote:В какой строке ошибка-то?


20....

Posted: 2006-04-16 20:08:57
by OxoT_nik
G60 wrote:
OxoT_nik wrote:В какой строке ошибка-то?


20....
В этой? Loot[13]=0x1F4C ; Recalls
И что пишет?

Posted: 2006-04-16 20:09:01
by G60
Сенки всем всё оке :)

Posted: 2006-04-16 20:10:51
by OxoT_nik
G60 wrote:Сенки всем всё оке :)
;)

Posted: 2006-04-17 01:12:05
by flake
G60 wrote:Сенки всем всё оке :)


Вот мне после пол литра просто интересно для справки... ты исправил то, что я посоветовал (это так, для Купера)?

Posted: 2006-04-17 07:07:02
by Kynep
flake wrote:
G60 wrote:Сенки всем всё оке :)


Вот мне после пол литра просто интересно для справки... ты исправил то, что я посоветовал (это так, для Купера)?


Ваапще то это не мой скрипт.... и исправить пост я не магу...

Posted: 2006-04-17 12:17:21
by Savage
Скрипт мой только сильно переделан. Ошибка из за выхода за границу массива. У тебя стоит 37 элементов на самом деле их 38, потому что 0 тоже учитывается.

Code: Select all

DIM Loot[37] 

Posted: 2006-04-17 18:35:46
by OxoT_nik
Savage wrote:Скрипт мой только сильно переделан. Ошибка из за выхода за границу массива. У тебя стоит 37 элементов на самом деле их 38, потому что 0 тоже учитывается.

Code: Select all

DIM Loot[37] 
А почему именно в 20 строке ошибку выдал?

Posted: 2006-04-18 01:34:13
by Savage
Спрашивай девелоперов.