UltimaForum :: Zobacz temat - skrypt paski zmiennej

Spoiler:

Kod:

#===============================================================================
# Variable Gauge Display
#-------------------------------------------------------------------------------
# By piejamas
# v1.0
#===============================================================================
#
#Skrypt pozwalajÄcy wyĹwietliÄ wartoĹÄ zmiennej w pasku. :D

#------------------------------------------------------------------------------
# * Tu zmieniaj :D
#------------------------------------------------------------------------------

module Gauge

#--------------------------------------------
# Variable ID
# ID zmiennych, ktĂłre majÄ byÄ wyĹwietlane
VARIABLE_ID_1 = 1
VARIABLE_ID_2 = 2
#--------------------------------------------

#--------------------------------------------
# Visible Switch
# Pasek jest widoczny jeĹli ten przeĹÄcznik bÄdzie wĹÄczony
VISIBLE_SWITCH = 1
#--------------------------------------------

#--------------------------------------------
# Ustawienie
# Czyli gdzie ma siÄ znajdowaÄ okno ze zmiennÄ.
X = 0
Y = 0
GAUGE_WIDTH = 120
GAUGE_HEIGHT = 6
#--------------------------------------------

#--------------------------------------------
# Gauge Max
# Maksymalna wartoĹÄ ktĂłra bÄdzie wyĹwietlana na pasku.
GAUGE_MAX = 100
#--------------------------------------------

#--------------------------------------------
# Kolory paskĂłw pierwszej zmiennej
# Color.new( red, green, blue)
VAR1_COLOUR1 = Color.new( 0, 255, 100)
VAR1_COLOUR2 = Color.new( 0, 255, 0)
# Kolory paskĂłw drugiej zmiennej
VAR2_COLOUR1 = Color.new( 0, 255, 100)
VAR2_COLOUR2 = Color.new( 0, 255, 0)
#--------------------------------------------

#--------------------------------------------
# PokaĹź okno
# PokazaÄ okno czy teĹź nie?
SHOW_WINDOW = true
#--------------------------------------------

#--------------------------------------------
# Text
# Tekst ktĂłry bÄdzie wyĹwietlany nad paskiem
TEXT = "o.o"
#--------------------------------------------

################################################################################
## Tego nie dotykaj chyba Ĺźe wiesz co robisz :) ##
################################################################################

end

class Window_GaugeDisplay < Window_Base
include Gauge

#----------------------------------------------------------------------------
# * Object initialization
#----------------------------------------------------------------------------
def initialize
super(X, Y, GAUGE_WIDTH + 16, GAUGE_HEIGHT + WLH * 2 + 32)
self.visible = $game_switches[VISIBLE_SWITCH]
self.opacity = 0 unless SHOW_WINDOW
@old_var1 = $game_variables[VARIABLE_ID_1]
@old_var2 = $game_variables[VARIABLE_ID_2]
self.contents.draw_text(-8, -7, self.contents.width, WLH, TEXT, 1)
refresh
end

#----------------------------------------------------------------------------
# * Refresh
#----------------------------------------------------------------------------
# Draw the stuff
#----------------------------------------------------------------------------
def refresh
gw = GAUGE_WIDTH * $game_variables[VARIABLE_ID_1] / GAUGE_MAX
gc1 = VAR1_COLOUR1
gc2 = VAR1_COLOUR2
self.contents.fill_rect(0, 0 + WLH - 8, GAUGE_WIDTH, GAUGE_HEIGHT, gauge_back_color)
self.contents.gradient_fill_rect(0, 0 + WLH - 8, gw, GAUGE_HEIGHT, gc1, gc2)

gw = GAUGE_WIDTH * $game_variables[VARIABLE_ID_2] / GAUGE_MAX
gc1 = VAR2_COLOUR1
gc2 = VAR2_COLOUR2
self.contents.fill_rect(0, 0 + WLH * 2 - 8, GAUGE_WIDTH, GAUGE_HEIGHT, gauge_back_color)
self.contents.gradient_fill_rect(0, 0 + WLH * 2 - 8, gw, GAUGE_HEIGHT, gc1, gc2)
end
#----------------------------------------------------------------------------
# * Update
#----------------------------------------------------------------------------
def update
self.visible = $game_switches[VISIBLE_SWITCH]
var1 = $game_variables[VARIABLE_ID_1]
var2 = $game_variables[VARIABLE_ID_2]
refresh if var1 != @old_var1 or var2 != @old_var2
@old_var1 = var1
@old_var2 = var2
end
end

class Scene_Map

#----------------------------------------------------------------------------
# * Aliases
#----------------------------------------------------------------------------

alias :var_guage_old_start :start unless $@
alias :var_guage_old_update :update unless $@
alias :var_guage_old_terminate :terminate unless $@

#----------------------------------------------------------------------------
# * Start
#----------------------------------------------------------------------------
def start
var_guage_old_start
@var_guage = Window_GaugeDisplay.new
end

#----------------------------------------------------------------------------
# * Update
#----------------------------------------------------------------------------
def update
var_guage_old_update
@var_guage.update
end

#----------------------------------------------------------------------------
# * Terminate
#----------------------------------------------------------------------------
def terminate
var_guage_old_terminate
@var_guage.dispose
end

end