问一下，VX的图块扩张脚本怎么用。。

八月桑

1. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
2. #_/    ◆ タイルセット拡張 - KGC_TilesetExtension ◆ VX ◆
   
3. #_/    ◇ Last update : 2008/07/13 ◇
   
4. #_/----------------------------------------------------------------------------
   
5. #_/  タイル画像変更、４方向通行、地形タグなどの機能を追加します。
   
6. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
7. 
   
8. #==============================================================================
   
9. # ★ カスタマイズ項目 - Customize ★
   
10. #==============================================================================
    
11. 
    
12. module KGC
    
13. module TilesetExtension
    
14.   # ◆ タイル画像ファイル名のプレフィックス
    
15.   #  タイル画像ファイル名の先頭に必要な文字列。
    
16.   TILE_IMAGE_PREFIX = "Tile"
    
17. 
    
18.   # ◆ タイル画像のプリセット
    
19.   #  [SET <セット名>] で使用可能。
    
20.   TILE_PRESET = {}  # ← これは消さないこと！
    
21.   # ここから下に、プリセットを定義。
    
22.   # ↓は設定例
    
23.     TILE_PRESET["_1图块"] = {
    
24.     "A2"=>"A2_1",
    
25.    "A1"=>"A1_1",
    
26.    "A4"=>"A4_1",
    
27. 
    
28.   }
    
29.     TILE_PRESET["_沙漠"] = {
    
30.     "A1"=>"A1_沙漠",
    
31.     "A2"=>"A2_沙漠",
    
32.     "A3"=>"A3_沙漠",
    
33.     "A4"=>"A4_沙漠",
    
34.     "A5"=>"A5_沙漠",
    
35.     "E"=>"E_沙漠",
    
36.     "B"=>"B_沙漠",
    
37.     "C"=>"C_沙漠",
    
38.     "D"=>"D_沙漠",
    
39.   }
    
40.     TILE_PRESET["_沙漠2"] = {
    
41.     "A1"=>"A1_沙漠",
    
42.     "A2"=>"A2_沙漠",
    
43.     "A3"=>"A3_沙漠",
    
44.     "A4"=>"A4_沙漠",
    
45.     "A5"=>"A5_沙漠",
    
46.   }
    
47.       TILE_PRESET["_沙漠建筑"] = {
    
48.     "A4"=>"A4_1",
    
49.     "A2"=>"A2_1",
    
50.     "C"=>"C_沙漠",
    
51.   }
    
52.       TILE_PRESET["_冰窟"] = {
    
53.     "A4"=>"A4_冰窟",
    
54. 
    
55.   }
    
56.       TILE_PRESET["_晋城"] = {
    
57.     "A1"=>"A1_沙漠",
    
58.     "A2"=>"A2_沙漠",
    
59.     "A3"=>"A3_晋城",
    
60.     "A4"=>"A4_沙漠",
    
61.     "A5"=>"A5_沙漠",
    
62.     "E"=>"E_晋城",
    
63.   }  
    
64.       TILE_PRESET["_血洞"] = {
    
65.     "A2"=>"A2_血洞",
    
66.     "E"=>"E_血洞",
    
67.   }
    
68.       TILE_PRESET["_狩猎场"] = {
    
69.     "E"=>"E_狩猎场",
    
70.     }
    
71.       TILE_PRESET["_狩猎场2"] = {
    
72.     "E"=>"E_狩猎场2",
    
73.   }
    
74.   # 使うときは、マップ名に [SET 魔王の城] を入れる。
    
75. 
    
76.   # ◆ ４方向通行・地形タグ確認ボタン (デバッグ用)
    
77.   #  このボタンを押すと、プレイヤーが立っている場所の４方向通行設定と
    
78.   #  地形タグをダイアログに表示します。
    
79.   #  nil にすると、この機能は無効になります。
    
80.   #   ※ この機能はテストプレイ中のみ有効になります。
    
