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 6208
21 전투 ABS_v3액션 알피지 46 file 알피지GM 2010.03.07 5808
20 전투 액알 스크립트 24 백호 2009.02.22 6019
19 HUD 주인공,NPC이름 머리 나타내기 49 file 송긔 2010.11.28 6073
18 액터 시트르산의 XP용 감정 말풍선 표시 스크립트 37 file 시트르산 2011.01.25 6118
17 이름입력 케릭터 위에 또는 NPC 위에 이름 뛰우기 [헬악이님 제공] 49 file 아방스 2007.11.09 6415
16 온라인 Mr.Metring NPE 1.0 [RPG XP 온라인 스크립트] 35 아방스 2009.01.07 6536
15 그래픽 화면을 부드럽게 해주는스크립트[ 아주 유용] 56 file - 하늘 - 2009.08.05 6570
14 메뉴 온라인메뉴처럼!! 메이플 메뉴처럼!! 변신~스크립트 33 WMN 2008.03.17 6826
13 전투 [신기술 체험] 강회된 횡스크롤 액알 13 file 백호 2009.02.22 6843
12 스킬 ABP액알 v1.2 스킬추가, 버그수정판 36 file 백호 2009.02.22 6920
11 메시지 대화창에 얼굴 그래픽 띠우기 73 아방스 2007.11.09 7120
10 메뉴 메이플스토리처럼 메뉴를^^ 57 file 딸기님 2010.07.13 7151
9 온라인 넷플레이1.7.0+abs5.5+한챗 49 쀍뛝쒧 2009.01.24 7289
8 이름입력 대화창에 얼굴, 이름 띄우기 37 킬라롯 2008.11.09 7497
7 전투 [액알]neo_a-rpg_module_1[1][1].2 스크립트 83 file 은빛바람 2009.10.03 8309
6 온라인 광넷[ 광땡 온라인 + 넷플레이 ] 62 - 하늘 - 2009.08.02 9003
5 온라인 온라인 스크립트 Unis Net RMXP 공식 배포! 25 file 뮤바보 2011.12.25 9407
4 맵/타일 [유니크급] RPG XP 게임을 3D화로 보자! Neo Mode7 script / 52 file 쉴더 2009.02.28 9450
3 온라인 RPG 만들기 xp 온라인 스크립트 33 아방스 2007.11.09 9602
2 온라인 채팅 가능 온라인 스크립트 배포 107 file 아방스 2009.01.03 10686
Board Pagination Prev 1 ... 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 Next
/ 52