Store items, Now with tag funcionality Options

[breadlord]

This script allows the player to store items in stores you set up in events. Now with added tag funcionality, item and stack limit functionality.

Here are some screenies to hopefully explain it better :

[Show/Hide] Screenies

Awww, the cuboards empty.


Lets put something in.


Yey, it's not empty no more.

Instructions in the script, here it is :

CODE

####################### Breadlord's Item storage Script ########################
## This script allows the player to store and remove items (and weapons and ##
## armours) in stores you set up in events. You set up a store in this format ##
## : $stores['store name'] = Store.new({items allready stored}, {Weapons ##
## allready stored}), {armours allready stored}, max items, [tag1, tag2, ect] ##
## ,[anti tag 1, anti tag 2, ect). For items and weapons allready stored ect ##
## use the format {id => amount, id => amount , ect}. For max items, put the ##
## maximum items you can store, you can leave this blank or put -1 to have ##
## unlimited storage. For the tags you can put whatever you like, if you ##
## enter tags then it will only let items with those tags in ther notes be ##
## stored. Anti tags are the opisite of tags, if you put them in they will ##
## disalow all items with Item Exclude>anti tag in there notes To put the ##
## tags in the items notes, put Item Type>tag in the notes field. Note, you ##
## can leave all the feilds blank. To call up the item storage scene use ##
## $store = 'name of store' then $scene = Scene_Store.new, were name of store ##
## is the name of the item store you want the player to access. ##
################################################################################
############################## Do not edit #####################################
################################################################################

class Window_party_title < Window_Base

def initialize

super(0, 0, 544, 64)
self.contents.font.color = normal_color
if $stores[$store].max == -1
self.contents.draw_text(0, 0, 272, 32, "Party Items", 1)
self.contents.draw_text(272, 0, 272, 32, $store, 1)
else
a = $stores[$store].max
a = a.to_s
self.contents.draw_text(0, 0, 272, 32, "Party Items", 1)
self.contents.draw_text(272, 0, 272, 32, $store + ', Max = ' + a, 1)
end

end

end


class Window_Item_Number < Window_Base
#--------------------------------------------------------------------------
# * Object Initialization
# x : window X coordinate
# y : window Y coordinate
#--------------------------------------------------------------------------
def initialize(x, y)
super(x, y, 304, 100)
@item = nil
@max = 1
@number = 1
end
#--------------------------------------------------------------------------
# * Set Items, Max Quantity, and Price
#--------------------------------------------------------------------------
def set(item, max)
@item = item
@max = max
@number = 1
refresh
end
#--------------------------------------------------------------------------
# * Set Inputted Quantity
#--------------------------------------------------------------------------
def number
return @number
end
#--------------------------------------------------------------------------
# * Refresh
#--------------------------------------------------------------------------
def refresh
y = 25
self.contents.clear
draw_item_name(@item, 0, y)
self.contents.font.color = normal_color
self.contents.draw_text(160, y, 20, WLH, "")
self.contents.draw_text(208, y, 20, WLH, @number, 2)
self.cursor_rect.set(208, y, 28, WLH)
end
#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
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



class Window_Help_New < Window_Base
#--------------------------------------------------------------------------
# * Object Initialization
#--------------------------------------------------------------------------
def initialize(x,y,w,l)
super(x, y, w, l)
@type = type
end
#--------------------------------------------------------------------------
# * Set Text
# text : character string displayed in window
# align : alignment (0..flush left, 1..center, 2..flush right)
#--------------------------------------------------------------------------
def set_text(text, align = 0, item = nil)
if text != @text or align != @align
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(4, 0, self.width - 40, WLH, text, align)
if item != nil
draw_icon(item.icon_index, 4, WLH*2)
a = $game_party.item_number(item)
a = a.to_s
self.contents.draw_text(26, WLH*2, self.width - 40, WLH, ': ' + a)
a = A3D.gnd( item, 'Item Type', true )
if a == ''
a = 'None'
end
draw_icon(item.icon_index, 4, WLH*4)
self.contents.draw_text(26, WLH*4, self.width - 40, WLH, ': ' + a)
draw_icon(71, 4, WLH*6)
a = item.price
a = a.to_s
self.contents.draw_text(26, WLH*6, self.width - 40, WLH, ': ' + a)
end
@text = text
@align = align
end
end
end