81.   DEBUG_INFO_BUTTON = Input::F7
    
82. end
    
83. end
    
84. 
    
85. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
86. 
    
87. $imported = {} if $imported == nil
    
88. $imported["TilesetExtension"] = true
    
89. 
    
90. if $data_mapinfos == nil
    
91.   $data_mapinfos = load_data("Data/MapInfos.rvdata")
    
92. end
    
93. 
    
94. # 方向フラグ (４方向通行フラグ対応)
    
95. module DirectionFlag
    
96.   DOWN  = 0x01
    
97.   LEFT  = 0x02
    
98.   RIGHT = 0x04
    
99.   UP    = 0x08
    
100. end
     
101. 
     
102. module KGC::TilesetExtension
     
103.   # 拡張タイルセットのファイル名
     
104.   EX_RVDATA = "TilesetEx.rvdata"
     
105. 
     
106.   # 正規表現
     
107.   module Regexp
     
108.     # 継承
     
109.     INHERIT = /\[INHERIT\]/i
     
110.     # プリセット
     
111.     PRESET = /\[SET ([\w\-]+)\]/i
     
112.   end
     
113. 
     
114.   # デフォルトタイルセットファイル名
     
115.   DEFAULT_FILENAME = {
     
116.     "A1"=>"TileA1",
     
117.     "A2"=>"TileA2",
     
118.     "A3"=>"TileA3",
     
119.     "A4"=>"TileA4",
     
120.     "A5"=>"TileA5",
     
121.     "B"=>"TileB",
     
122.     "C"=>"TileC",
     
123.     "D"=>"TileD",
     
124.     "E"=>"TileE"
     
125.   }
     
126.   @@__filename = DEFAULT_FILENAME.dup
     
127. 
     
128.   module_function
     
129.   #--------------------------------------------------------------------------
     
130.   # ○ 指定マップのタイル画像ファイル名初期化
     
131.   #     map_id : マップ ID
     
132.   #--------------------------------------------------------------------------
     
133.   def init_tileset_filename(map_id)
     
134.     @@__filename = get_converted_tileset_filename(map_id)
     
135.   end
     
136.   #--------------------------------------------------------------------------
     
137.   # ○ 変換後のタイル画像ファイル名を取得
     
138.   #     map_id : マップ ID
     
139.   #--------------------------------------------------------------------------
     
140.   def get_converted_tileset_filename(map_id)
     
141.     info = $data_mapinfos[map_id]
     
142.     name = info.original_name
     
143.     filename = DEFAULT_FILENAME.dup
     
144.     if name =~ Regexp::INHERIT
     
145.       # 継承する場合は親を調べる
     
146.       parent_id = $data_mapinfos[map_id].parent_id
     
147.       if parent_id > 0
     
148.         filename = get_converted_tileset_filename(parent_id)
     
149.       end
     
150.     end
     
151.     # 現マップの変換規則を適用
     
152.     return convert_tileset_filename(filename, name)
     
153.   end
     
154.   #--------------------------------------------------------------------------
     
155.   # ○ タイル画像ファイル名変換
     
156.   #     filename : ファイル名 (Hash)
     
157.   #     map_name : マップ名
     
158.   #--------------------------------------------------------------------------
     
159.   def convert_tileset_filename(filename, map_name)
     
160.     name_buf = filename.dup
     
161.     # プリセット適用
     
162.     presets = map_name.scan(Regexp::PRESET)
     
163.     presets.each { |s|
     
164.       if TILE_PRESET.has_key?(s[0])
     
165.         TILE_PRESET[s[0]].each { |k, v|
     
166.           name_buf[k] = TILE_IMAGE_PREFIX + v
     
167.         }
     
168.       end
     
169.     }
     
170.     # 置換
     
