超华丽视觉 频谱！音频增强模块 Bass For RMXP!支持音频ogg wma!

じ☆ve冰风

下了 没一个顶的 ！ 我晕

1. #==============================================================================# ■ Graphics#------------------------------------------------------------------------------# 　 重新定义Graphics 防止当机! 重要!#==============================================================================class __ "\000\000\000\000\000\000\360?"#     sparc (IEEE754 双精度 大Endian):##     [1.0].pack("d") => "?\360\000\000\000\000\000\000"    if fftval=256      fftval = BASS_DATA_FFT256    elsif fftval=512      fftval = BASS_DATA_FFT512    elsif fftval=1024 # 眼睛开始花了!      fftval = BASS_DATA_FFT1024    elsif fftval=2048      fftval = BASS_DATA_FFT2048    elsif fftval=4096      fftval = BASS_DATA_FFT4096    elsif fftval=8192      fftval = BASS_DATA_FFT8192    else      return nil    end    fft = Win32API.new("bass.dll","BASS_ChannelGetData",'ipi','i')    fft.call(@stream,@fft_p,fftval)     return @fft_p  end  #--------------------------------------------------------------------------  # ● 解开包  #--------------------------------------------------------------------------  def getpack(no=4)    return getfftdata.unpack("d"+no.to_s)  end  #--------------------------------------------------------------------------  # ● 暂停播放  #--------------------------------------------------------------------------  def pause    act=Win32API.new("bass.dll","BASS_ChannelPause",'i','i')    act.call(@stream)  end  #--------------------------------------------------------------------------  # ● 恢复播放  #--------------------------------------------------------------------------  def recovery    play = Win32API.new("bass.dll","BASS_ChannelPlay",'ii','i')    play.call(@stream,0)  end  #--------------------------------------------------------------------------  # ● 停止播放  #--------------------------------------------------------------------------  def stop    stop = Win32API.new("bass.dll","BASS_ChannelStop",'i','i')    stop.call(@stream)  end  #--------------------------------------------------------------------------  # ● 取播放状态  #--------------------------------------------------------------------------  def getstatus    active = Win32API.new("bass.dll","BASS_ChannelIsActive",'i','i')    return active.call(@stream)  end  #--------------------------------------------------------------------------  # ● 取播放状态文本  #--------------------------------------------------------------------------  def getstatusstr    active = Win32API.new("bass.dll","BASS_ChannelIsActive",'i','i')    string = "未知状态"    case active.call(@stream)    when 0      string ="停止播放"    when 1      string ="正在播放"    when 2      string ="等待播放"    when 3      string ="暂停播放"    end    return string  end  #--------------------------------------------------------------------------  # ● 前进后退  #--------------------------------------------------------------------------  def seek(pos=0)    setpos = Win32API.new("AuxiliaryLib.dll","seek",'ii','v')    setpos.call(@stream,pos)  end  #--------------------------------------------------------------------------  # ● 置音量  #--------------------------------------------------------------------------  def setvol(vol=100)    setvol = Win32API.new("AuxiliaryLib.dll","SetVol",'ii','v')    setvol.call(@stream,vol)  end  #--------------------------------------------------------------------------  # ● 取音量  #--------------------------------------------------------------------------  def getvol    getvol = Win32API.new("AuxiliaryLib.dll","GetVol",'i','i')    return getvol.call(@stream)  end  #--------------------------------------------------------------------------  # ● 置播放位置  #--------------------------------------------------------------------------  def seek_to(pos = 0)    to = Win32API.new("AuxiliaryLib.dll","To",'ii','v')    getvol.call(@stream,to)  endend复制代码

复制代码

附件下 由于 Music 都是 流行歌曲 而且 3种格式 mp3 wma ogg 所以包 比较大!
版务...附件上不上...上千脑了 ...
下载地址:http://down.qiannao.com/space/fi ... /Project1.rar/.page
             本帖来自P1论坛作者kula1900，因Project1站服务器在国外有时候访问缓慢不方便作者交流学习，经联系P1站长fux2同意署名转载一起分享游戏制作经验，共同为国内独立游戏作者共同创造良好交流环境，原文地址：https://rpg.blue/forum.php?mod=viewthread&tid=163102  若有侵权，发帖作者可联系底部站长QQ在线咨询功能删除，谢谢。