请问这种BGM的播放效果如何实现？

怪蜀黍

假设：1、某BGM为非midi格式，或者说它是wma格式；2、BGM由前奏A（0至5秒）和主体B（5至60秒）组成。
问题：怎么实现先播放一次前奏A，接着无间断地重复播放主体B？
通俗地说就是要以下这种伪代码的效果：

1. begin
   
2.   播放0秒至5秒
   
3.   loop do
   
4.     播放5秒至60秒
   
5.   end
   
6. end

复制代码

月夜神音

1. # MP3ループ演奏 Ver VX_1.00
   
2. # 配布元・サポートURL
   
3. # http://members.jcom.home.ne.jp/cogwheel/
   
4. 
   
5. #==============================================================================
   
6. # ■ RPG
   
7. #------------------------------------------------------------------------------
   
8. # 　RPG全体のモジュールです。
   
9. #==============================================================================
   
10. 
    
11. module RPG
    
12. #==============================================================================
    
13. # ■ BGM
    
14. #------------------------------------------------------------------------------
    
15. # 　BGM を管理・制御するクラスです。
    
16. #==============================================================================
    
17. 
    
18.   class BGM < AudioFile
    
19.     @@last = BGM.new
    
20.     #--------------------------------------------------------------------------
    
21.     # ● BGM の演奏
    
22.     #--------------------------------------------------------------------------
    
23.     def play
    
24.       if @name.empty?
    
25.         Audio.bgm_stop
    
26.         @@last = BGM.new
    
27.       else
    
28.         name = "Audio/BGM/"
    
29.         start = 0
    
30.         loop = 0
    
31.         step = [0, 0]
    
32.         fin = 0
    
33.         case @name
    
34.         when "satoc-boss09-2"
    
35.           type = "Battle"
    
36.           start = 0
    
37.           loop = 96040
    
38.           fin = 202680
    
39.         when "satoc-town07-2"
    
40.           type = "Dungeon"
    
41.           start = 0
    
42.           loop = 31980
    
43.           fin = 100000
    
44.         else
    
45.           type = "Normal"
    
46.         end
    
47.         if type == "Normal"
    
48.           name = @name
    
49.         else
    
50.           name = $game_audio.name?("Audio/BGM/" + @name)
    
51.         end
    
52.         $game_audio.bgm_play(name, @volume, @pitch, type, start, loop, fin)
    
53.         @@last = self
    
54.       end
    
55.     end
    
56.     #--------------------------------------------------------------------------
    
57.     # ● BGM の演奏停止
    
58.     #--------------------------------------------------------------------------
    
59.     def self.stop
    
60.       $game_audio.bgm_stop
    
61.       @@last = BGM.new
    
62.     end
    
63.     #--------------------------------------------------------------------------
    
64.     # ● BGM のフェードアウト
    
65.     #--------------------------------------------------------------------------
    
66.     def self.fade(time)
    
67.       $game_audio.fadeout_set(time)
    
68.       @@last = BGM.new
    
69.     end
    
70.   end
    
71. 
    
72. #==============================================================================
    
73. # ■ ME
    
74. #------------------------------------------------------------------------------
    
75. # 　ME を管理・制御するクラスです。
    
76. #==============================================================================
    
77. 
    
78.   class ME < AudioFile
    
79.     #--------------------------------------------------------------------------
    
80.     # ● ME の演奏
    
81.     #--------------------------------------------------------------------------
    
82.     def play
    
83.       if @name.empty?
    
84.         Audio.me_stop
    
85.       else
    
86.         Audio.me_play("Audio/ME/" + @name, @volume, @pitch)
    
87.       end
    
88.       $game_audio.me_set("Audio/ME/" + @name)
    
89.     end
    
90.     #--------------------------------------------------------------------------
    
91.     # ● ME の演奏停止
    
92.     #--------------------------------------------------------------------------
    
93.     def self.stop
    
94.       Audio.me_stop
    
