RM_VX地形标志V3.5_图块版本（脚本优化）

TERENCE

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

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


第一次发的地形标志帖子过期帖处里！！

---

地形标志设置方法：
A～E每张图块ID都是从最左上方开始计算(由左到右)
001,002,003,004,005,006,007,008
009,010,011,012,013,014,015,016
...............................
249,250,251,252,253,254,255,256

{ 图块ID=>地形标志值 ,图块ID=>地形标志值 ,.......}
如果没设置地形标志值 调用后默认值为0
------------------------------------------------------
★注意事项：
[B页]的第一格空白图块是"不能"设置地形标志的
因为它是专门清理图块B～E的工具   而非图块
所以图块[B页]的部分 ID从第二格002开始计算

001[X设置不能],002,003,004,005,006,007,008
...............................

另外如果图层地形标志重叠，
以高图层的B～E为主！！
------------------------------------------------------
调用方法：

获取角色当前所在地形标誌
$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 == 值

（V3.5感谢流星姐的脚本优化）

1. 
   
2. #==============================================================================
   
3. # ■ RM_VX地形标志V3.0_图块版本 By TERENCE(龙皇)
   
4. #------------------------------------------------------------------------------
   
5. # 　地形标志设置方法:
   
6. # 　A～E每张图块ID都是从最左上方开始计算(由左到右)
   
7. #   001,002,003,004,005,006,007,008
   
8. #   009,010,011,012,013,014,015,016
   
9. #   ...............................
   
10. #   249,250,251,252,253,254,255,256
    
11. #
    
12. #   { 图块ID=>地形标志值 ,图块ID=>地形标志值 ,.......}
    
13. #   如果没设置地形标志值 调用后默认值为0
    
14. #------------------------------------------------------
    
15. #   ★注意事项:
    
16. #   [B页]的第一格空白图块是"不能"设置地形标志的
    
17. #   因为它是专门清理图块B～E的工具   而非图块
    
18. #   所以图块[B页]的部分 ID从第二格002开始计算
    
19. #
    
20. #   001[X设置不能],002,003,004,005,006,007,008
    
21. #   ...............................
    
22. #------------------------------------------------------
    
23. #   调用方法:
    
24. #
    
25. #   获取角色当前所在地形标誌
    
26. #   $game_player.terrain_tag
    
27. #   
    
28. #   获取某事件当前所在地形标誌
    
29. #   $game_map.events[事件编号].terrain_tag
    
30. #------------------------------------------------------
    
31. #   事件脚本中常用的使用方法:
    
32. #
    
33. #   角色当前所在地形标誌  帶入 某变量中
    
34. #   $game_variables[变量编号] = $game_player.terrain_tag
    
35. #
    
36. #   某事件当前所在地形标誌  帶入 某变量中
    
37. #   $game_variables[变量编号] = $game_map.events[事件编号].terrain_tag
    
38. #------------------------------------------------------
    
39. #   事件条件分歧脚本中常用的使用方法:
    
40. #
    
41. #   角色当前所在地形标誌  是否等于 值
    
42. #   $game_player.terrain_tag == 值
    
43. #
    
44. #   某事件当前所在地形标誌  是否等于 值
    
45. #   $game_map.events[事件编号].terrain_tag == 值
    
46. #
    
47. #==============================================================================
    
48. 
    
49. class Game_Character
    
50. #--------------------------------------------------------------------------
    
51. # ● 地形标志设置区
    
52. #--------------------------------------------------------------------------
    
53. 
    
54.   # 图块Ａ的部分_ID　(ID:1～256)
    
55.   MAP_TILE_A = {1=>0 ,256=>0}
    
56.   MAP_TILE_A.default = 0
    
57. 
    
58.   # 图块Ｂ的部分_ID  (ID:2～256) ★
    
59.   MAP_TILE_B = {2=>0 ,256=>0}
    
60.   MAP_TILE_B.default = 0
    
61. 
    
62.   # 图块Ｃ的部分_ID  (ID:1～256)
    
63.   MAP_TILE_C = {1=>0 ,256=>0}
    
64.   MAP_TILE_C.default = 0
    
65. 
    
66.   # 图块Ｄ的部分_ID  (ID:1～256)
    
67.   MAP_TILE_D = {1=>0 ,256=>0}
    
68.   MAP_TILE_D.default = 0
    
69. 
    
