请教制作个可储存道具的箱子,储存的道具可带到下个周目

taeckle · 发表于 2021-5-14 06:30:12

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

目前完全没有思路，还请大神指点一二，多谢了！

Cupidk爱呗茶 · 发表于 2021-5-18 21:21:14

本帖最后由 Cupidk爱呗茶于 2021-8-13 23:50 编辑

花了一下午写的虽说可能比不上论坛上其他大神的作品而且代码方面会有点乱不过我尽力了..

基本上算是实现了LZ所说的所有要求了顺便..范例就收20星屑吧.. 希望不会无人问津

（
工程演示

范例

NG变量+多周目箱子.rar (450.03 KB, 下载次数: 17, 售价: 20 星屑)
脚本 ↓
箱子系统和跨存档变量均为原创

RUBY 代码复制

# 简易跨存档变量 by cupidk rays 制作
# 脚本特性: 生成的数据即便不进行存档也依旧不会消失 (制作多周目游戏)
# 变量获取方法 CUPIDK::NGVAR.get_var(id)
# 数据获取方法 CUPIDK::NGVAR.get_data
module CUPIDK end
module CUPIDK::NGVAR
   # 被跨存档变量占用的变量位置
 
   VAR_RANGE = 1..100
 
  # 这里设置一些初始的数值 ↓
   # 数字类变量初始化请写在这里
   SETINIT_VAR = [0]
 
   NGTIMES_VARID = 1   # 存储周目数的跨存档变量ID
 
   NGCASE_SIZE = 3 # 这里设置每次周目额外获得的仓库容量上限
 
   SETINIT_VAR[NGTIMES_VARID] = 1  # 周目数初始化
 
 
   # 各种数据类请保存在这里(如数组，哈希表等)
   SETINIT_DATA = {
   "NG_items" => {} , # 跨存档物品
   }
 
  def self.init_Ngdata(name)
    save_data(SETINIT_DATA, name)
  end  
  def self.data_set(name)
    init_Ngdata(name) unless FileTest.exist?(name)
    @Game_DataNg = load_data(name)
  end  
  def self.get_data
    @Game_DataNg
  end
 
  def self.init_Ngvar(name)
    save_data(SETINIT_VAR, name)
  end  
  def self.var_set(name)
    init_Ngvar(name) unless FileTest.exist?(name)
    @Game_VarNg = load_data(name)
  end  
  def self.var_refresh(var_id, value, name = "Data/NGvar.rxdata")
    @Game_VarNg[var_id] = value
    save_data(@Game_VarNg, name)
  end  
  def self.get_var(var_id)
    @Game_VarNg[var_id] || 0
  end
end 
class Scene_Title
  include CUPIDK
  alias :old_start_21518 :main
  def main
     NGVAR.data_set("Data/NGdata.rxdata")
     NGVAR.var_set("Data/NGvar.rxdata")
     old_start_21518
   end    
end
class Game_Variables
  include CUPIDK
  alias_method "old_var_give_21518", "[]="
  def []=(var_id, value)
    return NGVAR.var_refresh(var_id, value) if NGVAR::VAR_RANGE === var_id
    old_var_give_21518(var_id, value)
  end
  alias_method "old_var_21518", "[]"
  def [](var_id)
    return NGVAR.get_var(var_id) if NGVAR::VAR_RANGE === var_id
    old_var_21518(var_id)
  end
end

# 简易跨存档变量 by cupidk rays 制作


# 脚本特性: 生成的数据即便不进行存档也依旧不会消失 (制作多周目游戏)


# 变量获取方法 CUPIDK::NGVAR.get_var(id)


# 数据获取方法 CUPIDK::NGVAR.get_data


module CUPIDK end


