偷偷丢Tilemap试写(感谢胃君的地图讲解)10.2更新

IamI

我在望天。占楼慢慢看
没有flash_data没有flash_data没有flash_data没有flash_data没有flash_data没有flash_data没有flash_data没有flash_data

lhbadsl

楼主很牛逼。。。。。。。。。{/fd}
我有个问题就是楼主知不知道是否可以绘制，更大分辨率的tilemap,从而破除rmvx或者rmxp的544*416或者640*480的限制，因为我试过这个和分辨率脚本一起使用，可是发觉还是直接拖大了元件地图的图块尺寸，不知道能不能写个加大图块数量的脚本版出来，让rmvx的分辨率提高成为事实，最好是能够写出rmxp的那个tilemap就更好了，我试过有一个脚本是可以支持更大的图块数量的，结合分辨率脚本后真的能够提高分辨率，不过只是。。。。。。。哎。。。。。卡死人了，如果楼主的这个脚本速度和它的图块数量结合起来的话，那么高分辨率将成为事实。。。。。。。。

lhbadsl

再不好意思的顶下。。。。。。。支持楼主，支持tilemap，支持楼主转行玩xp。。。。{/hx}

1. #===========================================================
   
2. # ** Game_Map
   
3. #===========================================================
   
4. 
   
5. class Game_Map
   
6.   #--------------------------------------------------------------------------
   
7.   # * Public Instance Variables
   
8.   #--------------------------------------------------------------------------
   
9.   attr_reader :map
   
10.   attr_accessor :tilemap_tone
    
11.   attr_accessor :tilemap_plane
    
12.   attr_accessor :tilemap_zoom_x
    
13.   attr_accessor :tilemap_zoom_y
    
14.   attr_accessor :tilemap_tile_width
    
15.   attr_accessor :tilemap_tile_height
    
16.   #--------------------------------------------------------------------------
    
17.   # * Alias Listings
    
18.   #--------------------------------------------------------------------------
    
19.   alias seph_tilemap_gmap_init initialize
    
20.   #--------------------------------------------------------------------------
    
21.   # * Object Initialization
    
22.   #--------------------------------------------------------------------------
    
23.   def initialize
    
24.     # Original Initialization
    
25.     seph_tilemap_gmap_init
    
26.     # Sets Special Tilemap Properties
    
27.     @tilemap_tone        = nil
    
28.     @tilemap_plane       = false
    
29.     @tilemap_zoom_x      = 1.0
    
30.     @tilemap_zoom_y      = 1.0
    
31.     @tilemap_tile_width  = 32
    
32.     @tilemap_tile_height = 32
    
33.   end
    
34. end
    
35. 
    
36. #=============================================================
    
37. # ** Tilemap
    
38. #=============================================================
    
39. 
    
40. class Tilemap
    
41.   #--------------------------------------------------------------------------
    
42.   # * Animated Autotiles Frames Reset
    
43.   #--------------------------------------------------------------------------
    
44.   Animated_Autotiles_Frames = 15
    
45.   #--------------------------------------------------------------------------
    
46.   # * Auto-Tiles
    
47.   #
    
48.   #   Auto-Tile 48 : First Auto-Tile, Constructed of tiles 27, 28, 33, 34
    
49.   #--------------------------------------------------------------------------
    
