RmakeでACTゲームをつくろう / 第02回　マップを表示してみよう

aoihikawa

公開したゲーム
公開した素材
ブログ記事

投稿者： Cdv30200 aoi icon mini aoihikawa 投稿日：2011/10/09 17:12

≪「みんなのマンション　12号室」　Ver... | RmakeでACTゲームをつくろう / ...≫

RmakeでACTゲームをつくろう

　第02回　マップを表示してみよう

　　こんにちは。
　フリーデザイナープログラマー（自称）の
　簸川葵（ひかわ　あおい）と申します。

　　第01回では「関数を再利用してみよう」ということで、移植の手順についてお話しました。

　　今回はACTゲームの重要な基盤である、マップの表示を実践してみましょう。

02-01　マップを画面に表示する

　　基本的な表示の仕組みは、前回の第2回で解説したとおりです。
　　マップの画像から、1チップあたりのサイズに合わせて、
　切り取り・貼り付けを行うスクリプトを繰り返し、マップを表示していきます。

　　今回もまた、お手軽にスクリプトの作成までできるよう、
　サンプルの素材を準備いたしました。

一枚絵

汎用マップチップ01

　　こちらを参考に、クリップからリソースへの登録まで行い、
　すぐにスクリプトで利用できるように、準備してください。

　　今回はにぃみゃんのおさんぽびよりで使用した
　マップ設定関数を移植して利用します。
　　一部、この素材向けに作っている箇所がありますので、
　ほかの素材に差し替えて利用する場合は注意してください。

　　まずはチャプター0にて、一番上に汎用関数を移植します。

#メニュー項目等の表示OFF
setMenuItemVisible(getMenuBackLog(), false)
setMenuItemVisible(getMenuSave(), false)
setMenuItemVisible(getMenuLoad(), false)
setHelpVisible(false)

#キャンバスの初期化
setCanvasVisible(false)
deleteAllSprite()
drawCanvas()

#----- 関数の設定 -----
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
#べき乗
def POWER(n, b)
  r = 1; i = 0
  while i < b
    r = r * n; i = i + 1
  end
  return r
end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
#ここから↓は省略

　　次に、一番下にマップを設定を設定する関数を移植します。

#ここから↑は省略
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
#マップを設定
def setCreateMap(img_name, img_no, pos, set_z, map_w, map_dat)
    x = 0; y = 1; w = 2; h = 3
    set_map = createArray(); get = createArray(); set = createArray()
    get[x] = 0; get[y] = 0; get[w] = 32; get[h] = 32
    set[x] = 0; set[y] = 0; set[w] = 32; set[h] = 32
    #レイヤーが4なら当たり判定の配列を作成
    if set_z == 4
        hit_map = createArray()
    end
    i = 0; ilen = getArrayLength(map_dat)
    while i < ilen
        if set_z == 4
            hit_map[i] = createArray()
        end
        j = 0; jlen = getArrayLength(map_dat[i])
        while j < jlen
            map_d = map_dat[i][j]
            k = 0; klen = map_w
            while k < klen
                if map_d == 0
                    if set_z == 4
                        hit_map[i][(k + (j * map_w))] = 19
                    end
                else
                    #画像の切り出しポイントを算出
                    if k < (klen - 1)
                        chk = (map_d / POWER(1000, (map_w - (k + 1))))
                    else
                        chk = map_d
                    end
                    chk3 = false
                    #画像の貼り付けポイントを算出
                    if chk == 0
                        set_map[x] = 0; set_map[y] = 0
                    else
                        chk = chk % 1000
                        set_map[x] = floor(chk % 20); set_map[y] = floor(chk / 20)
                        if set_map[y] > 24
                            set_map[y] = set_map[y] - 25
                            chk3 = true
                        end
                    end
                    #画像を切り出して貼り付けする
                    chk = floor(chk)
                    if (chk != 19) #019番目の画像の場合、画像とあたり判定をセットしない
                        get[x] = set_map[x] * 32; get[y] = set_map[y] * 32
                        set[x] = (32 * k) + (32 * j * map_w); set[y] = 32 * i
                        if (chk != 278) #278番目の画像の場合、画像をセットしない
                          setCreateSprite(img_name, img_no, get, set, set_z, getVariable(pos))
                          if set_z == 2
                              setSpriteIndependentCamera(getVariable(img_name), true)
                          end
                        end
                        if set_z == 4
                             hit_map[i][(k + (j * map_w))] = chk
                        end
                    else
                        if set_z == 4
                            hit_map[i][(k + (j * map_w))] = 19
                        end
                    end
                end
                k = k + 1
            end
            j = j + 1
        end
        i = i + 1
    end
    if set_z == 4
      setVariable("hit_map", hit_map)
    end
end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/

　　マップデータの配列を受け取り、
　画像の切り出しと、貼り付けをする関数です。

　　レイヤーを指定している「set_z」変数が
　2の場合、カメラにスクロールをあわせる、多重スクロール背景用のレイヤーを、
　4の場合、当たり判定の「hit_map」変数を同時に設定する、実際のマップ用のレイヤーを
　設定するようになっています。

　　なお、この素材向けに、
　019番目のチップ画像は、当たり判定なしの空白チップ、
　278番目のチップ画像は、当たり判定ありの空白チップを
　設定するようになっていますので注意してください。

　　マップ画像のチップ位置番号につきましては、
　こちらにわかりやすい一覧を纏めましたのでご活用ください。

　　チャプター1に移動して、マップデータの準備を実行後、
　マップを設定する関数を呼び出すスクリプトを追加します。

#ここから↑は省略

#背景画像の設定
img_no = 79101
img_bg_name = "img_bg"

get[x] = 0;    get[y] = 0;    get[w] = 800;  get[h] = 600
set[x] = 0;    set[y] = 0;    set[w] = 800;  set[h] = 600
set_z = 1
pos_bg = createArray()
pos_bg[x] = 0; pos_bg[y] = 0

setCreateSprite(img_bg_name, img_no, get, set, set_z, pos_bg)
setSpriteIndependentCamera(getVariable(img_bg_name), true)
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
#マップ画像の設定
img_no = 79094
map_size = 5
img_map_name = "img_map"; pos_map = "pos_map"
setVariable(pos_map, createArray())
getVariable(pos_map)[x] = 0; getVariable(pos_map)[y] = -8

#マップデータの配列を準備
map_data = createArray()
map_data[00] = createArray()
map_data[01] = createArray()
map_data[02] = createArray()
map_data[03] = createArray()
map_data[04] = createArray()
map_data[05] = createArray()
map_data[06] = createArray()
map_data[07] = createArray()
map_data[08] = createArray()
map_data[09] = createArray()
map_data[10] = createArray()
map_data[11] = createArray()
map_data[12] = createArray()
map_data[13] = createArray()
map_data[14] = createArray()
map_data[15] = createArray()
map_data[16] = createArray()
map_data[17] = createArray()
map_data[18] = createArray()

set_z = 4

