文字列からBGのMAPに変換するプログラムを書いているんですが、 これのIF文もDATAでまとめられないでしょうか。

IFより前の部分

DATAでBGを作るやり方みたいですね。 過去に参考になりそうな投稿はしているので良かったら見てみてください。僕の活動から辿れます。以下のやつです。 日付：2014/12/19 BGをREAD,DATAを使ってプログラムで配置するサンプルです。

こんなかんじかな？あくまで方法の１つだけど。 参照用(IF文の比較用)文字列の土台を設置してあとから参照しながら置くみたいなやり方。

INSTR()とMID$を使ってみよう。 A=INSTR("MAPで使っている記号を全部順番に書く",MAP$) BG$=MID$("208030800080...(BG$の内容を順番に)",A*4,4) こうするとMAP$が"┐"ならAには1（2文字目）が入り、MID$で4文字目から4つ（つまり3080）が抜き取られてBG$に入る仕組みです。

皆さんありがとうございますm(_ _)m 参考にさせていただきます。