半手动显示地图名 - Project1

#============================================================================
# ☆ 半手动显示地图名。
# 由feizhaodan制作。
# 发布于66RPG
# http://rpg.blue/
# 版本号： 1.0.0
# 2011/10/24
# 转载时请连同这里一起转
#============================================================================
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　执行事件命令的解释器。本类在 Game_Map 类、Game_Troop 类、与
# Game_Event 类的内部使用。
#==============================================================================
class Game_Interpreter
def show_map_name(show_count = 60)
$game_system.show_map_name = true
$game_system.show_map_count = show_count
return true
end
def show_area_name(show_count = 60)
$game_system.show_area_name = true
$game_system.show_area_count = show_count
return true
end
def show_string(string = nil, show_count = 60, x = 24, y = 24)
$game_system.set_string(string, x, y, show_count)
return true
end
end
#==============================================================================
# ■ Game_System
#------------------------------------------------------------------------------
# 　处理系统附属数据的类。也可执行诸如交通工具、 BGM 等管理之类的功能。
# 本类的实例请参考$game_system 。
#==============================================================================
class Game_System
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_accessor :show_map_name
attr_accessor :show_map_count
attr_accessor :show_area_name
attr_accessor :show_area_count
attr_accessor :show_string
alias show_name_initialize initialize
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
show_name_initialize
@show_map_name = false
@show_map_count = 60
@show_area_name = false
@show_area_count = 60
@show_string = []
end
#--------------------------------------------------------------------------
# ● 设置显示内容
#--------------------------------------------------------------------------
def set_string(content, x, y, show_count)
return if content == nil
@show_string.push([content, x, y, show_count])
end
end
#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# 　处理主角的类。事件启动的判定、以及地图的滚动等功能。
# 本类的实例请参考 $game_player。
#==============================================================================
class Game_Player < Game_Character
def at_area
for area in $data_areas.values
if in_area?(area)
return area
end
end
return nil
end
end
#==============================================================================
# ■ Window_ShowName
#------------------------------------------------------------------------------
# 　在地图显示地图，区域，任意字符穿用的窗口
#==============================================================================
class Window_ShowName < Window_Base
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
super(0, 0, 50, WLH+32)
self.openness = 0
self.visible = true
self.active = false
self.back_opacity = 150
self.opacity = 100
load_map_data
@show_count = 0
end
#--------------------------------------------------------------------------
# ● 读取地图数据
#--------------------------------------------------------------------------
def load_map_data
@data = load_data("Data/MapInfos.rvdata")
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
super
@map_id = $game_map.map_id
if @show_count != 0
@show_count -= 1
elsif @show_count == 0 and self.openness != 0
self.close
else
if $game_system.show_map_name == true
self.x = 24
self.y = 24
name = @data[@map_id].name
width = contents.text_size(name).width
self.width = width + 32
create_contents
self.contents.draw_text(0, 0, width, WLH, name)
self.open
@show_count = $game_system.show_map_count
$game_system.show_map_count = 60
$game_system.show_map_name = false
elsif $game_system.show_area_name == true
self.x = 24
self.y = 24
@area = $game_player.at_area
if @area != nil
name = @area.name
else
name = "无"
end
width = contents.text_size(name).width
self.width = width + 32
create_contents
self.contents.draw_text(0, 0, width, WLH, name)
self.open
@show_count = $game_system.show_area_count
$game_system.show_area_count = 60
$game_system.show_area_name = false
elsif $game_system.show_string.empty? == false
self.x = $game_system.show_string[0][1]
self.y = $game_system.show_string[0][2]
string = $game_system.show_string[0][0]
width = contents.text_size(string).width
self.width = width + 32
create_contents
self.contents.draw_text(0, 0, width, WLH, string)
self.open
@show_count = $game_system.show_string[0][3]
$game_system.show_string.shift
end
end
end
end
#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
# 　处理地图画面的类。
#==============================================================================
class Scene_Map < Scene_Base
alias show_name_initialize initialize
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
show_name_initialize
create_showing_contents
end
#--------------------------------------------------------------------------
# ● 创建显示用内容
#--------------------------------------------------------------------------
def create_showing_contents
@showing_window = Window_ShowName.new
end
alias show_name_update update
#--------------------------------------------------------------------------
# ● 更新画面
#--------------------------------------------------------------------------
def update
show_name_update
unless $game_message.visible # 信息窗口显示中除外
update_showing_contents
end
end
#--------------------------------------------------------------------------
# ● 更新显示用窗口
#--------------------------------------------------------------------------
def update_showing_contents
@showing_window.update
end
alias show_name_terminate terminate
#--------------------------------------------------------------------------
# ● 结束处理
#--------------------------------------------------------------------------
def terminate
@showing_window.dispose
show_name_terminate
end
end
#============================================================================
# ☆ 半手动显示地图名。
# 由feizhaodan制作。
# 发布于66RPG
# http://rpg.blue/
# 版本号： 1.0.0
# 2011/10/24
# 转载时请连同这里一起转
#============================================================================

复制代码