座標データに変換したい訳ですから2重のFORループで CLS (←BGならBGCLR) RESTORE @MAP1 FOR Y TO [縦の幅]：FOR X TO [横の幅] READ A$　(←管理番号で書いてるなら$は不要です) LOCATE X,Y：PRINT A$　(←BGならBGPUT命令に置き換えて) NEXT：NEXT みたいな感じに書けば出来ると思います。