#マップデータを作成
map_data[00][0] = 019019019019019; map_data[00][1] = 019019019019019; map_data[00][2] = 019019019019019
map_data[01][0] = 019019019019019; map_data[01][1] = 019019019019019; map_data[01][2] = 019019019019019
map_data[02][0] = 019019019019019; map_data[02][1] = 019019019019019; map_data[02][2] = 019019019019019
map_data[03][0] = 019019019019019; map_data[03][1] = 019019019019019; map_data[03][2] = 019019019019019
map_data[04][0] = 019019019019019; map_data[04][1] = 019019019019019; map_data[04][2] = 019019019019019
map_data[05][0] = 019019019019019; map_data[05][1] = 019019019019019; map_data[05][2] = 019019019019019
map_data[06][0] = 019019019019019; map_data[06][1] = 019019019019019; map_data[06][2] = 019019019019019
map_data[07][0] = 019019019019019; map_data[07][1] = 019019019019019; map_data[07][2] = 019019019019019
map_data[08][0] = 019019019019019; map_data[08][1] = 019019019019019; map_data[08][2] = 019019019019019
map_data[09][0] = 019019019019019; map_data[09][1] = 019019019019019; map_data[09][2] = 019019019019019
map_data[10][0] = 019019019019019; map_data[10][1] = 019019019019019; map_data[10][2] = 019019019019019
map_data[11][0] = 019019019019019; map_data[11][1] = 019019019019019; map_data[11][2] = 019019019019019
map_data[12][0] = 019019019019019; map_data[12][1] = 019019019019019; map_data[12][2] = 019019019019019
map_data[13][0] = 019019019019019; map_data[13][1] = 019019019019019; map_data[13][2] = 019019019019019
map_data[14][0] = 019019019019019; map_data[14][1] = 019019019019019; map_data[14][2] = 019005007019019
map_data[15][0] = 019019019019019; map_data[15][1] = 019019019019019; map_data[15][2] = 019037039019019
map_data[16][0] = 019019019019019; map_data[16][1] = 019019019019019; map_data[16][2] = 019037039019019
map_data[17][0] = 019019019019019; map_data[17][1] = 019019019019019; map_data[17][2] = 019037039019019
map_data[18][0] = 006006006006006; map_data[18][1] = 006006006006006; map_data[18][2] = 006038038006006

map_data[00][3] = 019019019019019; map_data[00][4] = 019019019019019; map_data[00][5] = 019019019019019
map_data[01][3] = 019019019019019; map_data[01][4] = 019019019019019; map_data[01][5] = 019019019019019
map_data[02][3] = 019019019019019; map_data[02][4] = 019019019019019; map_data[02][5] = 019019019019019
map_data[03][3] = 019019019019019; map_data[03][4] = 019019019019019; map_data[03][5] = 019019019019019
map_data[04][3] = 019019019019019; map_data[04][4] = 019019019019019; map_data[04][5] = 019019019019019
map_data[05][3] = 019019019019019; map_data[05][4] = 019019019019019; map_data[05][5] = 019019019019019
map_data[06][3] = 019019019019019; map_data[06][4] = 019019019019019; map_data[06][5] = 019019019019019
map_data[07][3] = 019019019019019; map_data[07][4] = 019019019019019; map_data[07][5] = 019019019019019
map_data[08][3] = 019019019019019; map_data[08][4] = 019019019019019; map_data[08][5] = 019019019019019
map_data[09][3] = 019019019019019; map_data[09][4] = 019019019019019; map_data[09][5] = 019019019019019
map_data[10][3] = 019019019019019; map_data[10][4] = 019019019019019; map_data[10][5] = 019019019019019
map_data[11][3] = 019019019019019; map_data[11][4] = 019019019019019; map_data[11][5] = 019019019019019
map_data[12][3] = 019019019019019; map_data[12][4] = 019019019019019; map_data[12][5] = 019019019019019
map_data[13][3] = 019019019019019; map_data[13][4] = 019019019019019; map_data[13][5] = 019019019019019
map_data[14][3] = 019019019019019; map_data[14][4] = 019019019019019; map_data[14][5] = 019019019019019
map_data[15][3] = 019019019019019; map_data[15][4] = 019019019019019; map_data[15][5] = 019019019019019
map_data[16][3] = 019019019019019; map_data[16][4] = 019019019019019; map_data[16][5] = 005006006006006
map_data[17][3] = 019019019019019; map_data[17][4] = 019019019019019; map_data[17][5] = 037038038038038
map_data[18][3] = 006006006006006; map_data[18][4] = 006006006006006; map_data[18][5] = 038038038038038

map_data[00][6] = 019019019019019; map_data[00][7] = 019019019019019; map_data[00][8] = 019019019019019
map_data[01][6] = 019019019019019; map_data[01][7] = 019019019019019; map_data[01][8] = 019019019019019
map_data[02][6] = 019019019019019; map_data[02][7] = 019019019019019; map_data[02][8] = 019019019019019
map_data[03][6] = 019019019019019; map_data[03][7] = 019019019019019; map_data[03][8] = 019019019019019
map_data[04][6] = 019019019019019; map_data[04][7] = 019019019019019; map_data[04][8] = 019019019019019
map_data[05][6] = 019019019019019; map_data[05][7] = 019019019019019; map_data[05][8] = 019019019019019
map_data[06][6] = 019019019019019; map_data[06][7] = 019019019019019; map_data[06][8] = 019019019019019
map_data[07][6] = 019019019019019; map_data[07][7] = 019019019019019; map_data[07][8] = 019019019019019
map_data[08][6] = 019019019019019; map_data[08][7] = 019019019019019; map_data[08][8] = 019019019019019
map_data[09][6] = 019019019019019; map_data[09][7] = 019019019019019; map_data[09][8] = 019019019019019
map_data[10][6] = 019019019019019; map_data[10][7] = 019019019019019; map_data[10][8] = 019019019019019
map_data[11][6] = 019019019019019; map_data[11][7] = 019019019019019; map_data[11][8] = 019019019019019
map_data[12][6] = 019019019019019; map_data[12][7] = 019019019019019; map_data[12][8] = 019019019019019
map_data[13][6] = 019019019019019; map_data[13][7] = 019019019019019; map_data[13][8] = 019019019001002
map_data[14][6] = 005006006007019; map_data[14][7] = 019019019019019; map_data[14][8] = 019019019019019
map_data[15][6] = 037038038039019; map_data[15][7] = 019019019019019; map_data[15][8] = 019019019019019
map_data[16][6] = 038038038039019; map_data[16][7] = 019019019019019; map_data[16][8] = 019019019019019
map_data[17][6] = 038038038039019; map_data[17][7] = 019019019019019; map_data[17][8] = 019019019019019
map_data[18][6] = 038038038039019; map_data[18][7] = 019019019019005; map_data[18][8] = 006006006006006

map_data[00][9] = 019019019019019; map_data[00][10] = 019019019019019; map_data[00][11] = 019019019019019
map_data[01][9] = 019019019019019; map_data[01][10] = 019019019019019; map_data[01][11] = 019019019019019
map_data[02][9] = 019019019019019; map_data[02][10] = 019019019019019; map_data[02][11] = 019019019019019
map_data[03][9] = 019019019019019; map_data[03][10] = 019019019019019; map_data[03][11] = 019019019019019
map_data[04][9] = 019019019019019; map_data[04][10] = 019019019019019; map_data[04][11] = 019019019019019
map_data[05][9] = 019019019019019; map_data[05][10] = 019019019019019; map_data[05][11] = 019019019019019
map_data[06][9] = 019019019019019; map_data[06][10] = 019019019019019; map_data[06][11] = 019019019019019
map_data[07][9] = 019019019019019; map_data[07][10] = 019019019019019; map_data[07][11] = 019019019019019
map_data[08][9] = 001003019019019; map_data[08][10] = 019019019019019; map_data[08][11] = 019019019019019
map_data[09][9] = 019019019019019; map_data[09][10] = 019019019019019; map_data[09][11] = 019019019019019
map_data[10][9] = 019019019019019; map_data[10][10] = 019019019019019; map_data[10][11] = 019019019019019
map_data[11][9] = 019019019019019; map_data[11][10] = 019019019019019; map_data[11][11] = 019019019019019
map_data[12][9] = 019019019019019; map_data[12][10] = 019019019019019; map_data[12][11] = 019019019019019
map_data[13][9] = 002002002003019; map_data[13][10] = 019019019019019; map_data[13][11] = 019019019019019
map_data[14][9] = 019019019019019; map_data[14][10] = 019019019019019; map_data[14][11] = 019019019019019
map_data[15][9] = 019019019019019; map_data[15][10] = 019019019019019; map_data[15][11] = 019019019019019
map_data[16][9] = 019019019019019; map_data[16][10] = 019019019019019; map_data[16][11] = 019019019019019
map_data[17][9] = 019019019019019; map_data[17][10] = 019019019019019; map_data[17][11] = 019019019019019
map_data[18][9] = 006006006006006; map_data[18][10] = 006006006006006; map_data[18][11] = 006006006006006

