发一个制作横版过关游戏的脚本

pipilu

说明：来自国外的脚本。上行键跳跃，A键跳得更高。

因为当初看到的时候是乱码，怀着资源共享的激动发到幻森，根本没想到别的，所产生的误会请大家谅解。

1. # ▼▲▼ XRXS50. Action-Maps XC. ▼▲▼ built 033010
2. # by 桜雅 在土
4. #==============================================================================
5. # □ カスタマイズポイント
6. #==============================================================================
7. class XRXS50
8. #
9. # Action-Maps を稼動させるマップIDの配列
10. #
11. ENABLE_FULL_ACTY_MAPS = [1, 2]
12. #
13. # 「斜め降下」
14. #
15. ENABLE_SLIDE_DESCENT = true
16. #
17. # 向きジャンプ(true  : 向いている方向へジャンプ。
18. #              false : キーが押されている方向へジャンプ。)
19. #
20. JUMP_AS_KEY = false
21. end
22. #==============================================================================
23. # ■ Game_Player
24. #==============================================================================
25. class Game_Player < Game_Character
26. #--------------------------------------------------------------------------
27. # ○ 公開インスタンス変数
28. #--------------------------------------------------------------------------
29. # 既存
30. attr_writer   :direction_fix
31. attr_accessor :walk_anime
32. # 新規
33. attr_accessor :now_jumps
34. attr_writer   :xrxs50_direction_sidefix
35. #--------------------------------------------------------------------------
36. # ○ 最大ジャンプ回数
37. #--------------------------------------------------------------------------
38. def max_jumps
39.    return 1
40. end
41. #--------------------------------------------------------------------------
42. # ● 左を向く
43. #--------------------------------------------------------------------------
44. alias xrxs50_turn_left turn_left
45. def turn_left
46.    if @xrxs50_direction_sidefix
47.      @direction = 4
48.    else
49.      xrxs50_turn_left
50.    end
51. end
52. #--------------------------------------------------------------------------
53. # ● 右を向く
54. #--------------------------------------------------------------------------
55. alias xrxs50_turn_right turn_right
56. def turn_right
57.    if @xrxs50_direction_sidefix
58.      @direction = 6
59.    else
60.      xrxs50_turn_right
61.    end
62. end
63. end
64. #==============================================================================
65. # ■ Scene_Map
66. #==============================================================================
67. class Scene_Map
68. #--------------------------------------------------------------------------
69. # ● メイン処理
70. #--------------------------------------------------------------------------
71. alias xrxs50_main main
72. def main
73.    # チェック
74.    xrxs50_enable_check
75.    # 呼び戻す
76.    xrxs50_main
77. end
78. #--------------------------------------------------------------------------
79. # ● フレーム更新
80. #--------------------------------------------------------------------------
81. alias xrxs50_update update
82. def update
83.    # 呼び戻す
84.    xrxs50_update
85.    # フレーム更新 (座標系更新)
86.    if @xrxs50_enable
87.      update_coordinates
88.    end
89. end
90. #--------------------------------------------------------------------------
91. # ○ フレーム更新 (座標系更新)
92. #--------------------------------------------------------------------------
93. def update_coordinates
94.    if $game_player.passable?($game_player.x,$game_player.y,2)
95.      unless $game_player.moving?
96.        if XRXS50::ENABLE_SLIDE_DESCENT and
97.           Input.press?(Input::RIGHT) and
98.           $game_player.passable?($game_player.x,$game_player.y+1,6)
99.          $game_player.move_lower_right
100.        elsif XRXS50::ENABLE_SLIDE_DESCENT and
101.              Input.press?(Input::LEFT) and
102.              $game_player.passable?($game_player.x,$game_player.y+1,4)
103.          $game_player.move_lower_left
104.        else
105.          $game_player.move_down
106.        end
107.      end
108.    else
109.      $game_player.move_down
110.      $game_player.walk_anime = true unless $game_player.walk_anime
111.      $game_player.now_jumps  = 0
112.      if Input.trigger?(Input::X) and
113.         $game_player.now_jumps < $game_player.max_jumps
114.        if XRXS50::JUMP_AS_KEY
115.          direction = $game_player.direction == 4 ? -1 : 1
116.        else
117.          if Input.press?(Input::RIGHT)
118.            direction = 1
119.          elsif Input.press?(Input::LEFT)
120.            direction = -1
121.          else
122.            direction = 0
123.          end
124.        end
125.        $game_player.jump(direction, -2)
126.        $game_player.now_jumps += 1
127.        $game_player.walk_anime = false
128.      end
129.    end
130. end
131. #--------------------------------------------------------------------------
132. # ● プレイヤーの場所移動
133. #--------------------------------------------------------------------------
134. alias xrxs50_transfer_player transfer_player
135. def transfer_player
136.    # 呼び戻す
137.    xrxs50_transfer_player
138.    # チェック
139.    xrxs50_enable_check
140. end
141. #--------------------------------------------------------------------------
142. # ○ XRXS50 が稼動するか判定
143. #--------------------------------------------------------------------------
144. def xrxs50_enable_check
145.    if XRXS50::ENABLE_FULL_ACTY_MAPS.include?($game_map.map_id)
146.      $game_player.now_jumps = 0 if $game_player.now_jumps.nil?
147.      @xrxs50_enable = true
148.      $game_player.direction_fix = true
149.      $game_player.xrxs50_direction_sidefix = true
150.    else
151.      @xrxs50_enable = false
152.      $game_player.direction_fix = false
153.      $game_player.xrxs50_direction_sidefix = false
154.    end
155. end
156. end

