Runtime error

[Ex]

Обьясните, как изменить именно этот скрипт, чтобы не вылетала Ошибка:Runtime error

Code: Select all

sub Regs()
VAR need, i 
VAR Safe = '0x40090B17'
VAR BagPot = '0x40175AB4'

UO.UseObject(Safe)
UO.UseObject(BagPot)
DIM Col[3]
Col[0] = '0x09DF' ;totalmana
Col[1] = '0x09bb' ;gh
Col[2] = '0x0997' ;refresh
for i=0 to 3
UO.FindType('0x0F0E',Col[i],'backpack')
If UO.GetQuantity('finditem') < 10 then
need = 10 - UO.GetQuantity('finditem')
UO.Ignor('finditem')
UO.FindType('0x0F0E',Col[i],BagPot)
    UO.MoveItem('finditem',STR(need),'backpack')
    wait(600)    
End if
next 
end sub

Скрипт берёт потион, но на строку

Code: Select all

UO.FindType('0x0F0E',Col[i],'backpack')

Выдаёт ошибку...

[Destruction]

Code: Select all

for i=0 to 3 

на

Code: Select all

for i=0 to 2 

Ты третий элемент не объявил, но пытаешся с ним работать - навиный...

[Ex]

Ой блин, и точно.......
Все от невнимательности.......

[by_csd]

Ты третий элемент не объявил, но пытаешся с ним работать - навиный...

Четвертый.