Leyeshot2.1线形视野系统，做暗杀类游戏的葵花宝典！

流川枫

以下引用Sora于2008-11-5 18:54:01的发言：

我提个意见可以么
不知道是我不会用，还是确实存在这个缺陷
我设置一个事件，在D开关打开时，移动方式变成靠近主角，然后是与主角接触时战斗处理，模拟当NPC看见主角时，过去与之战斗
我遇到的问题是，比如当主角在事件左下方时，刚好进入事件视野，按4方向行走，NPC要靠近主角，就会往左走，当事件面一朝左，主角就不在视野内了，NPC就不动了……

这是设计上的 流程 问题。
正确的流程如下：

（第一种方案）在看到主角的 事件层里 关闭 可视开关，这样 独立开关D 就不会被关闭。你就可以 靠近主角，直到接触主角，触发战斗等。

（第二种方案）在看到主角的 事件层里 打开另一个独立开关B，当 独立开关D又被关上的时候，由于开了独立开关B，所以由 另外一个事件层 来处理 看见主角后又再次看不见主角时 的程序。

流川枫

以下引用178818872于2008-11-7 16:54:20的发言：

?????

流川枫

1. 
   
2. #==============================================================================
   
3. # ■ LCF_Leyeshot (linetype eyeshot)VX 2.1    Creator LCF  Date 2008.11.3
   
4. #------------------------------------------------------------------------------
   
5. # 　线形视野系统    编者：流川枫    QQ：350773875
   
6. #==============================================================================
   
7. #【使用说明】
   
8. #------------------------------------------------------------------------------
   
9. # 视野系统开关    $game_map.events[@event_id].le_seeing = true/false
   
10. # 功能：该值为true表示该NPC视野开启，否则未开启，默认为false。
    
11. #------------------------------------------------------------------------------
    
12. # 视野透视开关    $game_map.events[@event_id].le_clairv = true/false
    
13. # 功能：该值为true表示该NPC视野不扫描视线障碍，否则扫描，默认为false。
    
14. #------------------------------------------------------------------------------
    
15. # 视线显示开关    $game_map.events[@event_id].le_show = true/false
    
16. # 功能：该值为true表示显示该NPC的视线，否则不显示，默认为false。
    
17. #------------------------------------------------------------------------------
    
18. # 侧面可视开关    $game_map.events[@event_id].le_side = true/false
    
19. # 功能：该值为true表示该NPC可以看到侧面一格内的人，否则由斜率决定，默认为true。
    
20. #------------------------------------------------------------------------------
    
21. # 视野环绕开关    $game_map.events[@event_id].le_circle = true/false
    
22. # 功能：该值为true表示该NPC为环绕视野，否则不能看见自己的身后，默认为false。
    
23. #------------------------------------------------------------------------------
    
24. # 设置视野深度    $game_map.events[@event_id].le_deepness = 深度值
    
25. # 功能：该值代表视野的能见度，默认为7。
    
26. #------------------------------------------------------------------------------
    
27. # 设置视野斜率    $game_map.events[@event_id].le_slope = 斜率值
    
28. # 功能：该值代表视野的斜率，默认为1.0。
    
29. #------------------------------------------------------------------------------
    
30. # 设置显示颜色    $game_map.events[@event_id].le_color = 颜色值
    
31. # 功能：该值代表视线显示的颜色，默认为0xf0。
    
32. #==============================================================================
    
33. # 当NPC看到主角的时候，独立开关D会被打开,否则为关闭状态。
    
34. #==============================================================================
    
35. 
    
36. #==============================================================================
    
37. # ■ Game_Event
    
38. #------------------------------------------------------------------------------
    
39. # 　重载事件类
    
40. #==============================================================================
    
41. class Game_Event
    
42.   attr_accessor   :le_seeing                 # 视野系统开关
    
43.   attr_accessor   :le_clairv                 # 视野透视开关
    
44.   attr_accessor   :le_show                   # 视线显示开关
    
45.   attr_accessor   :le_side                   # 侧面可视开关
    
46.   attr_accessor   :le_circle                 # 视野环绕开关
    