#マップデータの設定
setCreateMap(img_map_name, img_no, pos_map, set_z, map_size, map_data)
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/

#----- 変数の設定 -----

#ここから↓は省略

　　画像表示に関連した基本的な部分の設定項目は、
　他の画像表示設定と同じ要領で行います。

　「map_size」変数は、1つの配列データあたりのチップ数を設定しています。
　「map_data」変数の配列は、先ほどの画像チップ番号情報を設定しています。
　1チップあたり3桁の数字、実際の画面表示と同じ方向へデータ列が並んでいます。
　最後に、マップを設定するsetCreateMap関数を利用して、画像の設定を行います。

　　ここまでで、マップの表示ができました。
　保存、終了をして、テストプレーを行い、
　マップが設定したデータ通りに表示されているか確認してみましょう。

02-02　マップをスクロールさせる

　　第01回で少しお話に出てきました、カメラの移動を利用して
　マップのスクロールをつくってみましょう。

　　なお、マップのスクロールは次のような仕組みでつくります。

　　まずは、必要な定数の設定から。

#ここから↑は省略

#キャラクターの設定
char_speed = 7
char_w_max = 800 - 63;      char_h_max = 600 - 80
char_anime_change = 6

char_hit = createArray()
char_hit[x] = 30;           char_hit[y] = 10
char_hit[w] = 33;           char_hit[h] = 80

#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
#背景の設定
bg_center = 352
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/

#音楽・効果音の設定
#ここから↓は省略

　　「bg_center」変数は、画面横幅の半分となるサイズから、
　キャラクター画像横幅の半分となるサイズを引いた値を設定しています。

　　マップをスクロールさせるとは、
　マップが画面端の場合はキャラクターの座標を、
　そうでない場合はマップの座標を
　進行方向とは逆方向に移動させて行います。

　　このとき、キャラクターとマップのどちらを移動させるか
　切り替えるポイントとなる中心点の座標です。

　　次は、必要な変数の設定。
　チャプター1にて、先ほど追加したマップの設定のすぐ後ろに追加します。

#ここから↑は省略
map_data[18][9] = 006006006006006; map_data[18][10] = 006006006006006; map_data[18][11] = 006006006006006

#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
setCreateMap(img_map_name, img_no, pos_map, set_z, map_size, map_data)
map_count = getArrayLength(map_data[0]) * map_size
map_max_w = map_count * 32
map_w  = map_max_w - 800
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/

#----- 変数の設定 -----

#ここから↓は省略

　「map_count」変数は、全体のマップ横サイズ（チップ数）
　「map_max_w」変数は、全体のマップ横サイズ（座標値）
　「map_w」変数は、全体のマップ横サイズ（座標値）から画面横幅の800を引いた数を
　設定しています。

　　マップが画面端に到達しているか、判定するために使用します。

　　キャラクターの移動スクリプトを差し替えて、
　マップのスクロールをつくります。

#ここから↑は省略
#_/_/_/_/_/_/_/_/_/_/_/_/ 変更分 _/_/_/_/_/_/_/_/_/_/_/_/
        #----- キャラクターの移動 -----
        if char_act != act_dmg
            if key_flg_left
                #左へ移動
                if (pos_char[x] < bg_center) || ((pos_char[x] > bg_center) && 
                   (getVariable(pos_map)[x] == map_w))
                    #中心線より外側
                    pos_char[x] = pos_char[x] - char_speed
                    if (pos_char[x] < bg_center) && (getVariable(pos_map)[x] == map_w)
                        getVariable(pos_map)[x] = getVariable(pos_map)[x] - (bg_center - pos_char[x])
                        pos_char[x] = bg_center
                    end
                else
                    #中心線
                    getVariable(pos_map)[x] = getVariable(pos_map)[x] - char_speed
                    if getVariable(pos_map)[x] < 0
                        pos_char[x] = pos_char[x] + getVariable(pos_map)[x]
                        getVariable(pos_map)[x] = 0
                    end
                end
                char_muki = 0
            elsif key_flg_right
                #右へ移動
                if (pos_char[x] > bg_center) || ((pos_char[x] < bg_center) && 
                   (getVariable(pos_map)[x] == 0))
                    #中心線より外側
                    pos_char[x] = pos_char[x] + char_speed
                    if (pos_char[x] > bg_center) && (getVariable(pos_map)[x] == 0)
                        getVariable(pos_map)[x] = getVariable(pos_map)[x] + (pos_char[x] - bg_center)
                        pos_char[x] = bg_center
                    end
                else
                    #中心線
                    getVariable(pos_map)[x] = getVariable(pos_map)[x] + char_speed
                    if getVariable(pos_map)[x] > map_w
                        pos_char[x] = pos_char[x] + (getVariable(pos_map)[x] - map_w)
                        getVariable(pos_map)[x] = map_w
                    end
                end
                char_muki = 1
            else
            end
        end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
#ここから↓は省略

　　先ほど追加した定数・変数を元に、
　キャラクターとマップのスクロールを切り替えています。
　　また、切り替わる瞬間のとき、
　キャラクターの移動速度とキャラクターの移動量・マップの移動量を比較して
　端数が出た場合、それぞれマップの移動量・キャラクターの移動量に
　その端数を加算するように調整しています。

　　最後に、実際にマップをスクロールさせます。
　マップのスクロールはカメラの移動を利用します。

#ここから↑は省略
            setSpritePos(img_char_name, pos_char)
        end
        
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
        #----- 背景のスクロール -----
        setSpriteCameraOffset(-(getVariable(pos_map)[x]), 0)
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
        
        #----- 画面の更新 -----
#ここから↓は省略

　　カメラが右に移動するとマップは左に、
　カメラが右に移動するとマップは右に移動するため、
　Ｘ座標の値をマイナスでセットしています。

　　ここまでで、マップのスクロールができました。
　保存、終了をして、テストプレーを行い、
　マップがスクロールできているか確認してみましょう。

02-03　マップの当たり判定を追加する

　　基本的な当たり判定の仕組みは、前回の第4回で解説したとおりです。

　　しかし、マップ内にあるすべてのチップひとつひとつに、
　当たり判定のスクリプトを動かしていると、膨大な処理量になってしまいます。
　　そこで、マップ側の当たり判定を座標情報を元に簡易的に判定することで、
　この処理量を軽減します。

