Limited Inventory

[raffy2010]

Descrizione

Questo script permette di impone un limite all'inventario del giocatore ed aggiunge la possibilita di scartare oggetti

http://3.bp.blogspot.com/-kuPP_aKGwig/UhDrfPdBbHI/AAAAAAAABMk/ziL9QOiS53I/s400/limited01.jpghttp://2.bp.blogspot.com/-8449bOTP6Nw/UhDrfR4PbxI/AAAAAAAABMo/t8qOmt1fM2c/s400/limited02.jpg

Autore

Theo

Allegati

N/A

Istruzioni per l'uso

Inserisci lo script sotto materials

 

Script

# =============================================================================
# TheoAllen - Limited Inventory
# Version : 1.2c
# Contact : www.rpgmakerid.com (or) http://theolized.blogspot.com
# (English Documentation)
# =============================================================================
($imported ||= {})[:Theo_LimInventory] = true
# =============================================================================
# CHANGE LOGS:
# -----------------------------------------------------------------------------
# 2013.10.07 - Bugfix. Item doesn't removed when discarded
# - Bugfix. Inventory amount not refreshed when item is discarded
# 2013.10.04 - Compatibility fix with chest system
# 2013.08.30 - Now unable to discard key item
# 2013.08.22 - Bugfix. Item size notetag isn't working
# 2013.08.19 - Bugfix when gained item
# - Bugfix when disable display item size in shop menu
# 2013.08.18 - Finished script
# =============================================================================
=begin

# ---------------------------------------------------------------------------
Introduction :
This script allow you to limit your inventory by overall possesed items
instead of individual items

# ---------------------------------------------------------------------------
How to Use :
Put this script below material but above main
If you're using YEA - Shop Option, put it below that script
Edit configurations and the notetags as described below

# ---------------------------------------------------------------------------
Notetags :
write down these notetags to the notebox in your database


Use this notetag where the n is a numeric value which is determine the size
of item. Use 0 for unlimited item. Only works for item and equipment such as
weapon or armor.


Use this notetag to determine the additional avalaible free inventory slot.
This notetag avalaible for Actor, Class, Equip, and States. If it's for
actor, avalaible inventory slot will increase when a new actor entered party.
If it's for equip, the avalaible slot will be increase if the certain equip
is equipped. And so do states


Inverse of . It will decrease the avalaible inventory slot. Pretty
clear I think.

# ---------------------------------------------------------------------------
Script call :
If you want to force gain an item even the inventory is full, you can do it
by script call. Just write this following line

force_gain_item($data_items[id],amount)

id is an item id in your database

# ---------------------------------------------------------------------------
Terms of use :
Credit me, TheoAllen. You are free to edit this script by your own. As long
as you don't claim it yours. For commercial purpose, don't forget to give me
a free copy of the game.

=end
# =============================================================================
# Configurations :
# =============================================================================
module THEO
module LimInv

# --------------------------------------------------------------------------
# General Settings (just put true / false)
# --------------------------------------------------------------------------

DynamicSlot = true
# Total avalaible inventory slot depends on actor, states, total party
# members, etc ...

Display_ItemSize = true
# Diplay item size in item menu

Include_Equip = true
# Total used inventory slot will also include actor equipment.

DrawTotal_Size = true
# If true, item size window will show total weight of specified item. For
# example, you have 10 potions. And each potion has 3 size/weight. The window
# will show 30 instead of 3

# --------------------------------------------------------------------------
# Numeric Settings
# --------------------------------------------------------------------------

Default_FreeSlot = 100
# Default free slot which is provided each actor. Of course, you may change
# it by notetag. If DynamicSlot is set to false, it will be the the total
# avalaible slot

NearMaxed_Percent = 25
# Percentage to determine if the inventory is almost maxed out or not

NearMaxed_Color = 21
# If inventory is almost maxed out, the inventory window will be drawn in
# different color. The color code is same as \C[n] in message

UseCommand_Size = 200
# The width of use item command window

# --------------------------------------------------------------------------
# Vocab Settings (Self-explanatory I think)
# --------------------------------------------------------------------------

InvSlotVocab = "Inventory: " # Inventory Vocab
InvSizeVocab = "Item Size: " # Item size / weight
SlotVocabShort = "Inv:" # Abbreviation for Inventory
UseVocab = "Use item" # Use item
DiscardVocab = "Discard item" # Discard Item
CancelVocab = "Cancel" # Cancel

end
end
# ============================================================================
# Do not touch anything pass this line.
# ============================================================================

# I told you ...

# ============================================================================
# Altered built in modules and classes
# ============================================================================
class << DataManager

