「配列の要素が無効です。」
メッセージが出て上手くいきません。
*draw_map_1_A
// 配列変数[ マップ ]を用意する dim map, 20, 20 map(0, 0) = 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 map(0, 1) = 1,2,2,2,2,2,2,2,2,3,2,2,2,2,2,2,2,2,2,1 map(0, 2) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 3) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 4) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 5) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 6) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 7) = 1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 8) = 1,0,0,0,0,2,2,2,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 9) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 10) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 11) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 12) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 13) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 14) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 15) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 16) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 17) = 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 map(0, 18) = 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 map(0, 19) = 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2 mx = 0 // X座標を保持するための変数 my = 0 // Y座標を保持するための変数 repeat length(map) repeat length2(map) // マップデータが0の場合地面を描写 if map(mx, my) = 0 { color 200, 200, 200 pos mx*16, my*16 gcopy 1, 0,0, 16,16 } // マップデータが1の場合壁を描写 if map(mx, my) = 1 { color 200, 200, 200 pos mx*16, my*16 gcopy 1,32,0, 16,16 } // マップデータが2の場合壁を描写 if map(mx, my) = 2 { color 200, 200, 200 pos mx*16, my*16 gcopy 1,16,0, 16,16 } // マップデータが3の場合入り口を描写 if map(mx, my) = 3 { color 200, 200, 200 pos mx*16, my*16 gcopy 1,0,0, 16,16 map_1_in=1 } mx += 1 loop if map(mx, my) = 3 :gosub*draw_map_1_B my += 1 : mx = 0 loop return
何故なんでしょうか?