Selwyn @ RMXP.Org Sun Apr 09, 2006 Wrote:This little script adds a scrollbar to the right of the window if all of a window's content can't be displayed within the window's frame.
The scrollbar is either a picture you can draw (6px width, 480px height, and put inside the Pictures folder) or a colored bar drawn by the program.
SCREENSHOTS
With the scrollbar the program makes.
With a scrollbar drawn by the maker.
SCRIPT
The Script
Code:
#==============================================================================
# ? Window_Selectable
#------------------------------------------------------------------------------
# ?Credits to Selwyn
#==============================================================================
class Window_Selectable < Window_Base
alias initialize_scrollbar initialize
alias update_scrollbar update
alias dispose_scrollbar dispose
#--------------------------------------------------------------------------
# ? initialize
#--------------------------------------------------------------------------
def initialize(x, y, width, height)
initialize_scrollbar(x, y, width, height)
@scrollbar = Sprite.new
@scrollbar.x = x + self.width - 13
@scrollbar.y = y + 17
@scrollbar.z = 3001
@scrollback = Sprite.new
bitmap = Bitmap.new(8, 448)
bitmap.fill_rect(0, 0, 8, 448, Color.new(0, 0, 0))
@scrollback.bitmap = bitmap
@scrollback.x = x + self.width - 14
@scrollback.y = y + 16
@scrollback.z = 3000
@scrollback.src_rect.set(0, 0, 8, self.height - 32)
self.scrollbar = false
end
#--------------------------------------------------------------------------
# ? contents=
#--------------------------------------------------------------------------
def contents=(contents)
super(contents)
unless self.contents.nil?
height = (self.height-33)/(self.contents.height/(self.height-32).to_f)
self.scrollbar = true
if height > self.height - 34
self.scrollbar = false
end
y = self.top_row * (self.height - 34) / row_max
rect = Rect.new(0, 0, 6, height)
bmp = RPG::Cache.picture("scrollbar") rescue nil
if bmp.nil?
bmp = Bitmap.new(6, 480)
color = self.windowskin.nil? ? Color.new(255, 255, 255) :
self.windowskin.get_pixel(0, 0)
bmp.fill_rect(0, 0, 6, 480, color)
end
@scrollbar.bitmap = bmp
@scrollbar.src_rect.set(0, 0, 6, height)
@scrollbar.y = y + self.y + 17
@scrollback.src_rect.set(0, 0, 8, self.height - 32)
end
end
#--------------------------------------------------------------------------
# ? dispose
#--------------------------------------------------------------------------
def dispose
dispose_scrollbar
if @scrollback.bitmap != nil
@scrollback.bitmap.clear
end
@scrollbar.dispose
@scrollback.dispose
end
#--------------------------------------------------------------------------
# ? scrollbar=
#--------------------------------------------------------------------------
def scrollbar=(bool)
@scrollbar.visible = bool
@scrollback.visible = bool
end
#--------------------------------------------------------------------------
# ? update
#--------------------------------------------------------------------------
def update
update_scrollbar
unless self.contents.nil?
height = (self.height-33)/(self.contents.height/(self.height-32).to_f)
self.scrollbar = true
if height > self.height - 34
self.scrollbar = false
end
y = self.top_row * (self.height - 34) / row_max
@scrollbar.src_rect.set(0, 0, 6, height)
@scrollbar.y = y + self.y + 17
@scrollback.src_rect.set(0, 0, 8, self.height - 32)
end
end
end
TERMS AND CONDITIONS
As always, Give Credit and Enjoy ;)
Window's Scrollbars - Printable Version![[Image: scrollscript1.PNG]](http://www.freewebs.com/enkisama/scrollscript1.PNG)
![[Image: scrollscript2.PNG]](http://www.freewebs.com/enkisama/scrollscript2.PNG)