class Window_Help_New2 < Window_Base
#--------------------------------------------------------------------------
# * Object Initialization
#--------------------------------------------------------------------------
def initialize(x,y,w,l)
super(x, y, w, l)
@type = type
end
#--------------------------------------------------------------------------
# * Set Text
# text : character string displayed in window
# align : alignment (0..flush left, 1..center, 2..flush right)
#--------------------------------------------------------------------------
def set_text(text, align = 0, item = nil)
if text != @text or align != @align
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(4, 0, self.width - 40, WLH, text, align)
if item != nil
draw_icon(item.icon_index, 4, WLH*2)
a = $stores[$store].item_number(item)
a = a.to_s
b = $stores[$store].stack
b = b.to_s
self.contents.draw_text(26, WLH*2, self.width - 40, WLH, ': ' + a + ' / ' + b)
a = A3D.gnd( item, 'Item Type', true )
if a == ''
a = 'None'
end
draw_icon(item.icon_index, 4, WLH*4)
self.contents.draw_text(26, WLH*4, self.width - 40, WLH, ': ' + a)
draw_icon(71, 4, WLH*6)
a = item.price
a = a.to_s
self.contents.draw_text(26, WLH*6, self.width - 40, WLH, ': ' + a)
end
@text = text
@align = align
end
end
end





class Window_Item_show < Window_Selectable

def initialize(x, y, width, height, column_max = 2, index = 0)
super(x, y, width, height)
@column_max = column_max
self.index = index
refresh
end

#--------------------------------------------------------------------------
# * Get Item
#--------------------------------------------------------------------------
def item
return @data[self.index]
end
#--------------------------------------------------------------------------
# * Whether or not to include in item list
# item : item
#--------------------------------------------------------------------------
def include?(item)
return false if item == nil
if $game_temp.in_battle
return false unless item.is_a?(RPG::Item)
end
return true
end
#--------------------------------------------------------------------------
# * Whether or not to display in enabled state
# item : item
#--------------------------------------------------------------------------
def enable?(item)
a = A3D.gnd( item, 'Item Type', true )
c = A3D.gnd( item, 'Exclude Type', true )
b = $stores[$store].tags
d = $stores[$store].anti_tags
zz = false
if !(b == false)
for i in 0..b.size - 1
for jj in 0..d.size - 1
if a == b[i] and !(a == nil) and c != d[jj] and
zz = true
end
end
end
if zz
return true
else
return false
end
else
return true
end
end
#--------------------------------------------------------------------------
# * Refresh
#--------------------------------------------------------------------------
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
#--------------------------------------------------------------------------
# * Draw Item
# index : item number
#--------------------------------------------------------------------------
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)
end
end
#--------------------------------------------------------------------------
# * Update Help Text
#--------------------------------------------------------------------------
def update_help
@help_window.set_text(item == nil ? "" : item.description, 1, item)
end
end



class Scene_Store < Scene_Base

def start
super
create_menu_background
@item_window = Window_Item_show.new(0,64,272,352, 1)
@storage_window = Window_Storage.new(272,64,272,352,$store)
@number_window = Window_Item_Number.new( 120, 153)
@item_help = Window_Help_New.new(272, 208, 272, 208)
@store_help = Window_Help_New2.new(0, 208, 272, 208)
@item_help.z = 200
@store_help.z = 200
@item_window.help_window = @item_help
@storage_window.help_window = @store_help
@store_help.visible = false
@party_title = Window_party_title.new
@number_window.z = 300
@number_window.visible = false
@number_window.active = false
@item_window.active = true
@storage_window.active = false
end

def enable?(item)
a = A3D.gnd( item, 'Item Type', true )
c = A3D.gnd( item, 'Exclude Type', true )
b = $stores[$store].tags
d = $stores[$store].anti_tags
zz = false
if !(b == false)
for i in 0..b.size - 1
for jj in 0..d.size - 1
if a == b[i] and !(a == nil) and c != d[jj] and
zz = true
end
end
end
if zz
return true
else
return false
end
else
return true
end
end

def update
super
update_menu_background
@item_window.update
@storage_window.update
if Input.trigger?(Input:: B) and @number_window.active == false
Sound.play_cancel
@item_window.dispose
@party_title.dispose
@storage_window.dispose
@number_window.dispose
@item_help.dispose
@store_help.dispose
$scene = Scene_Map.new
elsif @item_window.active
@item_help.visible = true
@store_help.visible = false
@item_help.update
update_item_window
elsif @storage_window.active
@store_help.update
@store_help.visible = true
@item_help.visible = false
update_store_window
elsif @number_window.active
@number_window.update
update_number_window
end
end

