【脚本】八方向行走实现

星雨空也

ACE八方向，求思路，有脚本更好
搜不到诶，之前的那个帖回复是0诶

铅笔描绘的思念

伪八方（对角线行走）？or 真八方？
这里有个10+的伪·8D

1. 
   
2. class Game_Player < Game_Character
   
3.   #--------------------------------------------------------------------------
   
4.   # ● 方向键移动处理
   
5.   #--------------------------------------------------------------------------
   
6.   def move_by_input
   
7.      case Input.dir8
   
8.       when 1;move_diagonal(4,2)
   
9.       when 2;move_straight(2)
   
10.       when 3;move_diagonal(6,2)
    
11.       when 4;move_straight(4)
    
12.       when 6;move_straight(6)
    
13.       when 7;move_diagonal(4,8)
    
14.       
    
15.       when 8;move_straight(8)
    
16.       when 9;move_diagonal(6,8)
    
17.      end  
    
18.   end
    
19. end   
    

复制代码

.va写脚本的效率比vx快了不是一星半点啊。。。。咱去试写一下真8D

jmdhz

看看这个吧！

acn00269

@星雨空也 这个可以不？

1. #==============================================================================
   
2. #  ■8方向移动 for RGSS3 Ver1.01 by 星潟
   
3. #
   
4. #     功能: 1.可以设置角色往8方向移动.
   
5. #           2.可以设置关于移动的一部分功能.
   
6. #==============================================================================
   
7. # 使用说明:
   
8. #   ★通过开关操作切换8方向移动的ON/OFF和能够设置一切移动的禁止.
   
9. #   ★根据开关操作调转奔跑判定键.
   
10. #   ★根据变量操作实行奔跑速度的强化.
    
11. #   ★根据开关切换追加奔跑禁止功能.
    
12. #
    
13. #==============================================================================
    
14. 
    
15. module MOVE_CONTROL
    
16.   #--------------------------------------------------------------------------
    
17.   # ● 基本设置(新增定义)
    
18.   #--------------------------------------------------------------------------
    
19.   # 这个开关ON的时候禁止8方向移动,只能4方向移动
    
20.   FOUR_MOVE_SWITCH = 100
    
21.   
    
22.   # 这个开关ON的时候禁止操作角色
    
23.   MOVE_SEAL_SWITCH = 101
    
24.   
    
25.   # 这个开关ON的时候调转奔跑判定键
    
26.   # 平时奔跑时按下奔跑键的状态变成通常行走
    
27.   DASH_REV = 102
    
28.   
    
29.   # 这个开关ON的时候奔跑不能使用
    
30.   # 开关切换使同一地图能够奔跑的场所和不能奔跑的场所区别开来
    
31.   DASH_SEAL = 103
    
32.   
    
33.   # 这个变量比0大的时候奔跑速度会再次增加
    
34.   DASH_PLUS = 100
    
35.   
    
36. end
    
37. 
    
38. class Game_CharacterBase
    
39.   #--------------------------------------------------------------------------
    
40.   # ● 取得移动速度(考虑奔跑状态)(重定义)
    
41.   #--------------------------------------------------------------------------
    
42.   alias real_move_speed_8direction real_move_speed
    
43.   def real_move_speed
    
44.     if $game_variables[MOVE_CONTROL::DASH_PLUS] > 0
    
45.       dash_plus = 1 + ($game_variables[MOVE_CONTROL::DASH_PLUS] * 0.1)
    
46.       @move_speed + (dash? ? dash_plus : 0)
    
47.     else
    
48.       real_move_speed_8direction
    
49.     end
    
50.   end
    
51. end
    
52. 
    
53. class Game_Player < Game_Character
    
54.   #--------------------------------------------------------------------------
    
55.   # ● 判定奔跑状态(重定义)
    
56.   #--------------------------------------------------------------------------
    
57.   alias dash_rev? dash?
    
58.   def dash?
    