50.   Autotiles = [
    
51.     [ [27, 28, 33, 34], [ 5, 28, 33, 34], [27,  6, 33, 34], [ 5,  6, 33, 34],
    
52.       [27, 28, 33, 12], [ 5, 28, 33, 12], [27,  6, 33, 12], [ 5,  6, 33, 12] ],
    
53.     [ [27, 28, 11, 34], [ 5, 28, 11, 34], [27,  6, 11, 34], [ 5,  6, 11, 34],
    
54.       [27, 28, 11, 12], [ 5, 28, 11, 12], [27,  6, 11, 12], [ 5,  6, 11, 12] ],
    
55.     [ [25, 26, 31, 32], [25,  6, 31, 32], [25, 26, 31, 12], [25,  6, 31, 12],
    
56.       [15, 16, 21, 22], [15, 16, 21, 12], [15, 16, 11, 22], [15, 16, 11, 12] ],
    
57.     [ [29, 30, 35, 36], [29, 30, 11, 36], [ 5, 30, 35, 36], [ 5, 30, 11, 36],
    
58.       [39, 40, 45, 46], [ 5, 40, 45, 46], [39,  6, 45, 46], [ 5,  6, 45, 46] ],
    
59.     [ [25, 30, 31, 36], [15, 16, 45, 46], [13, 14, 19, 20], [13, 14, 19, 12],
    
60.       [17, 18, 23, 24], [17, 18, 11, 24], [41, 42, 47, 48], [ 5, 42, 47, 48] ],
    
61.     [ [37, 38, 43, 44], [37,  6, 43, 44], [13, 18, 19, 24], [13, 14, 43, 44],
    
62.       [37, 42, 43, 48], [17, 18, 47, 48], [13, 18, 43, 48], [ 1,  2,  7,  8] ]
    
63.   ]
    
64.   #--------------------------------------------------------------------------
    
65.   # * Public Instance Variables
    
66.   #--------------------------------------------------------------------------
    
67.   attr_reader :layers
    
68.   attr_accessor :tileset
    
69.   attr_accessor :autotiles
    
70.   attr_accessor :map_data
    
71.   attr_accessor :flash_data
    
72.   attr_accessor :priorities
    
73.   attr_accessor :visible
    
74.   attr_accessor :ox
    
75.   attr_accessor :oy
    
76.   #--------------------------------------------------------------------------
    
77.   # * Object Initialization
    
78.   #--------------------------------------------------------------------------
    
79.   def initialize(viewport, map = $game_map.map)
    
80.     # Creates layers
    
81.     @layers = []
    
82.     for l in 0...3
    
83.       layer = ($game_map.tilemap_plane ?
    
84.                Plane.new(viewport) : Sprite.new(viewport))
    
85.       layer.bitmap = Bitmap.new(map.width * 32, map.height * 32)
    
86.       layer.z = l * 150
    
87.       layer.zoom_x = $game_map.tilemap_zoom_x
    
88.       layer.zoom_y = $game_map.tilemap_zoom_y
    
89.       if (tone = $game_map.tilemap_tone).is_a?(Tone)
    
90.         layer.tone = tone
    
91.       end
    
92.       @layers << layer
    
93.     end
    
94.     # Sets Tileset Data
    
95.     @tileset    = nil  # Refers to Map Tileset Name
    
96.     @autotiles  = []   # Refers to Tileset Auto-Tiles (Actual Auto-Tiles)
    
97.     @map_data   = nil  # Refers to 3D Array Of Tile Settings
    
98.     @flash_data = nil  # Refers to 3D Array of Tile Flashdata
    
99.     @priorities = nil  # Refers to Tileset Priorities
    
100.     @visible    = true # Refers to Tilest Visibleness
     
101.     @ox         = 0    # Bitmap Offsets         
     
102.     @oy         = 0    # bitmap Offsets
     
103.     @data       = nil  # Acts As Refresh Flag
     
104.     # Sets Specials Tile Properties
     
105.     @map         = map
     
106.     @tone        = $game_map.tilemap_tone
     
107.     @plane       = $game_map.tilemap_plane
     
108.     @zoom_x      = $game_map.tilemap_zoom_x
     
109.     @zoom_y      = $game_map.tilemap_zoom_y
     
110.     @tile_width  = $game_map.tilemap_tile_width
     
111.     @tile_height = $game_map.tilemap_tile_height
     
112.   end
     
113.   #--------------------------------------------------------------------------
     
114.   # * Dispose
     
115.   #--------------------------------------------------------------------------
     
116.   def dispose
     
117.     # Dispose Layers (Sprites)
     
118.     for layer in @layers
     
119.       layer.dispose
     
120.     end
     
121.   end
     
122.   #--------------------------------------------------------------------------
     
123.   # * Frame Update
     
124.   #--------------------------------------------------------------------------
     
125.   def update
     
126.     # If Data Changes
     
127.     unless @data == @map_data &&
     
