Out of DATA なので やはり読み込もうとしたときに データがなかった状態です。 FOR I=0 TO RND(5)+1 なので最大で0～5の6回のループです。 最低データは6つ用意する必要が あります。 データはちゃんと用意してあるぞ、という場合、データを読んで一旦終わってもう一度その処理にくると前に読んだ続きから読み始めます。 2回目の処理でデータが足らなくなっている可能性もあります。 その場合は、DATA文の前にラベルを置いてRESTOREコマンドでデータの読みだし位置を指定すると良いかもです。