READじゃなくてCOPYならできるよ DIM A[2] COPY A,"@A" @A DATA 1,2