128.            @tile_width == $game_map.tilemap_tile_width &&
     
129.            @tile_height == $game_map.tilemap_tile_height
     
130.       refresh
     
131.     end
     
132.     # Tone Change
     
133.     unless @tone == $game_map.tilemap_tone
     
134.       @tone = $game_map.tilemap_tone
     
135.       @tone = Tone.new(0, 0, 0, 0) if @tone.nil?
     
136.       for layer in @layers
     
137.         layer.tone = @tone
     
138.         layer.tone = @tone
     
139.       end
     
140.     end
     
141.     # Zoom Change
     
142.     unless @zoom_x == $game_map.tilemap_zoom_x
     
143.       @zoom_x = $game_map.tilemap_zoom_x
     
144.       for layer in @layers
     
145.         layer.zoom_x = @zoom_x
     
146.         layer.zoom_x = @zoom_x
     
147.       end
     
148.     end
     
149.     unless @zoom_y == $game_map.tilemap_zoom_y
     
150.       @zoom_y = $game_map.tilemap_zoom_y
     
151.       for layer in @layers
     
152.         layer.zoom_y = @zoom_y
     
153.         layer.zoom_y = @zoom_y
     
154.       end
     
155.     end
     
156.     # Update layer Position offsets
     
157.     for layer in @layers
     
158.       layer.ox = @ox
     
159.       layer.oy = @oy
     
160.     end
     
161.     # Animated Autotiles
     
162.     if Graphics.frame_count % Animated_Autotiles_Frames == 0
     
163.       # Refresh Autotiles
     
164.       refresh_autotiles
     
165.     end
     
166.   end
     
167.   #--------------------------------------------------------------------------
     
168.   # * Refresh
     
169.   #--------------------------------------------------------------------------
     
170.   def refresh
     
171.     # Saves Map Data
     
172.     @data = @map_data
     
173.     # Passes Through All Priorities
     
174.     for p in 0..5
     
175.       # Passes Through Layers
     
176.       for z in 0...@map_data.zsize
     
177.         # Passes Through X Coordinates
     
178.         for x in 0...@map_data.xsize
     
179.           # Passes Through Z Coordinates
     
180.           for y in 0...@map_data.ysize
     
181.             # Collects Tile ID
     
182.             id = @map_data[x, y, z]
     
183.             # Skip if 0 tile
     
184.             next if id == 0
     
185.             # Skip If Priority Doesn't Match
     
186.             next unless p == @priorities[id]
     
187.             # Cap Priority to Layer 3
     
188.             p = 2 if p > 2
     
189.             # Draw Tile
     
190.             id < 384 ? draw_autotile(x, y, p, id) : draw_tile(x, y, p, id)
     
191.           end
     
192.         end
     
193.       end
     
194.     end
     
195.   end
     
196.   #--------------------------------------------------------------------------
     
197.   # * Refresh Auto-Tiles
     
198.   #--------------------------------------------------------------------------
     
199.   def refresh_autotiles
     
200.     # Auto-Tile Locations
     
201.     autotile_locations = Table.new(@map_data.xsize, @map_data.ysize,
     
202.       @map_data.zsize)
     
203.     # Passes Through All Priorities
     
204.     for p in 0..5
     
205.       # Passes Through Layers
     
206.       for z in 0...@map_data.zsize
     
207.         # Passes Through X Coordinates
     
208.         for x in 0...@map_data.xsize
     
209.           # Passes Through Z Coordinates
     
210.           for y in 0...@map_data.ysize
     
211.             # Collects Tile ID
     
212.             id = @map_data[x, y, z]
     
213.             # Skip if 0 tile
     
214.             next if id == 0
     
215.             # Skip If Priority Doesn't Match
     
216.             next unless p == @priorities[id]
     
217.             # Skip If Non-Animated Tile
     
218. #            next unless autotile = @autotiles[id / 48 - 1].width / 96 > 1
     
219.             # Cap Priority to Layer 3
     
220.             p = 2 if p > 2
     
221.             # If Autotile
     
222.             if id < 384
     
223.               # Draw Auto-Tile
     
224.               draw_autotile(x, y, p, id)
     
