XP 스크립트

#########################
#하늘을날아 #################
#########################
#퍼온것이다~

#==============================================================================
# □ カスタマイズポイント
#==============================================================================
class XRXS50
  #
  # Action-Maps を稼動させるマップIDの配列
  #
  ENABLE_FULL_ACTY_MAPS = [1, 2]
  #
  # 「斜め降下」
  #
  ENABLE_SLIDE_DESCENT = true
  #
  # 向きジャンプ(true  : 向いている方向へジャンプ。
  #              false : キーが押されている方向へジャンプ。)
  #
  JUMP_AS_KEY = false
end
#==============================================================================
# ■ Game_Player
#==============================================================================
class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # ○ 公開インスタンス変数
  #--------------------------------------------------------------------------
  # 既存
  attr_writer  :direction_fix
  attr_accessor :walk_anime
  # 新規
  attr_accessor :now_jumps
  attr_writer  :xrxs50_direction_sidefix
  #--------------------------------------------------------------------------
  # ○ 最大ジャンプ回数
  #--------------------------------------------------------------------------
  def max_jumps
    return 1
  end
  #--------------------------------------------------------------------------
  # ● 左を向く
  #--------------------------------------------------------------------------
  alias xrxs50_turn_left turn_left
  def turn_left
    if @xrxs50_direction_sidefix
      @direction = 4
    else
      xrxs50_turn_left
    end
  end
  #--------------------------------------------------------------------------
  # ● 右を向く
  #--------------------------------------------------------------------------
  alias xrxs50_turn_right turn_right
  def turn_right
    if @xrxs50_direction_sidefix
      @direction = 6
    else
      xrxs50_turn_right
    end
  end
end
#==============================================================================
# ■ Scene_Map
#==============================================================================
class Scene_Map
  #--------------------------------------------------------------------------
  # ● メイン処理
  #--------------------------------------------------------------------------
  alias xrxs50_main main
  def main
    # チェック
    xrxs50_enable_check
    # 呼び戻す
    xrxs50_main
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias xrxs50_update update
  def update
    # 呼び戻す
    xrxs50_update
    # フレーム更新 (座標系更新)
    if @xrxs50_enable
      update_coordinates
    end
  end
  #--------------------------------------------------------------------------
  # ○ フレーム更新 (座標系更新)
  #--------------------------------------------------------------------------
  def update_coordinates
    if $game_player.passable?($game_player.x,$game_player.y,2)
      unless $game_player.moving?
        if XRXS50::ENABLE_SLIDE_DESCENT and
          Input.press?(Input::RIGHT) and
          $game_player.passable?($game_player.x,$game_player.y+1,6)
          $game_player.move_lower_right
        elsif XRXS50::ENABLE_SLIDE_DESCENT and
              Input.press?(Input::LEFT) and
              $game_player.passable?($game_player.x,$game_player.y+1,4)
          $game_player.move_lower_left
        else
          $game_player.move_down
        end
      end
    else
      $game_player.move_down
      $game_player.walk_anime = true unless $game_player.walk_anime
      $game_player.now_jumps  = 0
      if Input.trigger?(Input::X) and
        $game_player.now_jumps < $game_player.max_jumps
        if XRXS50::JUMP_AS_KEY
          direction = $game_player.direction == 4 ? -1 : 1
        else
          if Input.press?(Input::RIGHT)
            direction = 1
          elsif Input.press?(Input::LEFT)
            direction = -1
          else
            direction = 0
          end
        end
        $game_player.jump(direction, -2)
        $game_player.now_jumps += 1
        $game_player.walk_anime = false
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● プレイヤーの場所移動
  #--------------------------------------------------------------------------
  alias xrxs50_transfer_player transfer_player
  def transfer_player
    # 呼び戻す
    xrxs50_transfer_player
    # チェック
    xrxs50_enable_check
  end
  #--------------------------------------------------------------------------
  # ○ XRXS50 が稼動するか判定
  #--------------------------------------------------------------------------
  def xrxs50_enable_check
    if XRXS50::ENABLE_FULL_ACTY_MAPS.include?($game_map.map_id)
      $game_player.now_jumps = 0 if $game_player.now_jumps.nil?
      @xrxs50_enable = true
      $game_player.direction_fix = true
      $game_player.xrxs50_direction_sidefix = true
    else
      @xrxs50_enable = false
      $game_player.direction_fix = false
      $game_player.xrxs50_direction_sidefix = false
    end
  end
end
#점프키 a

Who's 백호

?

이상혁입니다.

http://elab.kr

Comment '7'

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 6153
114 전투 사이트뷰 전투 스크립트 (CBS R1) 8 file 백호 2009.02.21 3498
113 전투 시뮬레이션 턴알 3 file 백호 2009.02.21 3054
112 전투 A-battle 수정 file 백호 2009.02.21 1155
» 전투 횡스크롤형식의 스크립트 7 백호 2009.02.21 2972
110 전투 전투 관련 횟수 취득 스크립트 백호 2009.02.21 783
109 전투 SBABS게이지바 file 백호 2009.02.21 2285
108 전투 전투후 경험치 분배와 레벨업시 HP/SP 전회복 15 백호 2009.02.21 2377
107 전투 심플액알 더더 수정(스위치, 변수) 17 file 백호 2009.02.21 3046
106 전투 Single/All Target Switching by RPG Advocate 백호 2009.02.22 816
105 전투 위치보정스크립트 한글화 1 백호 2009.02.22 922
104 전투 Star Ocean Battle System 3 file 백호 2009.02.22 1228
103 전투 펫 시스템(ABS 3.4v포함) 23 file 백호 2009.02.22 3459
102 전투 전투배경확장 한글 3 백호 2009.02.22 1472
101 전투 SBABS v4 (A-RPG) 5 file 백호 2009.02.22 2055
100 전투 Custom Debugger, Battle Debugger by RPG Advocate file 백호 2009.02.22 1248
99 전투 RTAB방식의 CBS 스크립트 Final-2 5 file 백호 2009.02.22 1943
98 전투 자동전투 from RPG 쯔꾸르 XP RGSS Wiki 1 file 백호 2009.02.22 2621
97 전투 ATB시스템 입니다. [스샷 첨부] 17 백호 2009.02.22 4182
96 전투 Advanced Limit Breaks (KGC스크립트를 SDK호환용으로 손질한 것) 백호 2009.02.22 1214
95 전투 배틀샵 스크립트 1 백호 2009.02.22 1126
Board Pagination Prev 1 2 3 4 5 6 7 8 9 Next
/ 9