95.       $game_audio.mecount_set(1)
    
96.     end
    
97.     #--------------------------------------------------------------------------
    
98.     # ● ME のフェードアウト
    
99.     #--------------------------------------------------------------------------
    
100.     def self.fade(time)
     
101.       Audio.me_fade(time)
     
102.       $game_audio.mecount_set(time * Graphics.frame_rate / 1000)
     
103.     end
     
104.   end
     
105. end
     
106. 
     
107. #==============================================================================
     
108. # ■ Scene_Map
     
109. #------------------------------------------------------------------------------
     
110. # 　マップ画面の処理を行うクラスです。
     
111. #==============================================================================
     
112. 
     
113. class Scene_Map < Scene_Base
     
114.   #--------------------------------------------------------------------------
     
115.   # ● バトル画面への切り替え
     
116.   #--------------------------------------------------------------------------
     
117.   def call_battle
     
118.     @spriteset.update
     
119.     Graphics.update
     
120.     $game_player.make_encounter_count
     
121.     $game_player.straighten
     
122.     $game_temp.map_bgm = RPG::BGM.last
     
123.     $game_temp.map_bgs = RPG::BGS.last
     
124.     # RPG::BGM.stop
     
125.     RPG::BGS.stop
     
126.     Sound.play_battle_start
     
127.     $game_system.battle_bgm.play
     
128.     $game_temp.next_scene = nil
     
129.     $scene = Scene_Battle.new
     
130.   end
     
131. end
     
132. 
     
133. #==============================================================================
     
134. # ■ Game_Audio
     
135. #------------------------------------------------------------------------------
     
136. # 　MP3の演奏・その他BGMの演奏全般を司るクラスです。
     
137. # MP3の途中ループ等に対応します。
     
138. #==============================================================================
     
139. 
     
140. class Game_Audio
     
141.   #--------------------------------------------------------------------------
     
142.   # ● オブジェクト初期化
     
143.   #--------------------------------------------------------------------------
     
144.   def initialize
     
145.     @play = Win32API.new("winmm.dll", "mciSendString", ["p","p","l","l"], "i")
     
146.     @play.call("Close all", "\0" * 255, 255, 0)
     
147.     @type = "Normal"
     
148.     @me_count = 0
     
149.     fadein_set(0)
     
150.   end
     
151.   #--------------------------------------------------------------------------
     
152.   # ● BGM の演奏
     
153.   #     name       : BGM ネーム
     
154.   #     vol        : ボリューム
     
155.   #     pitch      : ピッチ
     
156.   #     type       : BGM タイプ
     
157.   #     start      : 演奏開始位置
     
158.   #     loop       : 演奏ループ時開始位置
     
159.   #     fin        : 演奏ループ終了位置
     
160.   #--------------------------------------------------------------------------
     
161.   def bgm_play(name, vol, pitch, type, start, loop, fin)
     
162.     fadein_set(0)
     
163.     if type == "Normal"
     
164.       bgm_stop(type) if @name != name
     
165.       Audio.bgm_play("Audio/BGM/" + name, vol, 100) if name != ""
     
166.     elsif @name != name
     
167.       bgm_stop(type)
     
168.       status = "\0" * 255
     
169.       @play.call("Status " + type + " mode", status, 255, 0)
     
170.       if status.unpack("A*")[0] == "paused"
     
171.         @play.call("Setaudio " + type + " volume to 0", "\0" * 255, 255, 0)
     
172.         @play.call("Play " + type, "\0" * 255, 255, 0)
     
173.         fadein_set(1000)
     
174.       else
     
175.         @play.call("Open " + name + " alias " + type + " type MPEGVideo",
     
176.           "\0" * 255, 255, 0)
     
177.         @play.call("Setaudio " + type + " volume to " +
     
178.           (vol ** 2 / 10).to_s, "\0" * 255, 255, 0)
     
