请问rm能做到从物品菜单中选择物品来做成分歧吗？

恋百里

会脚本就研究Window_Selectable类吧..不然只有慢慢做了

774559263

如果是选择项的话站里有一个增加选择项的脚本的

774559263

更多选项
累死我了，找了这么久终于找到了，不知道是不是楼主要的那个

774559263

慕月寒霜 发表于 2011-5-8 09:23
那个工程现在下载不了了TAT

我再看看，下载个给你吧

774559263

class Game_Temp
  attr_accessor :need_show_more
  attr_accessor :window_pos_y
  attr_accessor :choices
  
  alias old_ini initialize
  def initialize
    old_ini
    @need_show_more = false
    @window_pos_y = 16
    @choices = nil
  end
end

class Window_Message < Window_Selectable
  alias old_ref refresh
  def refresh
    if $game_temp.need_show_more
      self.y = $game_temp.window_pos_y
      self.height = 160 + 32 * ($game_temp.choice_max - 4)
      self.contents = Bitmap.new(self.width - 32, self.height - 32)
    else
      self.height = 160
      self.contents = Bitmap.new(self.width - 32, self.height - 32)
    end
    old_ref
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面
  #--------------------------------------------------------------------------
  def update
    super
    # 渐变的情况下
    if @fade_in
      self.contents_opacity += 24
      if @input_number_window != nil
        @input_number_window.contents_opacity += 24
      end
      if self.contents_opacity == 255
        @fade_in = false
      end
      return
    end
    # 输入数值的情况下
    if @input_number_window != nil
      @input_number_window.update
      # 确定
      if Input.trigger?(Input::C)
        $game_system.se_play($data_system.decision_se)
        $game_variables[$game_temp.num_input_variable_id] =
          @input_number_window.number
        $game_map.need_refresh = true
        # 释放输入数值窗口
        @input_number_window.dispose
        @input_number_window = nil
        terminate_message
      end
      return
    end
    # 显示信息中的情况下
    if @contents_showing
      # 如果不是在显示选择项中就显示暂停标志
      if $game_temp.choice_max == 0
        self.pause = true
      end
      # 取消
      if Input.trigger?(Input::B)
        if $game_temp.choice_max > 0 and $game_temp.choice_cancel_type > 0
          $game_system.se_play($data_system.cancel_se)
          $game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
          $game_variables[100] = $game_temp.choice_cancel_type - 1
          $game_temp.need_show_more = false
          terminate_message
        end
      end
      # 确定
      if Input.trigger?(Input::C)
        if $game_temp.choice_max > 0
          $game_system.se_play($data_system.decision_se)
          $game_variables[100] = self.index
          $game_temp.choice_proc.call(self.index)
        end
        $game_temp.need_show_more = false
        terminate_message
      end
      return
    end
    # 在渐变以外的状态下有等待显示的信息与选择项的场合
    if @fade_out == false and $game_temp.message_text != nil
      @contents_showing = true
      $game_temp.message_window_showing = true
      reset_window
      refresh
      Graphics.frame_reset
      self.visible = true
      self.contents_opacity = 0
      if @input_number_window != nil
        @input_number_window.contents_opacity = 0
      end
      @fade_in = true
      return
    end
    # 没有可以显示的信息、但是窗口为可见的情况下
    if self.visible
      @fade_out = true
      self.opacity -= 48
      if self.opacity == 0
        self.visible = false
        @fade_out = false
        $game_temp.message_window_showing = false
      end
      return
    end
  end
end

class Interpreter
  def command_102
    # 文章已经设置过 message_text 的情况下
    if $game_temp.message_text != nil
      # 结束
      return false
    end
    # 设置信息结束后待机和返回调用标志
    @message_waiting = true
    $game_temp.message_proc = Proc.new { @message_waiting = false }
    # 设置选择项
    $game_temp.message_text = ""
    $game_temp.choice_start = 0
    if $game_temp.need_show_more
      @parameters = [$game_temp.choices, $game_temp.choice_cancel_type]
    end
    setup_choices(@parameters)
    # 继续
    return true
  end
end

774559263

more choice.rar (189.3 KB, 下载次数: 108)

2011-5-8 10:18 上传

点击文件名下载附件