alias theo_limited_item_load_db load_database
def load_database
theo_limited_item_load_db
load_limited_slot
end

def load_limited_slot
database = $data_actors + $data_classes + $data_weapons + $data_armors +
$data_states + $data_items
database.compact.each do |db|
db.load_limited_inv
end
end
end

class RPG::BaseItem
attr_accessor :inv_size # Item inventory size
attr_accessor :inv_mod # Inventory slot modifier

def load_limited_inv
@inv_size = 1
@inv_mod = self.is_a?(RPG::Actor) ? THEO::LimInv::Default_FreeSlot : 0
self.note.split(/[\r\n]+/).each do |line|
case line
when /<(?:INV_SIZE|inv size): [ ]*(\d+)>/i
@inv_size = $1.to_i
when /<(?:INV_PLUS|inv plus): [ ]*(\d+)>/i
@inv_mod = $1.to_i
when /<(?:INV_MINUS|inv minus): [ ]*(\d+)>/i
@inv_mod = -$1.to_i
end
end
end

end
# ============================================================================
# Data structures and workflows goes here
# ============================================================================
class Game_Actor < Game_Battler

def equip_size
return 0 unless THEO::LimInv::Include_Equip
equips.compact.inject(0) {|total,equip| total + equip.inv_size}
end

def inv_max
result = $data_actors[id].inv_mod
result += $data_classes[class_id].inv_mod
result += states.inject(0) {|total,db| total + db.inv_mod}
result += equips.compact.inject(0) {|total,db| total + db.inv_mod}
result
end

end

class Game_Party < Game_Unit

def inv_max
return THEO::LimInv::Default_FreeSlot unless THEO::LimInv::DynamicSlot
return members.inject(0) {|total,member| total + member.inv_max}
end

def inv_maxed?
inv_max <= total_inv_size
end

def total_inv_size
result = all_items.inject(0) {|total,item| total +
(item_number(item) * item.inv_size)}
result += members.inject(0) {|total,member| total + member.equip_size}
result
end

alias theo_liminv_max_item max_item_number
def max_item_number(item)
$BTEST ? theo_liminv_max_item(item) : inv_max_item(item) + item_number(item)
end

def inv_max_item(item)
return 9999999 if item.nil? || item.inv_size == 0
free_slot / item.inv_size
end

def free_slot
inv_max - total_inv_size
end

alias theo_liminv_item_max? item_max?
def item_max?(item)
$BTEST ? theo_liminv_item_max?(item) : inv_maxed?
end

def near_maxed?
free_slot.to_f / inv_max <= THEO::LimInv::NearMaxed_Percent/100.0
end

def item_size(item)
return 0 unless item
item.inv_size * item_number(item)
end

def force_gain_item(item, amount)
container = item_container(item.class)
return unless container
last_number = item_number(item)
new_number = last_number + amount
container[item.id] = [new_number, 0].max
container.delete(item.id) if container[item.id] == 0
$game_map.need_refresh = true
end

end

class Game_Interpreter
def force_gain_item(item, amount)
$game_party.force_gain_item(item, amount)
end
end
# ============================================================================
# Window related class goes here
# ============================================================================
class Window_Base < Window
def draw_inv_slot(x,y,width = contents.width,align = 2)
txt = sprintf("%d/%d",$game_party.total_inv_size, $game_party.inv_max)
color = THEO::LimInv::NearMaxed_Color
if $game_party.near_maxed?
change_color(text_color(color))
else
change_color(normal_color)
end
draw_text(x,y,width,line_height,txt,align)
change_color(normal_color)
end

def draw_inv_info(x,y,width = contents.width)
change_color(system_color)
draw_text(x,y,width,line_height,THEO::LimInv::InvSlotVocab)
change_color(normal_color)
draw_inv_slot(x,y,width)
end

def draw_item_size(item,x,y,total = true,width = contents.width)
rect = Rect.new(x,y,width,line_height)
change_color(system_color)
draw_text(rect,THEO::LimInv::InvSizeVocab)
change_color(normal_color)
number = (THEO::LimInv::DrawTotal_Size && total) ?
$game_party.item_size(item) : item.nil? ? 0 : item.inv_size
draw_text(rect,number,2)
end
end

class Window_MenuLimInv < Window_Base

def initialize(width)
super(0,0,width,fitting_height(1))
refresh
end

def refresh
contents.clear
change_color(system_color)
txt = THEO::LimInv::SlotVocabShort
draw_text(0,0,contents.width,line_height,txt)
draw_inv_slot(0,0)
end

end

