伪八方向脚本怎样配合八方向鼠标寻路

qq295268654

1. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
2. #_/    ◆ ダッシュ＆８方向移動 - KGC_Dash_8DirMove ◆
   
3. #_/    ◇ Last update : 2007/04/28 ◇
   
4. #_/----------------------------------------------------------------------------
   
5. #_/  マップ移動時のダッシュ＆８方向移動機能を追加します。
   
6. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
7. 
   
8. #==============================================================================
   
9. # ★ カスタマイズ項目 ★
   
10. #==============================================================================
    
11. 
    
12. module KGC
    
13.   # ◆ダッシュボタン
    
14.   D8DM_DASH_BUTTON = Input::R
    
15.   # ◆ダッシュ速度
    
16.   D8DM_DASH_SPEED = 4
    
17.   # ◆歩行速度
    
18.   D8DM_WALK_SPEED = 4
    
19. end
    
20. 
    
21. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
22. 
    
23. $imported = {} if $imported == nil
    
24. $imported["Dash_8DirMove"] = true
    
25. 
    
26. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
27. 
    
28. module Dash
    
29.   #--------------------------------------------------------------------------
    
30.   # ● 一時ダッシュ速度指定
    
31.   #--------------------------------------------------------------------------
    
32.   def self.dash_speed=(value)
    
33.     $game_system.temp_dash_speed = value
    
34.   end
    
35.   #--------------------------------------------------------------------------
    
36.   # ● 一時歩行速度指定
    
37.   #--------------------------------------------------------------------------
    
38.   def self.walk_speed=(value)
    
39.     $game_system.temp_walk_speed = value
    
40.   end
    
41.   #--------------------------------------------------------------------------
    
42.   # ● 一時ダッシュ/歩行速度設定を解除
    
43.   #--------------------------------------------------------------------------
    
44.   def self.reset_speed
    
45.     $game_system.temp_dash_speed = nil
    
46.     $game_system.temp_walk_speed = nil
    
47.   end
    
48. end
    
49. 
    
50. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
51. 
    
52. #==============================================================================
    
53. # ■ Game_System
    
54. #==============================================================================
    
55. 
    
56. class Game_System
    
57.   #--------------------------------------------------------------------------
    
58.   # ● 公開インスタンス変数
    
59.   #--------------------------------------------------------------------------
    
60.   attr_accessor :dash_permit              # ダッシュ許可フラグ
    
61.   attr_accessor :dir8_permit              # ８方向移動許可フラグ
    
62.   attr_accessor :temp_dash_speed          # ダッシュ速度(一時)
    
63.   attr_accessor :temp_walk_speed          # 歩行速度(一時)
    
64.   #--------------------------------------------------------------------------
    
65.   # ● オブジェクト初期化
    
66.   #--------------------------------------------------------------------------
    
67.   alias initialize_KGC_Dash_8DirMove initialize
    
68.   def initialize
    
69.     initialize_KGC_Dash_8DirMove
    
70. 
    
71.     @dash_permit = true
    
72.     @dir8_permit = true
    
73.     @temp_dash_speed = nil
    
74.     @temp_walk_speed = nil
    
75.   end
    
76. end
    
77. 
    
78. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
79. 
    
80. #==============================================================================
    
81. # ■ Game_Player
    
82. #==============================================================================
    
83. 
    
84. class Game_Player < Game_Character
    
85.   #--------------------------------------------------------------------------
    
86.   # ● フレーム更新
    
87.   #--------------------------------------------------------------------------
    
88.   def update
    
89.     # ローカル変数に移動中かどうかを記憶
    
90.     last_moving = moving?
    
91.     # 移動中、イベント実行中、移動ルート強制中、
    
92.     # メッセージウィンドウ表示中のいずれでもない場合
    
93.     unless moving? or $game_system.map_interpreter.running? or
    
94.            @move_route_forcing or $game_temp.message_window_showing
    
95.       # 向きを保存
    
96.       direction = @direction
    
97.       # 方向ボタンが押されていれば、その方向へプレイヤーを移動
    
98.       if $game_system.dir8_permit
    
99.         case Input.dir8
    
100.         when 1  # 左下
     
101.           move_left
     
102.           move_down
     
103.           # 向き固定でない場合
     
104.           unless @direction_fix
     
105.             # 右向きだった場合は左を、上向きだった場合は下を向く
     
106.             @direction = (direction == 6 ? 4 : direction == 8 ? 2 : direction)
     
107.           end
     
108.         when 2  # 下
     
