怎样制作“横向地图画面”的系统？

Ftz。小寂、

我想制作一个横向地图画面的脚本，但找不到可以参考的脚本，有这个脚本的大大们可以给个我吗？谢谢了！！！

Ftz。小寂、

天空坠落 发表于 2011-6-2 12:19
神马意思？

就像雨血2烨城的游戏画面一样的。横版的。

xialicheng52

玩过最早用RM做的横版游戏，热血物语。哈哈…古董吧！

Ftz。小寂、

以前在6R里下载过一个，但是现在找不到了……那个脚本好像冒险岛的画面一样的。

zxc52590

搜尋「重力」呀~
在沒有的話我在給你

1097849185

我给你
=begin
====================================================================
重力状态：(在每个地图都要设置一下,"并行处理")
$ud_ok = false     
$airjump = 1
====================================================================
解除重力：(在我的这个游戏里用于爬楼梯)
$ud_ok = true
=end
#==============================================================================
# 本脚本来自奇兵RPG，使用和转载请保留此信息
#==============================================================================
$ud_ok = true     
$airjump = 1
# ————————————————————————————————————
# 全方向ドット移動 Ver ε
# 配布元?サポートURL
# http://members.jcom.home.ne.jp/cogwheel/

#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# 　プレイヤーを扱うクラスです。イベントの起動判定や、マップのスクロールなどの
# 機能を持っています。このクラスのインスタンスは $game_player で参照されます。
#==============================================================================
class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # ● 定数
  #--------------------------------------------------------------------------
  UP    = 48                  # 上方向の余裕(0 < UP < 63)
  DOWN  = 16                  # 下方向の余裕(0 < DOWN <63)
  SIDE  = 32                  # 左右方向の余裕(0 < SIDE <63)
  SLANT = true              # 移動ルートの斜め移動時、速度修正
  JUMPMAX = 70              
  JUMPADD = 10              
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader   :event                    # イベント時移動速度
  attr_accessor :move_speed               # 移動速度
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias :update_original :update
  def update
    # @walk:歩行速度 @dash:ダッシュ時移動速度
    # @event:イベント時移動速度（0の時は、イベント時に速度変更をしない）
    @walk  = 4
    @dash  = 5
    @event = 4
    @dot_m = true
    #ダッシュ機能。エンターキーが押されている間、移動速度を変更する。
    unless moving? or $game_system.map_interpreter.running? or
            @move_route_forcing or $game_temp.message_window_showing
      if @walk != @dash
        if Input.press?(Input::C)
          if @move_speed != @dash
            @move_speed = @dash
          end
        else
          if @move_speed != @walk
            @move_speed = @walk
          end
        end
      end
    end
    if @revise_x == nil and @revise_y == nil
      @revise_x = 0
      @revise_y = 0
    end
    unless @dot_m
      update_original
      return
    end
    if @move_route_forcing
      # ローカル変数に移動中かどうかを記憶
      last_moving = moving?
      # ローカル変数に座標を記憶
      last_real_x = @real_x
      last_real_y = @real_y
      # 座標がずれている場合
      if (@revise_x != 0 or @revise_y != 0) and not jumping? and @move == true
        if @revise_x != @real_x - @x * 128 or @revise_y != @real_y - @y * 128
          @revise_x = @real_x - @x * 128
          @revise_y = @real_y - @y * 128
        end
        # 移動距離distance1と目標距離distance2を設定
        distance1 = 2 ** @move_speed
        distance2 = Math.sqrt(@revise_x ** 2 + @revise_y ** 2)
        # 移動距離が目標距離を越えた場合
        if distance1 > distance2
          # 強制的に補正座標を零にする
          @real_x = @real_x - @revise_x
          @real_y = @real_y - @revise_y
          @revise_x = 0
          @revise_y = 0
          anime_update
        # 移動距離が目標距離に達しない場合
        else
          # 移動距離分目標距離に近づく
          @real_x -= (distance1 * @revise_x / distance2).round
          @real_y -= (distance1 * @revise_y / distance2).round
          @revise_x = @real_x - @x * 128
          @revise_y = @real_y - @y * 128
          anime_update
        end
      else
        super
      end
    else
      @move = false
      # 移動中、イベント実行中、移動ルート強制中、
      # メッセージウィンドウ表示中のいずれでもない場合
      unless moving? or $game_system.map_interpreter.running? or
             @move_route_forcing or $game_temp.message_window_showing
        @event_run = false
        # 方向ボタンが押されていれば、その方向へプレイヤーを移動
#---------------------------上下失效-----------------------------------------
      case Input.dir8
        when 1
          $ud_ok ? move_lower_left_p : move_left_p
        when 2
#          $ud_ok ? move_down_p : move_down_aaaagq
          move_down_p if $ud_ok
        when 3
         $ud_ok ? move_lower_right_p : move_right_p
        when 4
          move_left_p
        when 6
          move_right_p
        when 7
         $ud_ok ? move_upper_left_p : move_left_p
        when 8
#         $ud_ok ? move_up_p : move_up_aaaagq
         move_up_p if $ud_ok
        when 9
         $ud_ok ? move_upper_right_p : move_right_p
        end
      end
      # ローカル変数に座標を記憶
      last_real_x = @real_x
      last_real_y = @real_y
      # 移動処理
      @real_x = @x * 128 + @revise_x
      @real_y = @y * 128 + @revise_y
      # ローカル変数に移動中かどうかを記憶
      last_moving = moving?
      # 座標更新
      move_on
      # 現在の座標と以前の座標が異なる場合
      if (last_real_x != @real_x or last_real_y != @real_y)
        @move_distance = 0 if @move_distance == nil
        @move_distance += Math.sqrt((last_real_x - @real_x) ** 2 +
                                      (last_real_y - @real_y) ** 2)
        if @move_distance >= 128
          @move_distance %= 128
          increase_steps
        end
        # アニメーションを更新
        anime_update
      else
        @pattern = 0
      end
    end
    # キャラクターが下に移動し、かつ画面上の位置が中央より下の場合
    if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
      # マップを下にスクロール
      $game_map.scroll_down(@real_y - last_real_y)
    end
    # キャラクターが左に移動し、かつ画面上の位置が中央より左の場合
    if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
      # マップを左にスクロール
      $game_map.scroll_left(last_real_x - @real_x)
    end
    # キャラクターが右に移動し、かつ画面上の位置が中央より右の場合
    if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
      # マップを右にスクロール
      $game_map.scroll_right(@real_x - last_real_x)
    end
    # キャラクターが上に移動し、かつ画面上の位置が中央より上の場合
    if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
      # マップを上にスクロール
      $game_map.scroll_up(last_real_y - @real_y)
    end
    # 前回プレイヤーが移動中だった場合
    if last_moving
      # 同位置のイベントとの接触によるイベント起動判定
      result = check_event_trigger_here([1,2])
      if result == true
        if (last_real_x / 128.0).round != @x and
            (last_real_y / 128.0).round != @y
          if @direction == 2 or @direction == 8
            if (last_real_x / 128.0).round > @x
              turn_left
            else
              turn_right
            end
          else
            if (last_real_y / 128.0).round > @y
              turn_up
            else
              turn_down
            end
          end
        elsif (last_real_x / 128.0).round > @x
          turn_left
        elsif (last_real_x / 128.0).round < @x
          turn_right
        elsif (last_real_y / 128.0).round > @y
          turn_up
        elsif (last_real_y / 128.0).round < @y
          turn_down
        end
      end
      # 起動したイベントがない場合
      if result == false
        # デバッグモードが ON かつ CTRL キーが押されている場合を除き
        unless $DEBUG and Input.press?(Input::CTRL)
          # エンカウント カウントダウン
          if @encounter_count > 0
            @encounter_count -= 1
          end
        end
      end
    end
#-----------------------按跳跃-----------------------------------------------
# A ボタンが押された場合
    if Input.press?(Input::A) and not $ud_ok
      @twojump = 1 if @twojump == 0 and down1(((@x * 128 + @revise_x) / 128.0).round,
          ((@y * 128 + @revise_y) / 128.0).round, 5, true)
      if (not @apassed) and @twojump <= $airjump
        @apassed = true
        @jumpnow = JUMPMAX
        @twojump += 1
      else
        @jumpnow += 3        
      end
    else
      @apassed = false
    end