module CUPIDK::NGVAR


   # 被跨存档变量占用的变量位置


 


   VAR_RANGE = 1..100


 


  # 这里设置一些初始的数值 ↓


   # 数字类变量初始化请写在这里


   SETINIT_VAR = [0]


 


   NGTIMES_VARID = 1   # 存储周目数的跨存档变量ID


 


   NGCASE_SIZE = 3 # 这里设置每次周目额外获得的仓库容量上限


 


   SETINIT_VAR[NGTIMES_VARID] = 1  # 周目数初始化


 


 


   # 各种数据类请保存在这里(如数组，哈希表等)


   SETINIT_DATA = {


   "NG_items" => {} , # 跨存档物品


   }


 


  def self.init_Ngdata(name)


    save_data(SETINIT_DATA, name)


  end  


  def self.data_set(name)


    init_Ngdata(name) unless FileTest.exist?(name)


    @Game_DataNg = load_data(name)


  end  


  def self.get_data


    @Game_DataNg


  end


 


  def self.init_Ngvar(name)


    save_data(SETINIT_VAR, name)


  end  


  def self.var_set(name)


    init_Ngvar(name) unless FileTest.exist?(name)


    @Game_VarNg = load_data(name)


  end  


  def self.var_refresh(var_id, value, name = "Data/NGvar.rxdata")


    @Game_VarNg[var_id] = value


    save_data(@Game_VarNg, name)


  end  


  def self.get_var(var_id)


    @Game_VarNg[var_id] || 0


  end


end 


class Scene_Title


  include CUPIDK


  alias :old_start_21518 :main


  def main


     NGVAR.data_set("Data/NGdata.rxdata")


     NGVAR.var_set("Data/NGvar.rxdata")


     old_start_21518


   end    


end


class Game_Variables


  include CUPIDK


  alias_method "old_var_give_21518", "[]="


  def []=(var_id, value)


    return NGVAR.var_refresh(var_id, value) if NGVAR::VAR_RANGE === var_id


    old_var_give_21518(var_id, value)


  end


  alias_method "old_var_21518", "[]"


  def [](var_id)


    return NGVAR.get_var(var_id) if NGVAR::VAR_RANGE === var_id


    old_var_21518(var_id)


  end


end

RUBY 代码复制

# 多周目物品箱   by cupidk rays
# 需配合本工程内的跨存档变量
# 使用方法 调用脚本$scene = Scene_NGCase.new
class Game_Party; attr_accessor :items ; end  
class Window_NgItem < Window_Item
  def refresh
    if self.contents != nil
      self.contents.dispose
      self.contents = nil
    end
    @data = []
    (1...$data_items.size).each do |i|
      if Ngitem_number(i) > 0
        @data.push($data_items[i])
      end
    end
    @item_max = @data.size
    if @item_max > 0
      self.contents = Bitmap.new(width - 32, row_max * 32)
      (0...@item_max).each do |i|
        draw_item(i)
      end
    end
  end  
  def Ngitem_number(id)
    data = CUPIDK::NGVAR.get_data["NG_items"]
    n = data.include?(id) ? data[id] : 0
  end  
  def draw_item(index)
    item = @data[index]
    number = Ngitem_number(item.id)
    x = 4 + index % 2 * (288 + 32)
    y = index / 2 * 32
    rect = Rect.new(x, y, self.width / @column_max - 32, 32)
    self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
    bitmap = RPG::Cache.icon(item.icon_name)
    opacity = self.contents.font.color == normal_color ? 255 : 128
    self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
    self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
    self.contents.draw_text(x + 240, y, 16, 32, ":", 1)
    self.contents.draw_text(x + 256, y, 24, 32, number.to_s, 2)
  end
end  
class Window_HaveItem < Window_Item
   def draw_item(index)
    item = @data[index]
    case item
    when RPG::Item
      number = $game_party.item_number(item.id)
    when RPG::Weapon
      number = $game_party.weapon_number(item.id)
    when RPG::Armor
      number = $game_party.armor_number(item.id)
    end
    x = 4 + index % 2 * (288 + 32)
    y = index / 2 * 32
    rect = Rect.new(x, y, self.width / @column_max - 32, 32)
    self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
    bitmap = RPG::Cache.icon(item.icon_name)
    opacity = self.contents.font.color == normal_color ? 255 : 128
    self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
    self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
    self.contents.draw_text(x + 240, y, 16, 32, ":", 1)
    self.contents.draw_text(x + 256, y, 24, 32, number.to_s, 2)
  end
