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

雪流星

return 0 if MAP_TILE_B[map_tile_id_2]==nil
return MAP_TILE_B[map_tile_id_2]
可以縮短成
return MAP_TILE_B[map_tile_id_2] ? MAP_TILE_B[map_tile_id_2] : 0

或著 ==nil 也可以寫成 .nil?

---

if (map_tile_id_2 >= 257) and (map_tile_id_2 <= 512) d等
可以寫成
if map_tile_id2 / 257 == 0/1/2/3
返回0就是B、返回1就是C....等

---

還有哈表表的寫法可以改成：
{ 地形標記 => [圖塊ID, 圖塊ID, 圖塊ID, ...]}
這樣設置起來比較方便
方法參考沉影不器的關鍵字變色腳本

PS:
這段計算圖塊ID的腳本是我寫的
美獸寫的我沒找到，寫的可能會更漂亮

精灵使者

还要注意一件事：A图块里也是有橡皮的

TERENCE

以下引用snstar2006于2009-1-10 5:40:13的发言：
還有哈表表的寫法可以改成：
{ 地形標記 => [圖塊ID, 圖塊ID, 圖塊ID, ...]}
這樣設置起來比較方便
方法參考沉影不器的關鍵字變色腳本

如此一來
使用者在算地图ID时 很不方便 要从1号数到1千多号
我之所以这样特别把A～E的ID分开
是為了方便  使用者  算地图ID
使用者可以利用简单的乘法与数ˇ数ˋ找出ID值
A～E每个都是从1～256
（每張最多32行，所以使用计算复杂度只有8*(二位数)）

{ 图块ID=>地形标志值 ,图块ID=>地形标志值 ,.......}
这种使用方法思维设计  类似RM_XP地形标志使用方法
只是图块ID位置要自己找！！

以上是龙仔的狂妄言语......不要PIA我

以下引用精灵使者于2009-1-10 9:27:58的发言：
还要注意一件事：A图块里也是有橡皮的

那个橡皮是可以设置ID的(它是透明的图块)
我說的
黑屏区未定义(尚未规划任何)图块区域  回传0
指的是新建地图时连像皮都没抹过的地方喔！！

此時map_tile_id_0等于－１４０７
抹了A图块里的橡皮
map_tile_id_0是１３７

雪流星

我觉得直接在脚本中强制限制橡皮元件的地形标记为0就好了

---

龙黄你误会我的意思了
我不是说一次把全部的元件都设定好
是说这样

A={
1 => [1, 2, 3, 4, 5, 6],
2 => [7, 8, 9, 10],
3 => [],
4 => [11, 12, 23, 56],
5 => [22, 78, 99],
6 => [],
7 => []
}

一样只是要填需要的，只是 1、2、3这些地形标记只要一次

你看一下沉影的关键字变色脚本就明白了

柳无双

{/fd}显然，tomy的vx地图编辑器自带地形标志扩展功能，
可视化，直观操作

TERENCE

以下引用snstar2006于2009-1-10 11:55:33的发言：

我觉得直接在脚本中强制限制橡皮元件的地形标记为0就好了

不設置Ａ橡皮元件就是０
B～E的那个橡皮元件是不能设置成０
如果是这样没模B～E图块的地方 会永远回传０

即使你有設置
# 图块Ａ的部分_ID　(ID:1～256)
MAP_TILE_A = {1=>0 ,256=>0......}
也一樣

---

话说我很想知道那个地图ID你是用甚麼办法做出来的
我曾也 p $game_map.map.data 看过(嘗試過)
但出来的只有一16进制的值而已
完全找不到資料的影子在內


snstar2006
你是怎麼办到的？？


另P.S
p这个语法太好用了
脚本有问题时都能用这个在检验何处有问题

雪流星

我是看美兽的暂时修改通行的脚本
反向计算得到的

在VX脚本中判断地图通行度的地方也有
那个十六进制是代表通行度，你可以去看F1
p $game_map.map.data 出来的是 data 的在记忆体里面的地址
data 是表格(table) 类

---

还有，龙黄你误会我的意思了
我不是说一次把全部的元件都设定好
是说这样

A={
1 => [1, 2, 3, 4, 5, 6],
2 => [7, 8, 9, 10],
3 => [],
4 => [11, 12, 23, 56],
5 => [22, 78, 99],
6 => [],
7 => []
}

一样只是要填需要的，只是 1、2、3这些地形标记只要一次

你看一下沉影的关键字变色脚本就明白了

---

刚才看了一下默认脚本的定义，发现 class Game_Map 那段不用
因为在Game_Map里面本来就有

1.   #--------------------------------------------------------------------------
   
2.   # ● 獲取地圖數據
   
3.   #--------------------------------------------------------------------------
   
4.   def data
   
5.     return @map.data
   
6.   end
   

复制代码

读取的时候用 $game_map.data 代替 $game_map.map.data 就可以了

TERENCE

以下引用snstar2006于2009-1-10 12:19:06的发言：
还有，龙黄你误会我的意思了
我不是说一次把全部的元件都设定好
是说这样
A={
1 => [1, 2, 3, 4, 5, 6],
2 => [7, 8, 9, 10],
3 => [],
4 => [11, 12, 23, 56],
5 => [22, 78, 99],
6 => [],
7 => []
}
一样只是要填需要的，只是 1、2、3这些地形标记只要一次
你看一下沉影的关键字变色脚本就明白了

恩～我現在已经知道你的意思了！！
原谅我这只不想再改的懒惰的龙.....


话说只要达到目的就行了(只是方法不同而已)～PIA

以下引用snstar2006于2009-1-10 12:19:06的发言：
在VX脚本中判断地图通行度的地方也有
那个十六进制是代表通行度，你可以去看F1

我家那个F1帮助是日文

以下引用柳无双于2009-1-10 12:10:47的发言：
显然，tomy的vx地图编辑器自带地形标志扩展功能，
可视化，直观操作

不过那套编辑器MS不适合每个用戶的樣子
好像很多人都反应不能使用.......

雪流星

我的簽名...裡面有說明檔