class WindowParts
attr_accessor :width, :height, :x, :y
attr_accessor :borderx, :bordery
def initialize(width,height)
# Corners
@width=width # Width of skin image
@height=height # Height of skin image
@borderx=12
@bordery=12
@x=0
@y=0
@corners=[
Rect.new(0,0,0,0),
Rect.new(0,0,0,0),
Rect.new(0,0,0,0),
Rect.new(0,0,0,0)
]
# Sides
@sides=[
Rect.new(0,0,0,0),
Rect.new(0,0,0,0),
Rect.new(0,0,0,0),
Rect.new(0,0,0,0)
]
# Background rectangle
@back=Rect.new(0,0,0,0)
refresh
end
def getWindowPieces
refresh
ret=[]
for corner in @corners
ret.push(corner.clone)
end
for side in @sides
ret.push(side.clone)
end
ret.push(@back.clone)
return ret
end
def refresh
# Calculate corner rectangles
@corners[0].set(0,0,@borderx,@bordery) # NW
@corners[1].set(@width-@borderx,0,@borderx,@bordery) # NE
@corners[2].set(0,@height-@bordery,@borderx,@bordery) # SW
@corners[3].set(@width-@borderx,@height-@bordery,@borderx,@bordery) # SE
# Calculate side dimensions of window
sidewidth=[0,@width-@borderx*2].max
sideheight=[0,@height-@bordery*2].max
# Calculate side rectangles
@sides[0].set(@borderx,0,sidewidth,@bordery) # N
@sides[1].set(0,@bordery,@borderx,sideheight) # W
@sides[2].set(@width-@borderx,@bordery,@borderx,sideheight) # E
@sides[3].set(@borderx,@height-@bordery,sidewidth,@bordery) # S
# Calculate background
@back.set(@borderx,@bordery,sidewidth,sideheight)
for corner in @corners
corner.x+=@x
corner.y+=@y
end
for side in @sides
side.x+=@x
side.y+=@y
end
@back.x+=@x
@back.y+=@y
end
end
class TilingHelper
# Tiles the bitmap in srcbitmap to dstbitmap.
def self.tileBitmap(dstbitmap,dstrect,srcbitmap,srcrect)
dstbitmap.clear
return if !srcbitmap || srcrect.width<=0 || srcrect.height<=0
left=dstrect.x
top=dstrect.y
y=0;while y<dstrect.height
x=0;while x<dstrect.width
dstbitmap.blt(x+left,y+top,srcbitmap,srcrect)
x+=srcrect.width
end
y+=srcrect.height
end
end
# Ensures that the bitmap is big enough. dwidth and dheight
# are the desired width and height
def self.ensureBitmap(bitmap,dwidth,dheight)
if !bitmap||bitmap.disposed?||bitmap.width<dwidth||bitmap.height<dheight
bitmap.dispose if bitmap
bitmap=Bitmap.new([1,dwidth].max,[1,dheight].max)
end
return bitmap
end
# Tiles the given sprite with the given skin and rectangle
# skinSrcRect is the source rect of the skin's image
# spriteDstRect is the desired X and Y of the sprite as well as
# its desired size
def self.tileSprite(sprite, skin, skinSrcRect, spriteDstRect)
return if !sprite || sprite.disposed?
# position sprite
sprite.x=spriteDstRect.x
sprite.y=spriteDstRect.y
if !skin
sprite.bitmap.dispose if sprite.bitmap
sprite.bitmap=nil
else
# allocate bitmap if necessary
sprite.bitmap=self.ensureBitmap(sprite.bitmap,
spriteDstRect.width,spriteDstRect.height)
sprite.src_rect.set(0,0,spriteDstRect.width, spriteDstRect.height)
self.tileBitmap(sprite.bitmap,sprite.src_rect,skin,skinSrcRect)
end
end
end
class GenericSkinDisplay
attr_reader :x,:y,:width,:height,:z,:opacity,:visible
# Initializes the display with the specified viewport.
def initialize(viewport=nil)
@windowsprites=[]
for i in 0...9
@windowsprites[i]=Sprite.new(viewport)
end
@windowskin=nil
@skinparts=WindowParts.new(0,0)
@windowparts=WindowParts.new(0,0)
@viewport=viewport
@updateDisplay=true
@x=0
@y=0
@z=0
@width=0
@height=0
@opacity=255
@visible=true
privRefresh
end
def dispose
for sprite in @windowsprites
sprite.bitmap.dispose if sprite.bitmap
sprite.dispose
end
@windowsprites.clear
end
def windowskin=(value)
@windowskin=value
if value
@skinparts.width=value.width
@skinparts.height=value.height
end
@updateDisplay=true
privRefresh
end
def width=(value)
@width=value
@updateDisplay=true
@windowparts.width=value
privRefresh
end
def height=(value)
@height=value
@updateDisplay=true
@windowparts.height=value
privRefresh
end
def x=(value)
@x=value
@windowparts.x=value
privRefresh
end
def y=(value)
@y=value
@windowparts.y=value
privRefresh
end
def z=(value)
@z=value
privRefresh
end
def opacity=(value)
@opacity=value
privRefresh
end
def visible=(value)
@visible=value
privRefresh
end
private
def privRefresh
windowrects=@windowparts.getWindowPieces
if @updateDisplay
skinrects=@skinparts.getWindowPieces
for i in 0...9
TilingHelper.tileSprite(@windowsprites[i],
@windowskin,skinrects[i],windowrects[i])
@windowsprites[i].z=@z
@windowsprites[i].opacity=@opacity
@windowsprites[i].visible=@visible
end
@updateDisplay=false
else
for i in 0...9
@windowsprites[i].x=windowrects[i].x
@windowsprites[i].y=windowrects[i].y
@windowsprites[i].z=z
@windowsprites[i].opacity=@opacity
@windowsprites[i].visible=@visible
end
end
end
end
class ItemStorage
ITEM=1
WEAPON=2
ARMOR=3
attr_reader :maxsize
# Initializes item storage
def initialize(maxsize)
@items=[]
@maxsize=maxsize
end
# Returns true if storage is full.
def full?
for i in 0...@maxsize
return false if !@items[i]
end
return true
end
# Deposits an item to storage. Returns
# true if the item was stored.
def deposit(itemtype,id)
for i in 0...@maxsize
if !@items[i]
@items[i]=[itemtype,id]
return true
end
end
return false
end
# Withdraws an item from storage.
def withdraw(pos)
@items[pos]=nil
@items.compact!
end
# Gets the item type of the item in storage,
# or 0 if no item is stored there.
def itemtype(pos)
item=@items[pos]
return item ? item[0] : -1
end
# Gets the ID of the item in storage,
# or 0 if no item is stored there.
def itemid(pos)
item=@items[pos]
return item ? item[1] : -1
end
# Gets info about the item stored
# in the specified position, or nil if no item
# is stored there.
def iteminfo(pos)
item=@items[pos]
if item
case item[0]
when ITEM
return $data_items[item[1]]
when WEAPON
return $data_weapons[item[1]]
when ARMOR
return $data_armors[item[1]]
else
return nil
end
end
return nil
end
# Gets the name/icon name of the item stored in the specified
# position, or the empty string if no item is stored there
def itemname(pos)
item=iteminfo(pos)
return item ? item.name : ""
end
def itemicon(pos)
item=iteminfo(pos)
return item ? item.icon_name : ""
end
end
class ItemStorageDisplay
attr_reader :storage
def initialize(storage,viewport=nil)
@gsd=GenericSkinDisplay.new(viewport)
@sprites=[]
@spriteicons=[]
@storage=storage
@storagewidth=0
@storageheight=0
@viewport=viewport
refresh
end
def width;@gsd.width;end
def height;@gsd.height;end
def x;@gsd.x;end
def x=(value);@gsd.x=value;refresh;end
def y;@gsd.y;end
def y=(value);@gsd.y=value;refresh;end
def z;@gsd.z;end
def z=(value);@gsd.z=value;refresh;end
def opacity;@gsd.opacity;end
def opacity=(value);@gsd.opacity=value;refresh;end
def visible;@gsd.visible;end
def visible=(value);@gsd.visible=value;refresh;end
def dispose
@gsd.dispose
for sprite in @sprites
sprite.dispose
end
end
def storage=(value)
@storage=value
refresh
end
def windowskin=(value)
@gsd.windowskin=value
end
def setSize(width,height)
@storagewidth=width
@storageheight=height
@gsd.width=24+width*24
@gsd.height=24+height*24
end
def refresh
for i in 0...@storage.maxsize
iconname=@storage.itemicon(i)
if iconname==""
@sprites[i].visible=false if @sprites[i]
else
if !@sprites[i]
@sprites[i]=Sprite.new(@viewport)
end
if iconname!=@spriteicons[i]
@sprites[i].bitmap=RPG::Cache.icon(iconname)
@spriteicons[i]=iconname
end
end
storagesize=@storagewidth*@storageheight
if @sprites[i]
if i<storagesize
@sprites[i].x=@gsd.x+12+((i%@storagewidth)*24)
@sprites[i].y=@gsd.y+12+((i/@storagewidth)*24)
@sprites[i].z=@gsd.z
@sprites[i].opacity=@gsd.opacity
@sprites[i].visible=@gsd.visible
else
@sprites[i].visible=false
end
end
end
end
def update
refresh
end
end