class Window_ItemSize < Window_Base

def initialize(x,y,width)
super(x,y,width,fitting_height(1))
end

def set_item(item)
@item = item
refresh
end

def refresh
contents.clear
draw_item_size(@item,0,0)
end

end

class Window_FreeSlot < Window_Base
def initialize(x,y,width)
super(x,y,width,fitting_height(1))
refresh
end

def refresh
contents.clear
draw_inv_info(0,0)
end
end

class Window_ItemUseCommand < Window_Command
include THEO::LimInv

def initialize
super(0,0)
self.openness = 0
end

def set_item(item)
@item = item
refresh
end

def window_width
UseCommand_Size
end

def make_command_list
add_command(UseVocab, :use, $game_party.usable?(@item))
add_command(DiscardVocab, :discard, discardable?(@item))
add_command(CancelVocab, :cancel)
end

def to_center
self.x = Graphics.width/2 - width/2
self.y = Graphics.height/2 - height/2
end

def discardable?(item)
return false if item.nil?
!(item.is_a?(RPG::Item) && item.itype_id == 2)
end

end

class Window_DiscardAmount < Window_Base
attr_accessor :cmn_window
attr_accessor :itemlist
attr_accessor :freeslot

def initialize(x,y,width)
super(x,y,width,fitting_height(1))
self.openness = 0
@amount = 0
end

def set_item(item)
@item = item
@amount = 0
refresh
end

def refresh
contents.clear
return unless @item
draw_item_name(@item,0,0,true,contents.width)
txt = sprintf("%d/%d",@amount, $game_party.item_number(@item))
draw_text(0,0,contents.width,line_height,txt,2)
end

def draw_item_name(item, x, y, enabled = true, width = 172)
return unless item
draw_icon(item.icon_index, x, y, enabled)
change_color(normal_color, enabled)
draw_text(x + 24, y, width, line_height, item.name + ":")
end

def update
super
return unless open?
change_amount(1) if Input.repeat?(:RIGHT)
change_amount(-1) if Input.repeat?(:LEFT)
change_amount(10) if Input.repeat?(:UP)
change_amount(-10) if Input.repeat?(:DOWN)
lose_item if Input.trigger?(:C)
close_window if Input.trigger?(:B)
end

def change_amount(num)
@amount = [[@amount+num,0].max,$game_party.item_number(@item)].min
Sound.play_cursor
refresh
end

def lose_item
$game_party.lose_item(@item,@amount)
@itemlist.redraw_current_item
@freeslot.refresh
if $game_party.item_number(@item) == 0
@itemlist.refresh
end
close_window
end

def close_window
close
@cmn_window.activate
Sound.play_ok
end

end

class Window_ItemList < Window_Selectable
attr_reader :item_size_window

def item_size_window=(window)
@item_size_window = window
update_help
end

alias theo_liminv_update_help update_help
def update_help
theo_liminv_update_help
@item_size_window.set_item(item) if @item_size_window
end

alias theo_liminv_height= height=
def height=(height)
self.theo_liminv_height = height
refresh
end

def enable?(item)
return !item.nil?
end

end

class Window_ShopNumber < Window_Selectable
attr_accessor :mode

alias theo_liminv_init initialize
def initialize(x, y, height)
theo_liminv_init(x, y, height)
@mode = :buy
end

alias theo_liminv_refresh refresh
def refresh
theo_liminv_refresh
draw_itemsize
end

def draw_itemsize
item_size = @number * @item.inv_size
total_size = $game_party.total_inv_size +
(@mode == :buy ? item_size : -item_size)
txt = sprintf("%d/%d",total_size,$game_party.inv_max)
ypos = item_y + line_height * ($imported["YEA-ShopOptions"] ? 5 : 4)
rect = Rect.new(4,ypos,contents.width-8,line_height)
change_color(system_color)
draw_text(rect,THEO::LimInv::InvSlotVocab)
change_color(normal_color)
draw_text(rect,txt,2)
end

end

class Window_ShopStatus < Window_Base

if THEO::LimInv::Display_ItemSize
alias theo_liminv_draw_posses draw_possession
def draw_possession(x, y)
theo_liminv_draw_posses(x,y)
y += line_height
draw_item_size(@item,x,y,false, contents.width-(x*2))
end

if $imported["YEA-ShopOptions"]
def draw_actor_equip_info(dx, dy, actor)
dy += line_height
enabled = actor.equippable?(@item)
change_color(normal_color, enabled)
draw_text(dx, dy, contents.width, line_height, actor.name)
item1 = current_equipped_item(actor, @item.etype_id)
draw_actor_param_change(dx, dy, actor, item1) if enabled
end
end # $imported["YEA-ShopOption"]
end # Display item size

