Area Support for RPG maker XP

じ☆ve冰风

This script implements Areas (or Regions) in RPG maker XP, so they work the same way as in more modern RPG maker versions.
They work in parallel with terrain tags without changing anything on them, and the way to check them via script is also very similar.

To set them, execute your game in Debug mode and press F8. The option of placing the areas directly along the map using the mouse will be activated. To change the area index, press Q / W (or Page Down / Page Up) and use the directional arrows to scroll across the map. The changes will be saved in real time.

Spoiler: Side notes

If you're using the Grid-Free Doodads script I made some years ago, it has Area Support already integrated.

If you are using another Mouse script in your game, you can remove the Glitchfinder Key and Mouse and use the one you are already using (the methods in the Setup Mode script will have to be adapted).

Author: Wecoc
First Release: September 2016
Last Version: October 2018

Credits

• Wecoc (Area implementation)
  
• Glitchfinder (Keyboard & Mouse modules)
  

Terms of use
- Please give credits to everyone on the list above.
- You can repost this code.
- You can edit this code freely, and distribute the edits as well.
- This code can be used on commercial games.

Spoiler: Screen

[/quote]

Instructions
Download the demo and copy the four scripts on your game: Key Input, Mouse, Area Base and Area Setup.
There's not much to it apart from that.

You can define areas that are always passable or non-passable on the start of Area Base, and you can change the debug button (F8) on Area Setup.

Demo: Area Support 1.1.zip

Spoiler: Script calls[quote]Check the area on a map coordinate
$game_map.area(X, Y)

Set the area of a map coordinate by event
$game_map.set_area(X, Y, Area ID)

Get the current area of the player or an event
$game_player.area
$game_map.events[Event ID].area

This script also has some script addons available. I'll include a few below.

Spoiler: Addon - Event Area Restrictions

This little script allows to make some areas passable or non-passable for certain events or the player.

                Ruby:        

1. #==============================================================================
2. # ** Event Area Restrictions
3. #==============================================================================
5. class Game_Character
7.   attr_accessor :passable_areas
8.   attr_accessor :no_passable_areas
10.   alias areas_pass_ini initialize unless $@
11.   def initialize(*args)
12.     areas_pass_ini(*args)
13.     @passable_areas = {}
14.     @no_passable_areas = {}
15.     @passable_areas.default = false
16.     @no_passable_areas.default = false
17.   end
19.   def set_passable(area, value=true)
20.     if value == true
21.       @passable_areas[area] = true
22.       @no_passable_areas[area] = false
23.     else
24.       @passable_areas[area] = false
25.     end
26.     return true
27.   end
29.   def set_no_passable(area, value=true)
30.     if value == true
31.       @no_passable_areas[area] = true
32.       @passable_areas[area] = false
33.     else
34.       @no_passable_areas[area] = false
35.     end
36.     return true
37.   end
39.   def clear_passable(area)
40.     set_passable(area, false)
41.   end
43.   def clear_no_passable(area)
44.     set_no_passable(area, false)
45.   end
47.   alias areas_pass? passable? unless $@
48.   def passable?(x, y, d)
49.     new_x = x + (d == 6 ? 1 : d == 4 ? -1 : 0)
50.     new_y = y + (d == 2 ? 1 : d == 8 ? -1 : 0)
51.     return false if @no_passable_areas[self.area] == true
52.     return false if @no_passable_areas[$game_map.area(new_x, new_y)] == true
53.     return false unless $game_map.valid?(new_x, new_y)
54.     return true if @passable_areas[$game_map.area(new_x, new_y)] == true
55.     areas_pass?(x, y, d)
56.   end
57. end

复制代码

For example:
$game_map.events[Event ID].set_passable(Area ID)
$game_player.set_passable(Area ID)

You can use set_passable, set_no_passable, clear_passable and clear_no_passable.

Spoiler: Addon - Area Helper

This little script allows to define some descriptions on certain areas that will display when setting them, so you won't have to remember which IDs you had to use.

                Ruby:        

1. #==============================================================================
2. # ** [XP] Area Helper
3. #------------------------------------------------------------------------------
4. #  Author: Wecoc
5. #==============================================================================
7. module Setup
8.   AREA_HELPER = {1 => "Example", 10 => "Passable", 11 => "No passable"}
9.   AREA_HELPER.default = ""
10. end
12. class Scene_Map
13.   alias area_helper_call_setup call_setup unless $@
14.   def call_setup
15.     @helper_window = Window_Base.new(160, 0, 480, 64)
16.     @helper_window.back_opacity = 160
17.     width = @helper_window.width - 32
18.     height = @helper_window.height - 32
19.     @helper_window.contents = Bitmap.new(width, height)
20.     @helper_window.visible = false
21.     area_helper_call_setup
22.   end
24.   alias area_helper_refresh_area refresh_area unless $@
25.   def refresh_area
26.     area_helper_refresh_area
27.     @helper_window.contents.clear
28.     text = Setup::AREA_HELPER[@area_id]
29.     @helper_window.contents.draw_text(4, 0, 480 - 32, 32, text)
30.   end
32.   alias area_helper_update_setup update_setup unless $@
33.   def update_setup
34.     area_helper_update_setup
35.     @helper_window.update
36.     @helper_window.visible = @area_window.visible
37.   end
39.   alias area_helper_exit_setup exit_setup unless $@
40.   def exit_setup
41.     area_helper_exit_setup
42.     @helper_window.dispose
43.   end
44. end

复制代码

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