def update_number_window
if Input.trigger?(Input:: B)
Sound.play_cancel
@number_window.visible = false
@item_window.active = true
@storage_window.active = false
@number_window.active = false
elsif Input.trigger?(Input::C)
Sound.play_decision
if @from == 'item'
$game_party.gain_item(@item_window.item, -@number_window.number)
$stores[$store].gain_item(@item_window.item, @number_window.number)
@number_window.visible = false
index = @item_window.index
@item_window.dispose
@storage_window.dispose
@item_window = Window_Item_show.new(0,64,272,352, 1, index)
@storage_window = Window_Storage.new(272,64,272,352,$store)
@item_window.active = true
@storage_window.active = false
@number_window.active = false
@item_help.dispose
@store_help.dispose
@item_help = Window_Help_New.new(272, 208, 272, 208)
@store_help = Window_Help_New2.new(0, 208, 272, 208)
@item_help.z = 200
@store_help.z = 200
@item_window.help_window = @item_help
@storage_window.help_window = @store_help
else
$stores[$store].gain_item(@storage_window.item,-@number_window.number)
$game_party.gain_item(@storage_window.item, @number_window.number)
@number_window.visible = false
index = @storage_window.index
@item_window.dispose
@storage_window.dispose
@item_window = Window_Item_show.new(0,64,272,352, 1)
@storage_window = Window_Storage.new(272,64,272,352,$store, index)
@item_window.active = false
@storage_window.active = true
@number_window.active = false
@item_help.dispose
@store_help.dispose
@item_help = Window_Help_New.new(272, 208, 272, 208)
@store_help = Window_Help_New2.new(0, 208, 272, 208)
@item_help.z = 200
@store_help.z = 200
@item_window.help_window = @item_help
@storage_window.help_window = @store_help
end
end
end

def update_item_window
if Input.trigger?(Input::RIGHT)
Sound.play_cursor
@item_window.active = false
@storage_window.active = true
elsif Input.trigger?(Input::LEFT)
Sound.play_cursor
@item_window.active = false
@storage_window.active = true
elsif Input.trigger?(Input::C)
item = @item_window.item
if $stores[$store].max == -1 or $stores[$store].max - 1 > $stores[$store].all.size - 1 and $stores[$store].item_number(item) < $stores[$store].stack
if !(item == nil) and enable?(item)
@from = 'item'
num = $stores[$store].item_number(item)
max_stack = $stores[$store].stack
max = max_stack - num
if $game_party.item_number(item) < max
max = $game_party.item_number(item)
end
@number_window.set(item, max)
@number_window.visible = true
@item_window.active = false
@storage_window.active = false
@number_window.active = true
Sound.play_decision
else
Sound.play_buzzer
end
else
Sound.play_buzzer
end
end
end

def update_store_window
if Input.trigger?(Input::LEFT)
Sound.play_cursor
@item_window.active = true
@storage_window.active = false
elsif Input.trigger?(Input::RIGHT)
Sound.play_cursor
@item_window.active = true
@storage_window.active = false
elsif Input.trigger?(Input::C)
item = @storage_window.item
if !(item == nil) and enable?(item)
@from = 'store'
max = $stores[$store].item_number(item)
@number_window.set(item, max)
@number_window.visible = true
@item_window.active = false
@storage_window.active = false
@number_window.active = true
Sound.play_decision
else
Sound.play_buzzer
end
end
end

end






class Store

attr_accessor :items, :weapons, :armors, :max, :stack, :tags, :anti_tags

def initialize(items = {}, weapons = {}, armors = {}, max = -1, stack = 99999999, tags = [false], anti_tags = [])
@items = {}
@weapons = {}
@armors = {}
@all = []
@max = max
@stack = stack

if tags[0] == false
@tags = false
else
@tags = tags
end

if anti_tags[0] == false
@anti_tags = false
else
@anti_tags = anti_tags
end

for i in items.keys
@items[i] = items[i]
end

for i in weapons.keys
@weapons[i] = weapons[i]
end

for i in armors.keys
@armors[i] = armors[i]
end

end

def all
com = []
for i in @items.keys.sort
com.push($data_items[i]) if @items[i] > 0
end
for i in @weapons.keys.sort
com.push($data_weapons[i]) if @weapons[i] > 0
end
for i in @armors.keys.sort
com.push($data_armors[i]) if @armors[i] > 0
end
return com
end

