[MV] Custom Progress Bar - есть ли такой ?

# Window_Gauge (2013/ 1/ 9) #______________________________________________________________________________ module FreeGauge # 色の指定 ( Color.new(R,G,B) または \C[n] の n (数値) で指定 ) COLOR1 = Color.new(165, 156, 245) # 左端の色 COLOR2 = Color.new(73, 55, 236) # 右端の色 FILLED_COLOR = Color.new(73, 55, 236) # 満タン時の色 end #______________________________________________________________________________ class Game_Interpreter def draw_gauge(r, x = nil, y = nil, z = nil) scene = SceneManager.scene return unless scene.is_a?(Scene_Battle) window = scene.gauge_window window.x = x if x window.y = y if y window.z = z if z window.gauge_rate = r end #-------------------------------------------------------------------------- def show_gauge scene = SceneManager.scene return unless scene.is_a?(Scene_Battle) scene.gauge_window.show end #-------------------------------------------------------------------------- def hide_gauge scene = SceneManager.scene return unless scene.is_a?(Scene_Battle) scene.gauge_window.hide end #-------------------------------------------------------------------------- def change_gauge_color(color, i) scene = SceneManager.scene return unless scene.is_a?(Scene_Battle) case i when 1; scene.gauge_window.gauge_color1 = color when 2; scene.gauge_window.gauge_color2 = color when 3; scene.gauge_window.filled_color = color end end end class Window_Gauge < Window_Base attr_reader :gauge_rate attr_writer :gauge_color1 attr_writer :gauge_color2 attr_writer :filled_color def initialize(x = 0, y = 0, width = 160, height = 48) super self.hide.opacity = 0 @gauge_rate = 0.0 @gauge_color1 = FreeGauge::COLOR1.clone @gauge_color2 = FreeGauge::COLOR2.clone @filled_color = FreeGauge::FILLED_COLOR.clone end #-------------------------------------------------------------------------- def gauge_rate=(r) return if @gauge_rate == r @gauge_rate = r refresh end #-------------------------------------------------------------------------- def gauge_color1 return filled_color if @gauge_rate >= 1.0 return text_color(@gauge_color1) if @gauge_color1.is_a?(Integer) return @gauge_color1 end #-------------------------------------------------------------------------- def gauge_color2 return filled_color if @gauge_rate >= 1.0 return text_color(@gauge_color2) if @gauge_color2.is_a?(Integer) return @gauge_color2 end #-------------------------------------------------------------------------- def filled_color return text_color(@filled_color) if @filled_color.is_a?(Integer) return @filled_color end #-------------------------------------------------------------------------- def refresh contents.clear draw_gauge(0, 0, contents_width, gauge_rate, gauge_color1, gauge_color2) end end class Scene_Battle < Scene_Base attr_reader :gauge_window alias window_gauge__create_all_windows create_all_windows def create_all_windows window_gauge__create_all_windows @gauge_window = Window_Gauge.new end end

r = $game_variables[6] / 100.0 draw_gauge(r, 200, 30) show_gauge $window.create_contents text1 = $game_variables[6] text2 = "%" $window.draw_text(4,0,100,24,text1) $window.draw_text(32,0,100,24,text2)