【醒目】话说我写了几个脚本，想做整合，行否？ - Project1

#===========================================================================#
# *简易版华丽标题画面* #
# by.小y #
#---------------------------------------------------------------------------#
# ■ 简介 #
# 自由设置标题画面的背景、选项排版、网页链接等。使默认的标题画面 #
# 也变得十分华丽！ #
# ■ 功能 #
# 可以自由添加选项，支持增加友情链接等选项。并且可以更改标题画面 #
# 图片的路名称，此外，还可以调整快速调整选项的透明度与位置。 #
# ■ 使用方法 #
# 将此脚本插入Main之上，并在Graphics\system文件夹中放入标题画面图。 #
# 标题画面图名称为“标题画面”。此外还可以在18行、33行、50行进行设置。 #
#---------------------------------------------------------------------------#
# ◎部分设定
#-----------------------
module Vocab
# 定义打开网页的选项的名称。
Titlecommand = " ６Ｒ网站"
end
class Scene_Title < Scene_Base
def update
super
@command_window.update
if Input.trigger?(Input::C)
case @command_window.index
when 0
command_new_game
when 1
command_continue
when 2
a =
Win32API.new('shell32.dll','ShellExecuteA',%w(p p p p p i),'i')
a.call(0, 'open','www.66rpg.com',0, 0, 1) # 打开的网址链接设置。
# 认为66RPG主站。
when 3
command_shutdown
end
end
end
def create_title_graphic
[url=home.php?mod=space&uid=114926]@sprite[/url] = Sprite.new
@sprite.bitmap = Cache.system("标题画面")
end
def create_command_window
s1 = Vocab::new_game
s2 = Vocab::continue
s3 = Vocab::Titlecommand
s4 = Vocab::shutdown
@command_window = Window_Command.new(172, [s1, s2, s3, s4])
@command_window.opacity = 0 #这里设置选项的不透明度
@command_window.x = (880 - @command_window.width) / 2
@command_window.y = 268
if @continue_enabled
@command_window.index = 1
else
@command_window.draw_item(1, false)
end
@command_window.openness = 0
@command_window.open
end
end

复制代码