end  
class Scene_NGCase
  include CUPIDK
  def main
    # 生成帮助窗口、物品窗口
    @help_window = Window_Help.new
    @item_window = Window_HaveItem.new
    @item_window.y += 285
    @item_window.height = 130
    @item_window.help_window = @help_window
    @Ngitem_window = Window_NgItem.new
    @Ngitem_window.help_window = @help_window
    @Ngitem_window.height = 284
    if $game_party.items.empty? || !$game_party.items.any? {|k,v| v >= 1 }
      @item_window.active = false
    else  
      @Ngitem_window.active = false
    end
    # 执行过度
    Graphics.transition
    # 主循环
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    # 释放窗口
    @help_window.dispose
    @item_window.dispose
    @Ngitem_window.dispose
  end
  # 画面更新
  def update
    @help_window.update
    @item_window.update
    @Ngitem_window.update
    if @item_window.active
      update_item
      return
    end
    if @Ngitem_window.active
      update_Ngitem
      return
    end
  end  
 
  def Ngitems
    NGVAR.get_data["NG_items"]
  end  
  # 跨存档储存窗口
  def update_Ngitem
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      $scene = Scene_Map.new
      return
    end
    if Input.trigger?(Input::C)
       @Ngitem = @Ngitem_window.item
       num = 1
       if NGVAR.get_data["NG_items"].include?(@Ngitem.id) && NGVAR.get_data["NG_items"][@Ngitem.id] >= num
         NGVAR.get_data["NG_items"][@Ngitem.id] -= num
         if $game_party.items.include?(@Ngitem.id)
           $game_party.gain_item(@Ngitem.id, num)
         else
           $game_party.items[@Ngitem.id] = num
         end  
         $game_system.se_play($data_system.decision_se)
         name = "Data/NGdata.rxdata"
         save_data(NGVAR.get_data, name)
         @item_window.refresh
         @Ngitem_window.refresh
       else
        $game_system.se_play($data_system.cancel_se)
       end  
    end
  end  
  # 角色物品窗口
  def update_item
    if Input.trigger?(Input::B)
       $game_system.se_play($data_system.cancel_se)
       @Ngitem_window.active = true
       @item_window.active = false
      return 
    end
    if Input.trigger?(Input::C)
      @item = @item_window.item
      id = NGVAR::NGTIMES_VARID 
      max = $game_variables[id] * NGVAR::NGCASE_SIZE
      ngmax = NGVAR.get_data["NG_items"].select do |k, v|
        v > 0
      end  
      if (NGVAR.get_data["NG_items"][@item.id].nil? || NGVAR.get_data["NG_items"][@item.id] == 0) && 
        max <= ngmax.size
        return $game_system.se_play($data_system.cancel_se)
      end  
      # 演奏确定 SE
      num = 1
      if $game_party.items.include?(@item.id) && $game_party.item_number(@item.id) >= num
          $game_party.gain_item(@item.id, -num)
        if NGVAR.get_data["NG_items"][@item.id]
          NGVAR.get_data["NG_items"][@item.id] += num
        else
          NGVAR.get_data["NG_items"][@item.id] = num
        end 
        $game_system.se_play($data_system.decision_se)
        name = "Data/NGdata.rxdata"
        save_data(NGVAR.get_data, name)
        @item_window.refresh
        @Ngitem_window.refresh
      else
        $game_system.se_play($data_system.cancel_se)
      end  
    end
  end 
end

# 多周目物品箱   by cupidk rays


# 需配合本工程内的跨存档变量


# 使用方法 调用脚本$scene = Scene_NGCase.new


