DATA文で直接書き込むなら、こうすると良いです。
1と0でマップを作るときの例文です。
~略(メインループにGOSUB @MAPDATAGETを入れておきましょう。)~
@MAPDATAGET
RESTORE @MAP
FOR I=0 TO 6:FOR J=0 TO 11
READ MAPDATA
IF MAPDATA==0 THEN BGPUT 0,J,I,0
IF MAPDATA==1 THEN BGPUT 0,J,I,416
NEXT:NEXT:BGSCALE 0,2,2
RETURN
@MAP`12*7のDATAじゃないと"Out of DATA"になります。
DATA ・・・・・・(DATA文の中身はお好きなようにどうぞ。数値と数値の間はコンマ(,)で区切ってください。)