　　「hit_map」変数については、setCreateMap関数を行うとき、
　レイヤーが4なら同時に作っておくスクリプトになっていました。

　　この「hit_map」変数を元に、当たり判定を行う仕組みをつくっていきます。

　　まずは、チャプター0にて、一番下に座標情報を取得する関数を追加します。

#ここから↑は省略
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
#当たり判定の座標を算出
def setHitMap(char_atari, map_count)
    x1 = 0;   y1 = 1;   x2 = 2;   y2 = 3;   x3 = 4;   y3 = 5
    
    #当たり判定を行う座標を算出
    charHit_X1 = floor((char_atari[x1] + (getVariable("pos_map")[0])) / 32)
    charHit_X2 = floor((char_atari[x2] + (getVariable("pos_map")[0])) / 32)
    charHit_X3 = floor((char_atari[x3] + (getVariable("pos_map")[0])) / 32)
    charHit_Y1 = floor((char_atari[y1] + (getVariable("pos_map")[1] + 16)) / 32)
    charHit_Y2 = floor((char_atari[y2] + (getVariable("pos_map")[1] + 16)) / 32)
    charHit_Y3 = floor((char_atari[y3] + (getVariable("pos_map")[1] + 16)) / 32)
    charHit_Y4 = floor((char_atari[y3] + (getVariable("pos_map")[1] + 17)) / 32)
    
    #画面外の場合、画面端の座標とする
    if charHit_X1 < 0
        charHit_X1 = 0
    end
    if charHit_X3 > map_count
        charHit_X3 = map_count
    end
    
    if charHit_Y1 < 0
        charHit_Y1 = 0
        if charHit_Y2 < 0
            charHit_Y2 = 0
            if charHit_Y3 < 0
                charHit_Y3 = 0
                if charHit_Y4 < 0
                    charHit_Y4 = 0
                end
            end
        end
    end
    if charHit_Y4 > 18
        charHit_Y4 = 18
        if charHit_Y3 > 18
            charHit_Y3 = 18
            if charHit_Y2 > 18
                charHit_Y2 = 18
                if charHit_Y1 > 18
                    charHit_Y1 = 18
                end
            end
        end
    end
    
    #座標のマップ情報を取得
    charHitpos = createArray()
    charHitpos[0]  = getVariable("hit_map")[charHit_Y1][charHit_X1]
    charHitpos[1]  = getVariable("hit_map")[charHit_Y1][charHit_X2]
    charHitpos[2]  = getVariable("hit_map")[charHit_Y1][charHit_X3]
    charHitpos[3]  = getVariable("hit_map")[charHit_Y2][charHit_X1]
    charHitpos[4]  = getVariable("hit_map")[charHit_Y2][charHit_X2]
    charHitpos[5]  = getVariable("hit_map")[charHit_Y2][charHit_X3]
    charHitpos[6]  = getVariable("hit_map")[charHit_Y3][charHit_X1]
    charHitpos[7]  = getVariable("hit_map")[charHit_Y3][charHit_X2]
    charHitpos[8]  = getVariable("hit_map")[charHit_Y3][charHit_X3]
    charHitpos[9]  = getVariable("hit_map")[charHit_Y4][charHit_X1]
    charHitpos[10] = getVariable("hit_map")[charHit_Y4][charHit_X2]
    charHitpos[11] = getVariable("hit_map")[charHit_Y4][charHit_X3]
    
    charHitpos[12] = charHit_X1
    charHitpos[13] = charHit_X2
    charHitpos[14] = charHit_X3
    charHitpos[15] = charHit_Y1
    charHitpos[16] = charHit_Y2
    charHitpos[17] = charHit_Y3
    charHitpos[18] = charHit_Y4
    
    return charHitpos
end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/

　　キャラクターとマップの座標を元に、
　先ほどのイラストの黄色ポイントを算出する関数です。
　　各座標のhit_map情報と、座標番号を戻り値にセットしています。
　なお、Y座標の3番目と4番目は、キャラクターの足元の判定より
　1ドット下の当たり判定を比較することで、
　着地しているかどうか判断するために使用します。

　　次は、定数の設定です。

#ここから↑は省略
#----- 定数の設定 -----

x = 0;    y = 1;    w = 2;    h = 3
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
x1 = 0;   y1 = 1;   x2 = 2;   y2 = 3;   x3 = 4;   y3 = 5
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
act_std = 0; act_wrk = 1; act_jmp = 2; act_dmg = 3
#ここから↓は省略

　　当たり判定のポイントによって、
　キャラクターの座標を当たり判定外に移動させるスクリプトをつくります。
　　少しスクリプトの流れが複雑ですので、フローを纏めました。

・開始
　↓
＜地面に埋まっている　　　　＞
　↓ はい　　　　　　　　　｜いいえ
・着地状態に変更　　　　　｜
　｜　　　　　　　　　　　↓
　｜　　　　　　　　　　＜着地している　　　　　　　＞
　↓ 　　　　　　　　　　　↓ はい　　　　　　　　　↓ いいえ
＜壁にめり込んでいる　　　　＞　　　　　　　　　＜ジャンプ中　　　　　　　　＞
　↓ はい　　　　　　　　　｜いいえ　　　　　　　　｜はい　　　　　　　　　↓ いいえ
・壁の外側へ移動　　　　　｜　　　　　　　　　　　｜　　　　　　　　　　・ジャンプ状態に変更
　｜　　　　　　　　　　　｜　　　　　　　　　　　↓ 　　　　　　　　　　　↓
　｜　　　　　　　　　　　｜　　　　　　　　　　＜天井にめり込んでいる　　　＞
　｜　　　　　　　　　　　｜　　　　　　　　　　　↓ はい　　　　　　　　　｜いいえ
　｜　　　　　　　　　　　｜　　　　　　　　　　・天井の位置に変更　　　　｜
　｜　　　　　　　　　　　｜　　　　　　　　　　　↓ 　　　　　　　　　　　↓
　｜　　　　　　　　　　　｜　　　　　　　　　　＜壁にめり込んでいる　　　　＞
　｜　　　　　　　　　　　｜　　　　　　　　　　　↓ はい　　　　　　　　　｜いいえ
　｜　　　　　　　　　　　｜　　　　　　　　　　・壁の外側へ移動　　　　　｜
　↓ 　　　　　　　　　　　↓ 　　　　　　　　　　　↓ 　　　　　　　　　　　↓
・終了

　　このフローにそって、スクリプトを書いていきます。