def item_number(item)
case item
when RPG::Item
number = @items[item.id]
when RPG::Weapon
number = @weapons[item.id]
when RPG::Armor
number = @armors[item.id]
end
return number == nil ? 0 : number
end

def gain_item(item, n)
number = item_number(item)
case item
when RPG::Item
@items[item.id] = [[number + n, 0].max, 99].min
when RPG::Weapon
@weapons[item.id] = [[number + n, 0].max, 99].min
when RPG::Armor
@armors[item.id] = [[number + n, 0].max, 99].min
end
n += number
end

end




#==============================================================================
# ** Window_Item
#------------------------------------------------------------------------------
# This window displays a list of inventory items for the item screen, etc.
#==============================================================================

class Window_Storage < Window_Selectable
#--------------------------------------------------------------------------
# * Object Initialization
# x : window x-coordinate
# y : window y-coordinate
# width : window width
# height : window height
#--------------------------------------------------------------------------
def initialize(x, y, width, height, store, index = 0)
super(x, y, width, height)
@column_max = 1
self.index = index
@store = store
refresh
end
#--------------------------------------------------------------------------
# * Get Item
#--------------------------------------------------------------------------
def item
return @data[self.index]
end
#--------------------------------------------------------------------------
# * Whether or not to include in item list
# item : item
#--------------------------------------------------------------------------
def include?(item)
return false if item == nil
if $game_temp.in_battle
return false unless item.is_a?(RPG::Item)
end
return true
end
#--------------------------------------------------------------------------
# * Whether or not to display in enabled state
# item : item
#--------------------------------------------------------------------------
def enable?(item)
a = A3D.gnd( item, 'Item Type', true )
c = A3D.gnd( item, 'Exclude Type', true )
b = $stores[$store].tags
d = $stores[$store].anti_tags
zz = false
if !(b == false)
for i in 0..b.size - 1
for jj in 0..d.size - 1
if a == b[i] and !(a == nil) and c != d[jj] and
zz = true
end
end
end
if zz
return true
else
return false
end
else
return true
end
end

#--------------------------------------------------------------------------
# * Refresh
#--------------------------------------------------------------------------
def refresh
@data = []
for item in $stores[$store].all
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
#--------------------------------------------------------------------------
# * Draw Item
# index : item number
#--------------------------------------------------------------------------
def draw_item(index)
rect = item_rect(index)
self.contents.clear_rect(rect)
item = @data[index]
if item != nil
number = $stores[@store].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)
end
end
#--------------------------------------------------------------------------
# * Update Help Text
#--------------------------------------------------------------------------
def update_help
@help_window.set_text(item == nil ? "" : item.description, 1, item)
end
end







class Scene_Title < Scene_Base

alias new_game command_new_game

def command_new_game
$stores = {}
new_game
end

end



class Scene_File < Scene_Base

alias save write_save_data
alias load read_save_data

def write_save_data(file)
save(file)
Marshal.dump($stores, file)
end

def read_save_data(file)
load(file)
$stores = Marshal.load(file)
end

end










#===========================================================================
# A3D's Get Note Data
#
# << Version >>
# : 1.2
#
# << Useful >>
# allow you to set-up your new data in note area
# it will make your data in each item unlimitable
#
# << General Command >>
# : A3D.gnd( [/type, /id], /code, /string )
# : A3D.gnd( /item , /code, /string )
# /type = type of your item
# (1 = skill, 2 = item , 3 = weapon,
# (4 = armor, 5 = enemy, 6 = state)
# /id = id of your item
# /code = code to call your data
# /string = if you're expect an alphabet data (not number), set it true
# /item = $data object of your item (not $game)
#
# << How to Use >>
# in "note" area in each "item", write your code & data in this format
# : your_code>your_data
# example, second enemy in enemy's database, you have
# : AP>10
# : WD>SLASH
# you can pick-up each data by the following command
# : A3D.gnd([5,2], "AP")
# : A3D.gnd([5,2], "WD", true)
# or : enemy = $data_enemies[2]
# : A3D.gnd(enemy, "AP")
# : A3D.gnd(enemy, "WD", true)
#
# << Note >>
# this script is for non-commercial use only, give credit if use
#
# << Contact >>
# A3D (hyper_s@hotmail.com)
#===========================================================================

