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 6189
821 장비 장비창을 다른거로 바꾸기 [헬악이님 제공] 10 file 아방스 2007.11.09 3051
820 전투 심플액알 더더 수정(스위치, 변수) 17 file 백호 2009.02.21 3046
819 타이틀/게임오버 게임오버 화면 에서 커맨드 윈도우 스크립트 12 file 백호 2009.02.21 3031
818 메뉴 제가 쓰고있는 메뉴 13 file 백호 2009.02.21 3030
817 키입력 AInput Module 3.10 by vgvgf (전체키, 마우스 입력) 6 file Alkaid 2010.09.01 3030
816 전투 GTBS 1.4 스크립트 9 아방스 2009.02.05 3028
815 메뉴 링 메뉴 소지금,플레이시간 추가 버젼 17 Neowitch* 2008.04.20 3022
814 메시지 한글자씩 뜨는 스크립트 6 백호 2009.02.21 3003
813 아이템 아이템획득스크립트 ps인간 2009.01.23 2993
812 HUD 맵이름 넣기(bs님의 강의랑 다르게 스크립트로) 16 file 아방스 2007.11.09 2982
» 전투 횡스크롤형식의 스크립트 7 백호 2009.02.21 2980
810 전투 CTB by Charlie Fleed 3.1 - FF10 스타일의 전투시스템 6 Alkaid 2010.09.10 2975
809 이동 및 탈것 캐릭터 이동 프레임? 증가 스크립트 9 백호 2009.02.21 2971
808 아이템 [신기술 체험] 인벤토리 8 file 백호 2009.02.22 2963
807 맵/타일 World Map version 1.2 11 백호 2009.02.22 2962
806 메뉴 메뉴 단축키 스크립트 14 백호 2009.02.22 2960
805 그래픽 WhiteFlute - BitmapEX 4 file JACKY 2012.12.10 2954
804 메뉴 Mog-메뉴업그레이드? ps인간 2009.01.23 2948
803 전투 Mr.mo's SBABS Lite 5 6 아방스마니아 2010.11.14 2947
802 HUD 맵 이름을 표시해주는 스크립트입니다. 25 임희성 2011.02.12 2940
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 ... 52 Next
/ 52