KSteps2Doom VX

じ☆ve冰风

KSteps2Doom VX

by Kyonides​

Introduction

This script turns the map's encounter steps as a fixed number.
It features a simple HUD to let you know when you are about to trigger a random encounter on the current map.
The HUD will disappear if you leave any of the monster areas.
You have set no areas on that map?

Well, that means you won't be fighting any given monster.

Spoiler: The Script

                Ruby:       

1. # * KSteps2Doom VX * #
2. #   Scripter : Kyonides Arkanthes
3. #   2024-03-19
5. # This script turns the map's encounter steps as a fixed number.
6. # It features a simple HUD to let you know when you are about to trigger a
7. # random encounter on the current map.
9. module KSteps2Doom
10.   COUNTER_ICON_INDEX = 112
11.   COUNTER_X  = 4
12.   COUNTER_Y  = 4
13.   COUNTER_WH = [104, 26]
14. end
16. class Game_Map
17.   alias :kyon_steps2doom_gm_map_setup :setup
18.   def setup(map_id)
19.     kyon_steps2doom_gm_map_setup(map_id)
20.     areas = $data_areas.values.compact
21.     @map_areas = areas.select {|area| area.map_id == @map_id }
22.   end
23.   attr_reader :map_areas
24. end
26. class Game_Player
27.   attr_reader :encounter_count
28.   def make_encounter_count
29.     @encounter_count = 0
30.   end
32.   def update_encounter
33.     return if $TEST and Input.press?(Input::CTRL)
34.     return if in_vehicle? or !area_found?
35.     @encounter_count += 1
36.   end
38.   def map_area?(area)
39.     rect = area.rect
40.     return false if rect.x > @x or rect.y > @y
41.     return false if @x >= rect.x + rect.width
42.     return false if @y >= rect.y + rect.height
43.     return true
44.   end
46.   def area_found?
47.     $game_map.map_areas.find {|area| map_area?(area) } != nil
48.   end
49. end
51. class EncounterSprite < Sprite
52.   include KSteps2Doom
53.   def initialize(vp=nil)
54.     super(vp)
55.     self.x = COUNTER_X
56.     self.y = COUNTER_Y
57.     self.bitmap = Bitmap.new(*COUNTER_WH)
58.     make_rects
59.   end
61.   def make_rects
62.     grad_width = bitmap.width / 2
63.     @black = Color.new(0, 0, 0)
64.     @alpha = Color.new(0, 0, 0, 0)
65.     @left_rect = Rect.new(0, 0, grad_width, bitmap.height)
66.     @right_rect = Rect.new(grad_width, 0, grad_width, bitmap.height)
67.     @text_rect = Rect.new(32, 0, bitmap.width - 36, 24)
68.     pos = COUNTER_ICON_INDEX
69.     icon = Cache.system("IconSet")
70.     icon_rect = Rect.new(pos % 16 * 24, pos / 16 * 24, 24, 24)
71.     @icon = Bitmap.new(24, 24)
72.     @icon.blt(0, 0, icon, icon_rect)
73.   end
75.   def refresh
76.     self.visible = $game_player.area_found?
77.     return if $game_player.encounter_count == @last_steps
78.     @last_steps = $game_player.encounter_count
79.     self.bitmap.clear
80.     es = $game_map.encounter_step
81.     counter = sprintf("%02d/%02d", @last_steps, es)
82.     bitmap.gradient_fill_rect(@left_rect, @alpha, @black)
83.     bitmap.gradient_fill_rect(@right_rect, @black, @alpha)
84.     bitmap.blt(8, 0, @icon, @icon.rect)
85.     bitmap.draw_text(@text_rect, counter)
86.   end
88.   def dispose_all
89.     @icon.dispose
90.     bitmap.dispose
91.     dispose
92.   end
93. end
95. class Spriteset_Map
96.   alias :kyon_steps2doom_sprtst_map_crt_pix :create_pictures
97.   alias :kyon_steps2doom_sprtst_map_up :update
98.   alias :kyon_steps2doom_sprtst_map_disp :dispose
99.   def create_pictures
100.     kyon_steps2doom_sprtst_map_crt_pix
101.     make_encounter_counter
102.   end
104.   def make_encounter_counter
105.     @encounter_sprite = EncounterSprite.new(@viewport3)
106.   end
108.   def update_encounter_bitmap
109.     @encounter_sprite.refresh
110.   end
112.   def update
113.     kyon_steps2doom_sprtst_map_up
114.     update_encounter_bitmap
115.   end
117.   def dispose
118.     kyon_steps2doom_sprtst_map_disp
119.     @encounter_sprite.dispose_all
120.   end
121. end
123. class Scene_Map
124.   def update_encounter
125.     return if $game_map.interpreter.running?
126.     return if $game_system.encounter_disabled
127.     return if $game_map.encounter_step != $game_player.encounter_count
128.     troop_id = $game_player.make_encounter_troop_id
129.     return unless $data_troops[troop_id]
130.     $game_player.make_encounter_count
131.     $game_troop.setup(troop_id)
132.     $game_troop.can_escape = true
133.     $game_temp.battle_proc = nil
134.     $game_temp.next_scene = "battle"
135.     preemptive_or_surprise
136.   end
137. end

复制代码

Download Demo​

Terms & Conditions

Free for use in ANY game.
Due credit is mandatory.
Mention this forum in your game credits.
That's it!



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