class Game_Party; attr_accessor :items ; end  


class Window_NgItem < Window_Item


  def refresh


    if self.contents != nil


      self.contents.dispose


      self.contents = nil


    end


    @data = []


    (1...$data_items.size).each do |i|


      if Ngitem_number(i) > 0


        @data.push($data_items[i])


      end


    end


    @item_max = @data.size


    if @item_max > 0


      self.contents = Bitmap.new(width - 32, row_max * 32)


      (0...@item_max).each do |i|


        draw_item(i)


      end


    end


  end  


  def Ngitem_number(id)


    data = CUPIDK::NGVAR.get_data["NG_items"]


    n = data.include?(id) ? data[id] : 0


  end  


  def draw_item(index)


    item = @data[index]


    number = Ngitem_number(item.id)


    x = 4 + index % 2 * (288 + 32)


    y = index / 2 * 32


    rect = Rect.new(x, y, self.width / @column_max - 32, 32)


    self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))


    bitmap = RPG::Cache.icon(item.icon_name)


    opacity = self.contents.font.color == normal_color ? 255 : 128


    self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)


    self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)


    self.contents.draw_text(x + 240, y, 16, 32, ":", 1)


    self.contents.draw_text(x + 256, y, 24, 32, number.to_s, 2)


  end


end  


class Window_HaveItem < Window_Item


   def draw_item(index)


    item = @data[index]


    case item


    when RPG::Item


      number = $game_party.item_number(item.id)


    when RPG::Weapon


      number = $game_party.weapon_number(item.id)


    when RPG::Armor


      number = $game_party.armor_number(item.id)


    end


    x = 4 + index % 2 * (288 + 32)


    y = index / 2 * 32


    rect = Rect.new(x, y, self.width / @column_max - 32, 32)


    self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))


    bitmap = RPG::Cache.icon(item.icon_name)


    opacity = self.contents.font.color == normal_color ? 255 : 128


    self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)


    self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)


    self.contents.draw_text(x + 240, y, 16, 32, ":", 1)


    self.contents.draw_text(x + 256, y, 24, 32, number.to_s, 2)


  end


end  


class Scene_NGCase


  include CUPIDK


  def main


    # 生成帮助窗口、物品窗口


    @help_window = Window_Help.new


    @item_window = Window_HaveItem.new


    @item_window.y += 285


    @item_window.height = 130


    @item_window.help_window = @help_window


    @Ngitem_window = Window_NgItem.new


    @Ngitem_window.help_window = @help_window


    @Ngitem_window.height = 284


    if $game_party.items.empty? || !$game_party.items.any? {|k,v| v >= 1 }


      @item_window.active = false


    else  


      @Ngitem_window.active = false


    end


    # 执行过度


    Graphics.transition


    # 主循环


    loop do


      Graphics.update


      Input.update


      update


      if $scene != self


        break


      end


    end


    Graphics.freeze


    # 释放窗口


    @help_window.dispose


    @item_window.dispose


    @Ngitem_window.dispose


  end


  # 画面更新


  def update


    @help_window.update


    @item_window.update


    @Ngitem_window.update


    if @item_window.active


      update_item


      return


    end


    if @Ngitem_window.active


      update_Ngitem


      return


    end


  end  


 


  def Ngitems


    NGVAR.get_data["NG_items"]


  end  


  # 跨存档储存窗口


  def update_Ngitem


    if Input.trigger?(Input::B)


      $game_system.se_play($data_system.cancel_se)


      $scene = Scene_Map.new


      return


    end


    if Input.trigger?(Input::C)


       @Ngitem = @Ngitem_window.item


       num = 1


       if NGVAR.get_data["NG_items"].include?(@Ngitem.id) && NGVAR.get_data["NG_items"][@Ngitem.id] >= num


         NGVAR.get_data["NG_items"][@Ngitem.id] -= num


         if $game_party.items.include?(@Ngitem.id)


           $game_party.gain_item(@Ngitem.id, num)


         else


           $game_party.items[@Ngitem.id] = num


         end  


         $game_system.se_play($data_system.decision_se)


         name = "Data/NGdata.rxdata"


         save_data(NGVAR.get_data, name)


         @item_window.refresh


         @Ngitem_window.refresh


       else


        $game_system.se_play($data_system.cancel_se)


       end  


    end


  end  


  # 角色物品窗口


  def update_item


    if Input.trigger?(Input::B)


       $game_system.se_play($data_system.cancel_se)


       @Ngitem_window.active = true


       @item_window.active = false


      return 


    end


    if Input.trigger?(Input::C)


      @item = @item_window.item


      id = NGVAR::NGTIMES_VARID 


      max = $game_variables[id] * NGVAR::NGCASE_SIZE


      ngmax = NGVAR.get_data["NG_items"].select do |k, v|


        v > 0


      end  


      if (NGVAR.get_data["NG_items"][@item.id].nil? || NGVAR.get_data["NG_items"][@item.id] == 0) && 


        max <= ngmax.size


        return $game_system.se_play($data_system.cancel_se)


      end  


      # 演奏确定 SE


      num = 1


      if $game_party.items.include?(@item.id) && $game_party.item_number(@item.id) >= num


          $game_party.gain_item(@item.id, -num)


        if NGVAR.get_data["NG_items"][@item.id]


          NGVAR.get_data["NG_items"][@item.id] += num


        else


          NGVAR.get_data["NG_items"][@item.id] = num


        end 


        $game_system.se_play($data_system.decision_se)


        name = "Data/NGdata.rxdata"


        save_data(NGVAR.get_data, name)


        @item_window.refresh


        @Ngitem_window.refresh


      else


        $game_system.se_play($data_system.cancel_se)


      end  


    end


  end 