#ここから↑は省略
#_/_/_/_/_/_/_/_/_/_/_/_/ 変更分 _/_/_/_/_/_/_/_/_/_/_/_/
        #マップとの当たり判定
        if char_act != act_dmg
            HitFlgD = false; HitFlgM = false; HitFlgLD = false; HitFlgRD = false
            HitFlgU = false; HitFlgLU = false; HitFlgRU = false
            HitFlgLS = false; HitFlgRS = false
            xSa = 0; ySa = 0
            
            #キャラクターの当たり判定範囲
            char_atari[x1] = pos_char[x] + char_hit[x]
            char_atari[y1] = pos_char[y] + char_hit[y]
            char_atari[x2] = char_atari[x1] + (char_hit[w] * 0.5)
            char_atari[y2] = char_atari[y1] + (char_hit[h] * 0.5)
            char_atari[x3] = char_atari[x1] + char_hit[w]
            char_atari[y3] = char_atari[y1] + char_hit[h]
            
            #当たり判定の座標を算出
            charHitpos = setHitMap(char_atari, map_count)
            charHit_X1 = charHitpos[12]
            charHit_X2 = charHitpos[13]
            charHit_X3 = charHitpos[14]
            charHit_Y1 = charHitpos[15]
            charHit_Y2 = charHitpos[16]
            charHit_Y3 = charHitpos[17]
            charHit_Y4 = charHitpos[18]
            
            #床の当たり判定
            #右端または左端だけの場合フラグ除外するためのフラグ
            if (charHitpos[9] != 19) && (charHitpos[10] == 19) && (charHitpos[11] == 19)
                HitFlgLD = true
            end
            if (charHitpos[9] == 19) && (charHitpos[10] == 19) && (charHitpos[11] != 19)
                HitFlgRD = true
            end
            
            if ((charHitpos[6] == 19) && (charHitpos[9]  != 19)) ||
               ((charHitpos[7] == 19) && (charHitpos[10] != 19)) ||
               ((charHitpos[8] == 19) && (charHitpos[11] != 19))
                #着地中
                HitFlgD = true
            elsif ((charHitpos[6] != 19) && (charHitpos[9]  != 19)) ||
                  ((charHitpos[7] != 19) && (charHitpos[10] != 19)) ||
                  ((charHitpos[8] != 19) && (charHitpos[11] != 19))
                #埋まり中
                HitFlgM = true
                #当たり判定からの差分座標を算出
                ySa = char_atari[y3] - (((charHit_Y3 - 1) * 32) - getVariable("pos_map")[y] + 15)
            end
            
            #天井の当たり判定
            #右端または左端だけの場合フラグ除外するためのフラグ
            if (charHitpos[0] != 19) && (charHitpos[1] == 19) && (charHitpos[2] == 19)
                HitFlgLU = true
            end
            if (charHitpos[0] == 19) && (charHitpos[1] == 19) && (charHitpos[2] != 19)
                HitFlgRU = true
            end
            
            if (!(HitFlgD) || !(HitFlgM)) && !(HitFlgLU) && !(HitFlgRU) && (
               (charHitpos[0] != 19) ||
               (charHitpos[1] != 19) ||
               (charHitpos[2] != 19))
                #埋まり中
                HitFlgU = true
                #当たり判定からの差分座標を算出
                ySa = ((charHit_Y1 * 32) - getVariable("pos_map")[y] + 16) - char_atari[y1]
            end
            
            if pos_char[y] > 600
                ySa = 0
            end
            
            #キャラクターの状態変化と差分の移動
            if (HitFlgD || HitFlgM) && !(HitFlgLD) && !(HitFlgRD)
                #着地中
                if HitFlgM
                    #床 / 差分の移動
                    pos_char[y] = pos_char[y] - ySa
                end
            else
                #落下中
            end
            
            if HitFlgU
                #天井 / 差分の移動
                pos_char[y] = pos_char[y] + ySa
            end
            
            #キャラクターの当たり判定範囲(座標変化後の再設定)
            char_atari[x1] = pos_char[x] + char_hit[x]
            char_atari[y1] = pos_char[y] + char_hit[y]
            char_atari[x2] = char_atari[x1] + (char_hit[w] * 0.5)
            char_atari[y2] = char_atari[y1] + (char_hit[h] * 0.5)
            char_atari[x3] = char_atari[x1] + char_hit[w]
            char_atari[y3] = char_atari[y1] + char_hit[h]
            
            #当たり判定の座標を算出(座標変化後の再設定)
            charHitpos = setHitMap(char_atari, map_count)
            charHit_X1 = charHitpos[12]
            charHit_X2 = charHitpos[13]
            charHit_X3 = charHitpos[14]
            charHit_Y1 = charHitpos[15]
            charHit_Y2 = charHitpos[16]
            charHit_Y3 = charHitpos[17]
            charHit_Y4 = charHitpos[18]
            
            if !(HitFlgU)
                
                #壁の当たり判定
                if ((charHitpos[0] != 19) ||
                    (charHitpos[3] != 19) ||
                    (charHitpos[6] != 19))
                    #左の壁
                    HitFlgLS = true
                    #当たり判定からの差分座標を算出
                    xSa = char_atari[x1] + (getVariable("pos_map")[x] - ((charHit_X1 + 1) * 32))
                elsif ((charHitpos[2] != 19) ||
                       (charHitpos[5] != 19) ||
                       (charHitpos[8] != 19))
                    #右の壁
                    HitFlgRS = true
                    #当たり判定からの差分座標を算出
                    xSa = char_atari[x3] + (getVariable("pos_map")[x] - (charHit_X3 * 32) + 1)
                end
                
                #キャラクターの状態変化と差分の移動
                
                #壁 / 差分の移動
                if HitFlgRS
                    #左へ移動
                    if (pos_char[x] < bg_center) || ((pos_char[x] > bg_center) && 
                       (getVariable(pos_map)[x] == map_w))
                        #中心線より外側
                        pos_char[x] = pos_char[x] - xSa
                        if (pos_char[x] < bg_center) && (getVariable(pos_map)[x] == map_w)
                            getVariable(pos_map)[x] = getVariable(pos_map)[x] - (bg_center - pos_char[x])
                            pos_char[x] = bg_center
                        end
                    else
                        #中心線
                        getVariable(pos_map)[x] = getVariable(pos_map)[x] - xSa
                        if getVariable(pos_map)[x] < 0
                            pos_char[x] = pos_char[x] + getVariable(pos_map)[x]
                            getVariable(pos_map)[x] = 0
                        end
                    end
                elsif HitFlgLS
                    #右へ移動
                    if (pos_char[x] > bg_center) || ((pos_char[x] < bg_center) && 
                       (getVariable(pos_map)[x] == 0))
                        #中心線より外側
                        pos_char[x] = pos_char[x] - xSa
                        if (pos_char[x] > bg_center) && (getVariable(pos_map)[x] == 0)
                            getVariable(pos_map)[x] = getVariable(pos_map)[x] + (pos_char[x] - bg_center)
                            pos_char[x] = bg_center
                        end
                    else
                        #中心線
                        getVariable(pos_map)[x] = getVariable(pos_map)[x] - xSa
                        if getVariable(pos_map)[x] > map_w
                            pos_char[x] = pos_char[x] + (getVariable(pos_map)[x] - map_w)
                            getVariable(pos_map)[x] = map_w
                        end
                    end
                end
            end
        end
        
        #画面端との当たり判定
        if pos_char[x] < -(char_hit[x])
            pos_char[x] = -(char_hit[x])
        elsif pos_char[x] > char_w_max
            pos_char[x] = char_w_max
        end
        
        #キャラクターの座標を移動
        setSpritePos(img_char_name, pos_char)
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
#ここから↓は省略

　　フローの状態を判定するために、沢山のフラグや変数が登場しました。
　ひとつずつ、詳しく解説します。

　「HitFlgD」　 キャラクターの足元の当たり判定フラグ。
　　　　　　　　着地状態であればオンになります。
　「HitFlgM」　 キャラクターの足元の当たり判定フラグ。
　　　　　　　　地面に埋まっている状態であればオンになります。
　「HitFlgLD」　キャラクターの足元の当たり判定フラグ。
　　　　　　　　左下のみ設置しているときオンになります。
　「HitFlgRD」　キャラクターの足元の当たり判定フラグ。
　　　　　　　　右下のみ設置しているときオンになります。
　「HitFlgU」　 キャラクターの頭上の当たり判定フラグ。
　「HitFlgLU」　キャラクターの頭上の当たり判定フラグ。
　　　　　　　　左上のみ設置しているときオンになります。
　「HitFlgRU」　キャラクターの頭上の当たり判定フラグ。
　　　　　　　　右上のみ設置しているときオンになります。
　「HitFlgLS」　キャラクターの左側の当たり判定フラグ。
　「HitFlgRS」　キャラクターの右側の当たり判定フラグ。
　「xSa」　　　 キャラクターとチップの横方向重なり差分座標。
　「ySa」　　　 キャラクターとチップの縦方向重なり差分座標。

