Project1
标题:
恩,选择音乐播放系统
[打印本页]
作者:
退屈£无聊
时间:
2010-10-6 13:42
标题:
恩,选择音乐播放系统
本帖最后由 退屈£无聊 于 2010-10-7 17:07 编辑
应该对于大家都能够使用自如吧- - 我就不多说了。
#-------------------------------------------------------------------------------
# ·音乐选择播放器 By 退屈£无聊
#-------------------------------------------------------------------------------
# 呃。无聊写个东西玩先。 Update V1.02
# 介绍说明。音乐的设置格式 @music* = [名称,文件名, 简介],注意文字要加引号!
# 加了歌的话,在调用choose_music也要注意了。
# 相信也应该制作完成了吧。没有BUG了吧-0-。
$是否退出关闭音乐 = true
#-------------------------------------------------------------------------------
class Scene_Music
#===================================================
# ·主过程
#===================================================
def main
@music1 = [名称,文件名, 简介]
@music2 = [名称,文件名, 简介]
@music3 = [名称,文件名, 简介]
@music_command = Window_Command.new(200, [@music1[0], @music2[0], @music3[0]])
@music_command.x = 0
@music_command.y = 0
@music_command.opacity = 150
@music_command.z = 9999
@help_window = Window_MusicHelp.new
@help_window.x = 200
@help_window.y = 0
@help_window.width = 440
@help_window.height = 480
@help_window.opacity = 150
@help_window.z = 9999
# 执行过渡
Graphics.transition
# 主循环
loop do
# 刷新游戏画面
Graphics.update
# 刷新输入信息
Input.update
# 刷新画面
choose_music([@music1, @music2, @music3]) # 音乐如果有填加,不要忘了在这里填加!
# 如果画面被切换的话就中断循环
if $scene != self
break
end
end
# 准备过渡
Graphics.freeze
# 释放窗口
@music_command.dispose
@help_window.dispose
end
#==========================================================================
# ·选歌过程
#==========================================================================
def choose_music(music)
@music_command.update
@help_window.update
@musicfile = music
if Input.trigger?(Input::B)
$scene = Scene_Map.new
if $是否退出关闭音乐
$game_map.autoplay
end
end
if Input.trigger?(Input::C)
@music_name = "#{@musicfile[@music_command.index][1]}"
Audio.bgm_play("Audio/BGM/" + @music_name , 84, 0)
end
@help_window.draw_music("#{@musicfile[@music_command.index][2]}")
end
#===========================透明部分==================================
module XRXS_MP7_Module
def create_spriteset
@spriteset = Spriteset_Map.new
end
def dispose_spriteset
@spriteset.dispose
end
end
include XRXS_MP7_Module
alias xrxs_mp7_main main
def main
create_spriteset
xrxs_mp7_main
dispose_spriteset
end
#=========不需要的删到这里为止======================
end
#==============================================================================
# ■ Window_Music
#------------------------------------------------------------------------------
# 音乐简介显示窗口。
#==============================================================================
class Window_MusicHelp < Window_Base
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
super(240, 0, 400, 480)
self.contents = Bitmap.new(self.width - 32, self.height - 32)
end
#--------------------------------------------------------------------------
# ● 描绘音乐
#--------------------------------------------------------------------------
def draw_music(music)
self.contents.clear
# 记录文字x坐标
x = 0
# 记录文字y坐标
y = 0
# 记录换行时y坐标最小加值
min_y = 0
self.contents.font.color = normal_color
# 描绘音乐简介
text = music
# 限制文字处理
begin
last_text = text.clone
text.gsub!(/\\[Vv]\[([0-9]+)\]/) { $game_variables[$1.to_i] }
end until text == last_text
text.gsub!(/\\[Nn]\[([0-9]+)\]/) do
$game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
end
# c 获取 1 个字 (如果不能取得文字就循环)
while ((c = text.slice!(/./m)) != nil)
# 另起一行文字的情况下
if c == "\n"
y += [32, min_y].max
min_y = 0
x = 0
# 下面的文字
next
end
# 自动换行处理
if x + self.contents.text_size(c).width > self.contents.width
y += [32, min_y].max
min_y = 0
x = 0
end
# 描绘文字
self.contents.draw_text(4 + x, y, 40, 32, c)
# x 为要描绘文字的加法运算
x += self.contents.text_size(c).width
end
end
end
复制代码
恩,别忘了把我默认写的东西改成你自己的哟。
作者:
后知后觉
时间:
2010-10-7 11:04
用一个会被保存到存档里的数组变量来装载你的这些
@music1 @music2 @music3 ....
那么就可以在游戏运行的时候对这个数组里的东西进行添加.
在这个 Scene 里用 循环来获取这个数组里的所有东西.
这样可能会比固定的只有3个或X个更好.
这样就可以使用物品调用公共事件设置这个数组(设置音乐CD).
可以做个像某某游戏的某主角收集古董那样的收集音乐CD的效果.
不过有一点就是.放太多这类的音乐文件的话.游戏体积会猛增.
作者:
小鱼子
时间:
2010-10-7 11:20
应该是原创发布
作者:
火ZHI意志
时间:
2010-10-7 11:49
我正需要这个 谢谢LZ
作者:
鬼小1
时间:
2010-10-7 13:25
提示:
作者被禁止或删除 内容自动屏蔽
作者:
火ZHI意志
时间:
2010-10-7 17:21
问一下LZ 为什么最大只能播放8个音乐 超过8个就提示错误
作者:
为她拔刀
时间:
2010-10-8 16:03
提示:
作者被禁止或删除 内容自动屏蔽
作者:
退屈£无聊
时间:
2010-10-9 17:11
回复
火ZHI意志
的帖子
问一下,39行填加过了吗.?
或者是@music..设置无误?
如果真有此BUG,我周日去修复.谢谢你的反馈!
作者:
火ZHI意志
时间:
2010-10-9 21:20
不好意思 39行的“@music9” 我漏了一个“c ” …………
作者:
RPG之草泥马
时间:
2011-10-5 11:56
本帖最后由 RPG之草泥马 于 2011-10-5 11:57 编辑
主要不会召唤界面,请教lz了
作者:
ChaseDEasy
时间:
2011-10-5 13:42
我是新手,想给女朋友做一个特色音乐播放器作生日礼物(10·08)。楼主,或者谁能告诉我这个怎么用么?感激不尽啊。。。
ChaseDEasy于2011-10-5 14:27补充以下内容:
最好能附送一个工程,谢谢各位了。。。真的急需啊~~~好人一生平安。下辈子也平安。
作者:
1742
时间:
2012-2-18 15:25
怎么打开?
作者:
fyfuture
时间:
2012-2-19 22:12
受教了,自己努力学习中。
作者:
657282177
时间:
2012-2-29 19:05
分享一下
欢迎光临 Project1 (https://rpg.blue/)
Powered by Discuz! X3.1