70.   # 图块Ｅ的部分_ID  (ID:1～256)
    
71.   MAP_TILE_E = {1=>0 ,256=>0}
    
72.   MAP_TILE_E.default = 0
    
73. 
    
74. #--------------------------------------------------------------------------
    
75. # ● 获取地形标志
    
76. #--------------------------------------------------------------------------
    
77.   def terrain_tag   
    
78.     # 计算图块ID数值
    
79.     a = $game_map.data[@x, @y, 0]-2000
    
80.     map_tile_id_0 = (a >= 0) ? a/48 : (a+593)
    
81.     map_tile_id_1 = ($game_map.data[@x, @y, 1]-2000) / 48
    
82.     map_tile_id_2 = ($game_map.data[@x, @y, 2]+1)
    
83.          
    
84.     map_tile_id_0 = 0 if map_tile_id_0 == -42 # A
    
85.     map_tile_id_1 = 0 if map_tile_id_1 == -42 # I
    
86.     map_tile_id_2 = 0 if map_tile_id_2 == -42 # B～E
    
87.    
    
88.     map_tile_id_0 = map_tile_id_1 if map_tile_id_1 > 0 # 图块A的ID矫正
    
89.    
    
90.     case map_tile_id_2
    
91.     when 1
    
92.       # 获取图块Ａ部分的地形标志
    
93.       return MAP_TILE_A[map_tile_id_0] if ( (1..256) === map_tile_id_0)
    
94.     when 2..256
    
95.       # 获取图块Ｂ部分的地形标志
    
96.       return MAP_TILE_B[map_tile_id_2]
    
97.     when 257..512
    
98.       # 获取图块Ｃ部分的地形标志
    
99.       return MAP_TILE_C[map_tile_id_2-256]
    
100.     when 513..768
     
101.       # 获取图块Ｄ部分的地形标志
     
102.       return MAP_TILE_D[map_tile_id_2-512]
     
103.     when 769..1024
     
104.       # 获取图块Ｅ部分的地形标志
     
105.       return MAP_TILE_E[map_tile_id_2-768]
     
106.     else
     
107.       # 黑屏区未定义(尚未规划任何)图块区域  回传0
     
108.       return 0   
     
109.     end
     
110.   end  
     
111. end
     

复制代码

范例工程：（V3.0）
http://rpg.blue/upload_program/d/TERENCE_VX_111976575.rar

另P.S.
感谢snstar2006提供美兽写的计算图块ID的脚本
另SORRY！！～连帖～我不是故意的

图块编辑器脚本在此：http://rpg.blue/viewthread.php?tid=115381

lzy136188230

回复 TERENCE 的帖子

让他读取主角前面一格的地图图块的地形标号怎么办啊？
   

雪流星

以下引用沉影不器于2009-1-20 21:50:42的发言：
跟.net没关系吧...虽然日文看不懂...

看到TERENCE开始做vx的事,开心得很...咦,为啥...

我们大家一起加加油把龙黄拉来VX这个大家庭 =v=

TERENCE

以下引用精灵使者于2009-1-16 7:57:58的发言：

华丽的将链接更新到主楼。

辛苦精灵了～～

精灵使者

华丽的将链接更新到主楼。

雪流星

编辑器脚本
http://rpg.blue/viewthread.php?tid=115381

TERENCE

明天一周起，我会不在家。。。
无法随时更新主楼～～也联络不到我，
所以如果有必要的話，可能劳请流星姐帮忙更新一下了！

雪流星

以下引用3nξhα0_lim于2009-1-11 17:18:05的发言：
如果说编辑器，我可以给个简单的参考，就像Blizz那样，可视化的编辑器生成出来的只是脚本设定的部分，并不用直接修改rvdata，可避存档错误，造成文件损坏。

算我鸡蛋里挑骨头好了……
如果说我吃饱了没事撑着干，把事件当图块用……
可是这脚本却不能够读取事件图块上的地形标志，反而是读取给地图的地形标志……
这里可以改进并完美化。
缺点：冲突性至少增加5-6倍。

还好不会冲突
事件的图像是图块的时候
储存为 tile_id，
所以只要读出来就好了

    for event in $game_map.events.values
      if event.pos?(@x, @y) and event.tile_id > 0
        map_tile_id_2 = event.tile_id
      end
    end

不过这里的图块ID跟我之前算的差1，是从0开始算的