module A3D
#--------------------------------------------------------------------------
# * Get Note Data
#--------------------------------------------------------------------------
def A3D.gnd(item, code, string = false)
if item.is_a?(Array)
case item[0]
when 1 then item = $data_skills[item[1]]
when 2 then item = $data_items[item[1]]
when 3 then item = $data_weapons[item[1]]
when 4 then item = $data_armors[item[1]]
when 5 then item = $data_enemies[item[1]]
when 6 then item = $data_states[item[1]]
end
end
item.note.split(/[\r\n]+/).each do |line|
if line.split(/[>]/)[0] == code
data = line.split(/[>]/)[1]
return string ? data : data.to_i
end
end
return string ? "" : 0
end

end

Requires A3D's get note script, included in script (at the bottom)

[Octople Threat]

There are smilies in the script... But it looks like you are really getting the hang of scripting, tho-ugh.

[breadlord]

Thanks, and I've fixed the smilies, why must the forum add in email tags as well...

[kaimonkey]

Suggestion= Ability for users to put tags on there items(and wepons and armors) and create containers that only can hold some of them. IE and Shelf that only holds books and potions, a wordrobe that only holds robes and clothes, ext

[breadlord]

Nice idea, I'll give that a try. just have to look at cutting strings and the such.


Now added tag funcionality.

[Octople Threat]

I just had a really random idea; kaimonkey, onidsouza, and breadlord should all join up and create a Jr. scripters league... T'would be epic...

Told you it was random... But in all seriousness I could see some really innovative uses for this script... Although if I could make a suggestion... Rearrange the windows, try to make them look less empty and, if possible to display more information.

[breadlord]

0_o, pretty wierd idea, might be fun....

Now back on topic : What extra info do you think I should show?

[Lord Moe]

I don't quite understand how to use this. Could you please explain? I read the description in the script, but I still don't get it.

[Octople Threat]

Well, for one you could show the item data. I noticed that that is left out, add that in there and you could make it look a lot less empty. Secondly, well try to think of something that you could add. Look at other scripts that a lot of people use that modify what items do, and try to add specific compatibility, it will encourage people who use those scripts, to use yours over something else that does the same thing, but without that special compatibility. For an example I would suggest modifying this scene to work together with your mix items or the like. Make it so there is a sub-menu which shows all the recipes that item can create or something. Use your imagination!

[kaimonkey]

Yeah, that sounds cool!

[Garlyle]

Hmm, this seems like a good idea.

However, with current limitations - or rather, the lack thereof, keeping a storage for items seems kinda pointless.

I suppose the next bit necessary would be a section to limit how many of an item to use?

[Octople Threat]

Yeah, that sounds cool!

Well apparently kaimonkey likes it... And breadlord seems pretty cool with it... You have to put like, a symbol for each on of you in the shield, and in the last part, put RRR... Or something...

Anyways on topic. Having unused space in a window makes it look unappealing, if you shorten the windows or take up the space with something else, or both, it makes it look cleaner and more presentable.

[Progsis]

Garlyle is right. Unless you add a space or weight limit there isn't really a point to storage.

[bazbroketail]

I was actually looking for something like this. My question is (though I haven't tried the script out fully) could you make a way, or include an event or something, that would take out all items currently in your inventory automatically and put into storage, and then later have an event or whatever give you all those items back? The reason I ask this, is that I am currently trying to work on an arena concept in my game, and I had originally wanted when you compete in the battles, the arena gives you their own weapons/armor/items for the battle, and they hold all of your current items and equipment. If there is already a similar script, I'd appreciate it if someone could direct me in that direction, otherwise, I think it might be worth looking into and trying to see what you can create. Thanks.

[iBash]

Garlyle is right. Unless you add a space or weight limit there isn't really a point to storage.

There is a limited inventory script floating around here somewhere.

[grafikal007]

Limited Inventory Script - RMRK.net - by Modern Algebra

Victory!

Also this script is what I was looking for since I am using this limited inventory script. Thanks so much! I hope some time you get around to making it more appealing

[kaimonkey]

This script is amazing

[grafikal007]

I did a quick mock up of a more appealing window collection.

[Show/Hide] image

Note 1: Center the titles [Party Items] and [Cupboard] over their respective columns.
Note 2: Add a description window for your currently highlighted item. (Most preferably a horizontally scrollable text if the description is very long, as to preserve the text's size.)

That's it

[breadlord]

WOA, lots of replies, I've added an info window:

Items now have a stack limit.

What else did I get asked...

oh yea luv the

[kaimonkey]

LOL!
So, loving the info box, and the tags (if I didn't say earler) so hows about we contact onidsouza? Oh and thanks Octople Threat for the idea!