#----------------------自由落体--------------------------------
    if not $ud_ok
      @jumpnow -= 10
      if @jumpnow < 0
        @jumpnow = [@jumpnow, -JUMPMAX].max
        if not down1(((@x * 128 + @revise_x) / 128.0).round,
          ((@y * 128 + @revise_y) / 128.0).round, -@jumpnow, true)
          @jumpnow = 0
          @twojump = 0
        end
      elsif @jumpnow > 0
        @jumpnow = [@jumpnow, JUMPMAX].min
        if not up1(((@x * 128 + @revise_x) / 128.0).round,
          ((@y * 128 + @revise_y) / 128.0).round, @jumpnow, true)
          @jumpnow = 0
        end
      end
    end
    if Input.trigger?(Input::C)
      # 同位置および正面のイベント起動判定
      check_event_trigger_here([0])
      check_event_trigger_there([0,1,2])
    end
  end
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    @jumpnow = 0
    @twojump = 0
    @apassed = false
    @revise_x = 0
    @revise_y = 0
    @move == false
    super
  end
  #--------------------------------------------------------------------------
  # ● 移動判定
  #--------------------------------------------------------------------------
  def moving?
    unless @dot_m
      result = super
      return result
    end
    # 強制移動の場合オリジナルの判定をさせる
    if @move_route_forcing
      if @move == false
        return false
      end
      super
    # 通常時は現座標が実座標と異なる場合のみ移動中と判定
    else
      return (@x != (@real_x / 128.0).round or @y != (@real_y / 128.0).round)
    end
  end
  #--------------------------------------------------------------------------
  # ● 移動判定
  #--------------------------------------------------------------------------
  def moving_a?
    if @move == false
      if (@move_route.list[@move_route_index].code <= 14 or
          @move_route.list[@move_route_index].code == 25)
        @move = true
      end
      return false
    end
    moving?
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新 (ジャンプ)
  #--------------------------------------------------------------------------
  def update_jump
    # ジャンプカウントを 1 減らす
    @jump_count -= 1
    # 新しい座標を計算
    @real_x = (@real_x * @jump_count + @x * 128) / (@jump_count + 1)
    @real_y = (@real_y * @jump_count + @y * 128) / (@jump_count + 1)
    if @jump_count == 0
      @revise_x = 0
      @revise_y = 0
    end
  end
  #--------------------------------------------------------------------------
  # ● 移動タイプ : カスタム
  #--------------------------------------------------------------------------
  def move_type_custom
    unless @dot_m
      super
      return
    end
    # 停止中でなければ中断
    if jumping? or moving_a?
      return
    end
    # 移動コマンドのリストの最後に到達するまでループ
    while @move_route_index < @move_route.list.size
      # 移動コマンドを取得
      command = @move_route.list[@move_route_index]
      # コマンドコード 0 番 (リストの最後) の場合
      if command.code == 0
        # オプション [動作を繰り返す] が ON の場合
        if @move_route.repeat
          # 移動ルートのインデックスを最初に戻す
          @move_route_index = 0
        end
        # オプション [動作を繰り返す] が OFF の場合
        unless @move_route.repeat
          # 移動ルート強制中の場合
          if @move_route_forcing and not @move_route.repeat
            # 移動ルートの強制を解除
            @move_route_forcing = false
            # オリジナルの移動ルートを復帰
            @move_route = @original_move_route
            @move_route_index = @original_move_route_index
            @original_move_route = nil
          end
          # 停止カウントをクリア
          @stop_count = 0
        end
        return
      end
      # 移動系コマンド (下に移動～ジャンプ) の場合
      if command.code <= 14
        # コマンドコードで分岐
        case command.code
        when 1  # 下に移動
          move_down
        when 2  # 左に移動
          move_left
        when 3  # 右に移動
          move_right
        when 4  # 上に移動
          move_up
        when 5  # 左下に移動
          move_lower_left
        when 6  # 右下に移動
          move_lower_right
        when 7  # 左上に移動
          move_upper_left
        when 8  # 右上に移動
          move_upper_right
        when 9  # ランダムに移動
          move_random
        when 10  # プレイヤーに近づく
          move_toward_player
        when 11  # プレイヤーから遠ざかる
          move_away_from_player
        when 12  # 一歩前進
          move_forward
        when 13  # 一歩後退
          move_backward
        when 14  # ジャンプ
          jump(command.parameters[0], command.parameters[1])
        end
        # オプション [移動できない場合は無視] が OFF で、移動失敗の場合
        if not @move_route.skippable and not moving? and not jumping?
          return
        end
        @move_route_index += 1
        return
      end
      # ウェイトの場合
      if command.code == 15
        # ウェイトカウントを設定
        @wait_count = command.parameters[0] * 2 - 1
        @move_route_index += 1
        return
      end
      # 向き変更系のコマンドの場合
      if command.code >= 16 and command.code <= 26
        # コマンドコードで分岐
        case command.code
        when 16  # 下を向く
          turn_down
        when 17  # 左を向く
          turn_left
        when 18  # 右を向く
          turn_right
        when 19  # 上を向く
          turn_up
        when 20  # 右に 90 度回転
          turn_right_90
        when 21  # 左に 90 度回転
          turn_left_90
        when 22  # 180 度回転
          turn_180
        when 23  # 右か左に 90 度回転
          turn_right_or_left_90
        when 24  # ランダムに方向転換
          turn_random
        when 25  # プレイヤーの方を向く
          turn_toward_player
        when 26  # プレイヤーの逆を向く
          turn_away_from_player
        end
        @move_route_index += 1
        return
      end
      # その他のコマンドの場合
      if command.code >= 27
        # コマンドコードで分岐
        case command.code
        when 27  # スイッチ ON
          $game_switches[command.parameters[0]] = true
          $game_map.need_refresh = true
        when 28  # スイッチ OFF
          $game_switches[command.parameters[0]] = false
          $game_map.need_refresh = true
        when 29  # 移動速度の変更
          @move_speed = command.parameters[0]
        when 30  # 移動頻度の変更
          @move_frequency = command.parameters[0]
        when 31  # 移動時アニメ ON
          @walk_anime = true
        when 32  # 移動時アニメ OFF
          @walk_anime = false
        when 33  # 停止時アニメ ON
          @step_anime = true
        when 34  # 停止時アニメ OFF
          @step_anime = false
        when 35  # 向き固定 ON
          @direction_fix = true
        when 36  # 向き固定 OFF
          @direction_fix = false
        when 37  # すり抜け ON
          @through = true
        when 38  # すり抜け OFF
          @through = false
        when 39  # 最前面に表示 ON
          @always_on_top = true
        when 40  # 最前面に表示 OFF
          @always_on_top = false
        when 41  # グラフィック変更
          @tile_id = 0
          @character_name = command.parameters[0]
          @character_hue = command.parameters[1]
          if @original_direction != command.parameters[2]
            @direction = command.parameters[2]
            @original_direction = @direction
            @prelock_direction = 0
          end
          if @original_pattern != command.parameters[3]
            @pattern = command.parameters[3]
            @original_pattern = @pattern
          end
        when 42  # 不透明度の変更
          @opacity = command.parameters[0]
        when 43  # 合成方法の変更
          @blend_type = command.parameters[0]
        when 44  # SE の演奏
          $game_system.se_play(command.parameters[0])
        when 45  # スクリプト
          result = eval(command.parameters[0])
        end
        @move_route_index += 1
        return
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 下に移動
  #--------------------------------------------------------------------------
  def move_down_p
    # 下を向く
    turn_down
    # 移動距離を算出
    distance = 2 ** @move_speed
    down1(((@x * 128 + @revise_x) / 128.0).round,
          ((@y * 128 + @revise_y) / 128.0).round, distance, true)
  end
  def move_down_aaaagq
    distance = 2 ** @move_speed
    down1(((@x * 128 + @revise_x) / 128.0).round,
          ((@y * 128 + @revise_y) / 128.0).round, distance, true)
  end
  #--------------------------------------------------------------------------
  # ● 下に移動可能かどうかの判定１
  #--------------------------------------------------------------------------
  def down1(x, y, distance, down = false)
    result = down2(x, y, distance)
    if result == false
      @event_run = check_event_trigger_touch(x, y+1)
      return result
    end
    if @revise_x < -SIDE
      result = down2(x, y + 1, distance, 4)
      result &= down2(x - 1, y, distance)
      if result == false
        if down
          move_lower_right_p
          if @revise_x > SIDE
            @revise_x = SIDE
          end
        end
        return result
      end
    elsif @revise_x > SIDE
      result = down2(x, y + 1, distance, 6)
      result &= down2(x + 1, y, distance)
      if result == false
        if down
          move_lower_left_p
          if @revise_x < -SIDE
            @revise_x = -SIDE
          end
        end
        return result
      end
    end
    # 下に移動可能ならば距離分移動
    @revise_y += distance
    return result
  end
  #--------------------------------------------------------------------------
  # ● 下に移動可能かどうかの判定２
  #--------------------------------------------------------------------------
  def down2(x, y, distance, d = 2)
    if @revise_y + distance > DOWN
      unless passable?(x, y, d)
        if @revise_y < DOWN
          @revise_y = DOWN
        end
        return false
      end
    end
    return true
  end
  #--------------------------------------------------------------------------
  # ● 左に移動
  #--------------------------------------------------------------------------
  def move_left_p
    # 左を向く
    turn_left
    distance = 2 ** @move_speed
    left1(((@x * 128 + @revise_x) / 128.0).round,
          ((@y * 128 + @revise_y) / 128.0).round, distance, true)
  end
  #--------------------------------------------------------------------------
  # ● 左に移動可能かどうかの判定１
  #--------------------------------------------------------------------------
  def left1(x, y, distance, left = false)
    result = left2(x, y, distance)
    if result == false
      @event_run = check_event_trigger_touch(x-1, y)
      return result
    end
    if @revise_y < -UP and $ud_ok
      result = left2(x - 1, y, distance, 8)
      result &= left2(x, y - 1, distance)
      if result == false
        if left
          move_lower_left_p
          if @revise_y > DOWN
            @revise_y = DOWN
          end
        end
        return result
      end
    elsif @revise_y > DOWN and $ud_ok
      result = left2(x - 1, y, distance, 2)
      result &= left2(x, y + 1, distance)
      if result == false
        if left
          move_upper_left_p
          if @revise_y < -UP
            @revise_y = -UP
          end
        end
        return result
      end
    end
    @revise_x -= distance
    return result
  end
  #--------------------------------------------------------------------------
  # ● 左に移動可能かどうかの判定２
  #--------------------------------------------------------------------------
  def left2(x, y, distance, d = 4)
    if @revise_x - distance < -SIDE
      unless passable?(x, y, d)
        if @revise_x > -SIDE
          @revise_x = -SIDE
        end
        return false
      end
    end
    return true
  end
  #--------------------------------------------------------------------------
  # ● 右に移動
  #--------------------------------------------------------------------------
  def move_right_p
      # 右を向く
      turn_right
    distance = 2 ** @move_speed
    right1(((@x * 128 + @revise_x) / 128.0).round,
            ((@y * 128 + @revise_y) / 128.0).round, distance, true)
  end
  #--------------------------------------------------------------------------
  # ● 右に移動可能かどうかの判定１
  #--------------------------------------------------------------------------
  def right1(x, y, distance, right = false)
    result = right2(x, y, distance)
    if result == false
      @event_run = check_event_trigger_touch(x+1, y)
      return result
    end
    if @revise_y < -UP and $ud_ok
      result = right2(x + 1, y, distance, 8)
      result &= right2(x, y - 1, distance)
      if result == false
        if right
          move_lower_right_p
          if @revise_y > DOWN
            @revise_y = DOWN
          end
        end
        return result
      end
    elsif @revise_y > DOWN and $ud_ok
      result = right2(x + 1, y, distance, 2)
      result &= right2(x, y + 1, distance)
      if result == false
        if right
          move_upper_right_p
          if @revise_y < -UP
            @revise_y = -UP
          end
        end
        return result
      end
    end
    @revise_x += distance
    return result
  end
  #--------------------------------------------------------------------------
  # ● 右に移動可能かどうかの判定２
  #--------------------------------------------------------------------------
  def right2(x, y, distance, d = 6)
    if @revise_x + distance > SIDE
      unless passable?(x, y, d)
        if @revise_x < SIDE
          @revise_x = SIDE
        end
        return false
      end
    end
    return true
  end
  #--------------------------------------------------------------------------
  # ● 上に移動
  #--------------------------------------------------------------------------
  def move_up_p
    # 上を向く
    turn_up
    # 下に移動
    distance = 2 ** @move_speed
    up1(((@x * 128 + @revise_x) / 128.0).round,
        ((@y * 128 + @revise_y) / 128.0).round, distance, true)
  end
  def move_up_aaaagq
    distance = 2 ** @move_speed
    up1(((@x * 128 + @revise_x) / 128.0).round,
        ((@y * 128 + @revise_y) / 128.0).round, distance, true)
  end
  #--------------------------------------------------------------------------
  # ● 上に移動可能かどうかの判定１
  #--------------------------------------------------------------------------
  def up1(x, y, distance, up = false)
    result = up2(x, y, distance)
    if result == false
      @event_run = check_event_trigger_touch(x, y-1)
      return result
    end
    if @revise_x < -SIDE
      result = up2(x, y - 1, distance, 4)
      result &= up2(x - 1, y, distance)
      if result == false
        if up
          move_upper_right_p
          if @revise_x > SIDE
            @revise_x = SIDE
          end
        end
        return result
      end
    elsif @revise_x > SIDE
      result = up2(x, y - 1, distance, 6)
      result &= up2(x + 1, y, distance)
      if result == false
        if up
          move_upper_left_p
          if @revise_x < -SIDE
            @revise_x = -SIDE
          end
        end
        return result
      end
    end
    @revise_y -= distance
    return result
  end
  #--------------------------------------------------------------------------
  # ● 上に移動可能かどうかの判定２
  #--------------------------------------------------------------------------
  def up2(x, y, distance, d = 8)
    if @revise_y - distance < -UP
      unless passable?(x, y, d)
        if @revise_y > -UP
          @revise_y = -UP
        end
        return false
      end
    end
    return true
  end
  #--------------------------------------------------------------------------
  # ● 左下に移動
  #--------------------------------------------------------------------------
  def move_lower_left_p
    # 向き固定でない場合
    unless @direction_fix
      # 右向きだった場合は左を、上向きだった場合は下を向く
      @direction = (@direction == 6 ? 4 : @direction == 8 ? 2 : @direction)
    end
    # 左下に移動
    distance = (2 ** @move_speed) / Math.sqrt(2)
    if @direction == 2
      turn_left unless down1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_down if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 2, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_y > DOWN and -UP > @revise_y - distance
          @revise_y = DOWN
        end
        turn_down unless left1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_left if @event_run
      end
    else
      turn_down unless left1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_left if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 4, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if  @revise_x + distance> SIDE and -SIDE > @revise_x
          @revise_x = -SIDE
        end
        turn_left unless down1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_down if @event_run
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 右下に移動
  #--------------------------------------------------------------------------
  def move_lower_right_p
    # 向き固定でない場合
    unless @direction_fix
      # 左向きだった場合は右を、上向きだった場合は下を向く
      @direction = (@direction == 4 ? 6 : @direction == 8 ? 2 : @direction)
    end
    # 右下に移動
    distance = (2 ** @move_speed) / Math.sqrt(2)
    if @direction == 2
      turn_right unless down1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_down if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 2, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_y > DOWN and -UP > @revise_y - distance
          @revise_y = DOWN
        end
        turn_down unless right1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_right if @event_run
      end
    else
      turn_down unless right1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_right if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 6, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_x > SIDE and -SIDE > @revise_x - distance
          @revise_x = SIDE
        end
        turn_right unless down1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_down if @event_run
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 左上に移動
  #--------------------------------------------------------------------------
  def move_upper_left_p
    # 向き固定でない場合
    unless @direction_fix
      # 右向きだった場合は左を、下向きだった場合は上を向く
      @direction = (@direction == 6 ? 4 : @direction == 2 ? 8 : @direction)
    end
    # 左上に移動
    distance = (2 ** @move_speed) / Math.sqrt(2)
    if @direction == 8
      turn_left unless up1(((@x * 128 + @revise_x) / 128.0).round,
                            ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_up if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 8, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_y + distance > DOWN and -UP > @revise_y
          @revise_y = -UP
        end
        turn_up unless left1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_left if @event_run
      end
    else
      turn_up unless left1(((@x * 128 + @revise_x) / 128.0).round,
                            ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_left if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 4, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_x > SIDE and -SIDE > @revise_x - distance
          @revise_x = SIDE
        end
        turn_left unless up1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_up if @event_run
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 右上に移動
  #--------------------------------------------------------------------------
  def move_upper_right_p
    # 向き固定でない場合
    unless @direction_fix
      # 左向きだった場合は右を、下向きだった場合は上を向く
      @direction = (@direction == 4 ? 6 : @direction == 2 ? 8 : @direction)
    end
    # 右上に移動
    distance = (2 ** @move_speed) / Math.sqrt(2)
    if @direction == 8
      turn_right unless up1(((@x * 128 + @revise_x) / 128.0).round,
                            ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_up if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 8, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_y + distance > DOWN and -UP > @revise_y
          @revise_y = -UP
        end
        turn_up unless right1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_right if @event_run
      end
    else
      turn_up unless right1(((@x * 128 + @revise_x) / 128.0).round,
                            ((@y * 128 + @revise_y) / 128.0).round, distance)
      turn_right if @event_run
      unless @event_run
        if last_move?(@real_x, @real_y, 6, distance)
          result = check_event_trigger_here([1,2], false)
          if result == true
            return
          end
        end
        move_on
        if @revise_x > SIDE and -SIDE > @revise_x - distance
          @revise_x = SIDE
        end
        turn_right unless up1(((@x * 128 + @revise_x) / 128.0).round,
                              ((@y * 128 + @revise_y) / 128.0).round, distance)
        turn_up if @event_run
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 同位置のイベント起動判定
  #--------------------------------------------------------------------------
  def check_event_trigger_here(triggers, run = true)
    result = false
    # イベント実行中の場合
    if $game_system.map_interpreter.running?
      return result
    end
    # 全イベントのループ
    for event in $game_map.events.values
      # イベントの座標とトリガーが一致した場合
      if event.x == ((@x * 128 + @revise_x) / 128.0).round and
          event.y == ((@y * 128 + @revise_y) / 128.0).round and
          triggers.include?(event.trigger)
        # ジャンプ中以外で、起動判定が同位置のイベントなら
        if not event.jumping? and event.over_trigger?
          if event.list.size > 1
            if run == true
              event.start
            end
            result = true
          end
        end
      end
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● 座標修正
  #--------------------------------------------------------------------------
  def move_on
    if @y < (@y + @revise_y / 128.0).round
      @y += 1
      @revise_y -= 128
    end
    if @x > (@x + @revise_x / 128.0).round
      @x -= 1
      @revise_x += 128
    end
    if @x < (@x + @revise_x / 128.0).round
      @x += 1
      @revise_x -= 128
    end
    if @y > (@y + @revise_y / 128.0).round
      @y -= 1
      @revise_y += 128
    end
  end
  #--------------------------------------------------------------------------
  # ● アニメーションアップデート
  #--------------------------------------------------------------------------
  def anime_update
    # 移動時アニメが ON の場合
    if @walk_anime
      # アニメカウントを 1.5 増やす
      @anime_count += 1.5
    # 移動時アニメが OFF で、停止時アニメが ON の場合
    elsif @step_anime
      # アニメカウントを 1 増やす
      @anime_count += 1
    end
    # アニメカウントが最大値を超えた場合
    # ※最大値は、基本値 18 から移動速度 * 1 を引いた値
    if @anime_count > 18 - @move_speed * 2
      # 停止時アニメが OFF かつ 停止中の場合
      if not @step_anime and @stop_count > 0
        # パターンをオリジナルに戻す
        @pattern = @original_pattern
      # 停止時アニメが ON または 移動中の場合
      else
        # パターンを更新
        @pattern = (@pattern + 1) % 4
      end
      # アニメカウントをクリア
      @anime_count = 0
    end
  end
  #--------------------------------------------------------------------------
  # ● 指定位置に移動
  #--------------------------------------------------------------------------
  # オリジナルのイベントを改名
  alias :moveto_original :moveto
  def moveto(x, y)
    # 補正座標を初期化
    @revise_x = 0
    @revise_y = 0
    # オリジナルのイベントを呼び出し
    moveto_original(x, y)
  end
  #--------------------------------------------------------------------------
  # ● 移動したかどうかの判定
  #--------------------------------------------------------------------------
  def last_move?(x, y, direction, distance)
    if direction == 2 or direction == 6
      distance *= -1
    end
    if (direction == 2 or direction == 8) and
        (y / 128.0).round != ((y - distance) / 128.0).round
      return true
    end
    if (direction == 4 or direction == 6) and
        (x / 128.0).round != ((x - distance) / 128.0).round
      return true
    end
    return false
  end
end

#==============================================================================
# ■ Game_Character (分割定義 1)
#------------------------------------------------------------------------------
# 　キャラクターを扱うクラスです。このクラスは Game_Player クラスと Game_Event
# クラスのスーパークラスとして使用されます。
#==============================================================================

class Game_Character
  #--------------------------------------------------------------------------
  # ● フレーム更新 (移動)
  #--------------------------------------------------------------------------
  def update_move
    # 移動速度からマップ座標系での移動距離に変換
    distance = 2 ** @move_speed
    if @x * 128 != @real_x and @y * 128 != @real_y and Game_Player::SLANT
      distance /= Math.sqrt(2)
    end
    # 論理座標が実座標より下の場合
    if @y * 128 > @real_y
      # 下に移動
      @real_y = [@real_y + distance, @y * 128].min
    end
    # 論理座標が実座標より左の場合
    if @x * 128 < @real_x
      # 左に移動
      @real_x = [@real_x - distance, @x * 128].max
    end
    # 論理座標が実座標より右の場合
    if @x * 128 > @real_x
      # 右に移動
      @real_x = [@real_x + distance, @x * 128].min
    end
    # 論理座標が実座標より上の場合
    if @y * 128 < @real_y
      # 上に移動
      @real_y = [@real_y - distance, @y * 128].max
    end
    # 移動時アニメが ON の場合
    if @walk_anime
      # アニメカウントを 1.5 増やす
      @anime_count += 1.5
    # 移動時アニメが OFF で、停止時アニメが ON の場合
    elsif @step_anime
      # アニメカウントを 1 増やす
      @anime_count += 1
    end
  end
end

#==============================================================================
# ■ Game_Event
#------------------------------------------------------------------------------
# 　イベントを扱うクラスです。条件判定によるイベントページ切り替えや、並列処理
# イベント実行などの機能を持っており、Game_Map クラスの内部で使用されます。
#==============================================================================

class Game_Event < Game_Character
  #--------------------------------------------------------------------------
  # ● イベント起動
  #--------------------------------------------------------------------------
  def start
    # 実行内容が空でない場合
    if @list.size > 1
      # $game_player.event が0でない場合
      if $game_player.event != 0
        # 移動速度を $game_player.event にする
        $game_player.move_speed = $game_player.event
      end
      @starting = true
    end
  end
end

#==============================================================================
# 本脚本来自奇兵RPG，使用和转载请保留此信息
#==============================================================================

zxc52590

1097849185 发表于 2011-6-26 06:20
我给你
=begin
====================================================================

這版沒有在空中行走圖更換喔!
去找找洛克人與大魔界村,那腳本比較完善!
------------我是分隔線--------------------------
傳送門:http://rpg.blue/forum.php?mod=viewthread&tid=56435


zxc52590于2011-7-12 09:36补充以下内容：

1. $ud_ok = true #上下失效
   
2. $airjump = 1  #空中連跳
   
3. #==============================================================================
   
4. # 本腳本來自www.66RPG.com，使用和轉載請保留此信息
   
5. #==============================================================================
   
6. 
   
7. # ————————————————————————————————————
   
8. # 全方向ドット移動 Ver ε
   
9. # 配布元・サポートURL
   
10. # http://members.jcom.home.ne.jp/cogwheel/
    
11. 
    
12. #==============================================================================
    
13. # ■ Game_Player
    
14. #------------------------------------------------------------------------------
    
15. # 　プレイヤーを扱うクラスです。イベントの起動判定や、マップのスクロールなどの
    
16. # 機能を持っています。このクラスのインスタンスは $game_player で參照されます。
    
17. #==============================================================================
    
18. class Game_Player < Game_Character
    
19.   #--------------------------------------------------------------------------
    
20.   # ● 定數
    
21.   #--------------------------------------------------------------------------
    
22.   UP    = 48                  # 上方向の余裕(0 < UP < 63)
    
23.   DOWN  = 16                  # 下方向の余裕(0 < DOWN <63)
    
24.   SIDE  = 32                  # 左右方向の余裕(0 < SIDE <63)
    
25.   SLANT = false               # 移動ルートの斜め移動時、速度修正
    
26.   JUMPMAX = 80              
    
27.   JUMPADD = 10              
    
28.   #--------------------------------------------------------------------------
    
29.   # ● 公開インスタンス■數
    
30.   #--------------------------------------------------------------------------
    
31.   attr_reader   :event                    # イベント時移動速度
    
32.   attr_accessor :move_speed               # 移動速度
    
33.   #--------------------------------------------------------------------------
    
34.   # ● フレーム更新
    
35.   #--------------------------------------------------------------------------
    
36.   alias :update_original :update
    
37.   def update
    
38.     # @walk:步行速度 @dash:ダッシュ時移動速度
    
39.     # @event:イベント時移動速度（0の時は、イベント時に速度■更をしない）
    
40.     @walk  = 4
    
41.     @dash  = 4
    
42.     @event = 4
    
43.     @dot_m = true
    
44.     #ダッシュ機能。エンターキーが押されている間、移動速度を■更する。
    
45.     unless moving? or $game_system.map_interpreter.running? or
    
46.             @move_route_forcing or $game_temp.message_window_showing
    
47.       if @walk != @dash
    
48.         if Input.press?(Input::C)
    
49.           if @move_speed != @dash
    
50.             @move_speed = @dash
    
51.           end
    
52.         else
    
53.           if @move_speed != @walk
    
54.             @move_speed = @walk
    
55.           end
    
56.         end
    
57.       end
    
58.     end
    
59.     if @revise_x == nil and @revise_y == nil
    
60.       @revise_x = 0
    
61.       @revise_y = 0
    
62.     end
    
63.     unless @dot_m
    
64.       update_original
    
65.       return
    
66.     end
    
67.     if @move_route_forcing
    
68.       # ローカル■數に移動中かどうかを記憶
    
69.       last_moving = moving?
    
70.       # ローカル■數に座標を記憶
    
71.       last_real_x = @real_x
    
72.       last_real_y = @real_y
    
73.       # 座標がずれている場合
    
74.       if (@revise_x != 0 or @revise_y != 0) and not jumping? and @move == true
    
75.         if @revise_x != @real_x - @x * 128 or @revise_y != @real_y - @y * 128
    
76.           @revise_x = @real_x - @x * 128
    
77.           @revise_y = @real_y - @y * 128
    
78.         end
    
79.         # 移動距離distance1と目標距離distance2を設定
    
80.         distance1 = 2 ** @move_speed
    
81.         distance2 = Math.sqrt(@revise_x ** 2 + @revise_y ** 2)
    
82.         # 移動距離が目標距離を越えた場合
    
83.         if distance1 > distance2
    
84.           # 強制的に補正座標を零にする
    
85.           @real_x = @real_x - @revise_x
    
86.           @real_y = @real_y - @revise_y
    
87.           @revise_x = 0
    
88.           @revise_y = 0
    
89.           anime_update
    
90.         # 移動距離が目標距離に達しない場合
    
91.         else
    
92.           # 移動距離分目標距離に近づく
    
93.           @real_x -= (distance1 * @revise_x / distance2).round
    
94.           @real_y -= (distance1 * @revise_y / distance2).round
    
95.           @revise_x = @real_x - @x * 128
    
96.           @revise_y = @real_y - @y * 128
    
97.           anime_update
    
98.         end
    
99.       else
    
100.         super
     
101.       end
     
102.     else
     
103.       @move = false
     
104.       # 移動中、イベント■行中、移動ルート強制中、
     
105.       # メッセージウィンドウ表示中のいずれでもない場合
     
106.       unless moving? or $game_system.map_interpreter.running? or
     
107.              @move_route_forcing or $game_temp.message_window_showing
     
108.         @event_run = false
     
109.         # 方向ボタンが押されていれば、その方向へプレイヤーを移動
     
110. #---------------------------上下失效-----------------------------------------
     
111.       case Input.dir8
     
112.         when 1
     
113.           $ud_ok ? move_lower_left_p : move_left_p
     
114.           if $game_variables[2] == 0
     
115.            @character_name = "洛克行走"
     
116.           end
     
117.         when 2
     
118. #          $ud_ok ? move_down_p : move_down_aaaagq
     
119.           move_down_p if $ud_ok
     
120.         when 3
     
121.          $ud_ok ? move_lower_right_p : move_right_p
     
122.           if $game_variables[2] == 0
     
123.            @character_name = "洛克行走"
     
124.           end
     
125.         when 4
     
126.           move_left_p
     
127.           if $game_variables[2] == 0
     
128.            @character_name = "洛克行走"
     
129.           end
     
130.         when 6
     
131.           move_right_p
     
132.           if $game_variables[2] == 0
     
133.            @character_name = "洛克行走"
     
134.           end
     
135.         when 7
     
136.          $ud_ok ? move_upper_left_p : move_left_p
     
137.           if $game_variables[2] == 0
     
138.            @character_name = "洛克行走"
     
139.           end
     
140.         when 8
     
141. #         $ud_ok ? move_up_p : move_up_aaaagq
     
142.          move_up_p if $ud_ok
     
143.         when 9
     
144.          $ud_ok ? move_upper_right_p : move_right_p
     
145.           if $game_variables[2] == 0
     
146.            @character_name = "洛克行走"
     
147.           end
     
148.         end
     
149.       end
     
150.       # ローカル■數に座標を記憶
     
151.       last_real_x = @real_x
     
152.       last_real_y = @real_y
     
153.       # 移動■理
     
154.       @real_x = @x * 128 + @revise_x
     
155.       @real_y = @y * 128 + @revise_y
     
156.       # ローカル■數に移動中かどうかを記憶
     
157.       last_moving = moving?
     
158.       # 座標更新
     
159.       move_on
     
160.       # 現在の座標と以前の座標が異なる場合
     
161.       if (last_real_x != @real_x or last_real_y != @real_y)
     
162.         @move_distance = 0 if @move_distance == nil
     
163.         @move_distance += Math.sqrt((last_real_x - @real_x) ** 2 +
     
164.                                       (last_real_y - @real_y) ** 2)
     
165.         if @move_distance >= 128
     
166.           @move_distance %= 128
     
167.           increase_steps
     
168.         end
     
169.         # アニメーションを更新
     
170.         anime_update
     
171.       else
     
172.         @pattern = 0
     
173.       end
     
174.     end
     
175.     # キャラクターが下に移動し、かつ畫面上の位置が中央より下の場合
     
176.     if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
     
177.       # マップを下にスクロール
     
178.       $game_map.scroll_down(@real_y - last_real_y)
     
179.     end
     
180.     # キャラクターが左に移動し、かつ畫面上の位置が中央より左の場合
     
181.     if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
     
182.       # マップを左にスクロール
     
183.       $game_map.scroll_left(last_real_x - @real_x)
     
184.     end
     
185.     # キャラクターが右に移動し、かつ畫面上の位置が中央より右の場合
     
186.     if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
     
187.       # マップを右にスクロール
     
188.       $game_map.scroll_right(@real_x - last_real_x)
     
189.     end
     
190.     # キャラクターが上に移動し、かつ畫面上の位置が中央より上の場合
     
191.     if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
     
192.       # マップを上にスクロール
     
193.       $game_map.scroll_up(last_real_y - @real_y)
     
194.     end
     
195.     # 前回プレイヤーが移動中だった場合
     
196.     if last_moving
     
197.       # 同位置のイベントとの接觸によるイベント起動判定
     
198.       result = check_event_trigger_here([1,2])
     
199.       if result == true
     
200.         if (last_real_x / 128.0).round != @x and
     
201.             (last_real_y / 128.0).round != @y
     
202.           if @direction == 2 or @direction == 8
     
203.             if (last_real_x / 128.0).round > @x
     
204.               turn_left
     
205.             else
     
206.               turn_right
     
207.             end
     
208.           else
     
209.             if (last_real_y / 128.0).round > @y
     
210.               turn_up
     
211.             else
     
212.               turn_down
     
213.             end
     
214.           end
     
215.         elsif (last_real_x / 128.0).round > @x
     
216.           turn_left
     
217.         elsif (last_real_x / 128.0).round < @x
     
218.           turn_right
     
219.         elsif (last_real_y / 128.0).round > @y
     
220.           turn_up
     
221.         elsif (last_real_y / 128.0).round < @y
     
222.           turn_down
     
223.         end
     
224.       end
     
225.       # 起動したイベントがない場合
     
226.       if result == false
     
227.         # デバッグモードが ON かつ CTRL キーが押されている場合を除き
     
228.         unless $DEBUG and Input.press?(Input::CTRL)
     
229.           # エンカウント カウントダウン
     
230.           if @encounter_count > 0
     
231.             @encounter_count -= 1
     
232.           end
     
233.         end
     
234.       end
     
235.     end
     
236. #-----------------------按跳躍-----------------------------------------------
     
237. # A ボタンが押された場合
     
238.     if Input.press?(Input::A) and not $ud_ok
     
239.       @twojump = 1 if @twojump == 0 and down1(((@x * 128 + @revise_x) / 128.0).round,
     
240.           ((@y * 128 + @revise_y) / 128.0).round, 5, true)
     
241.           if $game_variables[2]==0
     
242.            @character_name = "洛克跳躍"
     
243.            $game_variables[2]=1
     
244.         end
     
245.       if (not @apassed) and @twojump <= $airjump
     
246.         @apassed = true
     
247.         @jumpnow = JUMPMAX
     
248.         @twojump += 1
     
249.       else
     
250.         @jumpnow += 3        
     
251.       end
     
252.     else
     
253.       @apassed = false
     
254.     end
     
255. #----------------------自由落體--------------------------------
     
256.     if not $ud_ok
     
257.       @jumpnow -= 10
     
258.       if @jumpnow < 0
     
259.         @jumpnow = [@jumpnow, -JUMPMAX].max
     
260.         if not down1(((@x * 128 + @revise_x) / 128.0).round,
     
261.           ((@y * 128 + @revise_y) / 128.0).round, -@jumpnow, true)
     
262.           @jumpnow = 0
     
263.           @twojump = 0
     
264.           if $game_variables[2] == 1
     
265.            @character_name = "洛克站立"
     
266.           Audio.se_play("Audio/SE/角色落地.wav")
     
267.            $game_variables[2]=0
     
268.         end
     
269.         end
     
270.       elsif @jumpnow > 0
     
271.         @jumpnow = [@jumpnow, JUMPMAX].min
     
272.         if not up1(((@x * 128 + @revise_x) / 128.0).round,
     
273.           ((@y * 128 + @revise_y) / 128.0).round, @jumpnow, true)
     
274.           @jumpnow = 0
     
275.         end
     
276.       end
     
277.     end
     
278.     if Input.trigger?(Input::C)
     
279.       # 同位置および正面のイベント起動判定
     
280.       check_event_trigger_here([0])
     
281.       check_event_trigger_there([0,1,2])
     
282.     end
     
283.   end
     
284.   #--------------------------------------------------------------------------
     
285.   # ● オブジェクト初期化
     
286.   #--------------------------------------------------------------------------
     
287.   def initialize
     
288.     @jumpnow = 0
     
289.     @twojump = 0
     
290.     @apassed = false
     
291.     @revise_x = 0
     
292.     @revise_y = 0
     
293.     @move == false
     
294.     super
     
295.   end
     
296.   #--------------------------------------------------------------------------
     
297.   # ● 移動判定
     
298.   #--------------------------------------------------------------------------
     
299.   def moving?
     
300.     unless @dot_m
     
301.       result = super
     
302.       return result
     
303.     end
     
304.     # 強制移動の場合オリジナルの判定をさせる
     
305.     if @move_route_forcing
     
306.       if @move == false
     
307.         return false
     
308.       end
     
309.       super
     
310.     # 通常時は現座標が■座標と異なる場合のみ移動中と判定
     
311.     else
     
312.       return (@x != (@real_x / 128.0).round or @y != (@real_y / 128.0).round)
     
313.     end
     
314.   end
     
315.   #--------------------------------------------------------------------------
     
316.   # ● 移動判定
     
317.   #--------------------------------------------------------------------------
     
318.   def moving_a?
     
319.     if @move == false
     
320.       if (@move_route.list[@move_route_index].code <= 14 or
     
321.           @move_route.list[@move_route_index].code == 25)
     
322.         @move = true
     
323.       end
     
324.       return false
     
325.     end
     
326.     moving?
     
327.   end
     
328.   #--------------------------------------------------------------------------
     
329.   # ● フレーム更新 (ジャンプ)
     
330.   #--------------------------------------------------------------------------
     
331.   def update_jump
     
332.     # ジャンプカウントを 1 減らす
     
333.     @jump_count -= 1
     
334.     # 新しい座標を計算
     
335.     @real_x = (@real_x * @jump_count + @x * 128) / (@jump_count + 1)
     
336.     @real_y = (@real_y * @jump_count + @y * 128) / (@jump_count + 1)
     
337.     if @jump_count == 0
     
338.       @revise_x = 0
     
339.       @revise_y = 0
     
340.     end
     
341.   end
     
342.   #--------------------------------------------------------------------------
     
343.   # ● 移動タイプ : カスタム
     
344.   #--------------------------------------------------------------------------
     
345.   def move_type_custom
     
346.     unless @dot_m
     
347.       super
     
348.       return
     
349.     end
     
350.     # 停止中でなければ中斷
     
351.     if jumping? or moving_a?
     
352.       return
     
353.     end
     
354.     # 移動コマンドのリストの最後に到達するまでループ
     
355.     while @move_route_index < @move_route.list.size
     
356.       # 移動コマンドを取得
     
357.       command = @move_route.list[@move_route_index]
     
358.       # コマンドコード 0 番 (リストの最後) の場合
     
359.       if command.code == 0
     
360.         # オプション [動作を繰り返す] が ON の場合
     
361.         if @move_route.repeat
     
362.           # 移動ルートのインデックスを最初に■す
     
363.           @move_route_index = 0
     
364.         end
     
365.         # オプション [動作を繰り返す] が OFF の場合
     
366.         unless @move_route.repeat
     
367.           # 移動ルート強制中の場合
     
368.           if @move_route_forcing and not @move_route.repeat
     
369.             # 移動ルートの強制を解除
     
370.             @move_route_forcing = false
     
371.             # オリジナルの移動ルートを復■
     
372.             @move_route = @original_move_route
     
373.             @move_route_index = @original_move_route_index
     
374.             @original_move_route = nil
     
375.           end
     
376.           # 停止カウントをクリア
     
377.           @stop_count = 0
     
378.         end
     
379.         return
     
380.       end
     
381.       # 移動系コマンド (下に移動～ジャンプ) の場合
     
382.       if command.code <= 14
     
383.         # コマンドコードで分岐
     
384.         case command.code
     
385.         when 1  # 下に移動
     
386.           move_down
     
387.         when 2  # 左に移動
     
388.           move_left
     
389.         when 3  # 右に移動
     
390.           move_right
     
391.         when 4  # 上に移動
     
392.           move_up
     
393.         when 5  # 左下に移動
     
394.           move_lower_left
     
395.         when 6  # 右下に移動
     
396.           move_lower_right
     
397.         when 7  # 左上に移動
     
398.           move_upper_left
     
399.         when 8  # 右上に移動
     
400.           move_upper_right
     
401.         when 9  # ランダムに移動
     
402.           move_random
     
403.         when 10  # プレイヤーに近づく
     
404.           move_toward_player
     
405.         when 11  # プレイヤーから遠ざかる
     
406.           move_away_from_player
     
407.         when 12  # 一步前進
     
408.           move_forward
     
409.         when 13  # 一步後退
     
410.           move_backward
     
411.         when 14  # ジャンプ
     
412.           jump(command.parameters[0], command.parameters[1])
     
413.         end
     
414.         # オプション [移動できない場合は無視] が OFF で、移動失敗の場合
     
415.         if not @move_route.skippable and not moving? and not jumping?
     
416.           return
     
417.         end
     
418.         @move_route_index += 1
     
419.         return
     
420.       end
     
421.       # ウェイトの場合
     
422.       if command.code == 15
     
423.         # ウェイトカウントを設定
     
424.         @wait_count = command.parameters[0] * 2 - 1
     
425.         @move_route_index += 1
     
426.         return
     
427.       end
     
428.       # 向き■更系のコマンドの場合
     
429.       if command.code >= 16 and command.code <= 26
     
430.         # コマンドコードで分岐
     
431.         case command.code
     
432.         when 16  # 下を向く
     
433.           turn_down
     
434.         when 17  # 左を向く
     
435.           turn_left
     
436.         when 18  # 右を向く
     
437.           turn_right
     
438.         when 19  # 上を向く
     
439.           turn_up
     
440.         when 20  # 右に 90 度回■
     
441.           turn_right_90
     
442.         when 21  # 左に 90 度回■
     
443.           turn_left_90
     
444.         when 22  # 180 度回■
     
445.           turn_180
     
446.         when 23  # 右か左に 90 度回■
     
447.           turn_right_or_left_90
     
448.         when 24  # ランダムに方向■換
     
449.           turn_random
     
450.         when 25  # プレイヤーの方を向く
     
451.           turn_toward_player
     
452.         when 26  # プレイヤーの逆を向く
     
453.           turn_away_from_player
     
454.         end
     
455.         @move_route_index += 1
     
456.         return
     
457.       end
     
458.       # その他のコマンドの場合
     
459.       if command.code >= 27
     
460.         # コマンドコードで分岐
     
461.         case command.code
     
462.         when 27  # スイッチ ON
     
463.           $game_switches[command.parameters[0]] = true
     
464.           $game_map.need_refresh = true
     
465.         when 28  # スイッチ OFF
     
466.           $game_switches[command.parameters[0]] = false
     
467.           $game_map.need_refresh = true
     
468.         when 29  # 移動速度の■更
     
469.           @move_speed = command.parameters[0]
     
470.         when 30  # 移動頻度の■更
     
471.           @move_frequency = command.parameters[0]
     
472.         when 31  # 移動時アニメ ON
     
473.           @walk_anime = true
     
474.         when 32  # 移動時アニメ OFF
     
475.           @walk_anime = false
     
476.         when 33  # 停止時アニメ ON
     
477.           @step_anime = true
     
478.         when 34  # 停止時アニメ OFF
     
479.           @step_anime = false
     
480.         when 35  # 向き固定 ON
     
481.           @direction_fix = true
     
482.         when 36  # 向き固定 OFF
     
483.           @direction_fix = false
     
484.         when 37  # すり■け ON
     
485.           @through = true
     
486.         when 38  # すり■け OFF
     
487.           @through = false
     
488.         when 39  # 最前面に表示 ON
     
489.           @always_on_top = true
     
490.         when 40  # 最前面に表示 OFF
     
491.           @always_on_top = false
     
492.         when 41  # グラフィック■更
     
493.           @tile_id = 0
     
494.           @character_name = command.parameters[0]
     
495.           @character_hue = command.parameters[1]
     
496.           if @original_direction != command.parameters[2]
     
497.             @direction = command.parameters[2]
     
498.             @original_direction = @direction
     
499.             @prelock_direction = 0
     
500.           end
     
501.           if @original_pattern != command.parameters[3]
     
502.             @pattern = command.parameters[3]
     
503.             @original_pattern = @pattern
     
504.           end
     
505.         when 42  # 不透明度の■更
     
506.           @opacity = command.parameters[0]
     
507.         when 43  # 合成方法の■更
     
508.           @blend_type = command.parameters[0]
     
509.         when 44  # SE の演奏
     
510.           $game_system.se_play(command.parameters[0])
     
511.         when 45  # スクリプト
     
512.           result = eval(command.parameters[0])
     
513.         end
     
514.         @move_route_index += 1
     
515.         return
     
516.       end
     
517.     end
     
518.   end
     
519.   #--------------------------------------------------------------------------
     
520.   # ● 下に移動
     
521.   #--------------------------------------------------------------------------
     
522.   def move_down_p
     
523.     # 下を向く
     
524.     turn_down
     
525.     # 移動距離を算出
     
526.     distance = 2 ** @move_speed
     
527.     down1(((@x * 128 + @revise_x) / 128.0).round,
     
528.           ((@y * 128 + @revise_y) / 128.0).round, distance, true)
     
529.   end
     
530.   def move_down_aaaagq
     
531.     distance = 2 ** @move_speed
     
532.     down1(((@x * 128 + @revise_x) / 128.0).round,
     
533.           ((@y * 128 + @revise_y) / 128.0).round, distance, true)
     
534.   end
     
535.   #--------------------------------------------------------------------------
     
536.   # ● 下に移動可能かどうかの判定１
     
537.   #--------------------------------------------------------------------------
     
538.   def down1(x, y, distance, down = false)
     
539.     result = down2(x, y, distance)
     
540.     if result == false
     
541.       @event_run = check_event_trigger_touch(x, y+1)
     
542.       return result
     
543.     end
     
544.     if @revise_x < -SIDE
     
545.       result = down2(x, y + 1, distance, 4)
     
546.       result &= down2(x - 1, y, distance)
     
547.       if result == false
     
548.         if down
     
549.           move_lower_right_p
     
550.           if @revise_x > SIDE
     
551.             @revise_x = SIDE
     
552.           end
     
553.         end
     
554.         return result
     
555.       end
     
556.     elsif @revise_x > SIDE
     
557.       result = down2(x, y + 1, distance, 6)
     
558.       result &= down2(x + 1, y, distance)
     
559.       if result == false
     
560.         if down
     
561.           move_lower_left_p
     
562.           if @revise_x < -SIDE
     
563.             @revise_x = -SIDE
     
564.           end
     
565.         end
     
566.         return result
     
567.       end
     
568.     end
     
569.     # 下に移動可能ならば距離分移動
     
570.     @revise_y += distance
     
571.     return result
     
572.   end
     
573.   #--------------------------------------------------------------------------
     
574.   # ● 下に移動可能かどうかの判定２
     
575.   #--------------------------------------------------------------------------
     
576.   def down2(x, y, distance, d = 2)
     
577.     if @revise_y + distance > DOWN
     
578.       unless passable?(x, y, d)
     
579.         if @revise_y < DOWN
     
580.           @revise_y = DOWN
     
581.         end
     
582.         return false
     
583.       end
     
584.     end
     
585.     return true
     
586.   end
     
587.   #--------------------------------------------------------------------------
     
588.   # ● 左に移動
     
589.   #--------------------------------------------------------------------------
     
590.   def move_left_p
     
591.     # 左を向く
     
592.     turn_left
     
593.     distance = 2 ** @move_speed
     
594.     left1(((@x * 128 + @revise_x) / 128.0).round,
     
595.           ((@y * 128 + @revise_y) / 128.0).round, distance, true)
     
596.   end
     
597.   #--------------------------------------------------------------------------
     
598.   # ● 左に移動可能かどうかの判定１
     
599.   #--------------------------------------------------------------------------
     
600.   def left1(x, y, distance, left = false)
     
601.     result = left2(x, y, distance)
     
602.     if result == false
     
603.       @event_run = check_event_trigger_touch(x-1, y)
     
604.       return result
     
605.     end
     
606.     if @revise_y < -UP and $ud_ok
     
607.       result = left2(x - 1, y, distance, 8)
     
608.       result &= left2(x, y - 1, distance)
     
609.       if result == false
     
610.         if left
     
611.           move_lower_left_p
     
612.           if @revise_y > DOWN
     
613.             @revise_y = DOWN
     
614.           end
     
615.         end
     
616.         return result
     
617.       end
     
618.     elsif @revise_y > DOWN and $ud_ok
     
619.       result = left2(x - 1, y, distance, 2)
     
620.       result &= left2(x, y + 1, distance)
     
621.       if result == false
     
622.         if left
     
623.           move_upper_left_p
     
624.           if @revise_y < -UP
     
625.             @revise_y = -UP
     
626.           end
     
627.         end
     
628.         return result
     
629.       end
     
630.     end
     
631.     @revise_x -= distance
     
632.     return result
     
633.   end
     
634.   #--------------------------------------------------------------------------
     
635.   # ● 左に移動可能かどうかの判定２
     
636.   #--------------------------------------------------------------------------
     
637.   def left2(x, y, distance, d = 4)
     
638.     if @revise_x - distance < -SIDE
     
639.       unless passable?(x, y, d)
     
640.         if @revise_x > -SIDE
     
641.           @revise_x = -SIDE
     
642.         end
     
643.         return false
     
644.       end
     
645.     end
     
646.     return true
     
647.   end
     
648.   #--------------------------------------------------------------------------
     
649.   # ● 右に移動
     
650.   #--------------------------------------------------------------------------
     
651.   def move_right_p
     
652.       # 右を向く
     
653.       turn_right
     
654.     distance = 2 ** @move_speed
     
655.     right1(((@x * 128 + @revise_x) / 128.0).round,
     
656.             ((@y * 128 + @revise_y) / 128.0).round, distance, true)
     
657.   end
     
658.   #--------------------------------------------------------------------------
     
659.   # ● 右に移動可能かどうかの判定１
     
660.   #--------------------------------------------------------------------------
     
661.   def right1(x, y, distance, right = false)
     
662.     result = right2(x, y, distance)
     
663.     if result == false
     
664.       @event_run = check_event_trigger_touch(x+1, y)
     
665.       return result
     
666.     end
     
667.     if @revise_y < -UP and $ud_ok
     
668.       result = right2(x + 1, y, distance, 8)
     
669.       result &= right2(x, y - 1, distance)
     
670.       if result == false
     
671.         if right
     
672.           move_lower_right_p
     
673.           if @revise_y > DOWN
     
674.             @revise_y = DOWN
     
675.           end
     
676.         end
     
677.         return result
     
678.       end
     
679.     elsif @revise_y > DOWN and $ud_ok
     
680.       result = right2(x + 1, y, distance, 2)
     
681.       result &= right2(x, y + 1, distance)
     
682.       if result == false
     
683.         if right
     
684.           move_upper_right_p
     
685.           if @revise_y < -UP
     
686.             @revise_y = -UP
     
687.           end
     
688.         end
     
689.         return result
     
690.       end
     
691.     end
     
692.     @revise_x += distance
     
693.     return result
     
694.   end
     
695.   #--------------------------------------------------------------------------
     
696.   # ● 右に移動可能かどうかの判定２
     
697.   #--------------------------------------------------------------------------
     
698.   def right2(x, y, distance, d = 6)
     
699.     if @revise_x + distance > SIDE
     
700.       unless passable?(x, y, d)
     
701.         if @revise_x < SIDE
     
702.           @revise_x = SIDE
     
703.         end
     
704.         return false
     
705.       end
     
706.     end
     
707.     return true
     
708.   end
     
709.   #--------------------------------------------------------------------------
     
710.   # ● 上に移動
     
711.   #--------------------------------------------------------------------------
     
712.   def move_up_p
     
713.     # 上を向く
     
714.     turn_up
     
715.     # 下に移動
     
716.     distance = 2 ** @move_speed
     
717.     up1(((@x * 128 + @revise_x) / 128.0).round,
     
718.         ((@y * 128 + @revise_y) / 128.0).round, distance, true)
     
719.   end
     
720.   def move_up_aaaagq
     
721.     distance = 2 ** @move_speed
     
722.     up1(((@x * 128 + @revise_x) / 128.0).round,
     
723.         ((@y * 128 + @revise_y) / 128.0).round, distance, true)
     
724.   end
     
725.   #--------------------------------------------------------------------------
     
726.   # ● 上に移動可能かどうかの判定１
     
727.   #--------------------------------------------------------------------------
     
728.   def up1(x, y, distance, up = false)
     
729.     result = up2(x, y, distance)
     
730.     if result == false
     
731.       @event_run = check_event_trigger_touch(x, y-1)
     
732.       return result
     
733.     end
     
734.     if @revise_x < -SIDE
     
735.       result = up2(x, y - 1, distance, 4)
     
736.       result &= up2(x - 1, y, distance)
     
737.       if result == false
     
738.         if up
     
739.           move_upper_right_p
     
740.           if @revise_x > SIDE
     
741.             @revise_x = SIDE
     
742.           end
     
743.         end
     
744.         return result
     
745.       end
     
746.     elsif @revise_x > SIDE
     
747.       result = up2(x, y - 1, distance, 6)
     
748.       result &= up2(x + 1, y, distance)
     
749.       if result == false
     
750.         if up
     
751.           move_upper_left_p
     
752.           if @revise_x < -SIDE
     
753.             @revise_x = -SIDE
     
754.           end
     
755.         end
     
756.         return result
     
757.       end
     
758.     end
     
759.     @revise_y -= distance
     
760.     return result
     
761.   end
     
762.   #--------------------------------------------------------------------------
     
763.   # ● 上に移動可能かどうかの判定２
     
764.   #--------------------------------------------------------------------------
     
765.   def up2(x, y, distance, d = 8)
     
766.     if @revise_y - distance < -UP
     
767.       unless passable?(x, y, d)
     
768.         if @revise_y > -UP
     
769.           @revise_y = -UP
     
770.         end
     
771.         return false
     
772.       end
     
773.     end
     
774.     return true
     
775.   end
     
776.   #--------------------------------------------------------------------------
     
777.   # ● 左下に移動
     
778.   #--------------------------------------------------------------------------
     
779.   def move_lower_left_p
     
780.     # 向き固定でない場合
     
781.     unless @direction_fix
     
782.       # 右向きだった場合は左を、上向きだった場合は下を向く
     
783.       @direction = (@direction == 6 ? 4 : @direction == 8 ? 2 : @direction)
     
784.     end
     
785.     # 左下に移動
     
786.     distance = (2 ** @move_speed) / Math.sqrt(2)
     
787.     if @direction == 2
     
788.       turn_left unless down1(((@x * 128 + @revise_x) / 128.0).round,
     
789.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
790.       turn_down if @event_run
     
791.       unless @event_run
     
792.         if last_move?(@real_x, @real_y, 2, distance)
     
793.           result = check_event_trigger_here([1,2], false)
     
794.           if result == true
     
795.             return
     
796.           end
     
797.         end
     
798.         move_on
     
799.         if @revise_y > DOWN and -UP > @revise_y - distance
     
800.           @revise_y = DOWN
     
801.         end
     
802.         turn_down unless left1(((@x * 128 + @revise_x) / 128.0).round,
     
803.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
804.         turn_left if @event_run
     
805.       end
     
806.     else
     
807.       turn_down unless left1(((@x * 128 + @revise_x) / 128.0).round,
     
808.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
809.       turn_left if @event_run
     
810.       unless @event_run
     
811.         if last_move?(@real_x, @real_y, 4, distance)
     
812.           result = check_event_trigger_here([1,2], false)
     
813.           if result == true
     
814.             return
     
815.           end
     
816.         end
     
817.         move_on
     
818.         if  @revise_x + distance> SIDE and -SIDE > @revise_x
     
819.           @revise_x = -SIDE
     
820.         end
     
821.         turn_left unless down1(((@x * 128 + @revise_x) / 128.0).round,
     
822.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
823.         turn_down if @event_run
     
824.       end
     
825.     end
     
826.   end
     
827.   #--------------------------------------------------------------------------
     
828.   # ● 右下に移動
     
829.   #--------------------------------------------------------------------------
     
830.   def move_lower_right_p
     
831.     # 向き固定でない場合
     
832.     unless @direction_fix
     
833.       # 左向きだった場合は右を、上向きだった場合は下を向く
     
834.       @direction = (@direction == 4 ? 6 : @direction == 8 ? 2 : @direction)
     
835.     end
     
836.     # 右下に移動
     
837.     distance = (2 ** @move_speed) / Math.sqrt(2)
     
838.     if @direction == 2
     
839.       turn_right unless down1(((@x * 128 + @revise_x) / 128.0).round,
     
840.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
841.       turn_down if @event_run
     
842.       unless @event_run
     
843.         if last_move?(@real_x, @real_y, 2, distance)
     
844.           result = check_event_trigger_here([1,2], false)
     
845.           if result == true
     
846.             return
     
847.           end
     
848.         end
     
849.         move_on
     
850.         if @revise_y > DOWN and -UP > @revise_y - distance
     
851.           @revise_y = DOWN
     
852.         end
     
853.         turn_down unless right1(((@x * 128 + @revise_x) / 128.0).round,
     
854.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
855.         turn_right if @event_run
     
856.       end
     
857.     else
     
858.       turn_down unless right1(((@x * 128 + @revise_x) / 128.0).round,
     
859.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
860.       turn_right if @event_run
     
861.       unless @event_run
     
862.         if last_move?(@real_x, @real_y, 6, distance)
     
863.           result = check_event_trigger_here([1,2], false)
     
864.           if result == true
     
865.             return
     
866.           end
     
867.         end
     
868.         move_on
     
869.         if @revise_x > SIDE and -SIDE > @revise_x - distance
     
870.           @revise_x = SIDE
     
871.         end
     
872.         turn_right unless down1(((@x * 128 + @revise_x) / 128.0).round,
     
873.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
874.         turn_down if @event_run
     
875.       end
     
876.     end
     
877.   end
     
878.   #--------------------------------------------------------------------------
     
879.   # ● 左上に移動
     
880.   #--------------------------------------------------------------------------
     
881.   def move_upper_left_p
     
882.     # 向き固定でない場合
     
883.     unless @direction_fix
     
884.       # 右向きだった場合は左を、下向きだった場合は上を向く
     
885.       @direction = (@direction == 6 ? 4 : @direction == 2 ? 8 : @direction)
     
886.     end
     
887.     # 左上に移動
     
888.     distance = (2 ** @move_speed) / Math.sqrt(2)
     
889.     if @direction == 8
     
890.       turn_left unless up1(((@x * 128 + @revise_x) / 128.0).round,
     
891.                             ((@y * 128 + @revise_y) / 128.0).round, distance)
     
892.       turn_up if @event_run
     
893.       unless @event_run
     
894.         if last_move?(@real_x, @real_y, 8, distance)
     
895.           result = check_event_trigger_here([1,2], false)
     
896.           if result == true
     
897.             return
     
898.           end
     
899.         end
     
900.         move_on
     
901.         if @revise_y + distance > DOWN and -UP > @revise_y
     
902.           @revise_y = -UP
     
903.         end
     
904.         turn_up unless left1(((@x * 128 + @revise_x) / 128.0).round,
     
905.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
906.         turn_left if @event_run
     
907.       end
     
908.     else
     
909.       turn_up unless left1(((@x * 128 + @revise_x) / 128.0).round,
     
910.                             ((@y * 128 + @revise_y) / 128.0).round, distance)
     
911.       turn_left if @event_run
     
912.       unless @event_run
     
913.         if last_move?(@real_x, @real_y, 4, distance)
     
914.           result = check_event_trigger_here([1,2], false)
     
915.           if result == true
     
916.             return
     
917.           end
     
918.         end
     
919.         move_on
     
920.         if @revise_x > SIDE and -SIDE > @revise_x - distance
     
921.           @revise_x = SIDE
     
922.         end
     
923.         turn_left unless up1(((@x * 128 + @revise_x) / 128.0).round,
     
924.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
925.         turn_up if @event_run
     
926.       end
     
927.     end
     
928.   end
     
929.   #--------------------------------------------------------------------------
     
930.   # ● 右上に移動
     
931.   #--------------------------------------------------------------------------
     
932.   def move_upper_right_p
     
933.     # 向き固定でない場合
     
934.     unless @direction_fix
     
935.       # 左向きだった場合は右を、下向きだった場合は上を向く
     
936.       @direction = (@direction == 4 ? 6 : @direction == 2 ? 8 : @direction)
     
937.     end
     
938.     # 右上に移動
     
939.     distance = (2 ** @move_speed) / Math.sqrt(2)
     
940.     if @direction == 8
     
941.       turn_right unless up1(((@x * 128 + @revise_x) / 128.0).round,
     
942.                             ((@y * 128 + @revise_y) / 128.0).round, distance)
     
943.       turn_up if @event_run
     
944.       unless @event_run
     
945.         if last_move?(@real_x, @real_y, 8, distance)
     
946.           result = check_event_trigger_here([1,2], false)
     
947.           if result == true
     
948.             return
     
949.           end
     
950.         end
     
951.         move_on
     
952.         if @revise_y + distance > DOWN and -UP > @revise_y
     
953.           @revise_y = -UP
     
954.         end
     
955.         turn_up unless right1(((@x * 128 + @revise_x) / 128.0).round,
     
956.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
957.         turn_right if @event_run
     
958.       end
     
959.     else
     
960.       turn_up unless right1(((@x * 128 + @revise_x) / 128.0).round,
     
961.                             ((@y * 128 + @revise_y) / 128.0).round, distance)
     
962.       turn_right if @event_run
     
963.       unless @event_run
     
964.         if last_move?(@real_x, @real_y, 6, distance)
     
965.           result = check_event_trigger_here([1,2], false)
     
966.           if result == true
     
967.             return
     
968.           end
     
969.         end
     
970.         move_on
     
971.         if @revise_x > SIDE and -SIDE > @revise_x - distance
     
972.           @revise_x = SIDE
     
973.         end
     
974.         turn_right unless up1(((@x * 128 + @revise_x) / 128.0).round,
     
975.                               ((@y * 128 + @revise_y) / 128.0).round, distance)
     
976.         turn_up if @event_run
     
977.       end
     
978.     end
     
979.   end
     
980.   #--------------------------------------------------------------------------
     
981.   # ● 同位置のイベント起動判定
     
982.   #--------------------------------------------------------------------------
     
983.   def check_event_trigger_here(triggers, run = true)
     
984.     result = false
     
985.     # イベント■行中の場合
     
986.     if $game_system.map_interpreter.running?
     
987.       return result
     
988.     end
     
989.     # 全イベントのループ
     
990.     for event in $game_map.events.values
     
991.       # イベントの座標とトリガーが一致した場合
     
992.       if event.x == ((@x * 128 + @revise_x) / 128.0).round and
     
993.           event.y == ((@y * 128 + @revise_y) / 128.0).round and
     
994.           triggers.include?(event.trigger)
     
995.         # ジャンプ中以外で、起動判定が同位置のイベントなら
     
996.         if not event.jumping? and event.over_trigger?
     
997.           if event.list.size > 1
     
998.             if run == true
     
999.               event.start
     
1000.             end
      
1001.             result = true
      
1002.           end
      
1003.         end
      
1004.       end
      
1005.     end
      
1006.     return result
      
1007.   end
      
1008.   #--------------------------------------------------------------------------
      
1009.   # ● 座標修正
      
1010.   #--------------------------------------------------------------------------
      
1011.   def move_on
      
1012.     if @y < (@y + @revise_y / 128.0).round
      
1013.       @y += 1
      
1014.       @revise_y -= 128
      
1015.     end
      
1016.     if @x > (@x + @revise_x / 128.0).round
      
1017.       @x -= 1
      
1018.       @revise_x += 128
      
1019.     end
      
1020.     if @x < (@x + @revise_x / 128.0).round
      
1021.       @x += 1
      
1022.       @revise_x -= 128
      
1023.     end
      
1024.     if @y > (@y + @revise_y / 128.0).round
      
1025.       @y -= 1
      
1026.       @revise_y += 128
      
1027.     end
      
1028.   end
      
1029.   #--------------------------------------------------------------------------
      
1030.   # ● アニメーションアップデート
      
1031.   #--------------------------------------------------------------------------
      
1032.   def anime_update
      
1033.     # 移動時アニメが ON の場合
      
1034.     if @walk_anime
      
1035.       # アニメカウントを 1.5 ■やす
      
1036.       @anime_count += 1.5
      
1037.     # 移動時アニメが OFF で、停止時アニメが ON の場合
      
1038.     elsif @step_anime
      
1039.       # アニメカウントを 1 ■やす
      
1040.       @anime_count += 1
      
1041.     end
      
1042.     # アニメカウントが最大■を超えた場合
      
1043.     # ※最大■は、基本■ 18 から移動速度 * 1 を引いた■
      
1044.     if @anime_count > 18 - @move_speed * 2
      
1045.       # 停止時アニメが OFF かつ 停止中の場合
      
1046.       if not @step_anime and @stop_count > 0
      
1047.         # パターンをオリジナルに■す
      
1048.         @pattern = @original_pattern
      
1049.       # 停止時アニメが ON または 移動中の場合
      
1050.       else
      
1051.         # パターンを更新
      
1052.         @pattern = (@pattern + 1) % 4
      
1053.       end
      
1054.       # アニメカウントをクリア
      
1055.       @anime_count = 0
      
1056.     end
      
1057.   end
      
1058.   #--------------------------------------------------------------------------
      
1059.   # ● 指定位置に移動
      
1060.   #--------------------------------------------------------------------------
      
1061.   # オリジナルのイベントを改名
      
1062.   alias :moveto_original :moveto
      
1063.   def moveto(x, y)
      
1064.     # 補正座標を初期化
      
1065.     @revise_x = 0
      
1066.     @revise_y = 0
      
1067.     # オリジナルのイベントを呼び出し
      
1068.     moveto_original(x, y)
      
1069.   end
      
1070.   #--------------------------------------------------------------------------
      
1071.   # ● 移動したかどうかの判定
      
1072.   #--------------------------------------------------------------------------
      
1073.   def last_move?(x, y, direction, distance)
      
1074.     if direction == 2 or direction == 6
      
1075.       distance *= -1
      
1076.     end
      
1077.     if (direction == 2 or direction == 8) and
      
1078.         (y / 128.0).round != ((y - distance) / 128.0).round
      
1079.       return true
      
1080.     end
      
1081.     if (direction == 4 or direction == 6) and
      
1082.         (x / 128.0).round != ((x - distance) / 128.0).round
      
1083.       return true
      
1084.     end
      
1085.     return false
      
1086.   end
      
1087. 
      
1088. #==============================================================================
      
1089. # ■ Game_Character (分割定義 1)
      
1090. #------------------------------------------------------------------------------
      
1091. # 　キャラクターを扱うクラスです。このクラスは Game_Player クラスと Game_Event
      
1092. # クラスのスーパークラスとして使用されます。
      
1093. #==============================================================================
      
1094. 
      
1095. class Game_Character
      
1096.   #--------------------------------------------------------------------------
      
1097.   # ● フレーム更新 (移動)
      
1098.   #--------------------------------------------------------------------------
      
1099.   def update_move
      
1100.     # 移動速度からマップ座標系での移動距離に■換
      
1101.     distance = 2 ** @move_speed
      
1102.     if @x * 128 != @real_x and @y * 128 != @real_y and Game_Player::SLANT
      
1103.       distance /= Math.sqrt(2)
      
1104.     end
      
1105.     # 論理座標が■座標より下の場合
      
1106.     if @y * 128 > @real_y
      
1107.       # 下に移動
      
1108.       @real_y = [@real_y + distance, @y * 128].min
      
1109.     end
      
1110.     # 論理座標が■座標より左の場合
      
1111.     if @x * 128 < @real_x
      
1112.       # 左に移動
      
1113.       @real_x = [@real_x - distance, @x * 128].max
      
1114.     end
      
1115.     # 論理座標が■座標より右の場合
      
1116.     if @x * 128 > @real_x
      
1117.       # 右に移動
      
1118.       @real_x = [@real_x + distance, @x * 128].min
      
1119.     end
      
1120.     # 論理座標が■座標より上の場合
      
1121.     if @y * 128 < @real_y
      
1122.       # 上に移動
      
1123.       @real_y = [@real_y - distance, @y * 128].max
      
1124.     end
      
1125.     # 移動時アニメが ON の場合
      
1126.     if @walk_anime
      
1127.       # アニメカウントを 1.5 ■やす
      
1128.       @anime_count += 1.5
      
1129.     # 移動時アニメが OFF で、停止時アニメが ON の場合
      
1130.     elsif @step_anime
      
1131.       # アニメカウントを 1 ■やす
      
1132.       @anime_count += 1
      
1133.     end
      
1134.   end
      
1135. end
      
1136. 
      
1137. #==============================================================================
      
1138. # ■ Game_Event
      
1139. #------------------------------------------------------------------------------
      
1140. # 　イベントを扱うクラスです。條件判定によるイベントページ切り替えや、並列■理
      
1141. # イベント■行などの機能を持っており、Game_Map クラスの內部で使用されます。
      
1142. #==============================================================================
      
1143. 
      
1144. class Game_Event < Game_Character
      
1145.   #--------------------------------------------------------------------------
      
1146.   # ● イベント起動
      
1147.   #--------------------------------------------------------------------------
      
1148.   def start
      
1149.     # ■行內容が空でない場合
      
1150.     if @list.size > 1
      
1151.       # $game_player.event が0でない場合
      
1152.       if $game_player.event != 0
      
1153.         # 移動速度を $game_player.event にする
      
1154.         $game_player.move_speed = $game_player.event
      
1155.       end
      
1156.       @starting = true
      
1157.     end
      
1158.   end
      
1159. end
      
1160. end
      
1161. 
      
1162. #==============================================================================
      
1163. # 本腳本來自www.66RPG.com，使用和轉載請保留此信息
      
1164. #==============================================================================
      

复制代码

這比較完善!