找人转移act横版脚本、

yangff

看看，米悬赏，不管 {/gg}

yangff

开玩笑的。。。
我试试

雪流星

以下引用yangff于2008-6-3 12:32:15的发言：
开玩笑的。。。
我试试

做好了發在技術區
我來發布

yangff

做好了
版本：0.1
bug超多（确切地说是极不顺手，特别是连跳系统，按一下就飞天上去了（3连跳 {/gg}）
代码如下（暂时不要发布，希望能有人解决掉这些不是bug的bug）

1. #代码段1
   
2. #==============================================================================
   
3. # ■ Game_Character
   
4. #------------------------------------------------------------------------------
   
5. # 　处理角色的类。本类作为 Game_Player 类与 Game_Event 类的超级类使用。
   
6. #==============================================================================
   
7. 
   
8. class Game_Character
   
9.   #--------------------------------------------------------------------------
   
10.   # ● 向上移动
    
11.   #     turn_ok : 允许当场转向
    
12.   #--------------------------------------------------------------------------
    
13.   def move_up(turn_ok = true,act = false)
    
14.     if passable?(@x, @y-1)                  # 可通行的场合
    
15.       turn_up if turn_ok
    
16.       @y = $game_map.round_y(@y-1)
    
17.       @real_y = (@y+1)*256
    
18.       increase_steps if not act
    
19.       check_event_trigger_touch(@x, @y-1) if act  # 是否触发接触事件
    
20.       @move_failed = false
    
21.     else                                    # 不可通行的场合
    
22.       turn_up if turn_ok
    
23.       check_event_trigger_touch(@x, @y-1)   # 是否触发接触事件
    
24.       @move_failed = true
    
25.     end
    
26.   end
    
27.   #--------------------------------------------------------------------------
    
28.   # ● 向下移动
    
29.   #     turn_ok : 允许当场转向
    
30.   #--------------------------------------------------------------------------
    
31.   def move_down(turn_ok = true,act = false)
    
32.     if passable?(@x, @y+1)                  # 可通行的场合
    
33.       turn_down if turn_ok
    
34.       @y = $game_map.round_y(@y+1)
    
35.       @real_y = (@y-1)*256
    
36.       increase_steps if not act
    
37.       check_event_trigger_touch(@x, @y-1) if act
    
38.       @move_failed = false
    
39.     else                                    # 不可通行的场合
    
40.       turn_down if turn_ok
    
41.       check_event_trigger_touch(@x, @y+1)   # 是否触发接触事件
    
42.       @move_failed = true
    
43.     end
    
44.   end
    
45. 
    
46. end
    

复制代码

1. #代码段2
   
2. $use = false #脚本开关
   
3. $airjump = 2  #空中连跳
   
4. $hight = 3
   
5. #==============================================================================
   
6. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
   
7. #==============================================================================
   
8. #==============================================================================
   
9. # ■ Game_Player
   
10. #------------------------------------------------------------------------------
    
11. # 　处理主角的类。事件启动的判定、以及地图的滚动等功能。
    
12. # 本类的实例请参考 $game_player。
    
13. #==============================================================================
    
14. 
    
15. class Game_Player < Game_Character
    
16.   #--------------------------------------------------------------------------
    
17.   # ● 常量
    
18.   #--------------------------------------------------------------------------
    
19.   CENTER_X = (544 / 2 - 16) * 8     # 画面中央 X 座标 * 8
    
20.   CENTER_Y = (416 / 2 - 16) * 8     # 画面中央 Y 座标 * 8
    
21.   #--------------------------------------------------------------------------
    
22.   # ● 定义实例变量
    
23.   #--------------------------------------------------------------------------
    
24.   attr_reader   :vehicle_type       # 目前乘坐交通工具类型
    
25.   #--------------------------------------------------------------------------
    
26.   # ● 初始化对像
    
27.   #--------------------------------------------------------------------------
    
28.   def initialize
    
29.     super
    
30.     @vehicle_type = -1
    
31.     @vehicle_getting_on = false     # 乘坐交通工具标志
    
32.     @vehicle_getting_off = false    # 离开交通工具标志
    
33.     @transferring = false           # 场所移动标志
    
34.     @new_map_id = 0                 # 目标地图 ID
    
35.     @new_x = 0                      # 目标 X 座标
    
36.     @new_y = 0                      # 目标 Y 座标
    
37.     @new_direction = 0              # 移动後方向
    
38.     @walking_bgm = nil              # 记忆用行走时 BGM
    
39.     @line_jp = 0
    
40.     @cont = 2
    
41.   end
    
42. 
    
43.   #--------------------------------------------------------------------------
    
44.   # ● 方向键移动处理
    
45.   #--------------------------------------------------------------------------
    
46.   def move_by_input
    
47.     if $use == false
    
48.       return unless movable?
    
49.       return if $game_map.interpreter.running?
    
50.       case Input.dir4
    
51.         when 2;  move_down
    
52.         when 4;  move_left
    
53.         when 6;  move_right
    
54.         when 8;  move_up
    
55.       end
    
56.     end
    
57.     if $use and @vehicle_type == -1
    
58.       return if $game_map.interpreter.running?
    
59.       if Input.dir4 == 8 and @line_jp <= $airjump
    
60.         up1
    
61.         @line_jp += 1
    
62.       end
    
63.       
    
64.       @cont -=1  
    
65.       return unless movable?
    
66.       case Input.dir4
    
67.         #when 2;  move_down
    
68.         when 4;  move_left
    
69.         when 6;  move_right#
    
70.         
    
71.           #when 8;  up1#up1
    
72.       end
    
73.       
    
74.       if passable?(@x, @y+1) #and @cont <= 0
    
75.         move_down(false,true)
    
76.         check_event_trigger_here([0])
    
77.         check_event_trigger_there([0,1,2])
    
78.         @cont = 1
    
79.       else
    
80.         if @line_jp > 0
    
81.           @line_jp = 0
    
82.         end
    
83.       end
    
84. 
    
85.     end
    
86.   end
    
87.     def up1
    
88.               for i in 1..$hight
    
89.             move_up(false,true)
    
90.             check_event_trigger_here([0])
    
91.             check_event_trigger_there([0,1,2])
    
92.           end
    
93. 
    
94.   end
    
95. 
    
96. end
    
97. #==============================================================================
    
98. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
    
99. #==============================================================================
    

复制代码

[/code]

雪流星

等你做好了PM我

yangff

以下引用snstar2006于2008-6-3 14:20:23的发言：

等你做好了PM我

问题是,不知道怎么做了.
以我的程度,改不下去了 {/gg}

越前リョーマ

希望能有一个完整的版本出现……

yangff

有一个比较严重的问题,事件触发有问题