#--------------------------------------------------------------------------
# ● require Taroxd基础设置，修复bug
# 使用方法：游戏测试中按下F6即可启用，再按一次关闭
#--------------------------------------------------------------------------
class Taroxd::PlanePassage < Plane
ENABLE = $TEST # 是否启用功能
KEY = :F6 # 控制显示通行度的按键
VISIBLE = false # 起始时是否可见
OPACITY = 150 # 不透明度
NG = Color.new(255, 0, 0, OPACITY) # 不可通行的颜色
OK = Color.new(0, 0, 255, OPACITY) # 可以通行的颜色
NG_WIDTH = 4 # 不可通行方向显示的宽度
include Taroxd::DisposeBitmap
include Taroxd::BugFix::PlaneVisible
def initialize(_)
super
self.visible = VISIBLE
self.z = 200
refresh
update
end
def update
self.visible ^= true if Input.trigger?(KEY)
self.ox = $game_map.display_x * 32
self.oy = $game_map.display_y * 32
end
def refresh
bitmap.dispose if bitmap
self.bitmap = Bitmap.new($game_map.width * 32, $game_map.height * 32)
$game_map.width.times do |x|
$game_map.height.times do |y|
draw_point(x, y)
end
end
end
# 绘制地图上的点 (x, y)
def draw_point(x, y)
ng_dirs = [2, 4, 6, 8].reject { |d| $game_map.passable?(x, y, d) }
if ng_dirs.size == 4
bitmap.fill_rect(x * 32, y * 32, 32, 32, NG)
return
end
bitmap.fill_rect(x * 32, y * 32, 32, 32, OK)
ng_dirs.each do |d|
dx = d == 6 ? 32 - NG_WIDTH : 0
dy = d == 2 ? 32 - NG_WIDTH : 0
if d == 2 || d == 8
width = 32
height = NG_WIDTH
else
width = NG_WIDTH
height = 32
end
bitmap.fill_rect(x * 32 + dx, y * 32 + dy, width, height, NG)
end
end
end
class Spriteset_Map
def_before :create_parallax do
@passage_plane = Taroxd::PlanePassage.new(@viewport3)
end
def_before(:update_parallax) { @passage_plane.update }
def_before(:refresh_characters) { @passage_plane.refresh }
def_before(:dispose_parallax) { @passage_plane.dispose }
end if Taroxd::PlanePassage::ENABLE