これだけだと無駄に長いと感じるかも知れませんが A(0)～A(99)にそれぞれ数値を代入する場合は A(0)=123:A(1)=456:A(2)=789:～A(99)=999 と100個代入文を記述する必要がありますが RESTORE @DATA1 FOR I=0 TO 99:READ A(I):NEXT @DATA1 DATA 123,456,789.～999 と、FOR～NEXT命令で繰り返しREAD命令で読み込むようにすれば 繰返し回数とDATA命令のデータの数を増減すれば簡単に変更が 出来ます。