Project1

标题: ACE有没有伪·八方向行走的脚本？ [打印本页]
作者: 1243852    时间: 2012-9-25 20:09
标题: ACE有没有伪·八方向行走的脚本？
本帖最后由 1243852 于 2012-9-26 19:09 编辑

求伪·八方向行走的脚本，就是用四方向行走图斜着走的脚本。
作者: chxush    时间: 2012-9-25 22:25
有
  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. #==============================================================================

  15. module MOVE_CONTROL
  16.   #--------------------------------------------------------------------------
  17.   # ● 基本设置(新增定义)
  18.   #--------------------------------------------------------------------------
  19.   # 这个开关ON的时候禁止8方向移动,只能4方向移动
  20.   FOUR_MOVE_SWITCH = 41
  21.   
  22.   # 这个开关ON的时候禁止操作角色
  23.   MOVE_SEAL_SWITCH = 42
  24.   
  25.   # 这个开关ON的时候调转奔跑判定键
  26.   # 平时奔跑时按下奔跑键的状态变成通常行走
  27.   DASH_REV = 43
  28.   
  29.   # 这个开关ON的时候奔跑不能使用
  30.   # 开关切换使同一地图能够奔跑的场所和不能奔跑的场所区别开来
  31.   DASH_SEAL = 44
  32.   
  33.   # 这个变量比0大的时候奔跑速度会再次增加
  34.   DASH_PLUS = 15
  35.   
  36. end

  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

  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
复制代码
作者: 咕噜    时间: 2012-9-26 13:36
  1. #==============================================================================
  2. # ■ VXAce-RGSS3-26 8方向移動 [Ver.1.0.0]          by Claimh
  3. #------------------------------------------------------------------------------
  4. # 8方向の移動が可能となります。
  5. # 斜め移動ができない時に縦or横に移動できる場合は縦or横に移動するようになります。
  6. #==============================================================================

  8. class Game_Player < Game_Character
  9.   #--------------------------------------------------------------------------
  10.   # ● 方向ボタン入力による移動処理
  11.   #--------------------------------------------------------------------------
  12.   def move_by_input
  13.     return if !movable? || $game_map.interpreter.running?
  14.     if [1, 3, 7, 9].include?(Input.dir8)
  15.       case Input.dir8
  16.       when 1; move_diagonal(4, 2)
  17.       when 3; move_diagonal(6, 2)
  18.       when 7; move_diagonal(4, 8)
  19.       when 9; move_diagonal(6, 8)
  20.       end
  21.       return if @move_succeed
  22.     end
  23.     move_straight(Input.dir4) if Input.dir4 > 0
  24.   end
  25. end


  28. class Game_CharacterBase
  29.   #--------------------------------------------------------------------------
  30.   # ● 斜めに移動
  31.   #     horz : 横方向（4 or 6）
  32.   #     vert : 縦方向（2 or 8）
  33.   #--------------------------------------------------------------------------
  34.   alias move_diagonal_8dir move_diagonal
  35.   def move_diagonal(horz, vert)
  36.     if !passable?(@x, @y, horz) and !passable?(@x, @y, vert)
  37.       @move_succeed = false
  38.       return
  39.     end
  40.     return move_straight(horz) if passable?(@x, @y, horz) and !passable?(@x, @y, vert)
  41.     return move_straight(vert) if !passable?(@x, @y, horz) and passable?(@x, @y, vert)
  42.     move_diagonal_8dir(horz, vert)
  43.   end
  44. end
复制代码
嗯哼 ？



欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1