[10VIP悬赏]有人知道Tilemap这个类是怎么定义的吗？

黑暗之神 · 发表于 2007-8-2 07:27:46

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

如题，想修改点东西，需要知道class Tilemap 这段RM内部的代码…谢了！
另外，如果知道如何查看RMXP的内部类也麻烦告诉我，很多东西要改动的，
十分感谢的说~！
[10VIP悬赏].......不够的话20也行～～～

黑暗之神 · 发表于 2007-8-2 07:27:46

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

如题，想修改点东西，需要知道class Tilemap 这段RM内部的代码…谢了！
另外，如果知道如何查看RMXP的内部类也麻烦告诉我，很多东西要改动的，
十分感谢的说~！
[10VIP悬赏].......不够的话20也行～～～

精灵使者 · 发表于 2007-8-2 08:38:07

这个建议转向援手区。恩恩。

亿万星辰 · 发表于 2007-8-2 14:11:42

这个东西本身没有提供,现在无非就是自己重新写一个或者想办法继续破解看能不能找着本来的方法........ -v-

黑暗之神 · 发表于 2007-8-2 15:13:00

....就是破解不了，而且没头绪写...
郁闷中…把人物显示的间隔放大了，地图不跟着放大，就错位了，设置通行就麻烦了…

K’ · 发表于 2007-8-2 17:50:50

偶这有个以前找到的一个外国人写的 tilemap

可以自定义自动元件的播放速度也许还有其他功能米仔细看就丢一边了刚翻出来。。

也许楼主可以参考下。