47.   attr_accessor   :le_deepness               # 视野深度
    
48.   attr_accessor   :le_slope                  # 视野斜率
    
49.   attr_accessor   :le_color                  # 显示颜色
    
50.   #--------------------------------------------------------------------------
    
51.   # ● 初始化对像
    
52.   #     map_id : 地图 ID
    
53.   #     event  : 事件 (RPG::Event)
    
54.   #--------------------------------------------------------------------------
    
55.   alias original_initialize initialize
    
56.   def initialize (map_id, event)
    
57.     original_initialize (map_id, event)
    
58.     @le_seeing   = false
    
59.     @le_clairv   = false
    
60.     @le_show     = false
    
61.     @le_side     = true
    
62.     @le_circle   = false
    
63.     @le_deepness = 7
    
64.     @le_slope    = 1.0
    
65.     @le_color    = 0xf0
    
66.     @trace = Table.new (@le_deepness,2)
    
67.     @trace[0,0] = -1
    
68.   end
    
69.   #--------------------------------------------------------------------------
    
70.   # ● 刷新
    
71.   #--------------------------------------------------------------------------
    
72.   alias original_update update
    
73.   def update
    
74.     if @le_seeing
    
75.       @trace.resize (@le_deepness,2) if @trace.xsize != @le_deepness
    
76.       original_switch = $game_self_switches[[$game_map.map_id, @id, "D"]]
    
77.       self.see
    
78.       $game_map.need_refresh = true if original_switch != $game_self_switches[[$game_map.map_id, @id, "D"]]
    
79.     end
    
80.     original_update
    
81.   end
    
82.   #--------------------------------------------------------------------------
    
83.   # ● 视野检测
    
84.   #--------------------------------------------------------------------------
    
85.   def see
    
86.     $game_self_switches[[$game_map.map_id, @id, "D"]] = false
    
87.     if ($game_player.x-@x).abs<@le_deepness and ($game_player.y-@y).abs<@le_deepness
    
88.       difference_x = $game_player.x - @x
    
89.       difference_y = $game_player.y - @y
    
90.       case @direction
    
91.       when 2
    
92.         return if @le_circle != true and $game_player.y < @y
    
93.         unless @le_side and (difference_y == 0 and difference_x.abs == 1)
    
94.           return if (difference_y/(difference_x+0.0)).abs < @le_slope
    
95.         end
    
96.       when 4
    
97.         return if @le_circle != true and $game_player.x > @x
    
98.         unless @le_side and difference_y.abs == 1 and difference_x == 0
    
99.           return if (difference_x/(difference_y+0.0)).abs < @le_slope
    
100.         end
     
101.       when 6
     
102.         return if @le_circle != true and $game_player.x < @x
     
103.         unless @le_side and difference_y.abs == 1 and difference_x == 0
     
104.           return if (difference_x/(difference_y+0.0)).abs < @le_slope
     
105.         end
     
106.       else
     
107.         return if @le_circle != true and $game_player.y > @y
     
108.         unless @le_side and difference_y == 0 and difference_x.abs == 1
     
109.           return if (difference_y/(difference_x+0.0)).abs < @le_slope
     
110.         end
     
111.       end
     
112.       $game_self_switches[[$game_map.map_id, @id, "D"]] = scan_line
     
113.     end
     
114.   end
     
115.   #--------------------------------------------------------------------------
     
116.   # ● 视线检测
     
117.   #--------------------------------------------------------------------------
     
118.   def scan_line
     
119.     difference_x = $game_player.x - @x
     
120.     difference_y = $game_player.y - @y
     
121.     direction_x = (difference_x > 0 ? 1 : -1)
     
122.     direction_y = (difference_y > 0 ? 1 : -1)
     
123.     i = 0
     
124.     if difference_x.abs > difference_y.abs
     
125.       while difference_x.abs > i+1
     
126.         i+=1
     
127.         x = @x+i*direction_x
     
128.         if direction_y>0
     
129.           y = @y+i*difference_y/(difference_x+0.0)*direction_y*direction_x+0.5
     
130.         else
     