59.     return false if $game_switches[MOVE_CONTROL::DASH_SEAL] == true
    
60.     if $game_switches[MOVE_CONTROL::DASH_REV] == true
    
61.       return false if @move_route_forcing
    
62.       return false if $game_map.disable_dash?
    
63.       return false if vehicle
    
64.       return false if Input.press?(:A)
    
65.       return true
    
66.     else
    
67.       dash_rev?
    
68.     end
    
69.   end
    
70.   #--------------------------------------------------------------------------
    
71.   # ● 处理方向键输入作出的移动(重定义)
    
72.   #--------------------------------------------------------------------------
    
73.   alias move_by_input_8direction move_by_input
    
74.   def move_by_input
    
75.     return if $game_switches[MOVE_CONTROL::MOVE_SEAL_SWITCH] == true
    
76.     if $game_switches[MOVE_CONTROL::FOUR_MOVE_SWITCH] == true
    
77.       move_by_input_8direction
    
78.       return
    
79.     end
    
80.     return if !movable? || $game_map.interpreter.running?
    
81.     if Input.press?(:LEFT) && Input.press?(:DOWN)
    
82.       if passable?(@x, @y, 4) && passable?(@x, @y, 2) &&
    
83.         passable?(@x - 1, @y, 2) && passable?(@x, @y + 1, 4) &&
    
84.         passable?(@x - 1, @y + 1, 6) && passable?(@x - 1, @y + 1, 8)
    
85.         move_diagonal(4, 2)
    
86.       elsif @direction == 4
    
87.         if passable?(@x, @y, 2) && passable?(@x, @y + 1, 8)
    
88.           move_straight(2)
    
89.         elsif passable?(@x, @y, 4) && passable?(@x - 1, @y, 6)
    
90.           move_straight(4)
    
91.         end
    
92.       elsif @direction == 2
    
93.         if passable?(@x, @y, 4) && passable?(@x - 1, @y, 6)
    
94.           move_straight(4)
    
95.         elsif passable?(@x, @y, 2) && passable?(@x, @y + 1, 8)
    
96.           move_straight(2)
    
97.         else
    
98.           move_straight(Input.dir4) if Input.dir4 > 0
    
99.         end
    
100.       else
     
101.         move_straight(Input.dir4) if Input.dir4 > 0
     
102.       end
     
103.     elsif Input.press?(:RIGHT) && Input.press?(:DOWN)
     
104.       if passable?(@x, @y, 6) && passable?(@x, @y, 2) &&
     
105.         passable?(@x + 1, @y, 2) && passable?(@x, @y + 1, 6) &&
     
106.         passable?(@x + 1, @y + 1, 4) && passable?(@x + 1, @y + 1, 8)
     
107.         move_diagonal(6, 2)
     
108.       elsif @direction == 6
     
109.         if passable?(@x, @y, 2) && passable?(@x, @y + 1, 8)
     
110.           move_straight(2)
     
111.         elsif passable?(@x, @y, 6) && passable?(@x + 1, @y, 4)
     
112.           move_straight(6)
     
113.         end
     
114.       elsif @direction == 2
     
115.         if passable?(@x, @y, 6) && passable?(@x + 1, @y, 4)
     
116.           move_straight(6)
     
117.         elsif passable?(@x, @y, 2) && passable?(@x, @y + 1, 8)
     
118.           move_straight(2)
     
119.         else
     
120.           move_straight(Input.dir4) if Input.dir4 > 0
     
121.         end
     
122.       else
     
123.         move_straight(Input.dir4) if Input.dir4 > 0
     
124.       end
     
125.     elsif Input.press?(:LEFT) && Input.press?(:UP)
     
126.       if passable?(@x, @y, 4) && passable?(@x, @y, 8) &&
     
127.         passable?(@x - 1, @y, 8) && passable?(@x, @y - 1, 4) &&
     
