赞 | 0 |
VIP | 5 |
好人卡 | 0 |
积分 | 1 |
经验 | 2640 |
最后登录 | 2013-12-18 |
在线时间 | 9 小时 |
Lv1.梦旅人 无月的荒城
- 梦石
- 0
- 星屑
- 50
- 在线时间
- 9 小时
- 注册时间
- 2007-12-20
- 帖子
- 2004
|
2楼

楼主 |
发表于 2008-1-20 19:13:53
|
只看该作者
脚本具体内容:
#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================
#--------------------------------------------------------------------------
# 开始菜单前加入图片
# 作者 : 擇
#--------------------------------------------------------------------------
class Scene_logo
#--------------------------------------------------------------------------
# ● 住处理
#--------------------------------------------------------------------------
def main
# 播放LOGO音效
Audio.se_play("Audio/SE/079-Monster01.ogg")
# 生成标题图形
@sprite = Sprite.new
@sprite.bitmap = RPG::Cache.title("001-Title01")
# 生成位置为画面中央
@sprite.x = (640 - @sprite.bitmap.width) / 2
@sprite.y = (480 - @sprite.bitmap.height) / 2
# 透明度(0为完全透明)
@sprite.opacity = 255
# 执行过渡
Graphics.transition
# 主循环
loop do
# 刷新游戏画面
Graphics.update
# 刷新输入信息
Input.update
# 刷新画面
update
# 如果画面被切换就中断循环
if $scene != self
break
end
end
# 装备过渡
Graphics.freeze
# 释放标题图形
@sprite.bitmap.dispose
@sprite.dispose
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
# 按下 A,B,C,下,上,左,右 键的情况下
if Input.trigger?(Input::A)
refresh
end
if Input.trigger?(Input::B)
refresh
end
if Input.trigger?(Input::C)
refresh
end
if Input.trigger?(Input::DOWN)
refresh
end
if Input.trigger?(Input::UP)
refresh
end
if Input.trigger?(Input::RIGHT)
refresh
end
if Input.trigger?(Input::LEFT)
refresh
end
def refresh
$scene = Scene_Title.new
Audio.se_stop
end
end
end
#==============================================================================
# ■ Main
#------------------------------------------------------------------------------
# 各定义结束后、从这里开始实际处理。
#==============================================================================
begin
# 准备过渡
# 设置系统默认字体
Font.default_name = (["黑体"])
Graphics.freeze
# 生成场景对像 (标题画面)
$scene = Scene_logo.new
# $scene 为有效的情况下调用 main 过程
while $scene != nil
$scene.main
end
# 淡入淡出
Graphics.transition(20)
rescue Errno::ENOENT
# 补充 Errn:ENOENT 以外错误
# 无法打开文件的情况下、显示信息后结束
filename = $!.message.sub("No such file or directory - ", "")
print("找不到文件 #{filename}。 ")
end
#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================
|
|