Using DATA like arrays

[axipher]

I'm making a font and I'm using DATA statements to make up the font, is there a way to do something like this:

Code:

dim _data(1 to 3)

_data(1):
data 1
_data(2):
data 2
_data(3):
data 4

for i = 1 to 3
    restore _data(i)
    read value
    print value
    sleep
next
sleep

So that way each piece of DATA can be indexed by a variable like an array?