128.         passable?(@x - 1, @y - 1, 2) && passable?(@x - 1, @y - 1, 6)
     
129.         move_diagonal(4, 8)
     
130.       elsif @direction == 4
     
131.         if passable?(@x, @y, 8) && passable?(@x, @y - 1, 2)
     
132.           move_straight(8)
     
133.         elsif passable?(@x, @y, 4) && passable?(@x - 1, @y, 6)
     
134.           move_straight(4)
     
135.         else
     
136.           move_straight(Input.dir4) if Input.dir4 > 0
     
137.         end
     
138.       elsif @direction == 8
     
139.         if passable?(@x, @y, 4) && passable?(@x - 1, @y, 6)
     
140.           move_straight(4)
     
141.         elsif passable?(@x, @y, 8) && passable?(@x, @y - 1, 2)
     
142.           move_straight(8)
     
143.         else
     
144.           move_straight(Input.dir4) if Input.dir4 > 0
     
145.         end
     
146.       else
     
147.         move_straight(Input.dir4) if Input.dir4 > 0
     
148.       end
     
149.     elsif Input.press?(:RIGHT) && Input.press?(:UP)
     
150.       if passable?(@x, @y, 6) && passable?(@x, @y, 8) &&
     
151.         passable?(@x + 1, @y, 8) && passable?(@x, @y - 1, 6) &&
     
152.         passable?(@x + 1, @y - 1, 2) && passable?(@x + 1, @y - 1, 4)
     
153.         move_diagonal(6, 8)
     
154.       elsif @direction == 6
     
155.         if passable?(@x, @y, 8) && passable?(@x, @y - 1, 2)
     
156.           move_straight(8)
     
157.         elsif passable?(@x, @y, 6) && passable?(@x + 1, @y, 4)
     
158.           move_straight(6)
     
159.         else
     
160.           move_straight(Input.dir4) if Input.dir4 > 0
     
161.         end
     
162.       elsif @direction == 8
     
163.         if passable?(@x, @y, 6) && passable?(@x + 1, @y, 4)
     
164.           move_straight(6)
     
165.         elsif passable?(@x, @y, 8) && passable?(@x, @y - 1, 2)
     
166.           move_straight(8)
     
167.         else
     
168.           move_straight(Input.dir4) if Input.dir4 > 0
     
169.         end
     
170.       else
     
171.         move_straight(Input.dir4) if Input.dir4 > 0
     
172.       end
     
173.     else
     
174.       move_straight(Input.dir4) if Input.dir4 > 0
     
175.     end
     
176.     unless moving?
     
177.       @direction = Input.dir4 unless Input.dir4 == 0
     
178.     end
     
179.   end
     
180. end

复制代码

铅笔描绘的思念

