一个关于自制图片标题菜单的问题（全脚本的） - Project1

#==============================================================================
# ■ Scene_Title
#------------------------------------------------------------------------------
# 　处理标题画面的类。
#==============================================================================
class Scene_Title < Game_Zzbl
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
super
@xdks = Sprite.new
@xdks.bitmap = RPG::Cache.title("新的开始.png")
@xdks.visible = false
@jdhy = Sprite.new
@jdhy.bitmap = RPG::Cache.title("旧的回忆.png")
@jdhy.visible = false
@zzzdh = Sprite.new
@zzzdh.bitmap = RPG::Cache.title("制作者的话.png")
@zzzdh.visible = false
@lkyx = Sprite.new
@lkyx.bitmap = RPG::Cache.title("离开游戏.png")
@lkyx.visible = false
end
#--------------------------------------------------------------------------
# ● 主处理
#--------------------------------------------------------------------------
def main
# 生成标题图形
@btc1 = Sprite.new
@btc1.bitmap = RPG::Cache.title("底层背景.png")
@btc2 = Sprite.new
@btc2.bitmap = RPG::Cache.title("边框装饰.png")
@btc3 = Sprite.new
@btc3.bitmap = RPG::Cache.title("标题文字.png")
#生成按钮选项
case @btbl
when 0
@xdks = Sprite.new
@xdks.bitmap = RPG::Cache.title("新的开始.png")
when 1
@jdhy = Sprite.new
@jdhy.bitmap = RPG::Cache.title("旧的回忆.png")
when 2
@zzzdh = Sprite.new
@zzzdh.bitmap = RPG::Cache.title("制作者的话.png")
when 3
@lkyx = Sprite.new
@lkyx.bitmap = RPG::Cache.title("离开游戏.png")
end
@xdks.z = 100
@jdhy.z = 100
@zzzdh.z = 100
@lkyx.z = 100
@old_btbl = 0
# 执行过渡
Graphics.transition
# 主循环
loop do
# 刷新游戏画面
Graphics.update
# 刷新输入信息
Input.update
# 刷新画面
update
# 如果画面被切换就中断循环
if $scene != self
break
end
end
# 准备过渡
Graphics.freeze
# 释放标题图形
@image_sprite.bitmap.dispose
@image_sprite.dispose
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
# 方向键下被按下的情况下
if Input.repeat?(Input::DOWN)
@btbl += 1
if @btbl == 4
@btbl = 0
end
end
#p @btbl
# 方向键上被按下的情况下
if Input.repeat?(Input::UP)
@btbl -= 1
if @btbl == -1
@btbl = 3
end
end
# 按钮动态
if @btbl != @old_btbl
@old_btbl = @btbl
#p @btbl
case @btbl
when 0
@xdks.visible = true
@wait_count = 2
@jdhy.visible = false
@wait_count = 2
@zzzdh.visible = false
@wait_count = 2
@lkyx.visible = false
when 1
@xdks.visible = false
@wait_count = 2
@jdhy.visible = true
@wait_count = 2
@zzzdh.visible = false
@wait_count = 2
@lkyx.visible = false
when 2
@xdks.visible = false
@wait_count = 2
@jdhy.visible = false
@wait_count = 2
@zzzdh.visible = true
@wait_count = 2
@lkyx.visible = false
when 3
@xdks.visible = false
@wait_count = 2
@jdhy.visible = false
@wait_count = 2
@zzzdh.visible = false
@wait_count = 2
@lkyx.visible = true
end
end
end
end

复制代码