Ruby Quellcode

#==============================================================================
# ** Audio
#------------------------------------------------------------------------------
#  Please note that this will play .SPC files ONLY IN GAME, not in the player.
#  As I was checking the RMXP.net forums for scripts, I stumbled upon a script 
#  that allowed the use of .PSF files and the like in RMXP games. I thought, 
#  what a great idea, but it doesn't allow the use of the best format, .SPC, 
#  aka music from SNES games. So, I modded around with it and this is what I 
#  came up with:
#
#  (Note, you will need to make a folder with your project called DLL and it 
#  will need to contain 4 Winamp Plugins, Winamp.dll, in_snes.dll, 
#  out_wave.dll, and snesapu.dll.)
#  
#  (Also note, this will ONLY play .SPC files in your game, and naturally, you 
#  will need to manually add the .SPC files to your audio folder.)
#  
#  Make sure to put this as a new script above main.
#==============================================================================
 
module Audio
  #==========================================================================
  # ** Winamp
  #==========================================================================
  class Winamp
    #------------------------------------------------------------------------
    # * initialize
    #------------------------------------------------------------------------
    def initialize
      in_dll = 'DLL\in_snes.dll'
      out_dll = 'DLL\out_wave.dll'
      winamp_dll = 'DLL\Winamp.dll'
      @ReadIni = Win32API.new('kernel32', 'GetPrivateProfileStringA', 'PPPPLP', 'L')
      @FindWindow = Win32API.new('user32', 'FindWindowA', 'PP', 'L')
      @Init_Winamp = Win32API.new(winamp_dll, 'Init_Winamp', 'PPL', 'L')
      @Winamp_Play = Win32API.new(winamp_dll, 'Winamp_Play', 'P', 'L')
      @Winamp_Pause = Win32API.new(winamp_dll, 'Winamp_Pause', '', '')
      @Winamp_Stop = Win32API.new(winamp_dll, 'Winamp_Stop', '', 'L')
      @Winamp_IsPlaying = Win32API.new(winamp_dll, 'Winamp_IsPlaying', '', 'L')
      @Winamp_GetFileInfo = Win32API.new(winamp_dll, 'Winamp_GetFileInfo', 'PL', 'P')
      @Winamp_SetVolume = Win32API.new(winamp_dll, 'Winamp_SetVolume', 'L', '')
      @Winamp_IsPaused = Win32API.new(winamp_dll, 'Winamp_IsPaused', '', 'L')
      @Init_Winamp.call(in_dll, out_dll, setup)
    end
    def play(file)
      return @Winamp_Play.call(file)
    end
    def pause
      @Winamp_Pause.call()
    end
    def stop
      return @Winamp_Stop.call()
    end
    def is_playing?
      return @Winamp_IsPlaying.call()
    end
    def get_file_info(playfile, length_adr)
      return @Winamp_GetFileInfo.call(playfile, length_adr)
    end
    def set_volume(volume)
      @Winamp_SetVolume.call(volume)
    end
    def is_paused?
      return @Winamp_IsPaused.call()
    end
    def setup
      entry = "\0" * 255
      @ReadIni.call('Game', 'Title', '', entry, 255, ".\\Game.ini")
      return @FindWindow.call('RGSS Player', entry.delete("\0"))
    end
  end
  #--------------------------------------------------------------------------
  # * define constant
  #--------------------------------------------------------------------------
  WINAMP = Winamp.new
  #--------------------------------------------------------------------------
  # * Audio.spc_play(filename, [volume])
  #--------------------------------------------------------------------------
  def self.spc_play(filename, volume = 255)
    for extension in ['.spc']
      if FileTest.exist?(filename + extension)
        filename = filename + extension
        break
      end
    end
    WINAMP.play(filename)
    WINAMP.set_volume(volume)
  end
  #--------------------------------------------------------------------------
  # * Audio.spc_playing?
  #--------------------------------------------------------------------------
  def self.spc_playing?
    if WINAMP.is_playing? == 0
      return false
    else
      return true
    end
  end
  #--------------------------------------------------------------------------
  # * Audio.spc_pause
  #--------------------------------------------------------------------------
  def self.spc_pause
    WINAMP.pause
  end
  #--------------------------------------------------------------------------
  # * Audio.spc_paused?
  #--------------------------------------------------------------------------
  def self.spc_paused?
    if WINAMP.is_paused? == 0
      return false
    else
      return true
    end
  end
  #--------------------------------------------------------------------------
  # * Audio.spc_stop
  #--------------------------------------------------------------------------
  def self.spc_stop
    WINAMP.stop
  end
end
 
#==============================================================================
# ** Game_System
#------------------------------------------------------------------------------
# Changes added to the bgm_play and bgm_stop functions.
#==============================================================================
 
class Game_System
  #--------------------------------------------------------------------------
  # * Play Back Ground Music
  #--------------------------------------------------------------------------
  def bgm_play(bgm)
    @playing_bgm = bgm
    if bgm != nil and bgm.name != ""
      Audio.bgm_play("Audio/BGM/" + bgm.name, bgm.volume * 1.5, bgm.pitch)
      Audio.spc_play("Audio/BGM/" + bgm.name, bgm.volume * 1.5)      
    else
      Audio.bgm_stop
      Audio.spc_stop
    end
    Graphics.frame_reset
  end
  #--------------------------------------------------------------------------
  # * Stop playing BGM
  #--------------------------------------------------------------------------
  def bgm_stop
    Audio.bgm_stop
    Audio.spc_stop
  end
end
 
module Audio
  class <<self
    alias_method(:alt_bgm_play,:bgm_play) if not method_defined?(:alt_bgm_play)
  end
  def self.bgm_play(name, volume = 100, pitch = 100)
    if @bgm != name
      @bgm = name
      alt_bgm_play(name,volume,pitch)
    end
  end
end