#==============================================================================
# ** Game_Map
#==============================================================================
class Game_Map
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_reader :map
attr_accessor :tilemap_tone
attr_accessor :tilemap_plane
attr_accessor :tilemap_zoom_x
attr_accessor :tilemap_zoom_y
attr_accessor :tilemap_tile_width
attr_accessor :tilemap_tile_height
#--------------------------------------------------------------------------
# * Alias Listings
#--------------------------------------------------------------------------
alias seph_tilemap_gmap_init initialize
#--------------------------------------------------------------------------
# * Object Initialization
#--------------------------------------------------------------------------
def initialize
# Original Initialization
seph_tilemap_gmap_init
# Sets Special Tilemap Properties
@tilemap_tone = nil
@tilemap_plane = false
@tilemap_zoom_x = 1.0
@tilemap_zoom_y = 1.0
@tilemap_tile_width = 32
@tilemap_tile_height = 32
end
end
#==============================================================================
# ** Tilemap
#==============================================================================
class Tilemap
#--------------------------------------------------------------------------
# * Animated Autotiles Frames Reset
#--------------------------------------------------------------------------
Animated_Autotiles_Frames = 15
#--------------------------------------------------------------------------
# * Auto-Tiles
#
# Auto-Tile 48 : First Auto-Tile, Constructed of tiles 27, 28, 33, 34
#--------------------------------------------------------------------------
Autotiles = [
[ [27, 28, 33, 34], [ 5, 28, 33, 34], [27, 6, 33, 34], [ 5, 6, 33, 34],
[27, 28, 33, 12], [ 5, 28, 33, 12], [27, 6, 33, 12], [ 5, 6, 33, 12] ],
[ [27, 28, 11, 34], [ 5, 28, 11, 34], [27, 6, 11, 34], [ 5, 6, 11, 34],
[27, 28, 11, 12], [ 5, 28, 11, 12], [27, 6, 11, 12], [ 5, 6, 11, 12] ],
[ [25, 26, 31, 32], [25, 6, 31, 32], [25, 26, 31, 12], [25, 6, 31, 12],
[15, 16, 21, 22], [15, 16, 21, 12], [15, 16, 11, 22], [15, 16, 11, 12] ],
[ [29, 30, 35, 36], [29, 30, 11, 36], [ 5, 30, 35, 36], [ 5, 30, 11, 36],
[39, 40, 45, 46], [ 5, 40, 45, 46], [39, 6, 45, 46], [ 5, 6, 45, 46] ],
[ [25, 30, 31, 36], [15, 16, 45, 46], [13, 14, 19, 20], [13, 14, 19, 12],
[17, 18, 23, 24], [17, 18, 11, 24], [41, 42, 47, 48], [ 5, 42, 47, 48] ],
[ [37, 38, 43, 44], [37, 6, 43, 44], [13, 18, 19, 24], [13, 14, 43, 44],
[37, 42, 43, 48], [17, 18, 47, 48], [13, 18, 43, 48], [ 1, 2, 7, 8] ]
]
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_reader :layers
attr_accessor :tileset
attr_accessor :autotiles
attr_accessor :map_data
attr_accessor :flash_data
attr_accessor :priorities
attr_accessor :visible
attr_accessor :ox
attr_accessor :oy
#--------------------------------------------------------------------------
# * Object Initialization
#--------------------------------------------------------------------------
def initialize(viewport, map = $game_map.map)
# Creates layers
@layers = []
for l in 0...3
layer = ($game_map.tilemap_plane ?
Plane.new(viewport) : Sprite.new(viewport))
layer.bitmap = Bitmap.new(map.width * 32, map.height * 32)
layer.z = l * 150
layer.zoom_x = $game_map.tilemap_zoom_x
layer.zoom_y = $game_map.tilemap_zoom_y
if (tone = $game_map.tilemap_tone).is_a?(Tone)
layer.tone = tone
end
@layers << layer
end
# Sets Tileset Data
@tileset = nil # Refers to Map Tileset Name
@autotiles = [] # Refers to Tileset Auto-Tiles (Actual Auto-Tiles)
@map_data = nil # Refers to 3D Array Of Tile Settings
@flash_data = nil # Refers to 3D Array of Tile Flashdata
@priorities = nil # Refers to Tileset Priorities
@visible = true # Refers to Tilest Visibleness
@ox = 0 # Bitmap Offsets
@oy = 0 # bitmap Offsets
@data = nil # Acts As Refresh Flag
# Sets Specials Tile Properties
@map = map
@tone = $game_map.tilemap_tone
@plane = $game_map.tilemap_plane
@zoom_x = $game_map.tilemap_zoom_x
@zoom_y = $game_map.tilemap_zoom_y
@tile_width = $game_map.tilemap_tile_width
@tile_height = $game_map.tilemap_tile_height
end
#--------------------------------------------------------------------------
# * Dispose
#--------------------------------------------------------------------------
def dispose
# Dispose Layers (Sprites)
for layer in @layers
layer.dispose
end
end
#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
def update
# If Data Changes
unless @data == @map_data &&
@tile_width == $game_map.tilemap_tile_width &&
@tile_height == $game_map.tilemap_tile_height
refresh
end
# Tone Change
unless @tone == $game_map.tilemap_tone
@tone = $game_map.tilemap_tone
@tone = Tone.new(0, 0, 0, 0) if @tone.nil?
for layer in @layers
layer.tone = @tone
layer.tone = @tone
end
end
# Zoom Change
unless @zoom_x == $game_map.tilemap_zoom_x
@zoom_x = $game_map.tilemap_zoom_x
for layer in @layers
layer.zoom_x = @zoom_x
layer.zoom_x = @zoom_x
end
end
unless @zoom_y == $game_map.tilemap_zoom_y
@zoom_y = $game_map.tilemap_zoom_y
for layer in @layers
layer.zoom_y = @zoom_y
layer.zoom_y = @zoom_y
end
end
# Update layer Position offsets
for layer in @layers
layer.ox = @ox
layer.oy = @oy
end
# Animated Autotiles
if Graphics.frame_count % Animated_Autotiles_Frames == 0
# Refresh Autotiles
refresh_autotiles
end
end
#--------------------------------------------------------------------------
# * Refresh
#--------------------------------------------------------------------------
def refresh
# Saves Map Data
@data = @map_data
# Passes Through All Priorities
for p in 0..5
# Passes Through Layers
for z in 0...@map_data.zsize
# Passes Through X Coordinates
for x in 0...@map_data.xsize
# Passes Through Z Coordinates
for y in 0...@map_data.ysize
# Collects Tile ID
id = @map_data[x, y, z]
# Skip if 0 tile
next if id == 0
# Skip If Priority Doesn't Match
next unless p == @priorities[id]
# Cap Priority to Layer 3
p = 2 if p > 2
# Draw Tile
id < 384 ? draw_autotile(x, y, p, id) : draw_tile(x, y, p, id)
end
end
end
end
end
#--------------------------------------------------------------------------
# * Refresh Auto-Tiles
#--------------------------------------------------------------------------
def refresh_autotiles
# Auto-Tile Locations
autotile_locations = Table.new(@map_data.xsize, @map_data.ysize,
@map_data.zsize)
# Passes Through All Priorities
for p in 0..5
# Passes Through Layers
for z in 0...@map_data.zsize
# Passes Through X Coordinates
for x in 0...@map_data.xsize
# Passes Through Z Coordinates
for y in 0...@map_data.ysize
# Collects Tile ID
id = @map_data[x, y, z]
# Skip if 0 tile
next if id == 0
# Skip If Priority Doesn't Match
next unless p == @priorities[id]
# Skip If Non-Animated Tile
# next unless autotile = @autotiles[id / 48 - 1].width / 96 > 1
# Cap Priority to Layer 3
p = 2 if p > 2
# If Autotile
if id < 384
# Draw Auto-Tile
draw_autotile(x, y, p, id)
# Save Autotile Location
autotile_locations[x, y, z] = 1
# If Normal Tile
else
# If Autotile Drawn
if autotile_locations[x, y, z] == 1
# Redraw Normal Tile
draw_tile(x, y, p, id)
end
end
end
end
end
end
end
#--------------------------------------------------------------------------
# * Draw Tile
#--------------------------------------------------------------------------
def draw_tile(x, y, z, id)
# Figures Tile Rect
rect = Rect.new((id - 384) % 8 * 32, (id - 384) / 8 * 32, 32, 32)
# Calculates Tile Coordinates
x *= @tile_width
y *= @tile_height
# If Normal Tile
if @tile_width == 32 && @tile_height == 32
@layers[z].bitmap.blt(x, y, @tileset, rect)
# If Altered Dimensions
else
dest_rect = Rect.new(x, y, @tile_width, @tile_height)
@layers[z].bitmap.stretch_blt(dest_rect, @tileset, rect)
end
end
#--------------------------------------------------------------------------
# * Draw Auto-Tile
#--------------------------------------------------------------------------
def draw_autotile(x, y, z, tile_id)
# Gets Auto-Tile
autotile = @autotiles[tile_id / 48 - 1]
# Reconfigure Tile ID
tile_id %= 48
# Creates Bitmap
bitmap = Bitmap.new(32, 32)
# Collects Auto-Tile Tile Layout
tiles = Autotiles[tile_id / 8][tile_id % 8]
# Animated Tiles
frames = autotile.width / 96
# Configures Animation Offset
anim = (Graphics.frame_count / Animated_Autotiles_Frames) % frames * 96
# Draws Auto-Tile Rects
for i in 0...4
tile_position = tiles[i] - 1
src_rect = Rect.new(tile_position % 6 * 16 + anim, tile_position / 6 * 16, 16, 16)
bitmap.blt(i % 2 * 16, i / 2 * 16, autotile, src_rect)
end
# Calculates Tile Coordinates
x *= @tile_width
y *= @tile_height
# If Normal Tile
if @tile_width == 32 && @tile_height == 32
@layers[z].bitmap.blt(x, y, bitmap, Rect.new(0, 0, 32, 32))
# If Altered Dimensions
else
dest_rect = Rect.new(x, y, @tile_width, @tile_height)
@layers[z].bitmap.stretch_blt(dest_rect, bitmap, Rect.new(0, 0, 32, 32))
end
end
#--------------------------------------------------------------------------
# * Collect Bitmap
#--------------------------------------------------------------------------
def bitmap
# Creates New Blank Bitmap
bitmap = Bitmap.new(@layers[0].bitmap.width, @layers[0].bitmap.height)
# Passes Through All Layers
for layer in @layers
bitmap.blt(0, 0, layer.bitmap,
Rect.new(0, 0, bitmap.width, bitmap.height))
end
# Return Bitmap
return bitmap
end
end