179.         @play.call("Play " + type + " from " +
     
180.           start.to_s + " to " + fin.to_s, "\0" * 255, 255, 0)
     
181.       end
     
182.       if @me_count > 0
     
183.         fadein_set(0)
     
184.         @play.call("Setaudio " + type + " volume to 0", "\0" * 255, 255, 0)
     
185.       end
     
186.     else
     
187.       if @me_count > 0
     
188.         @play.call("Setaudio " + type + " volume to 0", "\0" * 255, 255, 0)
     
189.       else
     
190.         @play.call("Setaudio " + type + " volume to " +
     
191.           (vol ** 2 / 10).to_s, "\0" * 255, 255, 0)
     
192.       end
     
193.     end
     
194.     @name = name
     
195.     @type = type
     
196.     @vol = vol
     
197.     @start = start
     
198.     @loop = loop
     
199.     @fin = fin
     
200.   end
     
201.   #--------------------------------------------------------------------------
     
202.   # ● ファイルネームの取得
     
203.   #--------------------------------------------------------------------------
     
204.   def name?(name)
     
205.     if FileTest.exist?(name + ".mp3")
     
206.       return (name + ".mp3")
     
207.     elsif FileTest.exist?(name + ".ogg")
     
208.       return (name + ".ogg")
     
209.     elsif FileTest.exist?(name + ".wav")
     
210.       return (name + ".wav")
     
211.     elsif FileTest.exist?(name + ".mid")
     
212.       return (name + ".mid")
     
213.     end
     
214.     return "name"
     
215.   end
     
216.   #--------------------------------------------------------------------------
     
217.   # ● フェードイン
     
218.   #--------------------------------------------------------------------------
     
219.   def fadein(time)
     
220.     fadein_set(time * 1000)
     
221.   end
     
222.   #--------------------------------------------------------------------------
     
223.   # ● フェードインの設定
     
224.   #--------------------------------------------------------------------------
     
225.   def fadein_set(time)
     
226.     @fade_max = @fade_count = time * Graphics.frame_rate / 1000
     
227.   end
     
228.   #--------------------------------------------------------------------------
     
229.   # ● フェードアウトの設定
     
230.   #--------------------------------------------------------------------------
     
231.   def fadeout_set(time)
     
232.     if @type == "Normal"
     
233.       Audio.bgm_fade(time)
     
234.     else
     
235.       if @fade_count == 0
     
236.         @fade_max = time * Graphics.frame_rate / 1000
     
237.         @fade_count = - time * Graphics.frame_rate / 1000
     
238.       elsif @fade_count > 0
     
239.         @fade_max = (time * @fade_max * Graphics.frame_rate) /
     
240.           (1000 * (@fade_max - @fade_count))
     
241.         @fade_count = - time * Graphics.frame_rate / 1000
     
242.       else
     
243.         @fade_max = - (time * @fade_max * Graphics.frame_rate) /
     
244.           (1000 * @fade_count)
     
245.         @fade_count = - time * Graphics.frame_rate / 1000
     
246.       end
     
247.     end
     
248.   end
     
249.   #--------------------------------------------------------------------------
     
250.   # ● 演奏の停止
     
251.   #--------------------------------------------------------------------------
     
252.   def bgm_stop(type = "")
     
253.     if @type == "Dungeon" and type == "Battle"
     
254.       @play.call("Pause " + @type, "\0" * 255, 255, 0)
     
255.     else
     
256.       if @type == "Normal"
     
257.         Audio.bgm_stop
     
258.       else
     
259.         @play.call("Stop " + @type, "\0" * 255, 255, 0)
     
260.         @play.call("Close " + @type, "\0" * 255, 255, 0)
     
261.       end
     
262.     end
     
263.     @type = "Normal"
     
264.   end
     
265.   #--------------------------------------------------------------------------
     
266.   # ● ME 演奏の設定
     
267.   #--------------------------------------------------------------------------
     
268.   def me_set(name)
     
269.     # 現在のBGMが Normal でないのなら
     