end

taeckle · 发表于 2021-8-12 18:37:06

本帖最后由 taeckle 于 2021-8-12 19:11 编辑

Cupidk爱呗茶发表于 2021-8-9 16:24
非常抱歉最近有事回复迟了点可以这样改
替换跨存档箱子中的这个方法

大神你这段脚本哪句代码是控制箱子存储数量上限为$game_variable[1]*3的啊？我在你这段脚本里就没看到个数字3。。。

Cupidk爱呗茶 · 发表于 2021-8-9 16:24:06

本帖最后由 Cupidk爱呗茶于 2021-8-13 23:49 编辑

taeckle 发表于 2021-7-15 07:46
报告大佬，您发布的存储箱代码测试结果为每周目增加储存的道具种类数量上限增加3，请问下怎么改成单纯道 ...

非常抱歉最近有事回复迟了点可以这样改
替换跨存档箱子中的这个方法

RUBY 代码复制

# 角色物品窗口
  def update_item
    if Input.trigger?(Input::B)
       $game_system.se_play($data_system.cancel_se)
       @Ngitem_window.active = true
       @item_window.active = false
      return
    end
    if Input.trigger?(Input::C)
        @item = @item_window.item
        id = NGVAR::NGTIMES_VARID 
       max = $game_variables[id] * NGVAR::NGCASE_SIZE
       ngmax = NGVAR.get_data["NG_items"].inject(0) do |result, item| 
         result + item[1] 
       end  
      # 演奏确定 SE
        num = 1
        return $game_system.se_play($data_system.cancel_se) if ngmax + num > max
       if $game_party.items.include?(@item.id) && $game_party.item_number(@item.id) >= num
           $game_party.gain_item(@item.id, -num)
         if NGVAR.get_data["NG_items"][@item.id]
            NGVAR.get_data["NG_items"][@item.id] += num
         else
            NGVAR.get_data["NG_items"][@item.id] = num
         end 
        $game_system.se_play($data_system.decision_se)
        name = "Data/NGdata.rxdata"
        save_data(NGVAR.get_data, name)
        @item_window.refresh
        @Ngitem_window.refresh
       else
        $game_system.se_play($data_system.cancel_se)
      end  
    end
  end

