Another thing that you could do is place the data directly into an array from a file.
All you need is to save the array data to a file like this:
OPEN myfile$ FOR BINARY AS #1
PUT #1, , Array%()
To put it in at the program start:
OPEN myfile$ FOR BINARY AS #2
GET #2, , Array%()
Return to Index