切换地图后展示专有插图 - Project1

#==============================================================================
# ■ Scene_MapChange 1.0 Edition
#------------------------------------------------------------------------------
# 　切换关键地图时显示专有图像
# 作者 / Ryusa 参考 / 尽头宇文隳
# [email protected]
#==============================================================================
class Scene_MapChange
#--------------------------------------------------------------------------
# ● 主处理
#--------------------------------------------------------------------------
def main
# 获取地图 ID，导入变量 ryumap
ryumap = $game_map.map_id
# 由地图 ID 决定生成图形
filename = ""
case ryumap
#when num # 范例
#filename = "path" # 范例
when 22 # 里奥拉多地区·里奥拉多镇通道
filename = "Scene_AreaLeoladol.png"
when 40 # 里奥拉多地区·麦基通道
filename = "Scene_AreaLeoladol.png"
when 47 # 里奥拉多地区·波布雷欧普莱通道
filename = "Scene_AreaLeoladol.png"
when 23 # 里奥拉多镇
filename = "Scene_AreaLeoladol.png"
when 148 # 巴多·帕鲁迪兹山洞
filename = "Scene_CaveBado.png"
when 114 # 地狱门
filename = "Scene_Desert.png"
when 119 # 地球救济中心
filename = "Scene_Earth.png"
when 97 # 伊尔·米古拉
filename = "Scene_ElMigolar.png"
when 51 # 莫氏塔
filename = "Scene_Mr.MowTower.png"
when 38 # 波布雷·欧普莱
filename = "Scene_NewFork.png"
when 75 # 奥多里
filename = "Scene_Outry.png"
when 109 # 桑塔
filename = "Scene_SantaPork.png"
when 136 # 地狱门西村
filename = "Scene_SunPork.png"
when 42 # 麦基村
filename = "Scene_TownNeki.png"
else # 未特别指定的地图显示通用图像
filename = "Scene_TownNeki.png"
end
#print filename # 校验文件名，测试用
@sprite = Sprite.new
if not filename == ""
@sprite.bitmap = RPG::Cache.picture(filename)
@sprite.z = 9999 # 图像叠放层次在最前
end
# 执行过渡
Graphics.transition(60) # 淡入图像的时间，单位为帧
# 主循环
loop do
# 刷新游戏画面
Graphics.update
# 刷新输入信息
Input.update
# 刷新画面情报
update
# 如果画面被切换的话就中断循环
if $scene != self
break
end
end
# 准备过渡
Graphics.freeze
# 释放图形
@sprite.bitmap.dispose
@sprite.dispose
# 执行过度
Graphics.transition(20)
# 准备过渡
Graphics.freeze
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
@sprite.update
#@sprite.bitmap.update
# 按下 C 键的情况下
if Input.trigger?(Input::C)
# 切换到相应地图
$scene = Scene_Map.new
end
end
end

复制代码