READ MAP$ FOR X=0 TO LEN(MAP$)-1  IF MID$(適切な引数)=="壁の絵" THEN BGPUT 適切な引数 NEXT 1行分だけならこんな感じ。 行を増やす場合はYを増やすFOR-NEXTでこれを挟みます。 ヒントは出したので、それぞれ適切な引数を探ってみましょう。 変数Xは使います。 MID$は「好きな位置から、好きな文字数」文字列を取り出します。 サンプル8の技術デモも参考になるかな?