@あおりいかさん Miiverseで説明するにはとても事足りないとは思うけれども大抵の場合次のようなプログラムで終わる while 1 read map$ for x=0 to len(map$)-1 bg$=mid$(map$,x,1) bgput x,y,asc(bg$) next inc y wend 数値型のＢＧパーツデータを列挙しまくるのもいいけど、ここではＢＧパーツの文字コードの文字列として組んでます