手册的”RGSS参考>游戏库>Audio” “RGSS リファレンス>ゲームライブラリ>Audio”

这个页面，可以看到一堆模块方法。

例如bgm_play：

Audio.bgm_play(filename[, volume[, pitch[, pos]]])

要注意的是,Audio就是要发消息的对象，消息名是bgm_play，后面的消息参数分别是文件名、音量、音调、位置。加了方括号的表示可以省略。例如:

Audio.bgm_play "Audio/BGM/Theme1.ogg"

但这样，会播放了不到1秒就游戏结束了，因为没有让他停留在那里播放，我只是对音频模块说，播放这个BGM，然后游戏的主要脚本也就结束了。为了让他停在那里播放，可以用rgss_stop：

Audio.bgm_play "Audio/BGM/Theme1.ogg"
rgss_stop

现在为止我们只能手动点击关闭按钮关掉。

当然也可以像上一节一样弄的好看点

alias 无限刷新画面 rgss_stop
音频模块 = Audio
class << 音频模块
  alias 播放BGM bgm_play
end
某音乐 = "Audio/BGM/Theme1.ogg"
#----------------------------以上是各种设置和别名---------------------------
#----------------------------以下是要做的事情------------------------------
音频模块.播放BGM 某音乐
无限刷新画面

说是半残播放器，是因为只能播放一首曲子，不过更改下面的设置可以播放其他的曲子。从网络上取得的脚本，通常也会有些设置。

一个游戏至少要和用户有所交互，就说刚才简单的播放BGM，可以说是音乐欣赏，但是我为了控制它的播放情况，可以读取用户的按键：

• 上键: 增大音量
• 下键: 减小音量
• 右键: 提高音调
• 左键: 降低音调
• 回车, C: 暂停、恢复暂停
• ESC, X: 退出游戏

class << Audio
  alias 播放BGM bgm_play
  alias BGM位置 bgm_pos
end

class << Input
  alias 按了一下? trigger? #repeat? 并不是一按下就起作用，就按一下
  alias 一直按着? repeat?  #repeat? 并不是一按下就起作用，重复按下
  alias 按着?     press?   #press?  是按下就会起作用
end

@图形模块      = Graphics
@音频模块      = Audio
@键盘模块      = Input
@上键          = :UP
@下键          = :DOWN
@左键          = :LEFT
@右键          = :RIGHT
@回车          = :C
@ESC           = :B
#--------------------------↑别名-------------------------------
@某音乐      = "Audio/BGM/Theme1.ogg"

@音量        = 100
@音调        = 100
@暂停位置    = 0

@设置是暂停  = false
@改变了设置  = false
@退出游戏    = false
@暂停        = false
#--------------------------↑数据-------------------------------
def 初始化
  @音频模块.播放BGM @某音乐
end

def 按了一下? 某键        #按了一下?
  @键盘模块.按了一下? 某键
  #问键盘模块，按了一下某键吗?Ruby的方法名最后的问号多是要返回真假，表示测试或者疑问
end

def 判断按键修改设置
  case
    when 按了一下?(@上键)
      @音量 += 5
      @改变了设置 = true
    when 按了一下?(@下键)
      @音量 -= 5
      @改变了设置 = true
    when 按了一下?(@左键)
      @音调 -= 5
      @改变了设置 = true
    when 按了一下?(@右键)
      @音调 += 5
      @改变了设置 = true
    when 按了一下?(@回车)
      @暂停 = ! @暂停 #切换暂停/不暂停
      @改变了设置 = true
      @设置是暂停 = true
    when 按了一下?(@ESC)
      @退出游戏 = true
  end
end

def 更新设置
  exit if @退出游戏 #当退出游戏为真时退出
  if @改变了设置   #如果改变了设置
    unless @设置是暂停      #除非改变的设置是暂停 相当于if not 设置是暂停
      @当前位置 = @音频模块.BGM位置
      #当前位置 = Audio.bgm_pos
      @音频模块.播放BGM @某音乐, @音量, @音调, @当前位置
    else
      if @暂停
        @暂停位置 = Audio.bgm_pos
        Audio.bgm_stop
      else
        @音频模块.播放BGM @某音乐, @音量, @音调, @暂停位置
      end
    end
  end
  #复位设置
  @改变了设置 = false
  @设置是暂停 = false
end

#--------------------------↓运行-------------------------------
初始化
loop do
  Graphics.update
  Input.update
  #↑这两句就不用别名了，是整个RGSS系列都很重要的用法
  判断按键修改设置
  更新设置
end

对比一下下面的数据设置，不过下面这种用法不需要太追究：

class << Audio
  alias 播放BGM bgm_play
  alias BGM位置 bgm_pos
end

class << Input
  alias 按了一下? trigger? #repeat? 并不是一按下就起作用，就按一下
  alias 一直按着? repeat?  #repeat? 并不是一按下就起作用，重复按下
  alias 按着?     press?   #press?  是按下就会起作用
end

@图形模块      = Graphics
@音频模块      = Audio
@键盘模块      = Input
@上键          = :UP
@下键          = :DOWN
@左键          = :LEFT
@右键          = :RIGHT
@回车          = :C
@ESC           = :B
#--------------------------↑别名-------------------------------
@某音乐      = "Audio/BGM/Theme1.ogg"

@音量        = 100
@音调        = 100
@暂停位置    = 0

@设置是暂停  = false
@改变了设置  = false
@退出游戏    = false
@暂停        = false

