Vx型Xp用 - Player增强 - Player_Add

忧雪の伤

清单：
领队切换
惯性行走
弹性滚动
八方向键移动

---

（如果有其他需要可以回帖（？））

---

1. #==============================================================================
   
2. # ** Player_Add
   
3. #==============================================================================
   
4. #==============================================================================
   
5. # ■ Game_Player
   
6. #------------------------------------------------------------------------------
   
7. # 　处理主角的类。事件启动的判定、以及地图的滚动等功能。
   
8. # 本类的实例请参考 $game_player。
   
9. #==============================================================================
   
10. 
    
11. class Game_Player < Game_Character
    
12.   #--------------------------------------------------------------------------
    
13.   # ● 常量
    
14.   #--------------------------------------------------------------------------
    
15.   TRUE_SPEED = 4
    
16.   BEGIN_SPEED = 2
    
17.   #--------------------------------------------------------------------------
    
18.   # ● 刷新
    
19.   #--------------------------------------------------------------------------
    
20.   def refresh
    
21.     @character_name = ""
    
22.     @character_hue = 0
    
23.     return if $game_party.actors.size.zero?
    
24.     @leader_id = 0 if @leader_id.nil? or $game_party.actors[@leader_id].nil?
    
25.     actor = $game_party.actors[@leader_id]
    
26.     @character_name = actor.character_name
    
27.     @character_hue = actor.character_hue
    
28.   end
    
29.   #--------------------------------------------------------------------------
    
30.   # ● 更新惯性
    
31.   #--------------------------------------------------------------------------
    
32.   def update_inertia
    
33.     return @move_speed = BEGIN_SPEED if Input.dir8 == 0
    
34.     return @move_speed += 0.5 if @move_speed < TRUE_SPEED
    
35.   end
    
36.   #--------------------------------------------------------------------------
    
37.   # ● 更新领队切换
    
38.   #--------------------------------------------------------------------------
    
39.   def update_captain
    
40.     @leader_id += 1 if Input.trigger?(Input::R)
    
41.     @leader_id -= 1 if Input.trigger?(Input::L)
    
42.     refresh if Input.trigger?(Input::L) or Input.trigger?(Input::R)
    
43.   end   
    
44.   #--------------------------------------------------------------------------
    
45.   # ● 方向键移动处理
    
46.   #--------------------------------------------------------------------------
    
47.   def move_by_input
    
48.     return unless movable?
    
49.     return if $game_system.map_interpreter.running?
    
50.     case Input.dir8
    
51.     when 2;  move_down
    
52.     when 4;  move_left
    
53.     when 6;  move_right
    
54.     when 8;  move_up
    
55.     when 1;  move_lower_left
    
56.     when 3;  move_lower_right
    
57.     when 7;  move_upper_left
    
58.     when 9;  move_upper_right
    
59.     end
    
60.     update_inertia
    
61.   end
    
62.   #--------------------------------------------------------------------------
    
63.   # ● 可以行动判定
    
64.   #--------------------------------------------------------------------------
    
65.   def movable?
    
66.     return false if moving?                  
    
67.     return false if @move_route_forcing      
    
68.     return false if $game_temp.message_window_showing     
    
69.     return true
    
70.   end
    
71.   #--------------------------------------------------------------------------
    
72.   # ● 更新画面
    
73.   #--------------------------------------------------------------------------
    
74.   def update
    
75.     update_captain
    
76.     last_real_x = @real_x
    
77.     last_real_y = @real_y
    
78.     last_moving = moving?
    
79.     move_by_input
    
80.     super
    
81.     update_scroll(last_real_x, last_real_y)
    
82.     update_nomoving(last_moving)
    
83.   end
    
84.   #--------------------------------------------------------------------------
    
85.   # ● 更新滚动
    
86.   #--------------------------------------------------------------------------
    
87.   def update_scroll(last_real_x, last_real_y)
    
88.     ax1 = $game_map.adjust_x(last_real_x)
    
89.     ay1 = $game_map.adjust_y(last_real_y)
    
90.     ax2 = $game_map.adjust_x(@real_x)
    
91.     ay2 = $game_map.adjust_y(@real_y)
    
92.     slowmove = (2 ** (@move_speed - 1)).to_i
    