# 角色物品窗口


  def update_item


    if Input.trigger?(Input::B)


       $game_system.se_play($data_system.cancel_se)


       @Ngitem_window.active = true


       @item_window.active = false


      return


    end


    if Input.trigger?(Input::C)


        @item = @item_window.item


        id = NGVAR::NGTIMES_VARID 


       max = $game_variables[id] * NGVAR::NGCASE_SIZE


       ngmax = NGVAR.get_data["NG_items"].inject(0) do |result, item| 


         result + item[1] 


       end  


      # 演奏确定 SE


        num = 1


        return $game_system.se_play($data_system.cancel_se) if ngmax + num > max


       if $game_party.items.include?(@item.id) && $game_party.item_number(@item.id) >= num


           $game_party.gain_item(@item.id, -num)


         if NGVAR.get_data["NG_items"][@item.id]


            NGVAR.get_data["NG_items"][@item.id] += num


         else


            NGVAR.get_data["NG_items"][@item.id] = num


         end 


        $game_system.se_play($data_system.decision_se)


        name = "Data/NGdata.rxdata"


        save_data(NGVAR.get_data, name)


        @item_window.refresh


        @Ngitem_window.refresh


       else


        $game_system.se_play($data_system.cancel_se)


      end  


    end


  end

taeckle · 发表于 2021-7-15 07:46:29

Cupidk爱呗茶发表于 2021-6-14 22:13
是一个链接常量的用法在脚本中的含义大概就是获取CUPIDK模块中NGVAR模块
我们的跨存档变量就存储在NGV ...

报告大佬，您发布的存储箱代码测试结果为每周目增加储存的道具种类数量上限增加3，请问下怎么改成单纯道具数量增加3呢？

精灵使者 · 发表于 2021-6-20 09:26:42

taeckle 发表于 2021-6-16 05:56
请问大神，那个NGVAR模块是CUPIDK模块的子模块吗？在一个大模块(CUPIDK)里是怎样再定义出一个小模块(NGVA ...

不对，这个CPUICK直接在module里面写就行了，用的时候直接链接就行

taeckle · 发表于 2021-6-16 05:56:57

Cupidk爱呗茶发表于 2021-6-14 22:13
是一个链接常量的用法在脚本中的含义大概就是获取CUPIDK模块中NGVAR模块
我们的跨存档变量就存储在NGV ...

请问大神，那个NGVAR模块是CUPIDK模块的子模块吗？在一个大模块(CUPIDK)里是怎样再定义出一个小模块(NGVAR)的呢？

Cupidk爱呗茶 · 发表于 2021-6-14 22:13:38

本帖最后由 Cupidk爱呗茶于 2021-6-14 22:24 编辑

taeckle 发表于 2021-6-13 21:48
大神请问下这个脚本的第3行里“# 变量获取方法 CUPIDK::NGVAR.get_var(id)”的那个“::”符号是啥意思啊 ...

是一个链接常量的用法在脚本中的含义大概就是获取CUPIDK模块中NGVAR模块
我们的跨存档变量就存储在NGVAR模块中

taeckle · 发表于 2021-6-13 21:48:42

Cupidk爱呗茶发表于 2021-5-18 21:21
花了一下午写的虽说可能比不上论坛上其他大神的作品而且代码方面会有点乱不过我尽力了..
基本 ...

大神请问下这个脚本的第3行里“# 变量获取方法 CUPIDK::NGVAR.get_var(id)”的那个“::”符号是啥意思啊？

soulsaga · 发表于 2021-5-17 16:25:44

是每种道具的存放上限+3..还是道具总数算+3

帐号		自动登录	找回密码
密码			注册会员

[已经解决] 请教制作个可储存道具的箱子,储存的道具可带到下个周目

加入我们，或者，欢迎回来。

评分

点评

点评

评分

评分

点评

评分

评分

R考场第七期金奖

开拓者

贵宾