171.     DEFAULT_FILENAME.keys.each { |key|
     
172.       if map_name =~ /\[#{key} ([\w\-]+)\]/
     
173.         name_buf[key] = TILE_IMAGE_PREFIX + $1
     
174.       end
     
175.     }
     
176.     return name_buf
     
177.   end
     
178.   #--------------------------------------------------------------------------
     
179.   # ○ タイル画像ファイル名取得
     
180.   #--------------------------------------------------------------------------
     
181.   def get_tileset_filename
     
182.     return @@__filename
     
183.   end
     
184. end
     
185. 
     
186. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
187. 
     
188. #==============================================================================
     
189. # □ KGC::Commands
     
190. #==============================================================================
     
191. 
     
192. module KGC
     
193. module Commands
     
194.   module_function
     
195.   #--------------------------------------------------------------------------
     
196.   # ○ 指定座標の地形タグ取得
     
197.   #     x : マップの X 座標
     
198.   #     y : マップの Y 座標
     
199.   #     variable_id : 取得した地形タグを代入する変数の ID
     
200.   #--------------------------------------------------------------------------
     
201.   def get_terrain_tag(x, y, variable_id = 0)
     
202.     tag = $game_map.terrain_tag(x, y)       # 指定位置のタグを取得
     
203.     if variable_id > 0
     
204.       $game_variables[variable_id] = tag    # 指定された変数に代入
     
205.     end
     
206.     return tag
     
207.   end
     
208.   #--------------------------------------------------------------------------
     
209.   # ○ 指定イベント ID の位置の地形タグ取得
     
210.   #     event_id : イベント ID
     
211.   #     variable_id : 取得した地形タグを代入する変数の ID
     
212.   #--------------------------------------------------------------------------
     
213.   def get_event_terrain_tag(event_id, variable_id = 0)
     
214.     event = $game_map.events.values.find { |e| e.id == event_id }
     
215.     if event == nil
     
216.       # 該当するイベントが無ければ 0
     
217.       tag = 0
     
218.     else
     
219.       tag = $game_map.terrain_tag(event.x, event.y)
     
220.     end
     
221. 
     
222.     # 指定された変数に代入
     
223.     if variable_id > 0
     
224.       $game_variables[variable_id] = tag
     
225.     end
     
226.     return tag
     
227.   end
     
228.   #--------------------------------------------------------------------------
     
229.   # ○ プレイヤーの位置の地形タグ取得
     
230.   #     variable_id : 取得した地形タグを代入する変数の ID
     
231.   #--------------------------------------------------------------------------
     
232.   def get_player_terrain_tag(variable_id = 0)
     
233.     tag = $game_map.terrain_tag($game_player.x, $game_player.y)
     
234. 
     
235.     # 指定された変数に代入
     
236.     if variable_id > 0
     
237.       $game_variables[variable_id] = tag
     
238.     end
     
239.     return tag
     
240.   end
     
241. end
     
242. end
     
243. 
     
244. class Game_Interpreter
     
245.   include KGC::Commands
     
246. end
     
247. 
     
248. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
249. 
     
250. #==============================================================================
     
251. # ■ RPG::MapInfo
     
252. #==============================================================================
     
253. 
     
254. class RPG::MapInfo
     
255.   #--------------------------------------------------------------------------
     
256.   # ● マップ名取得
     
257.   #--------------------------------------------------------------------------
     
258.   def name
     
259.     return @name.gsub(/\[.*\]/) { "" }
     
260.   end
     
261.   #--------------------------------------------------------------------------
     
262.   # ○ オリジナルマップ名取得
     
263.   #--------------------------------------------------------------------------
     
264.   def original_name
     
265.     return @name
     
266.   end
     
267. end
     
268. 
     
269. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
270. 
     
271. #==============================================================================
     
272. # □ RPG::Tileset
     
273. #------------------------------------------------------------------------------
     
274. #   タイルセットの付加的情報を扱うクラスです。
     
275. #==============================================================================
     
276. 
     
277. class RPG::Tileset
     
278.   #--------------------------------------------------------------------------
     
279.   # ○ 定数
     
280.   #--------------------------------------------------------------------------
     
281.   TABLE_SIZE = 8192                       # 通行・地形タグテーブルのサイズ
     
282.   #--------------------------------------------------------------------------
     
283.   # ○ 公開インスタンス変数
     
284.   #--------------------------------------------------------------------------
     
285.   attr_accessor :version                  # 内部バージョン
     
286.   attr_accessor :passages                 # 4 方向通行フラグ
     
287.   attr_accessor :terrain_tags             # 地形タグ
     
288.   #--------------------------------------------------------------------------
     
289.   # ○ オブジェクト初期化
     
290.   #--------------------------------------------------------------------------
     
291.   def initialize
     
292.     @version = 1
     
293.     @passages = Table.new(TABLE_SIZE)
     
294.     @terrain_tags = Table.new(TABLE_SIZE)
     
295.   end
     
296. end
     
297. 
     
298. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
299. 
     
300. #==============================================================================
     
301. # ■ Game_Map
     
302. #==============================================================================
     
303. 
     
304. class Game_Map
     
305.   LAYERS = [2, 1, 0]
     
306.   #--------------------------------------------------------------------------
     
307.   # ● セットアップ
     
308.   #     map_id : マップ ID
     
309.   #--------------------------------------------------------------------------
     
310.   alias setup_KGC_TilesetExtension setup
     
311.   def setup(map_id)
     
312.     @map_id = map_id
     
313.     init_tileset_filename
     
314. 
     
315.     setup_KGC_TilesetExtension(map_id)
     
316.   end
     
317.   #--------------------------------------------------------------------------
     
318.   # ○ タイルセット画像ファイル名を初期化
     
319.   #--------------------------------------------------------------------------
     
320.   def init_tileset_filename
     
321.     KGC::TilesetExtension.init_tileset_filename(@map_id)
     
322.   end
     
323.   #--------------------------------------------------------------------------
     
324.   # ○ 指定座標の通行フラグ取得
     
325.   #     x : X 座標
     
326.   #     y : Y 座標
     
327.   #--------------------------------------------------------------------------
     
328.   def passage(x, y)
     
329.     LAYERS.each { |i|
     
330.       tile_id = @map.data[x, y, i]
     
331.       return 0 if tile_id == nil
     
332.       return $data_tileset.passages[tile_id]
     
333.     }
     
334.     return 0
     
335.   end
     
336.   #--------------------------------------------------------------------------
     
337.   # ○ 指定座標の地形タグ取得
     
338.   #     x : X 座標
     
339.   #     y : Y 座標
     
340.   #--------------------------------------------------------------------------
     
341.   def terrain_tag(x, y)
     
342.     LAYERS.each { |i|
     
343.       tile_id = @map.data[x, y, i]               # タイル ID を取得
     
344.       return 0 if tile_id == nil                 # タイル ID 取得失敗 : タグなし
     
345.       tag = $data_tileset.terrain_tags[tile_id]  # 地形タグを取得
     
346.       return tag if tag > 0                      # タグが設定してあれば返す
     
347.     }
     
348.     return 0
     
349.   end
     
350.   #--------------------------------------------------------------------------
     
351.   # ○ 指定方向通行可能判定
     
352.   #     x : X 座標
     
353.   #     y : Y 座標
     
354.   #     d : 移動方向
     
355.   #--------------------------------------------------------------------------
     
356.   def passable_dir?(x, y, d)
     
357.     # 方向 (0,2,4,6,8,10) から 通行フラグ (0,1,2,4,8,0) に変換
     
358.     flag = (1 << (d / 2 - 1)) & 0x0F
     
359. 
     
360.     LAYERS.each { |i|                         # レイヤーの上から順に調べる
     
361.       tile_id = @map.data[x, y, i]            # タイル ID を取得
     
362.       return false if tile_id == nil          # タイル ID 取得失敗 : 通行不可
     
363.       pass = $data_tileset.passages[tile_id]  # タイルセットの通行属性を取得
     
364.       return false if pass & flag != 0x00     # フラグが立っていたら通行不可
     
365.     }
     
366.     return true
     
367.   end
     
368. end
     
369. 
     
370. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
371. 
     
372. #==============================================================================
     
373. # ■ Game_Character
     
374. #==============================================================================
     
375. 
     
376. class Game_Character
     
377.   #--------------------------------------------------------------------------
     
378.   # ○ 通行可能判定
     
379.   #     x : X 座標
     
380.   #     y : Y 座標
     
381.   #     d : 移動方向 (省略時: 10)
     
382.   #--------------------------------------------------------------------------
     
383.   def passable?(x, y, d = 10)
     
384.     nx = moved_x(x, d)
     
385.     ny = moved_y(y, d)
     
386.     nx = $game_map.round_x(nx)                         # 横方向ループ補正
     
387.     ny = $game_map.round_y(ny)                         # 縦方向ループ補正
     
388.     return false unless $game_map.valid?(nx, ny)       # マップ外？
     
389.     return true if @through or debug_through?          # すり抜け ON？
     
390.     return false unless map_passable?(x, y, d)         # 指定方向に移動不能？
     
391.     return false unless map_passable?(nx, ny, 10 - d)  # 移動先が進入不能？
     
392.     return false if collide_with_characters?(nx, ny)   # キャラクターに衝突？
     
393.     return true                                        # 通行可
     
394.   end
     
395.   #--------------------------------------------------------------------------
     
396.   # ○ 移動後の X 座標算出
     
397.   #     x : X 座標
     
398.   #     d : 移動方向
     
399.   #    移動後の X 座標を計算する。
     
400.   #--------------------------------------------------------------------------
     
401.   def moved_x(x, d)
     
402.     return x + (d == 6 ? 1 : d == 4 ? -1 : 0)
     
403.   end
     
404.   #--------------------------------------------------------------------------
     
405.   # ○ 移動後の Y 座標算出
     
406.   #     y : Y 座標
     
407.   #     d : 移動方向
     
408.   #    移動後の Y 座標を計算する。
     
409.   #--------------------------------------------------------------------------
     
410.   def moved_y(y, d)
     
411.     return y + (d == 2 ? 1 : d == 8 ? -1 : 0)
     
412.   end
     
413.   #--------------------------------------------------------------------------
     
414.   # ○ マップ通行可能判定
     
415.   #     x : X 座標
     
416.   #     y : Y 座標
     
417.   #     d : 移動方向
     
418.   #    指定座標の指定した方向が通行可能かを取得する。
     
419.   #--------------------------------------------------------------------------
     
420.   def map_passable?(x, y, d)
     
421.     return $game_map.passable?(x, y) && $game_map.passable_dir?(x, y, d)
     
422.   end
     
423.   #--------------------------------------------------------------------------
     
424.   # ● 下に移動
     
425.   #     turn_ok : その場での向き変更を許可
     
426.   #--------------------------------------------------------------------------
     
427.   def move_down(turn_ok = true)
     
428.     if passable?(@x, @y, 2)                 # 通行可能
     
429.       turn_down
     
430.       @y = $game_map.round_y(@y+1)
     
431.       @real_y = (@y-1)*256
     
432.       increase_steps
     
433.       @move_failed = false
     
434.     else                                    # 通行不可能
     
435.       turn_down if turn_ok
     
436.       check_event_trigger_touch(@x, @y+1)   # 接触イベントの起動判定
     
437.       @move_failed = true
     
438.     end
     
439.   end
     
440.   #--------------------------------------------------------------------------
     
441.   # ● 左に移動
     
442.   #     turn_ok : その場での向き変更を許可
     
443.   #--------------------------------------------------------------------------
     
444.   def move_left(turn_ok = true)
     
445.     if passable?(@x, @y, 4)                 # 通行可能
     
446.       turn_left
     
447.       @x = $game_map.round_x(@x-1)
     
448.       @real_x = (@x+1)*256
     
449.       increase_steps
     
450.       @move_failed = false
     
451.     else                                    # 通行不可能
     
452.       turn_left if turn_ok
     
453.       check_event_trigger_touch(@x-1, @y)   # 接触イベントの起動判定
     
454.       @move_failed = true
     
455.     end
     
456.   end
     
457.   #--------------------------------------------------------------------------
     
458.   # ● 右に移動
     
459.   #     turn_ok : その場での向き変更を許可
     
460.   #--------------------------------------------------------------------------
     
461.   def move_right(turn_ok = true)
     
462.     if passable?(@x, @y, 6)                 # 通行可能
     
463.       turn_right
     
464.       @x = $game_map.round_x(@x+1)
     
465.       @real_x = (@x-1)*256
     
466.       increase_steps
     
467.       @move_failed = false
     
468.     else                                    # 通行不可能
     
469.       turn_right if turn_ok
     
470.       check_event_trigger_touch(@x+1, @y)   # 接触イベントの起動判定
     
471.       @move_failed = true
     
472.     end
     
473.   end
     
474.   #--------------------------------------------------------------------------
     
475.   # ● 上に移動
     
476.   #     turn_ok : その場での向き変更を許可
     
477.   #--------------------------------------------------------------------------
     
478.   def move_up(turn_ok = true)
     
479.     if passable?(@x, @y, 8)                 # 通行可能
     
480.       turn_up
     
481.       @y = $game_map.round_y(@y-1)
     
482.       @real_y = (@y+1)*256
     
483.       increase_steps
     
484.       @move_failed = false
     
485.     else                                    # 通行不可能
     
486.       turn_up if turn_ok
     
487.       check_event_trigger_touch(@x, @y-1)   # 接触イベントの起動判定
     
488.       @move_failed = true
     
489.     end
     
490.   end
     
491.   #--------------------------------------------------------------------------
     
492.   # ● 左下に移動
     
493.   #--------------------------------------------------------------------------
     
494.   def move_lower_left
     
495.     unless @direction_fix
     
496.       @direction = (@direction == 6 ? 4 : @direction == 8 ? 2 : @direction)
     
497.     end
     
498.     if (passable?(@x, @y, 2) && passable?(@x, @y+1, 4)) ||
     
499.        (passable?(@x, @y, 4) && passable?(@x-1, @y, 2))
     
500.       @x -= 1
     
501.       @y += 1
     
502.       increase_steps
     
503.       @move_failed = false
     
504.     else
     
505.       @move_failed = true
     
506.     end
     
507.   end
     
508.   #--------------------------------------------------------------------------
     
509.   # ● 右下に移動
     
510.   #--------------------------------------------------------------------------
     
511.   def move_lower_right
     
512.     unless @direction_fix
     
513.       @direction = (@direction == 4 ? 6 : @direction == 8 ? 2 : @direction)
     
514.     end
     
515.     if (passable?(@x, @y, 2) && passable?(@x, @y+1, 6)) ||
     
516.        (passable?(@x, @y, 6) && passable?(@x+1, @y, 2))
     
517.       @x += 1
     
518.       @y += 1
     
519.       increase_steps
     
520.       @move_failed = false
     
521.     else
     
522.       @move_failed = true
     
523.     end
     
524.   end
     
525.   #--------------------------------------------------------------------------
     
526.   # ● 左上に移動
     
527.   #--------------------------------------------------------------------------
     
528.   def move_upper_left
     
529.     unless @direction_fix
     
530.       @direction = (@direction == 6 ? 4 : @direction == 2 ? 8 : @direction)
     
531.     end
     
532.     if (passable?(@x, @y, 8) && passable?(@x, @y-1, 4)) ||
     
533.        (passable?(@x, @y, 4) && passable?(@x-1, @y, 8))
     
534.       @x -= 1
     
535.       @y -= 1
     
536.       increase_steps
     
537.       @move_failed = false
     
538.     else
     
539.       @move_failed = true
     
540.     end
     
541.   end
     
542.   #--------------------------------------------------------------------------
     
543.   # ● 右上に移動
     
544.   #--------------------------------------------------------------------------
     
545.   def move_upper_right
     
546.     unless @direction_fix
     
547.       @direction = (@direction == 4 ? 6 : @direction == 2 ? 8 : @direction)
     
548.     end
     
549.     if (passable?(@x, @y, 8) && passable?(@x, @y-1, 6)) ||
     
550.        (passable?(@x, @y, 6) && passable?(@x+1, @y, 8))
     
551.       @x += 1
     
552.       @y -= 1
     
553.       increase_steps
     
554.       @move_failed = false
     
555.     else
     
556.       @move_failed = true
     
557.     end
     
558.   end
     
559. end
     
560. 
     
561. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
562. 
     
563. #==============================================================================
     
564. # ■ Game_Player
     
565. #==============================================================================
     
566. 
     
567. class Game_Player < Game_Character
     
568.   #--------------------------------------------------------------------------
     
569.   # ○ マップ通行可能判定
     
570.   #     x : X 座標
     
571.   #     y : Y 座標
     
572.   #     d : 移動方向
     
573.   #    指定座標の指定した方向が通行可能かを取得する。
     
574.   #--------------------------------------------------------------------------
     
575.   alias map_passable_KGC_TilesetExtension? map_passable?
     
576.   def map_passable?(x, y, d)
     
577.     return false unless map_passable_KGC_TilesetExtension?(x, y)
     
578. 
     
579.     return $game_map.passable_dir?(x, y, d)
     
580.   end
     
581. 
     
582.   if $TEST && KGC::TilesetExtension::DEBUG_INFO_BUTTON != nil
     
583.   #--------------------------------------------------------------------------
     
584.   # ● フレーム更新
     
585.   #--------------------------------------------------------------------------
     
586.   alias update_KGC_TilesetExtension update
     
587.   def update
     
588.     update_KGC_TilesetExtension
     
589. 
     
590.     if Input.trigger?(KGC::TilesetExtension::DEBUG_INFO_BUTTON)
     
591.       show_passage_and_terrain_tag
     
592.     end
     
593.   end
     
594.   #--------------------------------------------------------------------------
     
595.   # ○ プレイヤー位置の通行フラグ・地形タグを表示
     
596.   #--------------------------------------------------------------------------
     
597.   def show_passage_and_terrain_tag
     
598.     passage = $game_map.passage(x, y)
     
599.     tag = $game_map.terrain_tag(x, y)
     
600. 
     
601.     # デバッグ情報作成
     
602.     s = "通行可能: "
     
603.     s += "↓" if passage & DirectionFlag::DOWN  == 0x00
     
604.     s += "←" if passage & DirectionFlag::LEFT  == 0x00
     
605.     s += "→" if passage & DirectionFlag::RIGHT == 0x00
     
606.     s += "↑" if passage & DirectionFlag::UP    == 0x00
     
607.     s += "  地形タグ: #{tag}"
     
608. 
     
609.     p s
     
610.   end
     
611.   end
     
612. 
     
613. end
     
614. 
     
615. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
616. 
     
617. #==============================================================================
     
618. # ■ Sprite_Character
     
619. #==============================================================================
     
620. 
     
621. class Sprite_Character < Sprite_Base
     
622.   #--------------------------------------------------------------------------
     
623.   # ● 指定されたタイルが含まれるタイルセット画像の取得
     
624.   #     tile_id : タイル ID
     
625.   #--------------------------------------------------------------------------
     
626.   def tileset_bitmap(tile_id)
     
627.     filename = KGC::TilesetExtension.get_tileset_filename
     
628.     set_number = tile_id / 256
     
629.     return Cache.system(filename["B"]) if set_number == 0
     
630.     return Cache.system(filename["C"]) if set_number == 1
     
631.     return Cache.system(filename["D"]) if set_number == 2
     
632.     return Cache.system(filename["E"]) if set_number == 3
     
633.     return nil
     
634.   end
     
635. end
     
636. 
     
637. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
638. 
     
639. #==============================================================================
     
640. # ■ Spriteset_Map
     
641. #==============================================================================
     
642. 
     
643. class Spriteset_Map
     
644.   #--------------------------------------------------------------------------
     
645.   # ● タイルマップの作成
     
646.   #--------------------------------------------------------------------------
     
647.   def create_tilemap
     
648.     filename = KGC::TilesetExtension.get_tileset_filename
     
649.     @tilemap = Tilemap.new(@viewport1)
     
650.     @tilemap.bitmaps[0] = Cache.system(filename["A1"])
     
651.     @tilemap.bitmaps[1] = Cache.system(filename["A2"])
     
652.     @tilemap.bitmaps[2] = Cache.system(filename["A3"])
     
653.     @tilemap.bitmaps[3] = Cache.system(filename["A4"])
     
654.     @tilemap.bitmaps[4] = Cache.system(filename["A5"])
     
655.     @tilemap.bitmaps[5] = Cache.system(filename["B"])
     
656.     @tilemap.bitmaps[6] = Cache.system(filename["C"])
     
657.     @tilemap.bitmaps[7] = Cache.system(filename["D"])
     
658.     @tilemap.bitmaps[8] = Cache.system(filename["E"])
     
659.     @tilemap.map_data = $game_map.data
     
660.     @tilemap.passages = $game_map.passages
     
661.   end
     
662. end
     
663. 
     
664. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
665. 
     
666. #==============================================================================
     
667. # ■ Scene_Title
     
668. #==============================================================================
     
669. 
     
670. class Scene_Title < Scene_Base
     
671.   #--------------------------------------------------------------------------
     
672.   # ● データベースのロード
     
673.   #--------------------------------------------------------------------------
     
674.   alias load_database_KGC_TilesetExtension load_database
     
675.   def load_database
     
676.     load_database_KGC_TilesetExtension
     
677. 
     
678.     load_tileset
     
679.   end
     
680.   #--------------------------------------------------------------------------
     
681.   # ○ タイルセット付加情報のロード
     
682.   #--------------------------------------------------------------------------
     
683.   def load_tileset
     
684.     begin
     
685.       $data_tileset = load_data("Data/#{KGC::TilesetExtension::EX_RVDATA}")
     
686.     rescue
     
687.       $data_tileset = RPG::Tileset.new
     
688.     end
     
689.   end
     
690. end
     
691. 
     
692. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
693. 
     
694. #==============================================================================
     
695. # ■ Scene_File
     
696. #==============================================================================
     
697. 
     
698. class Scene_File < Scene_Base
     
699.   #--------------------------------------------------------------------------
     
700.   # ● セーブデータの読み込み
     
701.   #     file : 読み込み用ファイルオブジェクト (オープン済み)
     
702.   #--------------------------------------------------------------------------
     
703.   alias read_save_data_KGC_TilesetExtension read_save_data
     
704.   def read_save_data(file)
     
705.     read_save_data_KGC_TilesetExtension(file)
     
706. 
     
707.     $game_map.init_tileset_filename
     
708.     Graphics.frame_reset
     
709.   end
     
710. end
     

复制代码

@protosssonny P叔快来..
【有问题 找P叔】
附@ @彭格列第XI代 @763663412 @黄嫩凉太
【有事儿没事儿都塞点糖给我吧..草莓味儿的..】  

彭格列第XI代

同没用过这种，以上是推测，你试试~