RMVX地形标志V2.0版（过期帖）

TERENCE

■ RMVX扩建地形标志脚本V2.0
前言：
在XP上有地形标誌的功能，但在VX却取消了该功能，
以至於要在VX地图上做一些特殊效果不容易达成，
不久前 我发了XP纯事件推箱子完美(无等待)效果
http://rpg.blue/viewthread.php?tid=114571
精灵问说没地形标誌的VX怎麼办.....

利用区域做出 的 地形标志脚本
现在都已经解决了
而且方法名称跟XP一样


V2.0版：
提升调用terrain_tag方法的效率

第二隐忧：
目前该V2.0版脚本存在隐忧就是...
脚本中的 # 过滤其它地图的区域资料 的地方
处理方式有点不妥....
当Areas.rvdata ($data_areas) 资料越来越庞大时
载入地图时所花费的时间相对加长

---

使用方法：

在生成区域命名的地方  命名成"数字"即可
如果命名為文字(字串)型式  调用时回传0
在没有区域的情况下调用时(默认下)  也回传0
------------------------------------------------------
调用方法：

获取角色当前所在地形标誌
$game_player.terrain_tag
   
获取某事件当前所在地形标誌
$game_map.events[事件编号].terrain_tag

------------------------------------------------------
事件脚本中常用的使用方法：

角色当前所在地形标誌  帶入 某变量中
$game_variables[变量编号] = $game_player.terrain_tag

某事件当前所在地形标誌  帶入 某变量中
$game_variables[变量编号] = $game_map.events[事件编号].terrain_tag

------------------------------------------------------
事件条件分歧脚本中常用的使用方法：

角色当前所在地形标誌  是否等于 值
$game_player.terrain_tag == 值

某事件当前所在地形标誌  是否等于 值
$game_map.events[事件编号].terrain_tag == 值

脚本：

1. 
   
2. #==============================================================================
   
3. # ■ 地形标志V2.0  By TERENCE(龙皇)
   
4. #------------------------------------------------------------------------------
   
5. # 　使用方法:
   
6. #
   
7. #   在生成区域命名的地方  命名成"数字"即可
   
8. #   如果命名為文字型(字串)型式  调用时回传0
   
9. #   在没有区域的情况下调用时(默认下)  也回传0
   
10. #------------------------------------------------------
    
11. #   调用方法:
    
12. #
    
13. #   获取角色当前所在地形标誌
    
14. #   $game_player.terrain_tag
    
15. #   
    
16. #   获取某事件当前所在地形标誌
    
17. #   $game_map.events[事件编号].terrain_tag
    
18. #------------------------------------------------------
    
19. #   事件脚本中常用的使用方法:
    
20. #
    
21. #   角色当前所在地形标誌  帶入 某变量中
    
22. #   $game_variables[变量编号] = $game_player.terrain_tag
    
23. #
    
24. #   某事件当前所在地形标誌  帶入 某变量中
    
25. #   $game_variables[变量编号] = $game_map.events[事件编号].terrain_tag
    
26. #------------------------------------------------------
    
27. #   事件条件分歧脚本中常用的使用方法:
    
28. #
    
29. #   角色当前所在地形标誌  是否等于 值
    
30. #   $game_player.terrain_tag == 值
    
31. #
    
32. #   某事件当前所在地形标誌  是否等于 值
    
33. #   $game_map.events[事件编号].terrain_tag == 值
    
34. #
    
35. #==============================================================================
    
36. class Game_Map
    
37.   #--------------------------------------------------------------------------
    
38.   # ● 设置
    
39.   #--------------------------------------------------------------------------
    
40.   alias area_setup setup
    
41.   def setup(map_id)
    
42.     area_setup(map_id)
    
43.     # 生成 暂存过滤区域物件资料 数组
    
44.     $temp_area = []
    
45.     # 过滤其它地图的区域资料
    
46.     for n in 0..$data_areas.values.size-1
    
47.       if $data_areas.values[n].map_id == @map_id
    
48.         $temp_area.push $data_areas.values[n]
    
49.       end
    
50.     end
    
51.   end
    
52. end
    
53. 
    
54. class Game_Character
    
55.   #--------------------------------------------------------------------------
    
56.   # ● 判断是否在区域内
    
57.   #--------------------------------------------------------------------------
    
58.   def area?(area)
    
59.     return false if @x < area.rect.x
    
60.     return false if @y < area.rect.y
    
61.     return false if @x >= area.rect.x + area.rect.width
    
62.     return false if @y >= area.rect.y + area.rect.height
    
63.     return true
    
64.   end
    
65.   #--------------------------------------------------------------------------
    
66.   # ● 获取地形标志
    
67.   #--------------------------------------------------------------------------
    
68.   def terrain_tag
    
69.     # 获取地图ID
    
70.     map_id = $game_map.map_id
    
71.     # 回传 所在地形标志 的值
    
72.     for area in $temp_area
    
73.       if area?(area)
    
74.         return area.name.to_i
    
75.       end
    
76.     end
    
77.     # 默认下 回传0
    
78.     return 0
    
79.   end
    
80. end
    

复制代码

范例工程：
http://rpg.blue/upload_program/d ... n_tag_111881102.rar

TERENCE

以下引用疯鸡瘫圣老贱于2009-1-8 7:43:03的发言：

收下……
繁体……
区域过多也是不好的……

工程有乱码吗？？
我记得是用简体啊....

精灵使者

区域其实可以从区域名下手。
建议从图块或者自动元件下手比较好

TERENCE

以下引用精灵使者于2009-1-8 10:54:05的发言：
区域其实可以从区域名下手。
建议从图块或者自动元件下手比较好

本脚本 就是从 区域名下手
这里最棘手的就是....
VX把每张地图的区域资讯全都挤在
Areas.rvdata ( $data_areas )  里

所以才需要 过滤其他地图的区域部分( 的回圈 )

精灵使者

这个这不就成显示地图名的方法了么？
每次进map的时候刷新此map的area，而不是直接读取所有的area然后刷新……这样应该会好些。
另外，考虑一下area重叠的问题。

TERENCE

以下引用精灵使者于2009-1-8 11:17:56的发言：
这个这不就成显示地图名的方法了么？
每次进map的时候刷新此map的area，而不是直接读取所有的area然后刷新……这样应该会好些。
另外，考虑一下area重叠的问题。

这就是我所伤脑筋的地方
這也是一定要过滤
map资讯跟area资讯是无关的

之所以可以判断角色是否在该地图的某区内
是由 MAP的ID 跟 $data_areas(类似数组)里所有map_id方法  作判定

$data_areas.values以数组方式存放"所有"地图的区域  每张区域都有存放map_id
你 p $data_areas.values 就一目了然

TERENCE

关於重叠 MS 以最先 生成区域的为主(无论该区命名是否为字串)

精灵使者

建议在移动场所的函数里面调出值重新读入一次关于此map的area比较好些。这样可以减少并行事件
在场所移动而且移动的map ID不相同的时间进行AREA的处理

TERENCE

以下引用精灵使者于2009-1-8 14:55:58的发言：

建议在移动场所的函数里面调出值重新读入一次关于此map的area比较好些。这样可以减少并行事件
在场所移动而且移动的map ID不相同的时间进行AREA的处理

精灵的意思是....
在载入地图数据rvdata时，
先進行  过滤其他地图的区域部分( 的回圈 )  嗎？

这样的确能提升调用terrain_tag方法的效率
但是载入地图时所花费的时间相对加长些喔！！