Cutting leather script

[serpentkillers]

I did a script:

Code: Select all

sub botas()
VAR i
dim botas[4]
botas[1]= 0x170b
botas[2]= 0x170f
botas[3]= 0x170e
botas[4]= 0x1711
Start:
For i = 1 to 4
UO.Usetype("0x0f9e")
Wait(1000)
UO.WaitTargetobject("botas[i]")
wait(4000)
next
goto Start
end sub

- botas[1,2,3,4] are the types of boots
- "0x0f9e" is the scissors

The problem is: when i try to run it, cames a msg "what you select didn't exists"

[Kazoo]

I did a script:

Code: Select all

sub botas()
VAR i
dim botas[4]
botas[1]= 0x170b
botas[2]= 0x170f
botas[3]= 0x170e
botas[4]= 0x1711
Start:
For i = 1 to 4
UO.Usetype("0x0f9e")
Wait(1000)
UO.WaitTargetobject("botas[i]")
wait(4000)
next
goto Start
end sub

- botas[1,2,3,4] are the types of boots
- "0x0f9e" is the scissors

The problem is: when i try to run it, cames a msg "what you select didn't exists"

becouse it's need to be so

Code: Select all

UO.WaitTargetobject("botas[i]")
UO.Usetype("0x0f9e")
Wait(1000)

[toqui]

sub botas()
VAR i
dim botas[4]
botas[1]= 0x170b
botas[2]= 0x170f
botas[3]= 0x170e
botas[4]= 0x1711
Start:
For i = 1 to 4
UO.Usetype("0x0f9e")
Wait(1000)
UO.WaitTargettype("botas[i]")
wait(4000)
next
goto Start
end sub

[Biga]

Code: Select all

dim botas[4]
 
botas[0]= 0x170b 
botas[1]= 0x170f 
botas[2]= 0x170e 
botas[3]= 0x1711 
Start: 
For i = 0 to 3
...

Dim botas[4] declares array 0..3.
(Йоко, я прав?)

Code: Select all

UO.WaitTargettype("botas[i]") 

Right: UO.WaitTargettype(botas[i])