怎么设置仓库脚本存的东西可以每个角色都共用呢？

344143370 · 发表于 2012-6-2 13:01:16

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

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

x

#==============================================================================
#==============================================================================
#
# ■ [vx]仓库
#------------------------------------------------------------------------------
# by 八云紫
# 转载时，请注明本脚本来着 66RPG
#==============================================================================
#==============================================================================
#==============================================================================
# ■ Byz_Vocab
#------------------------------------------------------------------------------
# 　定义系统用语和信息的模块。
#==============================================================================
module Byz_Vocab
#------ 仓库 ---------
WAREHOUSE_SAVING = "存东西"
WAREHOUSE_TAKING = "取东西"
CANCEN = "取消"
# 箭头文件名字，放到 GraphicsPictures 目录下。
ARROW_TWO = "Cursor"
# 存物品的时候的价格
PRICES = 10
end
class Bitmap
#--------------------------------------------------------------------------
# ● 描绘直线
# x1，y1，x2，y2：直线两端的坐标
# width：宽度
# color：颜色
#--------------------------------------------------------------------------
def drawline(x1, y1, x2, y2, width, color)
x1 = x1.to_f
y1 = y1.to_f
x2 = x2.to_f
y2 = y2.to_f
width = width.to_f
k = (y2 - y1) / (x2 - x1)
if k.abs > 1
drawline_x(x1, y1, x2, y2, width, color)
else
drawline_y(x1, y1, x2, y2, width, color)
end
end
def drawline_x(x1, y1, x2, y2, width, color)
l = ((x1 - x2) ** 2 + (y1 - y2) ** 2) ** 0.5 * width / (y1 - y2)
length = l.abs * 2
k = (x2 - x1) / (y2 - y1) #x=ky+b
b = x1 - k * y1
if l > 0
for ty in y2.to_i..y1.to_i
tx = ty * k + b
fill_rect(tx - l, ty, length, 1, color)
end
else
for ty in y1.to_i..y2.to_i
tx = ty * k + b
fill_rect(tx + l, ty, length, 1, color)
end
end
end
def drawline_y(x1, y1, x2, y2, width, color)
l = ((x1 - x2) ** 2 + (y1 - y2) ** 2) ** 0.5 * width / (x1 - x2)
height = l.abs * 2
k = (y2 - y1) / (x2 - x1) #y=kx+b
b = y1 - k * x1
if l > 0
for tx in x2.to_i..x1.to_i
ty = tx * k + b
fill_rect(tx, ty - l, 1, height, color)
end
else
for tx in x1.to_i..x2.to_i
ty = tx * k + b
fill_rect(tx, ty + l, 1, height, color)
end
end
end
end
#==============================================================================
# ■ Game_System
#------------------------------------------------------------------------------
# 　处理系统附属数据的类。也可执行诸如 BGM 管理、交通工具之类的功能。本类的实
# 例请参考 $game_system 。
#==============================================================================
class Game_System
attr_accessor :bank_loli_bitmap
attr_accessor :back_bank_bitmap
attr_accessor :prices # 存物品的收费价格
#--------------------------------------------------------------------------
# ● 初始化对象
#--------------------------------------------------------------------------
alias old_initialize initialize
def initialize
old_initialize
@bank_loli_bitmap = "MM_Pic1"
@back_bank_bitmap = "back"
@prices = Byz_Vocab::PRICES
end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　处理队伍的类。包含金钱以及物品的信息。
# 这个类的实例请参考 $game_party 。
#==============================================================================
class Game_Party < Game_Unit
attr_accessor :warehouse # 仓库
#--------------------------------------------------------------------------
# ● 初始化对象
#--------------------------------------------------------------------------
alias initialize_currency initialize
def initialize
initialize_currency
@warehouse_item = {} # 仓库物品
@warehouse_weapon = {} # 仓库武器
@warehouse_armor = {} # 仓库防具
@warehouse = [@warehouse_item, @warehouse_weapon, @warehouse_armor]
end
end
#==============================================================================
# ■ Window_Warehouse
#==============================================================================
class Window_Warehouse < Window_Selectable
#--------------------------------------------------------------------------
# ● 初始化
# kind : 0 物品 bool ：0 背包
# : 1 武器：1 仓库
# ：2 防具
#--------------------------------------------------------------------------
def initialize(kind, bool)
super(100, 110, 285, 202)
@kind = kind
@bool = bool
@column_max = 1
@help_window = Window_Byz_Help.new
@last_kind = @kind + 1
self.index = 0
@last_index = self.index + 1
@data = []
refresh
end
#--------------------------------------------------------------------------
# ● 写入 kind
#--------------------------------------------------------------------------
def kind=(index)
@kind = index
refresh
end
#--------------------------------------------------------------------------
# ● 获取 obj
#--------------------------------------------------------------------------
def check
if @data[self.index] == nil
return nil
else
return @data[self.index].id
end
end
#--------------------------------------------------------------------------
# ● 刷新开关
#--------------------------------------------------------------------------
def refresh_bool
@last_index = self.index + 1
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
if @bool == 1
dates = []
dates.clear
@data.clear
$game_party.warehouse[@kind].each_key {|key|
next if $game_party.warehouse[@kind][key] == nil
dates.push(key)}
if dates.size == 0
@data.clear
end
dates.sort!
if @kind == 0
dates.each{|index| @data.push($data_items[index])}
elsif @kind == 1
dates.each{|index| @data.push($data_weapons[index])}
elsif @kind == 2
dates.each{|index| @data.push($data_armors[index])}
end
@item_max = @data.size
else
@data.clear
for item in $game_party.items
if @kind == 0
@data.push(item) if item.is_a?(RPG::Item)
elsif @kind == 1
@data.push(item) if item.is_a?(RPG::Weapon)
elsif @kind == 2
@data.push(item) if item.is_a?(RPG::Armor)
end
end
@item_max = @data.size
end
return if 0 == @item_max
self.contents.clear
create_contents
if @data.size != 0
@data.each_index{|index| draw_item(index)}
end
end
def update
super
if @last_index != self.index or @last_kind != @kind
item_index = check
if item_index != nil
if @kind == 0
@help_window.set_item($data_items[item_index])
elsif @kind == 1
@help_window.set_item($data_weapons[item_index])
elsif @kind == 2
@help_window.set_item($data_armors[item_index])
end
else
@help_window.clear
self.contents.clear
end
refresh
@last_index = self.index
@last_kind = @kind
end
end
def dispose
super
@help_window.dispose
end
#--------------------------------------------------------------------------
# ● 描绘项目
# index : 项目编号
#--------------------------------------------------------------------------
def draw_item(index)
rect = item_rect(index)
item = @data[index]
self.contents.clear_rect(rect)
if item != nil
if @bool == 1
number = $game_party.warehouse[@kind][@data[index].id]
else
number = $game_party.item_number(item)
end
rect.width -= 4
draw_item_name(item, rect.x, rect.y, true)
self.contents.draw_text(rect, sprintf("%10d", number), 2)
else
self.contents.clear
end
end
end
#==============================================================================
# ■ Window_Byz_Help 物品帮助
#==============================================================================
class Window_Byz_Help < Window_Base
#--------------------------------------------------------------------------
# ● 初始化
#--------------------------------------------------------------------------
def initialize
super(0, 312, 544, 104)
end
def clear
self.contents.clear
end
#--------------------------------------------------------------------------
# ● 文字设定
# item : 物品
#--------------------------------------------------------------------------
def set_item(item)
if item.nil?
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(0, 0, 512, 24, $game_temp.shop_word)
@item = nil
return
end
if item != @item
@item = item
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(0, 0, 512, 24, @item.description)
if @item.is_a?(RPG::Item)
# 物品范围描述
scope = "[对象] : "
case @item.scope
when 0; scope += "无"
when 1; scope += "敌单体"
when 2; scope += "敌全体"
when 3; scope += "敌单体连续"
when 4; scope += "敌单体随机"
when 5; scope += "敌二体随机"
when 6; scope += "敌三体随机"
when 7; scope += "我方单体"
when 8; scope += "我方全体"
when 9; scope += "我方单体 (阵亡)"
when 10; scope += "我方全体 (阵亡)"
when 11; scope += "使用者"
end
self.contents.draw_text(0, 24, 512, 24, scope)
# 物品范围描述结束
# 物品恢复效果描述
effection = "[效果] : "
if @item.hp_recovery_rate > 0
effection += "#{Vocab.hp}+#{@item.hp_recovery_rate}% "
elsif @item.hp_recovery_rate < 0
effection += "#{Vocab.hp}-#{@item.hp_recovery_rate}% "
elsif @item.hp_recovery > 0
effection += "#{Vocab.hp}+#{@item.hp_recovery} "
elsif @item.hp_recovery < 0
effection += "#{Vocab.hp}-#{@item.hp_recovery} "
end
if @item.mp_recovery_rate > 0
effection += "#{Vocab.mp}+#{@item.mp_recovery_rate}% "
elsif @item.mp_recovery_rate < 0
effection += "#{Vocab.mp}-#{@item.mp_recovery_rate}% "
elsif @item.mp_recovery > 0
effection += "#{Vocab.mp}+#{@item.mp_recovery} "
elsif @item.mp_recovery < 0
effection += "#{Vocab.mp}-#{@item.mp_recovery} "
end
effection += "伤害#{@item.base_damage} " if @item.base_damage != 0
case @item.parameter_type
when 1
effection += "最大#{Vocab.hp}+#{@item.parameter_points}"
when 2
effection += "最大#{Vocab.mp}+#{@item.parameter_points}"
when 3
effection += "#{Vocab.atk}+#{@item.parameter_points}"
when 4
effection += "#{Vocab.def}+#{@item.parameter_points}"
when 5
effection += "#{Vocab.spi}+#{@item.parameter_points}"
when 6
effection += "#{Vocab.agi}+#{@item.parameter_points}"
end
self.contents.draw_text(0, 48, 512, 24, effection)
# 物品恢复效果描述结束
else
# 武器防具可装备人员描述
equip = "[可装备] : "
for actor in $game_party.members
if actor.equippable?(@item)
equip += "、" if equip != "[可装备] : "
equip += actor.name
end
end
equip += "无" if equip == "[可装备] : "
self.contents.draw_text(0, 24, 512, 24, equip)
# 武器防具可装备人员描述结束
# 武器防具攻防增减描述
effection = "[属性] : "
if @item.atk != 0
effection += "攻击力+#{@item.atk} "
end
if @item.def != 0
effection += "防御力+#{@item.def} "
end
if @item.spi != 0
effection += "精神力+#{@item.spi} "
end
if @item.agi != 0
effection += "敏捷性+#{@item.agi} "
end
# 武器防具攻防增减描述结束
if @item.is_a?(RPG::Armor)
# 防具特殊属性描述
if @item.prevent_critical
effection += "防止会心一击 "
end
if @item.half_mp_cost
effection += "消费MP减半 "
end
if @item.double_exp_gain
effection += "双倍经验 "
end
if @item.auto_hp_recover
effection += "自动恢复HP "
end
# 防具特殊属性描述结束
else
# 武器特殊属性描述
if @item.two_handed
effection += "双手持 "
end
if @item.fast_attack
effection += "先发制人 "
end
if @item.dual_attack
effection += "连击 "
end
if @item.critical_bonus
effection += "频发会心一击 "
end
# 武器特殊属性描述结束
end
unless @item.element_set.empty?
# 武器防具属性描述（左边那一栏需要打勾的）
effection += @item.is_a?(RPG::Armor) ? " [防具状态] : " : " [武器属性] : "
for state in @item.element_set
effection += $data_system.elements[state] + " "
end
# 武器防具属性描述结束
end
unless @item.state_set.empty?
# 武器防具状态描述（右边那一栏需要打勾的）
effection += @item.is_a?(RPG::Armor) ? " [无效化属性] : " : " [附加状态] : "
for state in @item.state_set
effection += $data_states[state].name + " "
end
# 武器防具状态描述结束
end
self.contents.draw_text(0, 48, 512, 24, effection)
end
end
end
end
#==============================================================================
# ■ Window_Byz_Name 标题名字
#==============================================================================
class Window_Byz_Name < Window_Base
#--------------------------------------------------------------------------
# ● 初始化对象
# x : 窗口的 X 坐标
# y : 窗口的 Y 坐标
#--------------------------------------------------------------------------
def initialize
super(0, 0, 384, 56)
self.contents.draw_text(-10, -5, 384, 32, "欢迎", 1)
end
#--------------------------------------------------------------------------
# ● 设置
#--------------------------------------------------------------------------
def set(string)
self.contents.clear
self.contents.draw_text(-10, -5, 384, 32, string, 1)
end
end
#==============================================================================
# ■ Window_ByzNumber
#==============================================================================
class Window_ByzNumber < Window_Base
#--------------------------------------------------------------------------
# ● 初始化
#--------------------------------------------------------------------------
def initialize(x, y)
super(x, y, 304, 130)
@item = nil
@max = 1
@price = 0
@number = 1
end
#--------------------------------------------------------------------------
# ● 物品、最大个数、价格设定
#--------------------------------------------------------------------------
def set(item, max, price)
@item = item
@max = max
@price = price
@number = 1
refresh
end
#--------------------------------------------------------------------------
# ● 取得数量
#--------------------------------------------------------------------------
def number
return @number
end
#--------------------------------------------------------------------------
# ● 取得总价格
#--------------------------------------------------------------------------
def price
return @price * @number
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
y = 5
self.contents.clear
draw_item_name(@item, 0, y)
self.contents.font.color = normal_color
self.contents.draw_text(212, y, 20, WLH, "×")
self.contents.draw_text(248, y, 20, WLH, @number, 2)
self.cursor_rect.set(244, y, 28, WLH)
self.contents.draw_text(0, y + WLH * 2, 100, WLH, "所需金钱")
draw_currency_value(@price * @number, 4, y + WLH * 2, 264)
self.contents.draw_text(0, y + WLH * 3, 100, WLH, "现有金钱")
draw_currency_value($game_party.gold, 4, y + WLH * 3, 264)
end
#--------------------------------------------------------------------------
# ● 更新（再定义）
#--------------------------------------------------------------------------
def update
super
if self.active
last_number = @number
if Input.repeat?(Input::RIGHT) and @number < @max
@number += 1
end
if Input.repeat?(Input::LEFT) and @number > 1
@number -= 1
end
if Input.repeat?(Input::UP) and @number < @max
@number = [@number + 10, @max].min
end
if Input.repeat?(Input::DOWN) and @number > 1
@number = [@number - 10, 1].max
end
if @number != last_number
Sound.play_cursor
refresh
end
end
end
end
#==========================================================================
# Scene_Byz_Bank
#==========================================================================
class Scene_Byz_Bank < Scene_Base
#======== 初始化 ========
def initialize
@command = []
@currency_exchanges_1 = -1 # 需要兑换的货币种类
@currency_exchanges_2 = -1
@numbers = 0
@command_number = []
@command_numbers = []
@type = -1 # 窗口刷新标志
end
#======== 主题 ========
#--------------------------------------------------------------------------
# ● 开始处理
#--------------------------------------------------------------------------
def start
super
create_menu_background
create_name
create_warehouse_command
@gold_window = Window_Gold.new(384, 0)
draw_loli_bitmap if $game_system.bank_loli_bitmap != ""
draw_back_bitmap if $game_system.back_bank_bitmap != ""
end
#--------------------------------------------------------------------------
# ● 结束处理
#--------------------------------------------------------------------------
def terminate
super
dispose_menu_background
dispose_loli_bitmap if $game_system.bank_loli_bitmap != ""
dispose_back_bitmap if $game_system.back_bank_bitmap != ""
@warehouse_obj_command_window.dispose if @warehouse_obj_command_window != nil
@name_window.dispose
@gold_window.dispose
@warehouse_command_window.dispose
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def update
super
@warehouse_command_window.update if @warehouse_command_window.active
@warehouse_window.update if @warehouse_window != nil and @warehouse_window.active
@warehouse_input.update if @warehouse_input != nil
if @warehouse_command_window.active
update_warehouse_command
elsif @warehouse_input != nil
update_warehouse_input(@type)
elsif @warehouse_window != nil and @warehouse_window.active
update_warehouse_window
end
end
#======== //end主题 ========
#======== 创建 ========
#--------------------------------------------------------------------------
# ● 创建仓库选项
#--------------------------------------------------------------------------
def create_warehouse_command
s1 = Byz_Vocab::WAREHOUSE_SAVING
s2 = Byz_Vocab::WAREHOUSE_TAKING
s3 = Byz_Vocab::CANCEN
@warehouse_command_window = Window_Command.new(384,[s1, s2, s3], 3)
@warehouse_command_window.x = 0
@warehouse_command_window.y = 55
@warehouse_command_window.index = 0
@warehouse_command_window.active = true
@warehouse_command_window.visible = true
end
#--------------------------------------------------------------------------
# ● 创建仓库子选项
#--------------------------------------------------------------------------
def create_warehouse_type
@warehouse_obj_command_window = Window_Base.new(0,110, 100, 130)
@warehouse_obj_command_window.visible = true
@warehouse_obj_command_window_index = 0
@warehouse_obj_command_window.contents.draw_text(-5, -27, 78, 100, "物品", 1)
@warehouse_obj_command_window.contents.draw_text(-5, 0, 78, 100, "武器", 1)
@warehouse_obj_command_window.contents.draw_text(-5, 27, 78, 100, "防具", 1)
end
#--------------------------------------------------------------------------
# ● 创建银行名字
#--------------------------------------------------------------------------
def create_name
@name_window = Window_Byz_Name.new
end
#--------------------------------------------------------------------------
# ● 显示LOLI图片
#--------------------------------------------------------------------------
def draw_loli_bitmap
@bitmap_viewport = Viewport.new(384, 55, 544, 416)
@loli_bitmap = Sprite.new(@bitmap_viewport)
@loli_bitmap.bitmap = Bitmap.new("Graphics/Pictures/#{$game_system.bank_loli_bitmap}")
@bitmap_viewport.z = 1
end
#--------------------------------------------------------------------------
# ● 显示背景图片
#--------------------------------------------------------------------------
def draw_back_bitmap
@back_bitmap = Sprite.new
@back_bitmap.bitmap = Bitmap.new("Graphics/Pictures/#{$game_system.back_bank_bitmap}")
@back_bitmap.x = @back_bitmap.y = 0
@back_bitmap.z = 0
end
#--------------------------------------------------------------------------
# ● 显示箭头图片
#--------------------------------------------------------------------------
def show_arrow_two
@arrow_two = Sprite.new
@arrow_two.bitmap = Bitmap.new("Graphics/Pictures/#{Byz_Vocab::ARROW_TWO}")
@arrow_two.x = 0
@arrow_two.y = 130
@arrow_two.z = 500
end
#--------------------------------------------------------------------------
# ● 显示提示窗口
#--------------------------------------------------------------------------
def show_window(string)
re = string.split(//)
w = Window_Base.new(150, 100, re.size * 32 + 64, 64)
w.contents = Bitmap.new(w.width - 32, w.height - 32)
w.contents.font.color = w.text_color(2)
w.contents.draw_text(0, -15, w.width, w.height, string)
for i in 0..10
w.open
w.update
Graphics.update
end
for i in 0..30
Graphics.update
end
for i in 0..20
w.close
w.update
Graphics.update
end
w.dispose
end
#======== //end创建 ========
#======== 更新 ========
#--------------------------------------------------------------------------
# ● 仓库总窗口刷新
#--------------------------------------------------------------------------
def update_warehouse_command
if Input.trigger?(Input::B)
$scene = Scene_Map.new
elsif Input.trigger?(Input::C)
Sound.play_decision
case @warehouse_command_window.index
when 0
create_warehouse_type
show_arrow_two
@warehouse_window = Window_Warehouse.new(@warehouse_obj_command_window_index, 0)
@warehouse_window.active = true
@bitmap_viewport.rect.set(384, 55, 544, 257)
@type = 0
@warehouse_command_window.active = false
@warehouse_command_window.index = -1
@name_window.set("存物品")
when 1
create_warehouse_type
show_arrow_two
@warehouse_window = Window_Warehouse.new(@warehouse_obj_command_window_index, 1)
@warehouse_window.active = true
@bitmap_viewport.rect.set(384, 55, 544, 257)
@type = 1
@warehouse_command_window.active = false
@warehouse_command_window.index = -1
@name_window.set("取物品")
when 2
$scene = Scene_Map.new
end
end
end
#--------------------------------------------------------------------------
# ● 物品窗口刷新
#--------------------------------------------------------------------------
def update_warehouse_window
if Input.trigger?(Input::R) or Input.trigger?(Input::RIGHT)
Sound.play_decision
@warehouse_obj_command_window_index += 1
@warehouse_obj_command_window_index %= 3
@warehouse_window.kind = @warehouse_obj_command_window_index
@warehouse_window.index = 0
@arrow_two.y = 130 + @warehouse_obj_command_window_index * 32
elsif Input.trigger?(Input::L) or Input.trigger?(Input::LEFT)
Sound.play_decision
@warehouse_obj_command_window_index -= 1
@warehouse_obj_command_window_index %= 3
@warehouse_window.kind = @warehouse_obj_command_window_index
@item_index = @warehouse_window.check
@warehouse_window.index = 0
@arrow_two.y = 130 + @warehouse_obj_command_window_index * 32
elsif Input.trigger?(Input::C)
Sound.play_decision
@item_index = @warehouse_window.check
@last_index = @warehouse_window.index
if @item_index == nil
return
end
@warehouse_window.active = false
@warehouse_input = Window_ByzNumber.new(100, 100)
@warehouse_input.active = true
if @type == 0
price = Byz_Vocab::PRICES
if @warehouse_obj_command_window_index == 0
@warehouse_input.set($data_items[@item_index], $game_party.item_number($data_items[@item_index]), price)
elsif @warehouse_obj_command_window_index == 1
@warehouse_input.set($data_weapons[@item_index], $game_party.item_number($data_weapons[@item_index]), price)
elsif @warehouse_obj_command_window_index == 2
@warehouse_input.set($data_armors[@item_index], $game_party.item_number($data_armors[@item_index]), price)
end
else
if @warehouse_obj_command_window_index == 0
@warehouse_input.set($data_items[@item_index], $game_party.warehouse[0][@item_index], 0)
elsif @warehouse_obj_command_window_index == 1
@warehouse_input.set($data_weapons[@item_index], $game_party.warehouse[1][@item_index], 0)
elsif @warehouse_obj_command_window_index == 2
@warehouse_input.set($data_armors[@item_index], $game_party.warehouse[2][@item_index], 0)
end
end
elsif Input.trigger?(Input::B)
@warehouse_obj_command_window.dispose
@warehouse_obj_command_window = nil
@arrow_two.bitmap.dispose
@arrow_two.dispose
@warehouse_window.dispose
@warehouse_window = nil
@warehouse_command_window.index = @type
@warehouse_command_window.active = true
@bitmap_viewport.rect.set(384, 55, 544, 416)
@name_window.set("欢迎")
end
end
def update_warehouse_input(type)
if Input.trigger?(Input::B)
@warehouse_obj_command_window.dispose
@warehouse_obj_command_window = nil
@arrow_two.bitmap.dispose
@arrow_two.dispose
create_warehouse_type
show_arrow_two
@warehouse_window.dispose
@warehouse_window = Window_Warehouse.new(@warehouse_obj_command_window_index, @type)
@warehouse_window.active = true
@warehouse_window.index = @last_index
@warehouse_input.dispose if @warehouse_input != nil
@warehouse_input = nil
@warehouse_window.active = true
elsif Input.trigger?(Input::C)
Sound.play_decision
@item_index = @warehouse_window.check
if @item_index == nil
return
end
@numbers = @warehouse_input.number
price = @warehouse_input.price
if type == 0
if @warehouse_obj_command_window_index == 0
if price < $game_party.gold
$game_party.lose_item($data_items[@item_index], @numbers)
if $game_party.warehouse[0][@item_index] == nil
$game_party.warehouse[0][@item_index] = 0
end
$game_party.lose_gold(@warehouse_input.price)
$game_party.warehouse[0][@item_index] += @numbers
@warehouse_window.refresh_bool
@gold_window.refresh
input_to_command
else
show_window("金钱不足")
return
end
elsif @warehouse_obj_command_window_index == 1
if price < $game_party.gold
$game_party.lose_item($data_weapons[@item_index], @numbers)
if $game_party.warehouse[1][@item_index] == nil
$game_party.warehouse[1][@item_index] = 0
end
$game_party.lose_gold(@warehouse_input.price)
$game_party.warehouse[1][@item_index] += @numbers
@warehouse_window.refresh_bool
@gold_window.refresh
input_to_command
else
show_window("金钱不足")
return
end
elsif @warehouse_obj_command_window_index == 2
if price < $game_party.gold
$game_party.lose_item($data_armors[@item_index], @numbers)
if $game_party.warehouse[2][@item_index] == nil
$game_party.warehouse[2][@item_index] = 0
end
$game_party.lose_gold(@warehouse_input.price)
$game_party.warehouse[2][@item_index] += @numbers
@warehouse_window.refresh_bool
@gold_window.refresh
input_to_command
else
show_window("金钱不足")
return
end
end
else
if @warehouse_obj_command_window_index == 0
if $game_party.warehouse[0][@item_index] == nil
input_to_command
return
end
if $game_party.warehouse[0][@item_index] <= @numbers
@numbers = $game_party.warehouse[0][@item_index]
$game_party.warehouse[0][@item_index] = nil
else
$game_party.warehouse[0][@item_index] -= @numbers
end
$game_party.gain_item($data_items[@item_index], @numbers)
@warehouse_window.refresh_bool
@gold_window.refresh
input_to_command
elsif @warehouse_obj_command_window_index == 1
if $game_party.warehouse[1][@item_index] == nil
@warehouse_window.refresh_bool
input_to_command
return
end
if $game_party.warehouse[1][@item_index] <= @numbers
@numbers = $game_party.warehouse[1][@item_index]
$game_party.warehouse[1][@item_index] = nil
else
$game_party.warehouse[1][@item_index] -= @numbers
end
$game_party.gain_item($data_weapons[@item_index], @numbers)
@warehouse_window.refresh_bool
@gold_window.refresh
input_to_command
elsif @warehouse_obj_command_window_index == 2
if $game_party.warehouse[2][@item_index] == nil
@warehouse_window.refresh_bool
input_to_command
return
end
if $game_party.warehouse[2][@item_index] <= @numbers
@numbers = $game_party.warehouse[2][@item_index]
$game_party.warehouse[2][@item_index] = nil
else
$game_party.warehouse[2][@item_index] -= @numbers
end
$game_party.gain_item($data_armors[@item_index], @numbers)
@warehouse_window.refresh_bool
@gold_window.refresh
input_to_command
end
end
end
end
#======== //end更新 ========
#======== 切换 ========
def input_to_command
@warehouse_input.dispose
@warehouse_input = nil
@warehouse_window.refresh
@warehouse_window.active = true
end
#======== //end切换 ========
#======== 释放 ========
#--------------------------------------------------------------------------
# ● 释放LOLI图片
#--------------------------------------------------------------------------
def dispose_loli_bitmap
@loli_bitmap.bitmap.dispose
@loli_bitmap.dispose
end
#--------------------------------------------------------------------------
# ● 释放背景图片
#--------------------------------------------------------------------------
def dispose_back_bitmap
@back_bitmap.bitmap.dispose
@back_bitmap.dispose
end
#======== //end释放 ========
end

复制代码

yychchhh · 发表于 2012-6-2 15:18:17

你可以试试这个：

#==============================================================================
#
# 仓库ver1.1
#
# 汉化 by 约束
#
# RPG中存放多余物品的仓库。
# 本脚本与黑狮子的脚本相似
# 参考于MQ0_PartyReserve所做。
#
# 使用方法
# 事件中的「脚本」里填入reserve_system即可启动此脚本。
#
# 不可存放物品
# ・不想可以存放事件/剧情所需物品时
# 在物品的备注栏中填入非存放即可
# 如此即可使物品不可存入仓库。
#
# 另外、为能使用TYPE74RX-T様的「限定特定物平的所持数上限」脚本
# 而写了专门应对的方法
# 如果有用到以上所述脚本、请使RX_T_ITEM为true状态
#
#==============================================================================
module BBL_RESERVE_SYSTEM
#==============================================================================
# 设定项目开始
#==============================================================================
# 如果不希望保管物品根据以下范畴区分的情况时请填入false
ITEM_DISCRETION = true
# ITEM_DISCRETION在true的状态时请在以下填入范畴名
# 从左开始依次为物品、武器、防具、金钱(顺序不可改变)
# ※如果不希望有金钱保管功能时将金钱从范畴内消去
# 例)　["物品", "武器", "防具"]
DISCRETION_NAME = ["物品", "武器", "防具", "金钱"]
# 操作说明文
# 如果不需要时、消除""内文字即可
COMMAND_EXPLANATION = "空格：分别存入Ｄ：全部存入"
# 使用仓库时的按键
RESERVE_KEY = Input::C # 分别存入
RESERVE_ALL_KEY = Input::Z # 全部存入
# 金钱选项窗口的用语
# 从左开始依次为保存和提取
GOLD_COMMAND_NAME = ["保存", "取出"]
# 所持金钱的用语
GOLD_NAME = "现有金额"
# 保存金钱的用语
RESERVE_GOLD_NAME = "存储金额"
# 使用了TYPE74RX-T様的「限定特定物平的所持数上限」脚本
# 请在以下改为true即可
RX_T_ITEM = false
#==============================================================================
# 设定项目完毕
#==============================================================================
end
$imported = {} if $imported == nil
class Game_Party
alias bbl_initialize initialize
#--------------------------------------------------------------------------
# ○ 定义实例变量 (追加定义)
#--------------------------------------------------------------------------
attr_reader :keep_gold # 保存金钱
#--------------------------------------------------------------------------
# ● 初期化对象
#--------------------------------------------------------------------------
def initialize
bbl_initialize
@keep_items = {} # 保管品 hash (物品 ID)
@keep_weapons = {} # 保管品 hash (武器 ID)
@keep_armors = {} # 保管品 hash (防具 ID)
@keep_gold = 0 # 保管金钱
end
#--------------------------------------------------------------------------
# ○ 获取保存物品的排序
#--------------------------------------------------------------------------
def keeping_items
result = []
for i in @keep_items.keys.sort
result.push($data_items[i]) if @keep_items[i] > 0
end
for i in @keep_weapons.keys.sort
result.push($data_weapons[i]) if @keep_weapons[i] > 0
end
for i in @keep_armors.keys.sort
result.push($data_armors[i]) if @keep_armors[i] > 0
end
return result
end
#--------------------------------------------------------------------------
# ○ 获取保存物品的所持数量
#--------------------------------------------------------------------------
def keeping_item_number(item)
case item
when RPG::Item
number = @keep_items[item.id]
when RPG::Weapon
number = @keep_weapons[item.id]
when RPG::Armor
number = @keep_armors[item.id]
end
return number == nil ? 0 : number
end
#--------------------------------------------------------------------------
# ○ 保存物品的增加 (减少)
# item : 物品
# n : 个数
#--------------------------------------------------------------------------
def gain_keeping_item(item, n)
number = keeping_item_number(item)
case item
when RPG::Item
@keep_items[item.id] = [[number + n, 0].max, 99].min
when RPG::Weapon
@keep_weapons[item.id] = [[number + n, 0].max, 99].min
when RPG::Armor
@keep_armors[item.id] = [[number + n, 0].max, 99].min
end
end
#--------------------------------------------------------------------------
# ○ 保存物品的减少
# item : 物品
# n : 个数
#--------------------------------------------------------------------------
def lose_keeping_item(item, n)
gain_keeping_item(item, -n)
end
#--------------------------------------------------------------------------
# ● 保管金额的增加 (减少)
# n : 金额
#--------------------------------------------------------------------------
def gain_keeping_gold(n)
@keep_gold = [[@keep_gold + n, 0].max, 9999999].min
end
#--------------------------------------------------------------------------
# ● 保管金额的减少
# n : 金额
#--------------------------------------------------------------------------
def lose_keeping_gold(n)
gain_keeping_gold(-n)
end
end
#==============================================================================
# ■ Game_Interpreter
#==============================================================================
class Game_Interpreter
#--------------------------------------------------------------------------
# ● 呼出仓库
#--------------------------------------------------------------------------
def reserve_system
$scene = Scene_Reserve.new
return true
end
end
class Scene_Reserve < Scene_Base
#--------------------------------------------------------------------------
# ● 开始处理
#--------------------------------------------------------------------------
def start
super
create_menu_background
@not_gold = true if BBL_RESERVE_SYSTEM::DISCRETION_NAME.size < 4
if BBL_RESERVE_SYSTEM::ITEM_DISCRETION
@item_window = Window_Reserve_main.new(0, 112, 272, 248)
@reserve_window = Window_Reserve.new(272, 112, 272, 248)
else
@item_window = Window_Reserve_main.new(0, 56, 272, 304)
@reserve_window = Window_Reserve.new(272, 56, 272, 304)
end
@help_window = Window_Help.new
@item_window.help_window = @help_window
@reserve_window.help_window = @help_window
@command_window = Window_ReserveCommand.new(544, BBL_RESERVE_SYSTEM::DISCRETION_NAME,
BBL_RESERVE_SYSTEM::DISCRETION_NAME.size, 1, 4)
@command_window.y = 56
@command_window.active = true
@gold_command_window = Window_ReserveCommand.new(192, BBL_RESERVE_SYSTEM::GOLD_COMMAND_NAME, 1, 0)
@gold_command_window.opacity = 0
@gold_command_window.x = 32
@gold_command_window.y = @item_window.y + 64
@gold_command_window.visible = false
@item_window.active = false
@reserve_window.active = false
@item_window.index = -1
@reserve_window.index = -1
@item_cursor = 0
@reserve_cursor = 0
@item_window.mode = 1
@reserve_window.mode = 1
@number_window = Window_GoldInput.new
@number_window.visible = false
@number_window.y = @gold_command_window.y + @gold_command_window.height
@gold_window = Window_HandGold.new(0, 416 - 56)
@gold_reserve_window = Window_ReserveGold.new(272, 416 - 56)
unless BBL_RESERVE_SYSTEM::ITEM_DISCRETION
@command_window.active = false
@command_window.visible = false
@item_window.index = 0
@item_window.active
end
if $imported["HelpExtension"]
adjust_window_size
else
adjust_gold_window_size
end
end
#--------------------------------------------------------------------------
# ● 完毕处理
#--------------------------------------------------------------------------
def terminate
super
dispose_menu_background
@item_window.dispose
@reserve_window.dispose
@command_window.dispose
@help_window.dispose
@gold_command_window.dispose
@gold_window.dispose
@gold_reserve_window.dispose
@number_window.dispose
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
super
update_menu_background
@command_window.update if BBL_RESERVE_SYSTEM::ITEM_DISCRETION
if @item_window.index >= 0
@item_window.active = true
@reserve_window.active = false
elsif @reserve_window.index >= 0
@item_window.active = false
@reserve_window.active = true
end
if @command_window.active == true
command_selection
elsif @item_window.active == true
select_item
elsif @reserve_window.active == true
select_keeping_item
elsif @gold_command_window.active == true
select_gold_command
elsif @number_window.active == true
select_number
end
item_mode = @command_window.index + 1
if item_mode != @item_window.mode
@item_window.mode = item_mode
end
if item_mode != @reserve_window.mode
@reserve_window.mode = item_mode
end
end
#--------------------------------------------------------------------------
# ● 指令窗口选项的刷新
#--------------------------------------------------------------------------
def command_selection
@help_window.set_text(BBL_RESERVE_SYSTEM::COMMAND_EXPLANATION)
if Input.trigger?(Input::C)
if @command_window.index == 3
Sound.play_decision
@command_window.active = false
@gold_command_window.visible = true
@gold_command_window.active = true
@gold_command_window.index = 0
else
Sound.play_decision
@command_window.active = false
@item_window.active = true
@item_window.index = 0
end
elsif Input.trigger?(Input::B)
Sound.play_cancel
$scene = Scene_Map.new
end
end
#--------------------------------------------------------------------------
# ● 所持物品选项的刷新
#--------------------------------------------------------------------------
def select_item
@item_window.update
@reserve_window.update
if Input.repeat?(BBL_RESERVE_SYSTEM::RESERVE_KEY)
@item_window.gain_item
@item_window.refresh
@reserve_window.refresh
if @item_window.item == nil
@item_window.index -= 1 if @item_window.index > 0
end
elsif Input.repeat?(BBL_RESERVE_SYSTEM::RESERVE_ALL_KEY)
@item_window.gain_item_all
@item_window.refresh
@reserve_window.refresh
if @item_window.item == nil
@item_window.index -= 1 if @item_window.index > 0
end
elsif Input.trigger?(Input::B)
if BBL_RESERVE_SYSTEM::ITEM_DISCRETION
Sound.play_cancel
@item_window.active = false
@item_window.index = -1
@command_window.active = true
else
Sound.play_cancel
$scene = Scene_Map.new
end
elsif Input.trigger?(Input::RIGHT) or Input.trigger?(Input::LEFT)
Sound.play_cursor
@item_cursor = @item_window.index
@item_window.active = false
@reserve_window.active
@item_window.index = -1
@reserve_window.index = @reserve_cursor
end
end
#--------------------------------------------------------------------------
# ● 保管物品选项的刷新
#--------------------------------------------------------------------------
def select_keeping_item
@item_window.update
@reserve_window.update
if Input.repeat?(BBL_RESERVE_SYSTEM::RESERVE_KEY)
@reserve_window.reserve_item
@item_window.refresh
@reserve_window.refresh
if @reserve_window.item == nil
@reserve_window.index -= 1 if @reserve_window.index > 0
end
elsif Input.repeat?(BBL_RESERVE_SYSTEM::RESERVE_ALL_KEY)
@reserve_window.reserve_item_all
@item_window.refresh
@reserve_window.refresh
if @reserve_window.item == nil
@reserve_window.index -= 1 if @reserve_window.index > 0
end
elsif Input.trigger?(Input::B)
if BBL_RESERVE_SYSTEM::ITEM_DISCRETION
Sound.play_cancel
@reserve_window.active = false
@reserve_window.index = -1
@command_window.active = true
else
Sound.play_cancel
$scene = Scene_Map.new
end
elsif Input.trigger?(Input::RIGHT) or Input.trigger?(Input::LEFT)
Sound.play_cursor
@reserve_cursor = @reserve_window.index
@reserve_window.active = false
@item_window.active
@reserve_window.index = -1
@item_window.index = @item_cursor
end
end
#--------------------------------------------------------------------------
# ● 金钱指令窗口选项的刷新
#--------------------------------------------------------------------------
def select_gold_command
@gold_command_window.update
if Input.trigger?(Input::C)
Sound.play_decision
@gold_command_window.active = false
@gold_command_window.visible = false
@number_window.visible = true
@number_window.active = true
if @gold_command_window.index == 0
@number_window.mode = 0 # 存入
@number_window.x = 32
else
@number_window.mode = 1 # 提取
@number_window.x = 304
end
elsif Input.trigger?(Input::B)
Sound.play_cancel
@gold_command_window.active = false
@gold_command_window.visible = false
@command_window.active = true
end
end
#--------------------------------------------------------------------------
# ● 填写金额的刷新
#--------------------------------------------------------------------------
def select_number
@number_window.update
if Input.trigger?(Input::C)
if @number_window.mode == 0
if @number_window.number > $game_party.gold
Sound.play_buzzer
@number_window.number = $game_party.gold
else
Sound.play_decision
gold = @number_window.number
$game_party.lose_gold(gold)
$game_party.gain_keeping_gold(gold)
@number_window.number = 0
@gold_window.refresh
@gold_reserve_window.refresh
end
elsif @number_window.mode == 1
if @number_window.number > $game_party.keep_gold
Sound.play_buzzer
@number_window.number = $game_party.keep_gold
else
Sound.play_decision
gold = @number_window.number
$game_party.gain_gold(gold)
$game_party.lose_keeping_gold(gold)
@number_window.number = 0
@gold_window.refresh
@gold_reserve_window.refresh
end
end
elsif Input.trigger?(Input::B)
Sound.play_cancel
@number_window.visible = false
@number_window.active = false
@number_window.number = 0
@number_window.index = 6
@gold_command_window.visible = true
@gold_command_window.active = true
end
end
if $imported["HelpExtension"]
#--------------------------------------------------------------------------
# ● 调整窗口大小用于KGC的扩张帮助窗口
#--------------------------------------------------------------------------
def adjust_window_size
@help_window.row_max = KGC::HelpExtension::ROW_MAX
@command_window.y = @help_window.height
@item_window.y = @command_window.height + @help_window.height
@reserve_window.y = @command_window.height + @help_window.height
sy = @help_window.height + @command_window.height + @gold_window.height
sy = @help_window.height + @command_window.height if @not_gold
@item_window.height = 416 - sy
@reserve_window.height = 416 - sy
@gold_command_window.y = @item_window.y
if @not_gold
@gold_window.visible = false
@gold_reserve_window.visible = false
end
end
end
#--------------------------------------------------------------------------
# ● 调整窗口大小
#--------------------------------------------------------------------------
def adjust_gold_window_size
sy = @help_window.height + @command_window.height + @gold_window.height
sy = @help_window.height + @command_window.height if @not_gold
@item_window.height = 416 - sy
@reserve_window.height = 416 - sy
if @not_gold
@gold_window.visible = false
@gold_reserve_window.visible = false
end
end
end
#==============================================================================
# ■ Window_Reserve
#------------------------------------------------------------------------------
# 　显示仓库中物品一览
#==============================================================================
class Window_Reserve < Window_Selectable
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :mode # 模式
#--------------------------------------------------------------------------
# ● 初期化对象
# x : 窗口的 X 坐标
# y : 窗口的 Y 坐标
# width : 窗口的宽度
# height : 窗口的高度
#--------------------------------------------------------------------------
def initialize(x, y, width, height)
super(x, y, width, height)
@column_max = 1
self.index = -1
@mode = 0
@total = 0
@value = 0
refresh
end
#--------------------------------------------------------------------------
# ● 获取物品
#--------------------------------------------------------------------------
def item
return @data[self.index]
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
@data = []
for item in $game_party.keeping_items
next unless include?(item)
@data.push(item)
if item.is_a?(RPG::Item) and item.id == $game_party.last_item_id
self.index = @data.size - 1
end
end
@data.push(nil) if include?(nil)
@item_max = @data.size
create_contents
for i in 0...@item_max
draw_item(i)
end
end
#--------------------------------------------------------------------------
# ● 项目的描画
# index : 项目编号
#--------------------------------------------------------------------------
def draw_item(index)
rect = item_rect(index)
self.contents.clear_rect(rect)
item = @data[index]
if item != nil
number = $game_party.keeping_item_number(item)
enabled = enable?(item)
rect.width -= 4
draw_item_name(item, rect.x, rect.y, enabled)
self.contents.draw_text(rect, sprintf("%2d", number), 2)
self.contents.font.size = 14
rect.width -= 20
self.contents.draw_text(rect, "×", 2)
self.contents.font.size = 20
end
end
#--------------------------------------------------------------------------
# ● 刷新帮助文本
#--------------------------------------------------------------------------
def update_help
@help_window.set_text(item == nil ? "" : item.description)
end
#--------------------------------------------------------------------------
# ● 模式的设定
# mode : 新模式
#--------------------------------------------------------------------------
def mode=(mode)
if @mode != mode
@mode = mode
refresh
end
end
#--------------------------------------------------------------------------
# ● 物品在许可状态时是否显示
#--------------------------------------------------------------------------
def enable?(item)
if BBL_RESERVE_SYSTEM::RX_T_ITEM
rx_limit = RX_T.get_numeric_of_system_word_in_sys_str(item, "所持可能数")
if rx_limit > 0
if $game_party.item_number(item) == rx_limit
return false
end
end
end
if $game_party.item_number(item) == 99
return false
else
return true
end
end
#--------------------------------------------------------------------------
# ● 物品是否存在于名单
# item : 物品
#--------------------------------------------------------------------------
def include?(item)
if BBL_RESERVE_SYSTEM::ITEM_DISCRETION
case @mode
when 1 # 物品
return false unless item.is_a?(RPG::Item)
when 2 # 武器
return false unless item.is_a?(RPG::Weapon)
when 3 # 防具
return false unless item.is_a?(RPG::Armor)
when 4 # 金钱
return false
end
return true
else
return false if item == nil
if $game_temp.in_battle
return false unless item.is_a?(RPG::Item)
end
return true
end
end
#--------------------------------------------------------------------------
# ● 取出保管中物品
#--------------------------------------------------------------------------
def reserve_item
return if item == nil
if BBL_RESERVE_SYSTEM::RX_T_ITEM
rx_limit = RX_T.get_numeric_of_system_word_in_sys_str(item, "所持可能数")
end
return Sound.play_buzzer if $game_party.item_number(item) == 99
if rx_limit == 0
rx_limit = nil
end
if $game_party.item_number(item) == rx_limit
Sound.play_buzzer
else
Sound.play_use_item
$game_party.lose_keeping_item(item, 1)
$game_party.gain_item(item, 1)
end
end
#--------------------------------------------------------------------------
# ● 将保管中物品全部取出
#--------------------------------------------------------------------------
def reserve_item_all
return if item == nil
if BBL_RESERVE_SYSTEM::RX_T_ITEM
rx_limit = RX_T.get_numeric_of_system_word_in_sys_str(item, "所持可能数")
end
return Sound.play_buzzer if $game_party.item_number(item) == 99
if rx_limit == 0
rx_limit = nil
end
if $game_party.item_number(item) == rx_limit
Sound.play_buzzer
else
Sound.play_use_item
@total = $game_party.keeping_item_number(item) + $game_party.item_number(item)
if rx_limit != nil
if rx_limit > 0
if @total > rx_limit
@value = @total - rx_limit
end
end
else
if @total > 99
@value = @total - 99
end
end
$game_party.gain_item(item, $game_party.keeping_item_number(item))
$game_party.lose_keeping_item(item, $game_party.keeping_item_number(item))
$game_party.gain_keeping_item(item, @value)
@total = 0
@value = 0
end
end
end
#==============================================================================
# ■ Window_Reserve
#------------------------------------------------------------------------------
# 　显示仓库中所持物品一览
#==============================================================================
class Window_Reserve_main < Window_Selectable
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :mode # 模式
#--------------------------------------------------------------------------
# ● 初期化对象
# x : 窗口的 X 坐标
# y : 窗口的 Y 坐标
# width : 窗口的宽度
# height : 窗口的高度
#--------------------------------------------------------------------------
def initialize(x, y, width, height)
super(x, y, width, height)
@column_max = 1
self.index = -1
@mode = 0
@total = 0
@value = 0
refresh
end
#--------------------------------------------------------------------------
# ● 物品的获取
#--------------------------------------------------------------------------
def item
return @data[self.index]
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
@data = []
for item in $game_party.items
next unless include?(item)
@data.push(item)
if item.is_a?(RPG::Item) and item.id == $game_party.last_item_id
self.index = @data.size - 1
end
end
@data.push(nil) if include?(nil)
@item_max = @data.size
create_contents
for i in 0...@item_max
draw_item(i)
end
end
#--------------------------------------------------------------------------
# ● 项目的描画
# index : 项目编号
#--------------------------------------------------------------------------
def draw_item(index)
rect = item_rect(index)
self.contents.clear_rect(rect)
item = @data[index]
if item != nil
number = $game_party.item_number(item)
enabled = enable?(item)
rect.width -= 4
draw_item_name(item, rect.x, rect.y, enabled)
self.contents.draw_text(rect, sprintf("%2d", number), 2)
self.contents.font.size = 14
rect.width -= 20
self.contents.draw_text(rect, "×", 2)
self.contents.font.size = 20
end
end
#--------------------------------------------------------------------------
# ● 刷新帮助文本
#--------------------------------------------------------------------------
def update_help
@help_window.set_text(item == nil ? "" : item.description)
end
#--------------------------------------------------------------------------
# ● 模式的设定
# mode : 新模式
#--------------------------------------------------------------------------
def mode=(mode)
if @mode != mode
@mode = mode
refresh
end
end
#--------------------------------------------------------------------------
# ● 物品在许可状态时是否显示
#--------------------------------------------------------------------------
def enable?(item)
if $game_party.keeping_item_number(item) == 99
return false
else
return true
end
end
#--------------------------------------------------------------------------
# ○ 物品是否存在于名单
# item : 物品
#--------------------------------------------------------------------------
def include?(item)
if BBL_RESERVE_SYSTEM::ITEM_DISCRETION
case @mode
when 1 # 物品
return false unless item.is_a?(RPG::Item)
return false if item.note.include?("非存放")
when 2 # 武器
return false unless item.is_a?(RPG::Weapon)
return false if item.note.include?("非存放")
when 3 # 防具
return false unless item.is_a?(RPG::Armor)
return false if item.note.include?("非存放")
when 4 # 金钱
return false
end
return true
else
return false if item == nil
if $game_temp.in_battle
return false unless item.is_a?(RPG::Item)
end
return false if item.note.include?("非存放")
return true
end
end
#--------------------------------------------------------------------------
# ● 所持有物品的保存
#--------------------------------------------------------------------------
def gain_item
return if item == nil
if $game_party.keeping_item_number(item) == 99
Sound.play_buzzer
else
Sound.play_use_item
$game_party.gain_keeping_item(item, 1)
$game_party.lose_item(item, 1)
end
end
#--------------------------------------------------------------------------
# ● 所持有物品全部保存
#--------------------------------------------------------------------------
def gain_item_all
return if item == nil
if $game_party.keeping_item_number(item) == 99
Sound.play_buzzer
else
Sound.play_use_item
@total = $game_party.keeping_item_number(item) + $game_party.item_number(item)
if @total > 99
@value = @total - 99
end
$game_party.gain_keeping_item(item, $game_party.item_number(item))
$game_party.lose_item(item, $game_party.item_number(item))
$game_party.gain_item(item, @value)
@total = 0
@value = 0
end
end
end
#==============================================================================
# ■ Window_GoldInput
#------------------------------------------------------------------------------
# 用于填写所持金钱的窗口。
#==============================================================================
class Window_GoldInput < Window_Base
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :mode # 模式
attr_accessor :index # 索引
#--------------------------------------------------------------------------
# ● 初期化对象
# digits_max : 行数
#--------------------------------------------------------------------------
def initialize
super(32, 208, 544, 64)
@number = 0
@digits_max = 7
@index = @digits_max - 1
@mode = 0
self.opacity = 0
self.active = false
self.z += 9999
refresh
update_cursor
end
#--------------------------------------------------------------------------
# ● 数值的获取
#--------------------------------------------------------------------------
def number
return @number
end
#--------------------------------------------------------------------------
# ● 模式的获取
# 0:保存 1:提取
#--------------------------------------------------------------------------
def mode=(mode)
@mode = mode
return @mode
end
#--------------------------------------------------------------------------
# ● 数值的设定
# number : 新数值
#--------------------------------------------------------------------------
def number=(number)
@number = [[number, 0].max, 10 ** @digits_max - 1].min
refresh
end
#--------------------------------------------------------------------------
# ● 行数的获取
#--------------------------------------------------------------------------
def digits_max
return @digits_max
end
#--------------------------------------------------------------------------
# ● 行数的设定
# digits_max : 新行数
#--------------------------------------------------------------------------
def digits_max=(digits_max)
@digits_max = digits_max
refresh
end
#--------------------------------------------------------------------------
# ● 光标向右移动
# wrap : 可以往复循环移动
#--------------------------------------------------------------------------
def cursor_right(wrap)
if @index < @digits_max - 1 or wrap
@index = (@index + 1) % @digits_max
end
end
#--------------------------------------------------------------------------
# ● 光标向左移动
# wrap : 可以往复循环移动
#--------------------------------------------------------------------------
def cursor_left(wrap)
if @index > 0 or wrap
@index = (@index + @digits_max - 1) % @digits_max
end
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
super
if self.active
if Input.repeat?(Input::UP) or Input.repeat?(Input::DOWN)
Sound.play_cursor
place = 10 ** (@digits_max - 1 - @index)
n = @number / place % 10
@number -= n * place
n = (n + 1) % 10 if Input.repeat?(Input::UP)
n = (n + 9) % 10 if Input.repeat?(Input::DOWN)
@number += n * place
refresh
end
last_index = @index
if Input.repeat?(Input::RIGHT)
if @index == @digits_max - 1
Sound.play_cursor
if @mode == 0
if @number == $game_party.gold
@number = 0
else
@number = $game_party.gold
end
elsif @mode == 1
if @number == $game_party.keep_gold
@number = 0
else
@number = $game_party.keep_gold
end
end
refresh
else
cursor_right(Input.trigger?(Input::RIGHT))
end
end
if Input.repeat?(Input::LEFT)
if @index == 0
Sound.play_cursor
if @mode == 0
if @number == $game_party.gold
@number = 0
else
@number = $game_party.gold
end
elsif @mode == 1
if @number == $game_party.keep_gold
@number = 0
else
@number = $game_party.keep_gold
end
end
refresh
else
cursor_left(Input.trigger?(Input::LEFT))
end
end
if @index != last_index
Sound.play_cursor
end
update_cursor
end
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
self.contents.font.color = normal_color
s = sprintf("%0*d", @digits_max, @number)
for i in 0...@digits_max
self.contents.draw_text(24 + i * 16, 0, 16, WLH, s[i,1], 1)
end
self.contents.font.color = system_color
self.contents.draw_text(24 + (i + 1) * 16, 0, 16, WLH, Vocab::gold)
end
#--------------------------------------------------------------------------
# ● 光标的刷新
#--------------------------------------------------------------------------
def update_cursor
self.cursor_rect.set(24 + @index * 16, 0, 16, WLH)
end
end
#==============================================================================
# ■ Window_ReserveGold
#------------------------------------------------------------------------------
# 　显示保存金额的窗口。
#==============================================================================
class Window_ReserveGold < Window_Base
#--------------------------------------------------------------------------
# ● 初期化对象
# x : 窗口的 X 坐标
# y : 窗口的 Y 坐标
#--------------------------------------------------------------------------
def initialize(x, y)
super(x, y, 272, WLH + 32)
refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
draw_currency_value($game_party.keep_gold, 104, 0, 120)
self.contents.font.color = system_color
self.contents.draw_text(16, 0, 120, WLH, BBL_RESERVE_SYSTEM::RESERVE_GOLD_NAME)
end
end
#==============================================================================
# ■ Window_HandGold
#------------------------------------------------------------------------------
# 　显示所持金额的窗口。
#==============================================================================
class Window_HandGold < Window_Base
#--------------------------------------------------------------------------
# ● 初期化对象
# x : 窗口的 X 坐标
# y : 窗口的 Y 坐标
#--------------------------------------------------------------------------
def initialize(x, y)
super(x, y, 272, WLH + 32)
refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
draw_currency_value($game_party.gold, 104, 0, 120)
self.contents.font.color = system_color
self.contents.draw_text(16, 0, 120, WLH, BBL_RESERVE_SYSTEM::GOLD_NAME)
end
end
#==============================================================================
# ■ Window_ReserveCommand
#------------------------------------------------------------------------------
# 　进行仓库指令选择的窗口。
#==============================================================================
class Window_ReserveCommand < Window_Selectable
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :commands # 指令
#--------------------------------------------------------------------------
# ● 初期化对象
# width : 窗口的宽度
# commands : 指令字符串的排序
# column_max : 行数 (在2 以上时,横向选项)
# row_max : 列数 (0:切合指令个数)
# spacing : 项目横向排列时空白的部分
#--------------------------------------------------------------------------
def initialize(width, commands, column_max = 1, row_max = 0, spacing = 32)
if row_max == 0
row_max = (commands.size + column_max - 1) / column_max
end
super(0, 0, width, row_max * WLH + 32, spacing)
@commands = commands
@item_max = commands.size
@column_max = column_max
refresh
self.index = 0
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
for i in 0...@item_max
draw_item(i)
end
end
#--------------------------------------------------------------------------
# ● 项目的描画
# index : 项目编号
# enabled : 有效标志。false 时会描绘为半透明状
#--------------------------------------------------------------------------
def draw_item(index, enabled = true)
rect = item_rect(index)
rect.x += 4
rect.width -= 8
self.contents.clear_rect(rect)
self.contents.font.color = normal_color
self.contents.font.color.alpha = enabled ? 255 : 128
self.contents.draw_text(rect, @commands[index], 1)
end
end

复制代码

344143370 · 发表于 2012-6-2 16:02:49

yychchhh 发表于 2012-6-2 15:18
你可以试试这个：

不行，第二个角色去还是空的...不可以共用

yychchhh · 发表于 2012-6-2 16:33:15

344143370 发表于 2012-6-2 16:02
不行，第二个角色去还是空的...不可以共用

我说的是把你的去掉，换成我的脚本！
在事件中加上reserve_system这个脚本即可运行！

344143370 · 发表于 2012-6-2 16:46:15

yychchhh 发表于 2012-6-2 16:33
我说的是把你的去掉，换成我的脚本！
在事件中加上reserve_system这个脚本即可运行！ ...

不行我用的就是你的脚本我把我的删了一样不能共用

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

[已经过期] 怎么设置仓库脚本存的东西可以每个角色都共用呢？

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

贵宾