109.           move_down
     
110.         when 3  # 右下
     
111.           move_down
     
112.           move_right
     
113.           # 向き固定でない場合
     
114.           unless @direction_fix
     
115.             # 左向きだった場合は右を、上向きだった場合は下を向く
     
116.             @direction = (direction == 4 ? 6 : direction == 8 ? 2 : direction)
     
117.           end
     
118.         when 4  # 左
     
119.           move_left
     
120.         when 6  # 右
     
121.           move_right
     
122.         when 7  # 左上
     
123.           move_up
     
124.           move_left
     
125.           # 向き固定でない場合
     
126.           unless @direction_fix
     
127.             # 右向きだった場合は左を、下向きだった場合は上を向く
     
128.             @direction = (direction == 6 ? 4 : direction == 2 ? 8 : direction)
     
129.           end
     
130.         when 8  # 上
     
131.           move_up
     
132.         when 9  # 右上
     
133.           move_right
     
134.           move_up
     
135.           # 向き固定でない場合
     
136.           unless @direction_fix
     
137.             # 左向きだった場合は右を、下向きだった場合は上を向く
     
138.             @direction = (direction == 4 ? 6 : direction == 2 ? 8 : direction)
     
139.           end
     
140.         end
     
141.       else
     
142.         case Input.dir4
     
143.         when 2
     
144.           move_down
     
145.         when 4
     
146.           move_left
     
147.         when 6
     
148.           move_right
     
149.         when 8
     
150.           move_up
     
151.         end
     
152.       end
     
153. 
     
154.       # 歩行速度調整
     
155.       if $game_system.dash_permit && Input.press?(KGC::D8DM_DASH_BUTTON)
     
156.         if $game_system.temp_dash_speed == nil
     
157.           @move_speed = KGC::D8DM_DASH_SPEED
     
158.         else
     
159.           @move_speed = $game_system.temp_dash_speed
     
160.         end
     
161.       else
     
162.         if $game_system.temp_walk_speed == nil
     
163.           @move_speed = KGC::D8DM_WALK_SPEED
     
164.         else
     
165.           @move_speed = $game_system.temp_walk_speed
     
166.         end
     
167.       end
     
168.     end
     
169.     # ローカル変数に座標を記憶
     
170.     last_real_x = @real_x
     
171.     last_real_y = @real_y
     
172.     super
     
173.     # キャラクターが下に移動し、かつ画面上の位置が中央より下の場合
     
174.     if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
     
175.       # マップを下にスクロール
     
176.       $game_map.scroll_down(@real_y - last_real_y)
     
177.     end
     
178.     # キャラクターが左に移動し、かつ画面上の位置が中央より左の場合
     
179.     if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
     
180.       # マップを左にスクロール
     
181.       $game_map.scroll_left(last_real_x - @real_x)
     
182.     end
     
183.     # キャラクターが右に移動し、かつ画面上の位置が中央より右の場合
     
184.     if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
     
185.       # マップを右にスクロール
     
186.       $game_map.scroll_right(@real_x - last_real_x)
     
187.     end
     
188.     # キャラクターが上に移動し、かつ画面上の位置が中央より上の場合
     
189.     if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
     
190.       # マップを上にスクロール
     
191.       $game_map.scroll_up(last_real_y - @real_y)
     
192.     end
     
193.     # 移動中ではない場合
     
194.     unless moving?
     
195.       # 前回プレイヤーが移動中だった場合
     
196.       if last_moving
     
197.         # 同位置のイベントとの接触によるイベント起動判定
     
198.         result = check_event_trigger_here([1,2])
     
199.         # 起動したイベントがない場合
     
200.         if result == false
     
201.           # デバッグモードが ON かつ CTRL キーが押されている場合を除き
     
202.           unless $DEBUG and Input.press?(Input::CTRL)
     
203.             # エンカウント カウントダウン
     
204.             if @encounter_count > 0
     
205.               @encounter_count -= 1
     
206.             end
     
207.           end
     
208.         end
     
209.       end
     
210.       # C ボタンが押された場合
     
211.       if Input.trigger?(Input::C)
     
212.         # 同位置および正面のイベント起動判定
     
213.         check_event_trigger_here([0])
     
214.         check_event_trigger_there([0,1,2])
     
215.       end
     
216.     end
     
217.   end
     
218. end
     

复制代码

我用了伪八方向脚本，请问怎样配合八方向鼠标寻路脚本，还有，貌似连鼠标响应都用不了了，如何解决