人家写好了（´Д`）。。居然和LS撞了么。。。

RUBY 代码复制

#===============================================================================
#  八方向行走
#    by：铅笔描绘的思念
#    在Characters里添加八方向行走图（命名规范：在四方向上的基础上＋_8D）
#    行走动画就为8方向的。否则就会原4方向的代替8方向的。
#
#    八方向：数字键盘方向对应的数字
#     7   8   9
#      ↖ ↑ ↗
#     4← 0 →6
#      ↙ ↓ ↘
#     1   2   3
#===============================================================================
#==============================================================================
# ■ Game_Player
#==============================================================================
class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # ● 八方向
  #--------------------------------------------------------------------------
  def direction_8dir
    @direction_8dir = @direction if @direction_8dir == nil
    return @direction_8dir
  end
  #--------------------------------------------------------------------------
  # ● 八方向移动
  #    d    :1、3、7、9 对应小键盘的四个方向
  #--------------------------------------------------------------------------
  def move_eight_dir(d)
    move_diagonal(d + 3,2) if d == 1 || d == 3
    move_diagonal(d - 3,8) if d == 7 || d == 9
  end
  #--------------------------------------------------------------------------
  # ● 八方向按键
  #--------------------------------------------------------------------------
  def move_by_input
    return if !movable? || $game_map.interpreter.running?
    case Input.dir8
     when 1,3,7,9;  move_eight_dir(Input.dir8)
     when 2,4,6,8;  move_straight(Input.dir4)
    else;    return
    end
    @direction_8dir = Input.dir8
  end
  #--------------------------------------------------------------------------
  # ● 斜向移动
  #     horz : 横向（4 or 6）
  #     vert : 纵向（2 or 8）
  #--------------------------------------------------------------------------
  def move_diagonal(horz, vert)
    @move_succeed = diagonal_passable?(x, y, horz, vert)
    last_steps = $game_party.steps
    if @move_succeed
      @x = $game_map.round_x_with_direction(@x, horz)
      @y = $game_map.round_y_with_direction(@y, vert)
      @real_x = $game_map.x_with_direction(@x, reverse_dir(horz))
      @real_y = $game_map.y_with_direction(@y, reverse_dir(vert))
      increase_steps
      # 八方向移动正确步数计算
      if $game_party.steps - last_steps == 2
        $game_party.decrease_steps
      end
    end
    set_direction(2) if horz == 4 && vert == 2
    set_direction(4) if horz == 4 && vert == 8
    set_direction(6) if horz == 6 && vert == 2
    set_direction(8) if horz == 6 && vert == 8
  end
end
#==============================================================================
# ■ Game_Party
#==============================================================================
class Game_Party < Game_Unit
  def decrease_steps
    @steps -= 1
  end
end
#==============================================================================
# ■ Sprite_Character
#==============================================================================
class Sprite_Character < Sprite_Base
  #--------------------------------------------------------------------------
  # ● 更新源位图（Source Bitmap）
  #--------------------------------------------------------------------------
  alias update_bitmap_8dir update_bitmap
  def update_bitmap
    update_bitmap_8dir
    if @tile_id > 0             
      @enable_slant = false
      return
    end
    unless graphic_changed?
     @enable_slant = true
    end 
   begin
      @character_name_slant = "#{@character_name}_8D"
      Cache.character(@character_name_slant)
    rescue
      @enable_slant = false
    end
  end
  #--------------------------------------------------------------------------
  # ● 更新源矩形
  #--------------------------------------------------------------------------
  alias update_src_rect_8dir update_src_rect  
  def update_src_rect
    return if @tile_id > 0      
    if @enable_slant
      update_src_rect_for_slant
    else
      update_src_rect_8dir
    end
  end
  #--------------------------------------------------------------------------
  # ● 更新斜方向传送矩形
  #--------------------------------------------------------------------------
  def update_src_rect_for_slant
    index = @character.character_index
    pattern = @character.pattern < 3 ? @character.pattern : 1
    sx = (index % 4 * 3 + pattern) * @cw
    dir = @character.direction_8dir
    case dir % 2
    when 0  # 上下左右
      if @last_slant
        self.bitmap = Cache.character(@character_name)
        @last_slant = false
      end
    else    
      unless @last_slant
        self.bitmap = Cache.character(@character_name_slant)
        @last_slant = true
      end
    end
      sy = (index / 4 * 4 + (@character.direction - 2) / 2) * @ch
    self.src_rect.set(sx, sy, @cw, @ch)
  end
end

#===============================================================================


#  八方向行走


#    by：铅笔描绘的思念


#    在Characters里添加八方向行走图（命名规范：在四方向上的基础上＋_8D）


#    行走动画就为8方向的。否则就会原4方向的代替8方向的。


#


#    八方向：数字键盘方向对应的数字


#     7   8   9


#      ↖ ↑ ↗


#     4← 0 →6


#      ↙ ↓ ↘


#     1   2   3


#===============================================================================


#==============================================================================


# ■ Game_Player


#==============================================================================


class Game_Player < Game_Character


  #--------------------------------------------------------------------------


  # ● 八方向


  #--------------------------------------------------------------------------


  def direction_8dir


    @direction_8dir = @direction if @direction_8dir == nil


    return @direction_8dir


  end


  #--------------------------------------------------------------------------


  # ● 八方向移动


  #    d    :1、3、7、9 对应小键盘的四个方向


  #--------------------------------------------------------------------------


  def move_eight_dir(d)


    move_diagonal(d + 3,2) if d == 1 || d == 3


    move_diagonal(d - 3,8) if d == 7 || d == 9


  end


  #--------------------------------------------------------------------------


  # ● 八方向按键


  #--------------------------------------------------------------------------


  def move_by_input


    return if !movable? || $game_map.interpreter.running?


    case Input.dir8


     when 1,3,7,9;  move_eight_dir(Input.dir8)


     when 2,4,6,8;  move_straight(Input.dir4)


    else;    return


    end


    @direction_8dir = Input.dir8


  end


  #--------------------------------------------------------------------------


  # ● 斜向移动


  #     horz : 横向（4 or 6）


  #     vert : 纵向（2 or 8）


  #--------------------------------------------------------------------------


  def move_diagonal(horz, vert)


    @move_succeed = diagonal_passable?(x, y, horz, vert)


    last_steps = $game_party.steps


    if @move_succeed


      @x = $game_map.round_x_with_direction(@x, horz)


      @y = $game_map.round_y_with_direction(@y, vert)


      @real_x = $game_map.x_with_direction(@x, reverse_dir(horz))


      @real_y = $game_map.y_with_direction(@y, reverse_dir(vert))


      increase_steps


      # 八方向移动正确步数计算


      if $game_party.steps - last_steps == 2


        $game_party.decrease_steps


      end


    end


    set_direction(2) if horz == 4 && vert == 2


    set_direction(4) if horz == 4 && vert == 8


    set_direction(6) if horz == 6 && vert == 2


    set_direction(8) if horz == 6 && vert == 8


  end


end


#==============================================================================


# ■ Game_Party


#==============================================================================


class Game_Party < Game_Unit


  def decrease_steps


    @steps -= 1


  end


end


#==============================================================================


# ■ Sprite_Character


#==============================================================================


class Sprite_Character < Sprite_Base


  #--------------------------------------------------------------------------


  # ● 更新源位图（Source Bitmap）


  #--------------------------------------------------------------------------


  alias update_bitmap_8dir update_bitmap


  def update_bitmap


    update_bitmap_8dir


    if @tile_id > 0             


      @enable_slant = false


      return


    end


    unless graphic_changed?


     @enable_slant = true


    end 


   begin


      @character_name_slant = "#{@character_name}_8D"


      Cache.character(@character_name_slant)


    rescue


      @enable_slant = false


    end


  end


  #--------------------------------------------------------------------------


  # ● 更新源矩形


  #--------------------------------------------------------------------------


  alias update_src_rect_8dir update_src_rect  


  def update_src_rect


    return if @tile_id > 0      


    if @enable_slant


      update_src_rect_for_slant


    else


      update_src_rect_8dir


    end


  end


  #--------------------------------------------------------------------------


  # ● 更新斜方向传送矩形


  #--------------------------------------------------------------------------


  def update_src_rect_for_slant


    index = @character.character_index


    pattern = @character.pattern < 3 ? @character.pattern : 1


    sx = (index % 4 * 3 + pattern) * @cw


    dir = @character.direction_8dir


    case dir % 2


    when 0  # 上下左右


      if @last_slant


        self.bitmap = Cache.character(@character_name)


        @last_slant = false


      end


    else    


      unless @last_slant


        self.bitmap = Cache.character(@character_name_slant)


        @last_slant = true


      end


    end


      sy = (index / 4 * 4 + (@character.direction - 2) / 2) * @ch


    self.src_rect.set(sx, sy, @cw, @ch)


  end


end