Panik Value ACE

じ☆ve冰风

Panik Value ACE

by Kyonides​

Introduction

This scriptlet allows you to display a so called panic level on screen. You can change its current location by adjusting the values of the corresponding CONSTANTS found in the Panik module.

Version 1.0.2

                Ruby:       

1. # * Panik Value ACE
2. #   Scripter : Kyonides Arkanthes
3. #   v1.0.2 - 2022-01-02
5. # * This script is free as beer and speech! * #
7. # Display the current Panic Level on screen!
8. # It changes its backdrop depending on how dangerous the situation actually is.
9. # You can toggle it by turning a specific game switch on and off at will.
10. # A flash will be displayed if the Panic Level hits a certain value.
11. # Please adjust the values of all the CONSTANTS found below in the Panik module.
13. module Panik
14.   BACKDROP_X = 460
15.   BACKDROP_Y = 0
16.   # Pictures for Good, So so and Bad Panic Levels
17.   BACKDROPS = ["", "", ""]
18.   VAR_ID = 100
19.   SWITCH_ID = 1
20.   FONT_NAME = "Verdana"
21.   FONT_SIZE = 20
22.   # [ Red, Green, Blue ] for each Panic Level
23.   FONT_COLOR = [[255,255,255], [220,80,20], [255,0,0]]
24.   FLASH_MIN_VALUE = 90
25.   FLASH_COLOR = [255,0,0,128] # [ Red, Green, Blue, Opacity ]
26.   FLASH_DURATION = 8
27. end
29. class PanicSpriteset
30.   include Panik
31.   def initialize
32.     @box = Sprite.new
33.     @box.x = BACKDROP_X
34.     @box.y = BACKDROP_Y
35.     @board = Sprite.new
36.     @board.x = BACKDROP_X + 4
37.     @board.y = BACKDROP_Y + 4
38.     @sprites = [@box, @board]
39.     refresh_panic
40.     check_panic_index
41.     refresh_backdrop
42.     @board.bitmap = Bitmap.new(@box.width - 8, @box.height - 8)
43.     refresh_value
44.     self.visible = $game_switches[SWITCH_ID]
45.   end
47.   def check_panic_index
48.     @panic_index = case @panic_value
49.     when 0..49   then 2
50.     when 50..75  then 1
51.     when 75..100 then 0
52.     end
53.   end
55.   def refresh_panic
56.     @panic_value = [0, $game_variables[VAR_ID]].max
57.     @panic_value = [@panic_value, 100].min
58.   end
60.   def refresh_backdrop
61.     @last_index = @panic_index
62.     backdrop = BACKDROPS[@last_index]
63.     @box.bitmap.dispose if @box.bitmap != nil
64.     @box.bitmap = Cache.picture(backdrop)
65.   end
67.   def refresh_value
68.     @last_value = @panic_value
69.     bit = @board.bitmap
70.     bit.clear
71.     bit.font.name = FONT_NAME
72.     bit.font.size = FONT_SIZE
73.     r, g, b = FONT_COLOR[@panic_index]
74.     bit.font.color = Color.new(r, g, b, 255)
75.     bit.draw_text(0, 0, @board.width, @board.height, @panic_value.to_s, 1)
76.     return if FLASH_MIN_VALUE > @panic_value
77.     r, g, b, a = FLASH_COLOR
78.     $game_screen.start_flash(Color.new(r, g, b, a), FLASH_DURATION)
79.   end
81.   def update
82.     refresh_panic
83.     check_panic_index
84.     refresh_backdrop if @last_index != @panic_index
85.     refresh_value if @last_value != @panic_value
86.     self.visible = $game_switches[SWITCH_ID]
87.   end
89.   def visible=(bool)
90.     if @last_state != bool
91.       @sprites.each{|sprite| sprite.visible = bool }
92.     end
93.     @last_state = bool
94.   end
96.   def dispose
97.     @sprites.each do |sprite|
98.       sprite.bitmap.dispose
99.       sprite.dispose
100.     end
101.     @sprites.clear
102.   end
103. end
105. class Scene_Map
106.   alias :kyon_panik_val_scn_map_crt_spr :create_spriteset
107.   alias :kyon_panik_val_scn_map_dsp_spr :dispose_spriteset
108.   alias :kyon_panik_val_scn_map_up :update
109.   def create_spriteset
110.     kyon_panik_val_scn_map_crt_spr
111.     @panic_box = PanicSpriteset.new
112.   end
113.   
114.   def dispose_spriteset
115.     kyon_panik_val_scn_map_dsp_spr
116.     @panic_box.dispose
117.   end
119.   def update
120.     kyon_panik_val_scn_map_up
121.     @panic_box.update
122.   end
123. end

复制代码

Terms & Conditions

You can find them embedded in my scriptlet.


本贴来自国际rpgmaker官方论坛作者:kyonides处,因国际论坛即将永久关站,为了存档多年珍贵资料,署名转载到本论坛存档,由于官方帖子为英文原帖，需要中文翻译请点击论坛顶部切换语言为中文就可以将帖子翻译成中文浏览,方便大家随时查看,原文地址：https://forums.rpgmakerweb.com/threads/panik-value-ace.143404/