复制代码

柳柳 · 发表于 2007-8-3 00:15:53

呵呵，想当年我们研究了半天也还是不能轻松搞定啊。不过测试了一下K’那个，就在地图绘了一棵树，运行，直接就效果不对。看了一下代码，好像原理和真实原理差不太多，不知道什么地方错了。

……想起当年自己尝试这个得到的一个副产品：http://rpg.blue/viewthread.php?tid=30398

原定义方法没有提供，我可以简单描述一下Tileset和Graphics两个怎么工作的：(非标准版，只是我个人的理解)

首先游戏所有画面刷新都是Graphics.update。那么这个update的一帧时间内，到底刷新了什么？

假设一张画好的地图，上面有Tileset，人物，显示的图片，一个人物还在播放魔法。那么：
1、先把所有涉嫌参与显示的素材加载到内存
2、建立一个Z取最小值的画布
3、把所有需要显示的内容，统一获得获得一个Z值。按照Z的从小到大的顺序排列（这里Tileset你可以理解为每一个32×32的小格是独立的Sprite，所以每个小格的Z都不同，这些Z值用数据库图块中优先级和本身的Y坐标确定，用于和人物互动）。
4、按照Z从小到大，从内存找到素材，然后把需要的Rect给strech_blt到画布正确的位置。其中alpha_blend使用普通和加法来计算。strech_blt的算法是从把拉伸后的图片(或者一边计算拉伸一边取颜色)按照1象素1行，切成很多行，循环每个行上每个点。当是普通，直接把这个点的颜色替换画布上对应点颜色，否则就进行一定计算得到画布上新的点的颜色。
5、全部算完替换完，这一帧就算刷新完了。