　　まずはフラグ関連で当たり状態を判断し、
　当たっていた場合、差分座標を計算する仕組みになっています。

　　最後に、差分座標をキャラクター・マップに追加しています。

　　ここまでで、マップの当たり判定ができました。
　保存、終了をして、テストプレーを行い、
　マップに接触すると立ち止まるか確認してみましょう。

02-04　ジャンプができるようにする

　　床の当たり判定ができましたので、
　キャラクターもジャンプができるようにしてみましょう。

　　まずは定数・変数の準備から。

#ここから↑は省略
#キャラクターの設定
char_speed = 7
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
char_jmp_h = 40
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
char_w_max = 800 - 63;      char_h_max = 600 - 80
char_anime_change = 6

#中略

char_muki = 1
char_act = act_std
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
char_jmp_count = 0
char_jmp_flg = false
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/

#キャラクターの当たり判定範囲
char_atari = createArray()
#ここから↓は省略

　「char_jmp_h」変数はキャラクターのジャンプ力
　「char_jmp_count」変数はジャンプしてからの経過時間
　「char_jmp_flg」変数はジャンプ中かどうかの判定に使用します

　　Ｚキーを押したときにジャンプを開始するようにします。

#ここから↑は省略
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
        #----- キャラクターのジャンプ -----
        if key_flg_z
            if (char_act != act_jmp) && !(char_jmp_flg)
                char_act = act_jmp; char_jmp_count = 0; char_jmp_flg = true
            end
        else
            char_jmp_flg = false
        end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
        #----- キャラクターのアニメーション -----
#ここから↓は省略

　　ジャンプ中の動作をつくります。
　まずはジャンプ中の座標移動。

#ここから↑は省略
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
        if char_act == act_jmp
            if char_jmp_count < 10
                pos_char[y] = pos_char[y] - (char_jmp_h * (0.4 + ((6 - char_jmp_count) * 0.1)))
                
            else
                pos_char[y] = pos_char[y] + (char_jmp_h * (0.4 + ((char_jmp_count - 14) * 0.1)))
                
            end
            
            if char_jmp_count < 20
                char_jmp_count = char_jmp_count + 1
            end
        end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
        #----- キャラクターのアニメーション -----
#ここから↓は省略

　　ジャンプ時間が10を頂点に、上昇中・下降中を切り替えています。
　　ジャンプ時間が20以上になったとき、落下速度は固定となります。

　次に、表示の切り替え。

#ここから↑は省略
        if char_act == act_wrk
            if char_anime_count < (char_anime_change)
                setCharSpritePattern(3 + (char_muki * 10))
            elsif char_anime_count < (char_anime_change * 2)
                setCharSpritePattern(4 + (char_muki * 10))
            elsif char_anime_count < (char_anime_change * 3)
                setCharSpritePattern(5 + (char_muki * 10))
            else
                setCharSpritePattern(6 + (char_muki * 10))
            end
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
        elsif char_act == act_jmp
            if char_jmp_count < 10
                setCharSpritePattern(7 + (char_muki * 10))
            else
                setCharSpritePattern(8 + (char_muki * 10))
            end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
        else
            if char_anime_count < (char_anime_change * 2)
                setCharSpritePattern(1 + (char_muki * 10))
            else
                setCharSpritePattern(2 + (char_muki * 10))
            end
        end
#ここから↓は省略

　　上昇中・下降中によって、表示を切り替えるようにしています。

　　当たり判定によって、着地中・ジャンプ中の状態を変更します。
　まずは、キャラクターの移動スクリプト

#ここから↑は省略
        #----- キャラクターの移動 -----
        if char_act != act_dmg
            if key_flg_left
                #左へ移動
                if (pos_char[x] < bg_center) || ((pos_char[x] > bg_center) && 
                   (getVariable(pos_map)[x] == map_w))
                    #中心線より外側
                    pos_char[x] = pos_char[x] - char_speed
                    if (pos_char[x] < bg_center) && (getVariable(pos_map)[x] == map_w)
                        getVariable(pos_map)[x] = getVariable(pos_map)[x] - (bg_center - pos_char[x])
                        pos_char[x] = bg_center
                    end
                else
                    #中心線
                    getVariable(pos_map)[x] = getVariable(pos_map)[x] - char_speed
                    if getVariable(pos_map)[x] < 0
                        pos_char[x] = pos_char[x] + getVariable(pos_map)[x]
                        getVariable(pos_map)[x] = 0
                    end
                end
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
                char_muki = 0
                if char_act != act_jmp
                    char_act = act_wrk
                end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
            elsif key_flg_right
                #右へ移動
                if (pos_char[x] > bg_center) || ((pos_char[x] < bg_center) && 
                   (getVariable(pos_map)[x] == 0))
                    #中心線より外側
                    pos_char[x] = pos_char[x] + char_speed
                    if (pos_char[x] > bg_center) && (getVariable(pos_map)[x] == 0)
                        getVariable(pos_map)[x] = getVariable(pos_map)[x] + (pos_char[x] - bg_center)
                        pos_char[x] = bg_center
                    end
                else
                    #中心線
                    getVariable(pos_map)[x] = getVariable(pos_map)[x] + char_speed
                    if getVariable(pos_map)[x] > map_w
                        pos_char[x] = pos_char[x] + (getVariable(pos_map)[x] - map_w)
                        getVariable(pos_map)[x] = map_w
                    end
                end
                char_muki = 1
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
                if char_act != act_jmp
                    char_act = act_wrk
                end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
            else
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
                if char_act != act_jmp
                    char_act = act_std
                end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
            end
        end
#ここから↓は省略

　次に、当たり判定スクリプト

#ここから↑は省略
            #キャラクターの状態変化と差分の移動
            if (HitFlgD || HitFlgM) && !(HitFlgLD) && !(HitFlgRD)
                #着地中
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
                #ジャンプ中の場合立ち状態に変更
                if char_act == act_jmp
                   char_act = act_std; char_jmp_count = 0
                end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
                if HitFlgM
                    #床 / 差分の移動
                    pos_char[y] = pos_char[y] - ySa
                end
            else
                #落下中
#_/_/_/_/_/_/_/_/_/_/_/_/ 追加分 _/_/_/_/_/_/_/_/_/_/_/_/
                #立ち状態の場合ジャンプ中に変更
                if char_act != act_jmp
                    char_act = act_jmp; char_jmp_count = 10
                end
#_/_/_/_/_/_/_/_/_/_/_/_/ここまで_/_/_/_/_/_/_/_/_/_/_/_/
            end
#ここから↓は省略

　　スクリプト全体

シーン

サンプルアクション　第02回　全体スクリプト

　　これで、一通り完成です。
　保存、終了をして、テストプレーを行い、
　マップの当たり判定、キャラクターのジャンプが行えるか
　確認してみましょう。

02-05　おわりに

