いいんじゃないでしょうか~(^^* 11行目のDATA内容が「終わり」を示すものなら、 WHILE 1  READ A$  IF A$=="" THEN BREAK  PRINT A$ WEND みたいにするのもアリですね。データ数が増減しても I の値をいじらなくていいので便利ですよ。