#
#    イベントのコメントアウト
#　　(C)2006 TYPE74RX-T
#

class Interpreter
  #--------------------------------------------------------------------------
  # ★ 注釈
  #--------------------------------------------------------------------------
  alias rx_ev_cmnt_out_command_108 command_108
  def command_108
    if @parameters[0].is_a?(String) and
      @parameters[0].include?("コメントアウト")
      # 初期設定
      rx_str = @parameters[0]
      j = 0
      # 文字列から数字のみを抽出
      rx_comment_outs = rx_str.scan(/\d+/)
      # 抽出した数字の文字列を数値化
      rx_cmnt_outs = rx_comment_outs[0].to_i
      # 指定したイベントコマンド数だけ無視するようにする
      # （↓内部的には無理矢理注釈命令に置き換えているだけ）
      for i in 1..rx_cmnt_outs
        l = i + j
        if @list[@index+l].code == 101
          @list[@index+l].code = 108
          for k in 1..3
            m = l + k
            # 次のイベントコマンドが文章 2 行目以降の場合、indexを順送りに
            if @list[@index+m].code == 401
              j += 1
            else
              break
            end
          end
        else
          @list[@index+l].code = 108
        end        
      end
      return true
    end
    rx_ev_cmnt_out_command_108
  end  
end