怎么让一个事件平滑地跟随另一事件移动

幻耶

希望让2号事件平滑地跟随1号事件平移，类似于父物体带动子物体的效果。在一个并行事件里用以下的两种脚本尝试，跟随的事件总是一卡一卡的，有延迟，即使把跟随事件的速度调到最高也没有用，怎么办？？

$game_map.events[2].moveto($game_map.events[1].x, 11)



$game_map.events[2].x = $game_map.events[1].x

芯☆淡茹水

move_to 是直接“闪”到目的地，AAA.x = ? 也是一样的效果。
要慢慢走到目的地，需要随时在跟随人物里面刷新，判断被跟随人物的坐标。
根据坐标差来决定跟随人物往哪个方向移动。

芯☆淡茹水

1. #==============================================================================
   
2. # 事件-->脚本 里写：$game_map.events[1].follow($game_map.events[2])  ，就是 1
   
3. #号事件跟随 2 号事件，要跟随玩家，把括号里面的 $game_map.events[2] 改成 $game_player 。
   
4. # 跟随者.follow(被跟随者)  。跟随事件里写 脚本 ，并且设置为 并行处理 。
   
5. #==============================================================================
   
6. class Game_Character
   
7.   #-----------------------------------------------------------------------
   
8.   def follow(target)
   
9.     sx = @x - target.x
   
10.     sy = @y - target.y
    
11.     abs_sx = sx.abs; abs_sy = sy.abs
    
12.     return if abs_sx + abs_sy < 2     #<= 坐标差小于多少就不跟随。
    
13.     # 求得差的绝对值
    
14.     abs_sx = sx.abs
    
15.     abs_sy = sy.abs
    
16.     # 横距离与纵距离相等的情况下
    
17.     if abs_sx == abs_sy
    
18.       # 随机将边数增加 1
    
19.       rand(2) == 0 ? abs_sx += 1 : abs_sy += 1
    
20.     end
    
21.     # 横侧距离长的情况下
    
22.     if abs_sx > abs_sy
    
23.       # 左右方向优先。
    
24.       sx > 0 ? move_left : move_right
    
25.       if not moving? and sy != 0
    
26.         sy > 0 ? move_up : move_down
    
27.       end
    
28.     # 竖侧距离长的情况下
    
29.     else
    
30.       # 上下方向优先。向主角移动
    
31.       sy > 0 ? move_up : move_down
    
32.       if not moving? and sx != 0
    
33.         sx > 0 ? move_left : move_right
    
34.       end
    
35.     end
    
36.   end
    
37. end
    
38. #==============================================================================

复制代码

taroxd

芯☆淡茹水 发表于 2015-1-16 16:57

并行事件什么的最讨厌了

[pre lang="ruby" line="1"]
class Game_Character

  # $game_map.events[1].follow = $game_map.events[2]
  # $game_map.events[1].follow = nil
  attr_accessor :follow

  alias_method :update_without_follow, :update

  def update
    update_without_follow
    return unless @follow
    # 把你的代码中 target 设为 @follow
  end
  
end[/pre]

幻耶

芯☆淡茹水 发表于 2015-1-16 16:57

好像效果有点区别，我希望当1号事件移动时（其实只有从左往右或从右往左平移），2号事件在其正下方一定距离，保持纵坐标的距离不变，也同1号事件一起平移

恐惧剑刃

够不够平滑？？？哈哈哈哈哈
比角色跟随平滑NNN倍

幻耶

恐惧剑刃 发表于 2015-1-18 18:04
够不够平滑？？？哈哈哈哈哈
比角色跟随平滑NNN倍

为什么总是报有毒？

幻耶

恐惧剑刃 发表于 2015-1-18 18:04
够不够平滑？？？哈哈哈哈哈
比角色跟随平滑NNN倍

我的意思是：假设事件1是一个喷火怪物，事件2是用来显示喷火动画的，事件1会在地图上一边喷火一边左右平移，事件2始终与之保持一定纵向距离平滑跟随。

因为事件1的行走图太大而火焰动画太长导致直接用事件1显示喷火动画会错位，所以想两个事件拼接起来

恐惧剑刃

幻耶 发表于 2015-1-18 20:38
我的意思是：假设事件1是一个喷火怪物，事件2是用来显示喷火动画的，事件1会在地图上一边喷火一边左右平 ...

以前写的

1. #==============================================================================
   
2. # ■ Game_Character (分割定义 4)
   
3. #------------------------------------------------------------------------------
   
4. # 　处理角色的类。本类作为 Game_Player 类与 Game_Event
   
5. # 类的超级类使用。
   
6. #==============================================================================
   
7. 
   
8. class Game_Character
   
9.   #--------------------------------------------------------------------------
   
10.   # ● 接近
    
11.   #--------------------------------------------------------------------------
    
12.   # 使用方法 ：
    
13.   # 事件=>设置移动路线=>脚本=>输入=>toward(目标的X坐标, 目标的Y坐标)
    
14.   # 可以单方向接近，只需把“目标的X坐标”或者“目标的Y坐标”传nil就可以
    
15.   #--------------------------------------------------------------------------
    
16.   # 目标的X既可以是主角也可以是事件甚至可以是纯坐标
    
17.   # 主角的X坐标 $game_player.x
    
18.   # 主角的Y坐标 $game_player.y
    
19.   # 事件的X坐标 $game_map.events[事件的id].x
    
20.   # 事件的T坐标 $game_map.events[事件的id].y
    
21.   #--------------------------------------------------------------------------
    
22.   def toward(x = nil, y = nil)
    
23.     return if x == nil and y == nil
    
24.     if x == nil
    
25.       # 求坐标差
    
26.       sy = @y - y
    
27.       return if sy == 0
    
28.       sy > 0 ? move_up : move_down
    
29.     elsif y == nil
    
30.       # 求坐标差
    
31.       sx = @x - x
    
32.       return if sx == 0
    
33.       sx > 0 ? move_left : move_right
    
34.     else
    
35.       # 求坐标差
    
36.       sx = @x - x
    
37.       sy = @y - y
    
38.       
    
39.       # 绝对值
    
40.       abs_sx = sx.abs
    
41.       abs_sy = sy.abs
    
42.       
    
43.       return if abs_sx <= 1 and abs_sy <= 1
    
44.       
    
45.       # 横距离与纵距离相等的情况下
    
46.       if abs_sx == abs_sy
    
47.         # 随机将边数增加 1
    
48.         rand(2) == 0 ? abs_sx += 1 : abs_sy += 1
    
49.       end
    
50.       # 横侧距离长的情况下
    
51.       if abs_sx > abs_sy
    
52.         # 左右方向优先。向主角移动
    
53.         sx > 0 ? move_left : move_right
    
54.         if not moving? and sy != 0
    
55.           sy > 0 ? move_up : move_down
    
56.         end
    
57.       # 竖侧距离长的情况下
    
58.       else
    
59.         # 上下方向优先。向主角移动
    
60.         sy > 0 ? move_up : move_down
    
61.         if not moving? and sx != 0
    
62.           sx > 0 ? move_left : move_right
    
63.         end
    
64.       end
    
65.     end
    
66.    
    
67.    
    
68.   end
    
69. end

复制代码

幻耶

恐惧剑刃 发表于 2015-1-18 20:57
以前写的

这样？在事件2并行事件里设置移动路线：脚本  toward($game_map.events[1].x, nil)

假设事件2始终保持与事件1的X坐标差保持0不变，并且事件2始终与事件1的Y坐标差保持5不变