93.     fastmove = (2 ** @move_speed).to_i
    
94.     length = (2 ** (@move_speed + 4)).to_i
    
95.     if ax2 < CENTER_X - 8
    
96.       if (ax2 - CENTER_X) <= -length
    
97.         $game_map.scroll_left(fastmove)
    
98.       else
    
99.         $game_map.scroll_left(slowmove)
    
100.       end
     
101.     elsif ax2 > CENTER_X + 8
     
102.       if (ax2 - CENTER_X) >= length
     
103.         $game_map.scroll_right(fastmove)
     
104.       else
     
105.         $game_map.scroll_right(slowmove)
     
106.       end
     
107.     end
     
108.     if ay2 < CENTER_Y - 8
     
109.       if (ay2 - CENTER_Y) <= -length
     
110.         $game_map.scroll_up(fastmove)
     
111.       else
     
112.         $game_map.scroll_up(slowmove)
     
113.       end
     
114.     elsif ay2 > CENTER_Y + 8
     
115.       if (ay2 - CENTER_Y) >= length
     
116.         $game_map.scroll_down(fastmove)
     
117.       else
     
118.         $game_map.scroll_down(slowmove)
     
119.       end
     
120.     end   
     
121.   end  
     
122.   #--------------------------------------------------------------------------
     
123.   # ● 非移动中更新
     
124.   #     last_moving : 之前是否正在移动
     
125.   #--------------------------------------------------------------------------
     
126.   def update_nomoving(last_moving)
     
127.     return if $game_system.map_interpreter.running?
     
128.     return if moving?
     
129.     return if check_touch_event if last_moving
     
130.     if not $game_temp.message_window_showing and Input.trigger?(Input::C)
     
131.       return if check_action_event
     
132.     end
     
133.     update_encounter if last_moving
     
134.   end
     
135.   #--------------------------------------------------------------------------
     
136.   # ● 更新遇敌
     
137.   #--------------------------------------------------------------------------
     
138.   def update_encounter
     
139.     return if $DEBUG and Input.press?(Input::CTRL)   
     
140.     if $game_map.bush?(@x, @y)                  
     
141.       @encounter_count -= 2                     
     
142.     else                                            
     
143.       @encounter_count -= 1                     
     
144.     end
     
145.   end
     
146.   #--------------------------------------------------------------------------
     
147.   # ● 判断事件是否由接触触发（重叠）
     
148.   #--------------------------------------------------------------------------
     
149.   def check_touch_event
     
150.     return check_event_trigger_here([1,2])
     
151.   end
     
152.   #--------------------------------------------------------------------------
     
153.   # ● 判断事件是否由确认键触发
     
154.   #--------------------------------------------------------------------------
     
155.   def check_action_event
     
156.     return true if check_event_trigger_here([0])
     
157.     return check_event_trigger_there([0,1,2])
     
158.   end
     
159. end
     
160. 
     
161. #==============================================================================
     
162. # ■ Game_Map
     
163. #------------------------------------------------------------------------------
     
164. # 　处理地图的类。包含卷动以及可以通行的判断功能。本类的实例请参考 $game_map 。
     
165. #==============================================================================
     
166. 
     
167. class Game_Map
     
168.   #--------------------------------------------------------------------------
     
169.   # ● 计算 X 座标减去显示座标
     
170.   #     x : X 座标
     
171.   #--------------------------------------------------------------------------
     
172.   def adjust_x(x)
     
173.     return x - @display_x
     
174.   end
     
175.   #--------------------------------------------------------------------------
     
176.   # ● 计算 Y 座标减去显示座标
     
177.   #     y : Y 座标
     
178.   #--------------------------------------------------------------------------
     
179.   def adjust_y(y)
     
180.     return y - @display_y
     
181.   end
     
182. end

复制代码

summer92

哇，好啊~~~，大人能不能来个   VX战斗中换人版

winsonzhong

又测试了下，发现如果画面卷动速度低于“begin speed"时是无法卷动的，而高于这个速度画面卷动时则可以，但是实际卷动距离只有定义的1/2，并且卷动完后，画面又自动锁定回角色恒定位置（角色位于画面中央）那里，这个怎么解决呢？