这是每次输入Graphics.update它会干的事情。这么说是否能大概知道Tileset的计算方法了？

柳柳 · 发表于 2007-8-3 01:18:37

本来想详细写一个Tilemap出来，后来觉得算了，怪麻烦的。我说说大体的算法吧。

def initialize
layer[j] = Sprite, .bitmap = Bitmap.new(640, 32 * 6)  <--6是因为优先级取0-5
j取值-1到16。
layer[j].y = j * 32 (或类似的)
layer[j].z = function get_z(.y) (参考game_character的def screen_z)

def refresh
for map_layer in 1..3  <--循环3层
  for i in -1..21
for j in -1..16  <--这两个循环地图上所有格以及显示区域边缘以外一圈的格子
   pro = function 获取[i,j]格第map_layer层的优先级
   wahaha_z = function 获取当前这一层这一格在当前屏幕状态下应有的Z值
   按照z，把素材中正确的一格考到layer[某]中的适当位置。这个layer[某].z = wahaha_z

def update
1、Sprite不update原有内容(注意这点，效率的关键问题)
2、update 所有layer的x, y
3、当镜头挪动了1格之后，refresh一次，重新考layer

def dispose
略

大概就是这样。

系统信息：本贴获得楼主认可，66RPG感谢您的热情解答～

黑暗之神 · 发表于 2009-6-12 08:00:00

用了上面的方法，发现不太理想…放大素材的话又卡
只好用我最后的方法：
既然是事件的间隔放大了1.5倍，从原来的128变成了192，画面等也设置成了192，所以这个只是显示的位置，跟他实际的坐标不符合，于是就在初始化时将他们的坐标缩小1.5倍，然后把通行的设置放大1.5倍，这样游戏中通行就没有问题了，并且事件放置的位置也会出现在大概的位置…
只是有一点，因为坐标/1.5的关系实际位置有所出入，设置就麻烦了点…也许临近的两个事件运行后就变成重叠在一起了，设置时要配合运行查看实际的位置效果…
大概目前我的工程只能这样了…设置麻烦了点，不过里面没问题就可以了…

---谢谢柳柳，K’

柳柳 · 发表于 2007-8-3 06:56:18

我建议是不要这么改
切格的方法很多的，但是最好不要引入小数……
你可以看我http://rpg.blue/viewthread.php?tid=30398这个，也是修改了格子大小，只是使用的是16×16的格子大小，对你而言只是用48×48而已。
这个方法理论上绝对不卡，因为只是双远景+一层绘制。而且游戏制作方面维持RMXP原样不用任何调整，只是素材方面需要像范例里面那样改改。你可以稍微看看……

当然，也可能是我没理解你说的方法，总之只要有种解决模式就行了

帐号		自动登录	找回密码
密码			注册会员

[10VIP悬赏]有人知道Tilemap这个类是怎么定义的吗？

加入我们，或者，欢迎回来。

加入我们，或者，欢迎回来。

开拓者

贵宾

RMVX自由创作大赛亚军

第2届短篇游戏比赛亚军

第5届短篇游戏比赛冠军