@按键设置 = {
   @上键  =>      ->{@音量 += 5} ,#这里有逗号
   @下键  =>      ->{@音量 -= 5} ,
   @左键  =>      ->{@音调 += 5} ,
   @右键  =>      ->{@音调 -= 5} ,
   @回车 =>       ->{
      @暂停 = ! @暂停 #切换暂停/不暂停
      @设置是暂停 = true
   },#可以写几行
   @ESC => ->{@退出游戏 = true}, 
}
#--------------------------↑数据-------------------------------
def 初始化
  @音频模块.播放BGM @某音乐
end

def 判断按键修改设置
  if @按键设置.any?{|键, 要做的事情|   #对于按键设置表而言，有任何为真的情况：
    if @键盘模块.按了一下? 某键        #↓
      要做的事情.call                 
      true #按下了某键                
    else                             
      false
    end
  }                                  #↓
     @改变了设置 = true               #有任何为真的情况，改变了设置
  end
end

def 更新设置
  exit if @退出游戏 #当退出游戏为真时退出
  if @改变了设置   #如果改变了设置
    unless @设置是暂停      #除非改变的设置是暂停 相当于if not 设置是暂停
      @当前位置 = @音频模块.BGM位置
      @音频模块.播放BGM @某音乐, @音量, @音调, @当前位置
    else
      if @暂停
        @暂停位置 = Audio.bgm_pos
        Audio.bgm_stop
      else
        @音频模块.播放BGM @某音乐, @音量, @音调, @暂停位置
      end
    end
  end
  #复位设置
  @改变了设置 = false
  @设置是暂停 = false
end

#--------------------------↓运行-------------------------------
初始化
loop do
  Graphics.update
  Input.update
  判断按键修改设置
  更新设置
end

也可以使用系统API，就像其他程序那样：

=begin C声明,注意对比
int __stdcall MessageBox(HWND, LPSTR, LPSTR, INT);
=end
MessageBox = Win32API.new "user32", "MessageBox", "ippi", "i"
MessageBox.call  0, "Hello", "Title", 16

Win32API.new的参数: DLL名, 函数名, 参数类型表, 返回值类型

但是通常情况下，类型可以自动推断出来，返回值也可以忽略，或者通常是整数兼容的类型。

这里用method_missing来匹配MessageBox这个不存在的方法，并生成”ippi”这样的参数表:

class API
  def initialize(dll)
    @dll = dll
  end
  def method_missing sym, *a
    Win32API.new(@dll, sym.to_s, a.map{|x|x.is_a?(Integer) ? ?i: ?p}, ?i).(*a)
  end
end

user32 = API.new "user32"
user32.MessageBox 0, "Hello", "Title", 16

打开RMVA，新建一个工程。

打开工程文件夹：选择测试（倒数第二个菜单），然后选择打开游戏文件夹（最后一项）。将会看见游戏的文件夹。

复制脚本：进入其中的Data目录将Scripts.rvdata2复制一份，改名为MyScripts.rvdata2就行了。 如果看到的是没有后缀名.rvdata2的Scripts，改为MyScripts就行了。

删掉默认脚本：回到RMVA，打开脚本编辑器，在左侧把所有脚本都删掉。 以后就在这个工程的基础上来讲解。

一行脚本能做到的事情有很多，首先我们来运行一个程序：

system "notepad.exe"

保存运行游戏，应该会打开一个记事本。 游戏会在关闭了记事本之后退出。

system的含义是给系统发送一个命令，让他启动程序，要启动的内容是”notepad.exe”。如果拿手机通信来比喻，可以发短信给系统，发短信这个方式是system，而内容是”notepad.exe”。

也可以发彩信: 启动程序 “notepad.exe”。 当然’启动程序’现在是没有的，下面就要说到。

事实上也可以约定说‘启动程序’的消息名字就是’启动程序‘而不是system，内容是记事本，于是改成下面的样子：

def 启动程序 x
  msgbox "将要启动 #{x}"
  system x
end
记事本 = "notepad.exe"

启动程序 记事本

这个从数学函数来理解就相当于：

f(x) = 提示”将要启动”x的信息 然后运行x

y = “notepad.exe”

f(y)的结果？ 当然是提示 “将要启动notepad.exe” 然后运行”notepad.exe”

def 消息名字 消息内容
  ...
end

也可以:

def 加法 a,b
  a+b
end

msgbox 加法 3,5 #显示8

3. 在Ruby里面，”定义消息“也可以是一个消息。

(名字是define_singleton_method。略长。含义是定义单个对象方法，对象就是消息的接受者，为这个接受者定义一个自定义消息。消息处理是一个函数，在Ruby里面，这种函数按照面向对象设计的惯例叫做方法。)

def 定义消息 消息名, 收到消息要做的事
  define_singleton_method 消息名, 收到消息要做的事
end

定义消息 "启动程序", ->程序{ system 程序 }

=begin 对比
def 启动程序 程序
  system 程序
end
=end
#井号后面的哪一行
#以及=begin =end之间的部分不会被运行

记事本 = "notepad.exe"

启动程序 记事本

注意在要做的事里面用到了一个->{}结构，他只是一个块，而不是正式的消息，写法是

->消息内容1, 消息内容2,...,消息内容N {要做的事}

同时虽然前面没写出来，def … end也可以接受多于1个内容，也叫做参数，用逗号隔开：

def 消息名 消息内容1, 消息内容2,...,消息内容N
   要做的事
end

定义消息 "启动程序", ->程序{ system 程序 }

def 运行 程序
   system 程序
end

记事本 = "notepad.exe"
画图 = "mspaint.exe"

运行 记事本
运行 画图

alias 运行 system   #定义消息的新名字: alias 新名字, 旧名字
运行 "notepad.exe"