131.           y = @y-i*difference_y/(difference_x+0.0)*direction_y*direction_x+0.5
     
132.         end
     
133.         x = x.floor
     
134.         y = y.floor
     
135.         if @le_clairv != true
     
136.           unless (direction_x > 0 ? map_passable?(x,y) : map_passable?(x,y))
     
137.             @trace[i-1,0] = -1
     
138.             return false
     
139.           end
     
140.         end
     
141.         if @le_show
     
142.           @trace[i-1,0] = x
     
143.           @trace[i-1,1] = y
     
144.           $scene.spriteset.tilemap.flash_data[x,y] = @le_color
     
145.         end
     
146.       end
     
147.     else
     
148.       while difference_y.abs > i+1
     
149.         i+=1
     
150.         y = @y+i*direction_y
     
151.         if direction_x>0
     
152.           x = @x+i*difference_x/(difference_y+0.0)*direction_x*direction_y+0.5
     
153.         else
     
154.           x = @x-i*difference_x/(difference_y+0.0)*direction_x*direction_y+0.5
     
155.         end
     
156.         x = x.floor
     
157.         y = y.floor
     
158.         if @le_clairv != true
     
159.           unless (direction_y > 0 ? map_passable?(x,y) : map_passable?(x,y))
     
160.             @trace[i-1,0] = -1
     
161.             return false
     
162.           end
     
163.         end
     
164.         if @le_show
     
165.           @trace[i-1,0] = x
     
166.           @trace[i-1,1] = y
     
167.           $scene.spriteset.tilemap.flash_data[x,y] = @le_color
     
168.         end
     
169.       end
     
170.     end
     
171.     return true
     
172.   end
     
173.   #--------------------------------------------------------------------------
     
174.   # ● 清楚痕迹
     
175.   #--------------------------------------------------------------------------
     
176.   def clear
     
177.     for i in 0 .. @trace.xsize-1
     
178.       break if @trace[i,0] == -1
     
179.       $scene.spriteset.tilemap.flash_data[@trace[i,0],@trace[i,1]] = 0
     
180.     end
     
181.     @trace[0,0] = -1
     
182.   end
     
183. end
     
184. #==============================================================================
     
185. # ■ Spriteset_Map
     
186. #------------------------------------------------------------------------------
     
187. #    重载地图显示
     
188. #==============================================================================
     
189. class Spriteset_Map
     
190.   attr_reader:tilemap
     
191.   alias :original_ini :initialize
     
192.   def initialize
     
193.     original_ini
     
194.     @tilemap.flash_data=Table.new(@tilemap.map_data.xsize,@tilemap.map_data.ysize)
     
195.   end  
     
196. end
     
197. #==============================================================================
     
198. # ■ Scene_Map
     
199. #------------------------------------------------------------------------------
     
200. #    重载地图场景
     
201. #==============================================================================
     
202. class Scene_Map
     
203.   attr_reader:spriteset
     
204. end
     
205. #==============================================================================
     
206. # ■ Game_Map
     
207. #------------------------------------------------------------------------------
     
208. # 　重载地图类
     
209. #==============================================================================
     
210. class Game_Map
     
211.   alias original_update update
     
212.   def update
     
213.     # 清除视线痕迹
     
214.     for event in @events.values
     
215.       event.clear
     
216.     end
     
217.     original_update
     
218.   end
     
219. end
     

复制代码

这个是LE2.1的VX版本。

流川枫

原来的RE系统已经推翻，请版主看到后 把原来的发布帖更新为LE系统。谢谢
http://rpg.blue/web/htm/news1183.htm

纯子

并行处理。。。。{/fd}

皇贞季

{/fd}感谢发布啊。这个感觉确实很棒。。。刚才在测试的过程中也发现了个问题，如果触发之后就是某个NPC的独立D启动看到了主角。这时候如果因为事件发生了场景转换，回归的时候，这个开关会处于永远开启的状态。。。比如，会追踪主角的NPC之后不断的追踪，54视野了。。。像你的范例里的那个场所移动，就会发生，不断的自动移动，无限循环。。。= =+求解。。。