「DATA命令で読みこんだ値」を 「READ命令でDATA命令から読みこんだ値」に 読み替えて下さい。 DATA命令でX方向に12列、Y方向に7行のマップのデータを 用意しているのでFOR~NEXTを2段にして処理をしています。