[L.D.M.T.]

dim a(100)

filein = ReadFile("mydata.dat")

for i=1 to 10
a(i) = readbyte(filein)
next