　　いかがでしたでしょうか。
　スクリプトの量も増えてきて、一度に全体を見渡すのは難しくなってきましたが、
　各処理ごとに分割して見てみると、これまでの応用であることがわかると思います。

　　さて、次回はキャラクター以外の要素、
　「敵・アイテムを追加してみよう」を実践してみましょう。

　　第01回　関数を再利用してみよう
　　第02回　マップを表示してみよう
　　第03回　敵・アイテムを追加してみよう
　　第04回　敵の動きや背景の演出を入れてみよう
　　番外　外部ツールと連携してみよう

コメントする

コメントするには、ログインする必要があります。

コメント一覧

退会したユーザー(投稿日：2011/11/22 00:16, 履歴)

マップ増やそうとしたら、配列番号変えるのがやたらと面倒なので・・・

Add = 0

map_data[00][0 + Add] = 019019019019019; map_data[00][1 + Add] = 019019019019019; map_data[00][2 + Add] = 019019019019019
map_data[01][0 + Add] = 019019019019019; map_data[01][1 + Add] = 019019019019019; map_data[01][2 + Add] = 019019019019019
map_data[02][0 + Add] = 019019019019019; map_data[02][1 + Add] = 019019019019019; map_data[02][2 + Add] = 019019019019019
map_data[03][0 + Add] = 019019019019019; map_data[03][1 + Add] = 019019019019019; map_data[03][2 + Add] = 019019019019019
map_data[04][0 + Add] = 019019019019019; map_data[04][1 + Add] = 019019019019019; map_data[04][2 + Add] = 019019019019019
map_data[05][0 + Add] = 019019019019019; map_data[05][1 + Add] = 019019019019019; map_data[05][2 + Add] = 019019019019019
map_data[06][0 + Add] = 019019019019019; map_data[06][1 + Add] = 019019019019019; map_data[06][2 + Add] = 019019019019019
map_data[07][0 + Add] = 019019019019019; map_data[07][1 + Add] = 019019019019019; map_data[07][2 + Add] = 019019019019019
map_data[08][0 + Add] = 019019019019019; map_data[08][1 + Add] = 019019019019019; map_data[08][2 + Add] = 019019019019019
map_data[09][0 + Add] = 019019019019019; map_data[09][1 + Add] = 019019019019019; map_data[09][2 + Add] = 019019019019019
map_data[10][0 + Add] = 019019019019019; map_data[10][1 + Add] = 019019019019019; map_data[10][2 + Add] = 019019019019019
map_data[11][0 + Add] = 019019019019019; map_data[11][1 + Add] = 019019019019019; map_data[11][2 + Add] = 019019019019019
map_data[12][0 + Add] = 019019019019019; map_data[12][1 + Add] = 019019019019019; map_data[12][2 + Add] = 019019019019019
map_data[13][0 + Add] = 019019019019019; map_data[13][1 + Add] = 019019019019019; map_data[13][2 + Add] = 019019019019019
map_data[14][0 + Add] = 019019019019019; map_data[14][1 + Add] = 019019019019019; map_data[14][2 + Add] = 019005007019019
map_data[15][0 + Add] = 019019019019019; map_data[15][1 + Add] = 019019019019019; map_data[15][2 + Add] = 019037039019019
map_data[16][0 + Add] = 019019019019019; map_data[16][1 + Add] = 019019019019019; map_data[16][2 + Add] = 019037039019019
map_data[17][0 + Add] = 019019019019019; map_data[17][1 + Add] = 019019019019019; map_data[17][2 + Add] = 019037039019019
map_data[18][0 + Add] = 006006006006006; map_data[18][1 + Add] = 006006006006006; map_data[18][2 + Add] = 006038038006006

Add = Add + 3
map_data[00][0 + Add] = 019019019019019; map_data[00][1 + Add] = 019019019019019; map_data[00][2 + Add] = 019019019019019
map_data[01][0 + Add] = 019019019019019; map_data[01][1 + Add] = 019019019019019; map_data[01][2 + Add] = 019019019019019
map_data[02][0 + Add] = 019019019019019; map_data[02][1 + Add] = 019019019019019; map_data[02][2 + Add] = 019019019019019
map_data[03][0 + Add] = 019019019019019; map_data[03][1 + Add] = 019019019019019; map_data[03][2 + Add] = 019019019019019
map_data[04][0 + Add] = 019019019019019; map_data[04][1 + Add] = 019019019019019; map_data[04][2 + Add] = 019019019019019
map_data[05][0 + Add] = 019019019019019; map_data[05][1 + Add] = 019019019019019; map_data[05][2 + Add] = 019019019019019
map_data[06][0 + Add] = 019019019019019; map_data[06][1 + Add] = 019019019019019; map_data[06][2 + Add] = 019019019019019
map_data[07][0 + Add] = 019019019019019; map_data[07][1 + Add] = 019019019019019; map_data[07][2 + Add] = 019019019019019
map_data[08][0 + Add] = 019019019019019; map_data[08][1 + Add] = 019019019019019; map_data[08][2 + Add] = 019019019019019
map_data[09][0 + Add] = 019019019019019; map_data[09][1 + Add] = 019019019019019; map_data[09][2 + Add] = 019019019019019
map_data[10][0 + Add] = 019019019019019; map_data[10][1 + Add] = 019019019019019; map_data[10][2 + Add] = 019019019019019
map_data[11][0 + Add] = 019019019019019; map_data[11][1 + Add] = 019019019019019; map_data[11][2 + Add] = 019019019019019
map_data[12][0 + Add] = 019019019019019; map_data[12][1 + Add] = 019019019019019; map_data[12][2 + Add] = 019019019019019
map_data[13][0 + Add] = 019019019019019; map_data[13][1 + Add] = 019019019019019; map_data[13][2 + Add] = 019019019019019
map_data[14][0 + Add] = 019019019019019; map_data[14][1 + Add] = 019019019019019; map_data[14][2 + Add] = 019005007019019
map_data[15][0 + Add] = 019019019019019; map_data[15][1 + Add] = 019019019019019; map_data[15][2 + Add] = 019037039019019
map_data[16][0 + Add] = 019019019019019; map_data[16][1 + Add] = 019019019019019; map_data[16][2 + Add] = 019037039019019
map_data[17][0 + Add] = 019019019019019; map_data[17][1 + Add] = 019019019019019; map_data[17][2 + Add] = 019037039019019
map_data[18][0 + Add] = 006006006006006; map_data[18][1 + Add] = 006006006006006; map_data[18][2 + Add] = 006038038006006