end
# ============================================================================
# Scene classes goes here
# ============================================================================
class Scene_Menu < Scene_MenuBase

alias theo_liminv_start start
def start
theo_liminv_start
create_liminv_window
end

def create_liminv_window
@lim_inv = Window_MenuLimInv.new(@gold_window.width)
@lim_inv.x = @command_window.x
@lim_inv.y = @command_window.height
end

end

class Scene_Item < Scene_ItemBase

alias theo_liminv_start start
def start
theo_liminv_start
resize_item_window
create_freeslot_window
create_itemsize_window
create_usecommand_window
create_discard_amount
end

def resize_item_window
@item_window.height -= @item_window.line_height * 2
end

def create_freeslot_window
wy = @item_window.y + @item_window.height
wh = THEO::LimInv::Display_ItemSize ? Graphics.width/2 : Graphics.width
@freeslot = Window_FreeSlot.new(0,wy,wh)
@freeslot.viewport = @viewport
end

def create_itemsize_window
return unless THEO::LimInv::Display_ItemSize
wx = @freeslot.width
wy = @freeslot.y
ww = wx
@itemsize = Window_ItemSize.new(wx,wy,ww)
@itemsize.viewport = @viewport
@item_window.item_size_window = @itemsize
end

def create_usecommand_window
@use_command = Window_ItemUseCommand.new
@use_command.to_center
@use_command.set_handler(:use, method(:use_command_ok))
@use_command.set_handler(:discard, method(:on_discard_ok))
@use_command.set_handler(:cancel, method(:on_usecmd_cancel))
@use_command.viewport = @viewport
end

def create_discard_amount
wx = @use_command.x
wy = @use_command.y + @use_command.height
ww = @use_command.width
@discard_window = Window_DiscardAmount.new(wx,wy,ww)
@discard_window.cmn_window = @use_command
@discard_window.itemlist = @item_window
@discard_window.freeslot = @freeslot
@discard_window.viewport = @viewport
end

alias theo_liminv_item_ok on_item_ok
def on_item_ok
@use_command.set_item(item)
@use_command.open
@use_command.activate
@use_command.select(0)
end

alias theo_liminv_use_item use_item
def use_item
@use_command.close
theo_liminv_use_item
@freeslot.refresh
end

def use_command_ok
theo_liminv_item_ok
@use_command.close
end

def on_discard_ok
@discard_window.set_item(item)
@discard_window.open
end

def on_usecmd_cancel
@item_window.activate
@use_command.close
@use_command.deactivate
end

end

class Scene_Shop < Scene_MenuBase
alias theo_liminv_buy_ok on_buy_ok
def on_buy_ok
@number_window.mode = :buy
theo_liminv_buy_ok
end

alias theo_liminv_sell_ok on_sell_ok
def on_sell_ok
@number_window.mode = :sell
theo_liminv_sell_ok
end
end

 

Bugs e Conflitti Noti

N/A

 

Altri dettagli

N/A

[Guardian of Irael]

Ah buono script per gli oggetti limitati nel menù, utile pure per altri generi di giochi! Per fortuna vedo anche il comando per forzare l'ottenimento di un oggetto, altrimenti rischiava di farti sprecare oggetti importanti o rari D:
^ ^

[Enom]

carino ecco qualcosa in piu per attirare il mio interesse grazie raffy, e con questo ho tutti gli script per l'aspetto tecnico, ho quasi tutta la grafica, e ho una storia da inserire, insomma grazie a te posso anche iniziare a darmi da fare xD

[raffy2010]

carino ecco qualcosa in piu per attirare il mio interesse grazie raffy, e con questo ho tutti gli script per l'aspetto tecnico, ho quasi tutta la grafica, e ho una storia da inserire, insomma grazie a te posso anche iniziare a darmi da fare xD

Prg u.u

[Kingartur2]

Uno delle caratteristiche che ho sempre odiato in un gioco, l'inventario limitato, è odioso e anti-produttivo xD

[Cris_93]

Per chi fosse interessato a questo script, vi segnalo che la versione presente nel primo post è vecchia e che qui di seguito ho messo l'ultima versione !

Update logs:

- Bugfix. Unequip item causes lose the item if inventory is full

- Ability to change base inventory limit using script call

- Ability to make your custom formula for inventory limit

 

Ultima versione script :

https://raw.github.com/theoallen/RGSS3/master/Limited%20Inventory%20(ENG)

[raffy2010]

Grazie per l'informazione ^^