270.     if @type != "Normal"
     
271.       # BGM 演奏の停止
     
272.       @play.call("Setaudio " + @type + " volume to 0", "\0" * 255, 255, 0)
     
273.     end
     
274.     # ME 演奏長の取得
     
275.     @play.call("Open " + name?(name) + " alias me type MPEGVideo",
     
276.        "\0" * 255, 255, 0)
     
277.     length = "\0" * 255
     
278.     @play.call("Status me length", length, 255, 0)
     
279.     # ME カウントの設定
     
280.     @me_count = length.unpack("A*")[0].to_i * 60 / 1000 - 90
     
281.   end
     
282.   #--------------------------------------------------------------------------
     
283.   # ● ME 演奏の直接指定
     
284.   #--------------------------------------------------------------------------
     
285.   def mecount_set(time)
     
286.     @me_count = time
     
287.   end
     
288.   #--------------------------------------------------------------------------
     
289.   # ● フレーム更新
     
290.   #--------------------------------------------------------------------------
     
291.   def update
     
292.     if @type != "Normal"
     
293.       code = "\0" * 255
     
294.       @play.call("Status " + @type + " position", code, 255, 0)
     
295.       if code.unpack("A*")[0].to_i >= @fin
     
296.         @play.call("Seek " + @type + " to " + @loop.to_s, "\0" * 255, 255, 0)
     
297.         @play.call("Play " + @type + " to " + @fin.to_s, "\0" * 255, 255, 0)
     
298.       end
     
299.       if @fade_count > 0
     
300.         @fade_count -= 1
     
301.         @play.call("Setaudio " + @type + " volume to " +
     
302.           ((@vol * (@fade_max - @fade_count) / @fade_max) ** 2 / 10).to_s,
     
303.           "\0" * 255, 255, 0)
     
304.       elsif @fade_count < 0
     
305.         @fade_count += 1
     
306.         @play.call("Setaudio " + @type + " volume to " +
     
307.           ((- @vol * @fade_count / @fade_max) ** 2 / 10).to_s,
     
308.           "\0" * 255, 255, 0)
     
309.       end
     
310.     end
     
311.     if @me_count > 0
     
312.       @me_count -= 1
     
313.       if @type != "Normal" and @me_count == 0
     
314.         fadein_set(1000)
     
315.       end
     
316.     end
     
317.   end
     
318. end
     
319. 
     
320. #==============================================================================
     
321. # ■ オーディオクラスの強制作成
     
322. #==============================================================================
     
323. 
     
324. if $game_audio == nil
     
325.   $game_audio = Game_Audio.new
     
326. end
     
327. 
     
328. #==============================================================================
     
329. # ■ Graphics
     
330. #------------------------------------------------------------------------------
     
331. # 　グラフィック全般の処理を行うクラスです。
     
332. #==============================================================================
     
333. 
     
334. class << Graphics
     
335.   #--------------------------------------------------------------------------
     
336.   # ● フレーム更新
     
337.   #--------------------------------------------------------------------------
     
338.   alias :update_audio :update unless method_defined?("update_audio")
     
339.   def update
     
340.     update_audio
     
341.     $game_audio.update
     
342.   end
     
343. end

复制代码

修改33~55行
when后面为音乐名称，目前好像只对mp3,ogg,wav,mid有效
type为类型，分别是"Normal"，"Dungeon"和"Battle"
start为开始时音乐桢数
loop为开始循环音乐桢数
fin为结束时音乐桢数
演奏方法是："start"～"fin"→"loop"～"fin"→"loop"～…持续下去
就这样……
脚本作者：ショウ - 月夜に響くノクターン Rebirth
出处：http://members.jcom.home.ne.jp/cogwheel/

怪蜀黍

感谢你，问题基本解决了！可是这个脚本有个问题，就是只支持英文或数字名称的BGM，不支持中文名称的BGM。不知道怎么改才能支持中文名称的BGM？