Add = Add + 3
map_data[00][0 + Add] = 019019019019019; map_data[00][1 + Add] = 019019019019019; map_data[00][2 + Add] = 019019019019019
map_data[01][0 + Add] = 019019019019019; map_data[01][1 + Add] = 019019019019019; map_data[01][2 + Add] = 019019019019019
map_data[02][0 + Add] = 019019019019019; map_data[02][1 + Add] = 019019019019019; map_data[02][2 + Add] = 019019019019019
map_data[03][0 + Add] = 019019019019019; map_data[03][1 + Add] = 019019019019019; map_data[03][2 + Add] = 019019019019019
map_data[04][0 + Add] = 019019019019019; map_data[04][1 + Add] = 019019019019019; map_data[04][2 + Add] = 019019019019019
map_data[05][0 + Add] = 019019019019019; map_data[05][1 + Add] = 019019019019019; map_data[05][2 + Add] = 019019019019019
map_data[06][0 + Add] = 019019019019019; map_data[06][1 + Add] = 019019019019019; map_data[06][2 + Add] = 019019019019019
map_data[07][0 + Add] = 019019019019019; map_data[07][1 + Add] = 019019019019019; map_data[07][2 + Add] = 019019019019019
map_data[08][0 + Add] = 019019019019019; map_data[08][1 + Add] = 019019019019019; map_data[08][2 + Add] = 019019019019019
map_data[09][0 + Add] = 019019019019019; map_data[09][1 + Add] = 019019019019019; map_data[09][2 + Add] = 019019019019019
map_data[10][0 + Add] = 019019019019019; map_data[10][1 + Add] = 019019019019019; map_data[10][2 + Add] = 019019019019019
map_data[11][0 + Add] = 019019019019019; map_data[11][1 + Add] = 019019019019019; map_data[11][2 + Add] = 019019019019019
map_data[12][0 + Add] = 019019019019019; map_data[12][1 + Add] = 019019019019019; map_data[12][2 + Add] = 019019019019019
map_data[13][0 + Add] = 019019019019019; map_data[13][1 + Add] = 019019019019019; map_data[13][2 + Add] = 019019019019019
map_data[14][0 + Add] = 019019019019019; map_data[14][1 + Add] = 019019019019019; map_data[14][2 + Add] = 019005007019019
map_data[15][0 + Add] = 019019019019019; map_data[15][1 + Add] = 019019019019019; map_data[15][2 + Add] = 019037039019019
map_data[16][0 + Add] = 019019019019019; map_data[16][1 + Add] = 019019019019019; map_data[16][2 + Add] = 019037039019019
map_data[17][0 + Add] = 019019019019019; map_data[17][1 + Add] = 019019019019019; map_data[17][2 + Add] = 019037039019019
map_data[18][0 + Add] = 006006006006006; map_data[18][1 + Add] = 006006006006006; map_data[18][2 + Add] = 006038038006006

#以下略

これでいくらでも増やせますね(^^)

aoihikawa(投稿日：2011/10/30 17:54, 履歴)

foodmakesさま＞

色の変更処理で、ブラウザが重くなる場合があります。

テキストエディタソフトに該当部分をコピーをして編集した後
後からRmakeにコピーをして上書きをすることで
この問題を回避できます。

aoihikawa(投稿日：2011/10/30 17:53, 履歴)

タクミ2310号さま＞

マップサイズよりも移動幅が大きい場合
当たり判定の仕組みを変更しないといけないですね。

移動方向、後方側の当たり判定、前方側の当たり判定、の順に
チェックしていけば可能だと思います。

退会したユーザー(投稿日：2011/10/30 13:23, 履歴)

なるほど、早速いじってみます･･･
と思ったがPCが低スペックだからmapdata関数のところにきたら固まった！
マップいじりは諦めた。

きゅうり(投稿日：2011/10/30 13:18, 履歴)

マ○オとかにある「壁抜け」の一種(？)

退会したユーザー(投稿日：2011/10/30 12:57, 履歴)

キャラのスピードを速くするとマップにめり込みますが・・・

aoihikawa(投稿日：2011/10/30 12:08, 履歴)

foodmakesさま＞

マップデータの本体は
02-01　マップを画面に表示する
#マップデータを作成の「map_data」配列変数です。

1つあたりに3桁×5つのデータが
マップ表示順に入っています。

退会したユーザー(投稿日：2011/10/30 11:05, 履歴)

マップを自分の思い通りにおきたいけど、ややこしすぎてどこをいじればいいかわからないー

退会したユーザー(投稿日：2011/10/19 16:41, 履歴)

うー早くアイテム出してみたいです！

naoki(投稿日：2011/10/11 21:41, 履歴)

面白そうですねー。作ってみたいです。ていうか、
これを冬季Rmake大会!!にだせばいいのだー（自己解決）
現在１枚絵を作成中です。次回も楽しみにしています！

ikosami(投稿日：2011/10/11 01:38, 履歴)

僕がこれを見て、一番改良できたのはマップの設定ですね。

今まで

getVariable("m")[0][0]= 0
getVariable("m")[0][1]= 1
#～～～～～～長いので中略～～～～～～～
getVariable("m")[11][14]= 2
getVariable("m")[11][15]= 2

のように、そのまま192個(12×16個)書いていて
異常に時間がかかるうえに、全部縦並びなので
どこが何なのかよくわかりませんでしたが

def em(X,mp)
  i = 0
  x = 0.1
  while i < X
    x = x * 10
    i = i + 1
  end
  xx = x
  m = createArray()
  i = 0
  while i < 12
    m[i] = createArray()
    o = 0
    x = xx
    while o < X
      m[i][o] = floor(mp[i]/x);mp[i]=mp[i]-(m[i][o]*x);x=x/10
      o = o + 1
    end
    i = i + 1
  end
setVariable("m", m)
end

x = 16#横の広さ
m = createArray()
m[00]= 0000000000000000
m[01]= 0000000000000000
m[02]= 0000000000000000
m[03]= 0000000000000000
m[04]= 0000000000000000
m[05]= 0000000000000000
m[06]= 0000000000000000
m[07]= 0000000000000000
m[08]= 0000000000000000
m[09]= 0000000000000000
m[10]= 0000000000000000
m[11]= 1111111111111111

em(x,m)

これならマップが作りやすいです（＾＾）
(まだ当たり判定とかで未完成ですが・・・)

aoihikawa(投稿日：2011/10/11 01:09, 履歴)

＞ikosamiさま

マップ素材のお褒めのお言葉
ありがとうございます。

同じ動作をするものでも、
人それぞれ個性が出てきますね。

自分なりに考えてやってみたことと、
違う発見があれば
それがまた、より成長できる
きっかけに繋がるかなと。

私もまだまだ勉強中です。

ikosami(投稿日：2011/10/11 00:45, 履歴)

僕がいこさみアドベンチャーで作ったマップチップは
32×32のほぼ塗りつぶしなので
こんなにうまい絵(をたくさん)は描けないですね・・・

それにしても、自分が何も見ずに考えて作ったものと
ほぼ同じものを他の人が作っているのを見ると
なんだか不思議な感じがします（＾＾；）

数学の問題で解いた時の長い計算式が
解説の解き方とまったく同じ回答だった時の感覚？

aoihikawa(投稿日：2011/10/10 19:09, 履歴)

＞foodmakesさま

マップ素材を製作される場合、019と278以外は全て
サイズ32*32の当たり判定ありとなっています。

マップの配置を変更する場合、
「map_data」変数に先ほどの素材のチップ番号が
並んでいる形になりますので、ここの数字を変更します。

少しずつ、変更してみるなど
実際にいろいろと触って、確かめてみてください。

退会したユーザー(投稿日：2011/10/10 18:24, 履歴)

うーんさすがにマップまで自作はできないな･･･。

hightoller(投稿日：2011/10/10 18:02, 履歴)

しばらく見ぬ間にここまで進化してたのか。浦島状態。

ikosami(投稿日：2011/10/10 17:27, 履歴)

1/32ですか。
その発想はありませんでした（＾＾；）

aoihikawa(投稿日：2011/10/10 16:02, 履歴)

＞ikosamiさま

マップサイズで割り算をしています。
1 * 0.03125 = 1 * (1/32) ＝ 1 / 32

直感的に意味がわかりにくいので
本文と公開スクリプトを修正いたしました。

ikosami(投稿日：2011/10/10 15:00, 履歴)

当たり判定を行う座標を算出の
「* 0.03125」
というのはどういう意味ですか？