225.               # Save Autotile Location
     
226.               autotile_locations[x, y, z] = 1
     
227.             # If Normal Tile
     
228.             else
     
229.               # If Autotile Drawn
     
230.               if autotile_locations[x, y, z] == 1
     
231.                 # Redraw Normal Tile
     
232.                 draw_tile(x, y, p, id)
     
233.               end
     
234.             end
     
235.           end
     
236.         end
     
237.       end
     
238.     end
     
239.   end
     
240.   #--------------------------------------------------------------------------
     
241.   # * Draw Tile
     
242.   #--------------------------------------------------------------------------
     
243.   def draw_tile(x, y, z, id)
     
244.     # Figures Tile Rect
     
245.     rect = Rect.new((id - 384) % 8 * 32, (id - 384) / 8 * 32, 32, 32)
     
246.     # Calculates Tile Coordinates
     
247.     x *= @tile_width
     
248.     y *= @tile_height
     
249.     # If Normal Tile
     
250.     if @tile_width == 32 && @tile_height == 32
     
251.       @layers[z].bitmap.blt(x, y, @tileset, rect)
     
252.     # If Altered Dimensions
     
253.     else
     
254.       dest_rect = Rect.new(x, y, @tile_width, @tile_height)
     
255.       @layers[z].bitmap.stretch_blt(dest_rect, @tileset, rect)
     
256.     end
     
257.   end
     
258.   #--------------------------------------------------------------------------
     
259.   # * Draw Auto-Tile
     
260.   #--------------------------------------------------------------------------
     
261.   def draw_autotile(x, y, z, tile_id)
     
262.     # Gets Auto-Tile
     
263.     autotile = @autotiles[tile_id / 48 - 1]
     
264.     # Reconfigure Tile ID
     
265.     tile_id %= 48
     
266.     # Creates Bitmap
     
267.     bitmap = Bitmap.new(32, 32)
     
268.     # Collects Auto-Tile Tile Layout
     
269.     tiles = Autotiles[tile_id / 8][tile_id % 8]
     
270.     # Animated Tiles
     
271.     frames = autotile.width / 96
     
272.     # Configures Animation Offset
     
273.     anim = (Graphics.frame_count / Animated_Autotiles_Frames) % frames * 96
     
274.     # Draws Auto-Tile Rects
     
275.     for i in 0...4
     
276.       tile_position = tiles[i] - 1
     
277.       src_rect = Rect.new(tile_position % 6 * 16 + anim, tile_position / 6 * 16, 16, 16)
     
278.       bitmap.blt(i % 2 * 16, i / 2 * 16, autotile, src_rect)
     
279.     end
     
280.     # Calculates Tile Coordinates
     
281.     x *= @tile_width
     
282.     y *= @tile_height
     
283.     # If Normal Tile
     
284.     if @tile_width == 32 && @tile_height == 32
     
285.       @layers[z].bitmap.blt(x, y, bitmap, Rect.new(0, 0, 32, 32))
     
286.     # If Altered Dimensions
     
287.     else
     
288.       dest_rect = Rect.new(x, y, @tile_width, @tile_height)
     
289.       @layers[z].bitmap.stretch_blt(dest_rect, bitmap, Rect.new(0, 0, 32, 32))
     
290.     end
     
291.   end
     
292.   #--------------------------------------------------------------------------
     
293.   # * Collect Bitmap
     
294.   #--------------------------------------------------------------------------
     
295.   def bitmap
     
296.     # Creates New Blank Bitmap
     
297.     bitmap = Bitmap.new(@layers[0].bitmap.width, @layers[0].bitmap.height)
     
298.     # Passes Through All Layers
     
299.     for layer in @layers
     
300.       bitmap.blt(0, 0, layer.bitmap,
     
301.         Rect.new(0, 0, bitmap.width, bitmap.height))
     
302.     end
     
303.     # Return Bitmap
     
304.     return bitmap
     
305.   end
     
306. end
     

复制代码

这个是xp那个可以破除分辨率低下的titlmap脚本，楼主参考下，如果可以优化它的速度的话，那么1024*768就会成为事实了。。。。。。