发现不少游戏有音乐鉴赏功能!

IamI

简陋吧，简陋吧，尽情的简陋吧！！！{/gg}

1. class Scene_Music
   
2.   #--------------------------------------------------------------------------
   
3.   # ● 主处理
   
4.   #--------------------------------------------------------------------------
   
5.   def main
   
6.     # 生成命令窗口
   
7.     s1 = "music1"
   
8.     s2 = "music2"
   
9.     s3 = "music3"
   
10.     s4 = "music4"
    
11.     @command_window = Window_Command.new(192, [s1, s2, s3,s4])
    
12.     @command_window.x = 320 - @command_window.width / 2
    
13.     @command_window.y = 240 - @command_window.height / 2
    
14.     @musicname = ["001-Battle01","002-Battle02","003-Battle03","004-Battle04"]
    
15.     Graphics.transition
    
16.     loop do
    
17.       Graphics.update
    
18.       Input.update
    
19.       update
    
20.       if $scene != self
    
21.         break
    
22.       end
    
23.     end
    
24.     Graphics.freeze
    
25.     @command_window.dispose
    
26.     if $scene.is_a?(Scene_Title)
    
27.       Graphics.transition
    
28.       Graphics.freeze
    
29.     end
    
30.   end
    
31.   #--------------------------------------------------------------------------
    
32.   # ● 刷新画面
    
33.   #--------------------------------------------------------------------------
    
34.   def update
    
35.     @command_window.update
    
36.     # 按下 B 键的情况下
    
37.     if Input.trigger?(Input::B)
    
38.       $game_system.se_play($data_system.cancel_se)
    
39.       $scene = Scene_Title.new
    
40.       return
    
41.     end
    
42.     # 按下 C 键的场合下
    
43.     if Input.trigger?(Input::C)
    
44.       # 命令窗口光标位置分支
    
45.       name = "Audio/BGM/" + @musicname[@command_window.index]
    
46.       Audio.bgm_play(name)
    
47.       return
    
48.     end
    
49.   end
    
50. end
    

复制代码

呼叫方法$scene = Scene_Music.new
返回界面为开始界面

---

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

dbshy

以下引用IamI于2008-8-11 12:31:54的发言：

简陋吧，简陋吧，尽情的简陋吧！！！
class Scene_Music
  #--------------------------------------------------------------------------
  # ● 主处理
  #--------------------------------------------------------------------------
  def main
    # 生成命令窗口
    s1 = "music1"
    s2 = "music2"
    s3 = "music3"
    s4 = "music4"
    @command_window = Window_Command.new(192, [s1, s2, s3,s4])
    @command_window.x = 320 - @command_window.width / 2
    @command_window.y = 240 - @command_window.height / 2
    @musicname = ["001-Battle01","002-Battle02","003-Battle03","004-Battle04"]
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @command_window.dispose
    if $scene.is_a?(Scene_Title)
      Graphics.transition
      Graphics.freeze
    end
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面
  #--------------------------------------------------------------------------
  def update
    @command_window.update
    # 按下 B 键的情况下
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      $scene = Scene_Title.new
      return
    end
    # 按下 C 键的场合下
    if Input.trigger?(Input::C)
      # 命令窗口光标位置分支
      name = "Audio/BGM/" + @musicname[@command_window.index]
      Audio.bgm_play(name)
      return
    end
  end
end


呼叫方法$scene = Scene_Music.new
返回界面为开始界面

这个还真简陋 ORZ

其实大道至简啊

LZ去主站看看吧,好象有

IamI

我坦白吧，这是我拷贝Scene_End改的
恩，把猎人的拖来
http://rpg.blue/web/htm/news837.htm

dbshy

以下引用铃铃于2008-8-11 12:14:38的发言：
　
刚才在主站上找了找!发现了一个很好看的!可惜,作者申明不能使用.只能做为参考.而自己又刚接触不太了解.有什么简单的方法可以做到吗?

没注意到

还是用IAMI的吧,大道至简
只要能实现效果就是好的