复制代码

FantasyDR

可惜注释都花掉了。

dzfcfi

乱码!截个图老看看!

pipilu

乱码不影响使用。

FantasyDR

汗……楼上的就没有明白么……注释里面是关于脚本的说明，以及作者的个人信息，这样相当于无端转载了。

虽说不影响使用，但是亦不要作出无所谓的样子。况且，有注释说明的代码更有助于游戏制作……

找了个原本的，方便的话，楼主编辑了你的顶帖吧。而且，代码要放在［ｃｏｄｅ］［／ｃｏｄｅ］标签之间，这样才能保证代码中的符号不被论坛错误识别。

2. # ▼▲▼ XRXS50. Action-Maps XC. ▼▲▼ built 033010
3. # by 桜雅 在土
5. #==============================================================================
6. # □ カスタマイズポイント
7. #==============================================================================
8. class XRXS50
9. #
10. # Action-Maps を稼動させるマップIDの配列
11. #
12. ENABLE_FULL_ACTY_MAPS = [1, 2]
13. #
14. # 「斜め降下」
15. #
16. ENABLE_SLIDE_DESCENT = true
17. #
18. # 向きジャンプ(true  : 向いている方向へジャンプ。
19. #              false : キーが押されている方向へジャンプ。)
20. #
21. JUMP_AS_KEY = false
22. end
23. #==============================================================================
24. # ■ Game_Player
25. #==============================================================================
26. class Game_Player < Game_Character
27. #--------------------------------------------------------------------------
28. # ○ 公開インスタンス変数
29. #--------------------------------------------------------------------------
30. # 既存
31. attr_writer   :direction_fix
32. attr_accessor :walk_anime
33. # 新規
34. attr_accessor :now_jumps
35. attr_writer   :xrxs50_direction_sidefix
36. #--------------------------------------------------------------------------
37. # ○ 最大ジャンプ回数
38. #--------------------------------------------------------------------------
39. def max_jumps
40.    return 1
41. end
42. #--------------------------------------------------------------------------
43. # ● 左を向く
44. #--------------------------------------------------------------------------
45. alias xrxs50_turn_left turn_left
46. def turn_left
47.    if @xrxs50_direction_sidefix
48.      @direction = 4
49.    else
50.      xrxs50_turn_left
51.    end
52. end
53. #--------------------------------------------------------------------------
54. # ● 右を向く
55. #--------------------------------------------------------------------------
56. alias xrxs50_turn_right turn_right
57. def turn_right
58.    if @xrxs50_direction_sidefix
59.      @direction = 6
60.    else
61.      xrxs50_turn_right
62.    end
63. end
64. end
65. #==============================================================================
66. # ■ Scene_Map
67. #==============================================================================
68. class Scene_Map
69. #--------------------------------------------------------------------------
70. # ● メイン処理
71. #--------------------------------------------------------------------------
72. alias xrxs50_main main
73. def main
74.    # チェック
75.    xrxs50_enable_check
76.    # 呼び戻す
77.    xrxs50_main
78. end
79. #--------------------------------------------------------------------------
80. # ● フレーム更新
81. #--------------------------------------------------------------------------
82. alias xrxs50_update update
83. def update
84.    # 呼び戻す
85.    xrxs50_update
86.    # フレーム更新 (座標系更新)
87.    if @xrxs50_enable
88.      update_coordinates
89.    end
90. end
91. #--------------------------------------------------------------------------
92. # ○ フレーム更新 (座標系更新)
93. #--------------------------------------------------------------------------
94. def update_coordinates
95.    if $game_player.passable?($game_player.x,$game_player.y,2)
96.      unless $game_player.moving?
97.        if XRXS50::ENABLE_SLIDE_DESCENT and
98.           Input.press?(Input::RIGHT) and
99.           $game_player.passable?($game_player.x,$game_player.y+1,6)
100.          $game_player.move_lower_right
101.        elsif XRXS50::ENABLE_SLIDE_DESCENT and
102.              Input.press?(Input::LEFT) and
103.              $game_player.passable?($game_player.x,$game_player.y+1,4)
104.          $game_player.move_lower_left
105.        else
106.          $game_player.move_down
107.        end
108.      end
109.    else
110.      $game_player.move_down
111.      $game_player.walk_anime = true unless $game_player.walk_anime
112.      $game_player.now_jumps  = 0
113.      if Input.trigger?(Input::X) and
114.         $game_player.now_jumps < $game_player.max_jumps
115.        if XRXS50::JUMP_AS_KEY
116.          direction = $game_player.direction == 4 ? -1 : 1
117.        else
118.          if Input.press?(Input::RIGHT)
119.            direction = 1
120.          elsif Input.press?(Input::LEFT)
121.            direction = -1
122.          else
123.            direction = 0
124.          end
125.        end
126.        $game_player.jump(direction, -2)
127.        $game_player.now_jumps += 1
128.        $game_player.walk_anime = false
129.      end
130.    end
131. end
132. #--------------------------------------------------------------------------
133. # ● プレイヤーの場所移動
134. #--------------------------------------------------------------------------
135. alias xrxs50_transfer_player transfer_player
136. def transfer_player
137.    # 呼び戻す
138.    xrxs50_transfer_player
139.    # チェック
140.    xrxs50_enable_check
141. end
142. #--------------------------------------------------------------------------
143. # ○ XRXS50 が稼動するか判定
144. #--------------------------------------------------------------------------
145. def xrxs50_enable_check
146.    if XRXS50::ENABLE_FULL_ACTY_MAPS.include?($game_map.map_id)
147.      $game_player.now_jumps = 0 if $game_player.now_jumps.nil?
148.      @xrxs50_enable = true
149.      $game_player.direction_fix = true
150.      $game_player.xrxs50_direction_sidefix = true
151.    else
152.      @xrxs50_enable = false
153.      $game_player.direction_fix = false
154.      $game_player.xrxs50_direction_sidefix = false
155.    end
156. end
157. end

复制代码

FantasyDR

没有考虑加速度,所以有点飘的感觉.
斜上跳落地时变成垂直了,有点撞到东西的感觉.

PS:RM是32象素一个格子的吧?