如何做到飞鸟到了夜间时回巢休息的效果？

文雅夕露

这是个飞鸟的事件，白天的时候就是在地图上随机飞行。



但到了夜间，变量等于3的时候就会回巢（地图固定的位置）休息。
因为随机移动的影响所以无法计算它具体的位置，
请教该怎么设置才能实现效果？

yang1zhi

使用自动寻路脚本，论坛应该可以搜索得到。
不过事件要是多，地图要是大，是会变卡的。

guoxiaomi

飞鸟应该是穿透的，所以不需要寻路，直接飞到目的地就OK。
关于自定义路线的方法：
先写这样的一个函数，具体的内容照抄 move_toward_player，

1. 
   
2. class Game_Character
   
3.   def move_toward_pos(x, y)
   
4.     ...
   
5.   end
   
6. end
   

复制代码

然后设置事件的移动模式：自定义，脚本：move_toward_pos(10, 10)

就会飞回 10, 10 的位置，同样也可以在里面进行一些其他的路线设置。

SailCat

事件向移动呗

事件向移动：使用方法为，将移动路线改为自定义，然后在脚本里写"move_type_toward_event(事件ID)
那个事件ID就是你的巢穴ID，它会自己回去的，因为鸟是穿透的

[pre lang="ruby"]class Game_Character
  #--------------------------------------------------------------------------
  # ● 移动类型 : 接近事件
  #    event_id : 事件编号
  #--------------------------------------------------------------------------
  def move_type_toward_event(event_id, sight = 20, ai = 6)
    # 求得与事件坐标的差
    sx = @x - $game_map.events[event_id].x
    sy = @y - $game_map.events[event_id].y
    # 求得差的绝对值
    abs_sx = sx > 0 ? sx : -sx
    abs_sy = sy > 0 ? sy : -sy
    # 如果方圆超过了视野
    if abs_sx ** 2 + abs_sy ** 2 >= sight ** 2
      # 随机
      move_random
      return
    end
    # 随机 0～5 的分支
    case rand(ai)
    when 0..3  # 接近事件
      move_toward_event(event_id)
    when 4  # 随机
      move_random
    when 5  # 前进一步
      move_forward
    end
  end
  #--------------------------------------------------------------------------
  # ● 接近事件
  #    event_id : 事件编号
  #--------------------------------------------------------------------------
  def move_toward_event(event_id)
    # 求得与事件的坐标差
    sx = @x - $game_map.events[event_id].x
    sy = @y - $game_map.events[event_id].y
    # 坐标相等情况下
    if sx == 0 and sy == 0
      return
    end
    # 求得差的绝对值
    abs_sx = sx.abs
    abs_sy = sy.abs
    # 横距离与纵距离相等的情况下
    if abs_sx == abs_sy
      # 随机将边数增加 1
      rand(2) == 0 ? abs_sx += 1 : abs_sy += 1
    end
    # 横侧距离长的情况下
    if abs_sx > abs_sy
      # 左右方向优先。向事件移动
      sx > 0 ? move_left : move_right
      if not moving? and sy != 0
        sy > 0 ? move_up : move_down
      end
    # 竖侧距离长的情况下
    else
      # 上下方向优先。向事件移动
      sy > 0 ? move_up : move_down
      if not moving? and sx != 0
        sx > 0 ? move_left : move_right
      end
    end
  end
end[/pre]

defisym

没有必要处理的那么复杂
判定主角和鸟巢的距离，在小于一定阈值的时候在夜晚的时候将白天的鸟儿销毁（保险起见可以先让他们远离主角移动）
同时在主角刚好看不见的地方创建归巢的鸟儿（移动），由于创建的点是你手动设定的，所以移动路线也是可以手动设定的，只需要设定两到三个起始位置和回家路线并且随机调用即可
合理调整阈值就可以了，这种处理方式相对来说要更加节约机能，实现起来也更简单一些
当然遇到那种无聊一直追着鸟走的就没办法了（比如说我（逃）

yang1zhi

简单点的就是显示个切换时间的图片，然后把白天的事件全都消掉，然后图片消失

芯☆淡茹水

    这个效果有点233，

随手改造了一下：
[pre lang="ruby"]#==============================================================================
class Game_Event < Game_Character
  #变量ID
  VAR_ID = 1
  #变量值（大于或等于：停止）
  VAR_NUM = 3
  #--------------------------------------------------------------------------
  def is_bird?
    return false if @list.nil? || @list[0].code != 108
    return @list[0].parameters[0].match(/<Location:(\S+)>/) != nil
  end
  #--------------------------------------------------------------------------
  def target_location
    return [0,0] if @list.nil? || @list[0].code != 108
    return [0,0] if !@list[0].parameters[0].match(/<Location:(\S+)>/)
    data = $1.split(",")
    return [data[0].to_i,data[1].to_i]
  end
  #--------------------------------------------------------------------------
  def land?
    return is_bird? && $game_variables[VAR_ID] >= VAR_NUM
  end
end
#==============================================================================
class Game_Character
  #--------------------------------------------------------------------------
  alias xrdata_move_type_random move_type_random
  def move_type_random
    if self.is_a?(Game_Event) && land?
      moveto_target
      return
    end
    xrdata_move_type_random
  end
  #--------------------------------------------------------------------------
  def moveto_target
    sx = @x - target_location[0]
    sy = @y - target_location[1]
    # 坐标相等情况下
    if sx == 0 and sy == 0
      key = [$game_map.map_id, @id, "A"]
      $game_self_switches[key] = $game_map.need_refresh = true
      return
    end
    # 求得差的绝对值
    abs_sx = sx.abs
    abs_sy = sy.abs
    # 横距离与纵距离相等的情况下
    if abs_sx == abs_sy
      # 随机将边数增加 1
      rand(2) == 0 ? abs_sx += 1 : abs_sy += 1
    end
    # 横侧距离长的情况下
    if abs_sx > abs_sy
      # 左右方向优先。向主角移动
      sx > 0 ? move_left : move_right
      if not moving? and sy != 0
        sy > 0 ? move_up : move_down
      end
    # 竖侧距离长的情况下
    else
      # 上下方向优先。向主角移动
      sy > 0 ? move_up : move_down
      if not moving? and sx != 0
        sx > 0 ? move_left : move_right
      end
    end
  end
end
#==============================================================================[/pre]


需要在飞行事件的飞行状态那一页，事件第一行注释：<Location:x,y>
表示需要停止时飞向的坐标（没注释就不能停止飞）。飞到目标自动打开独立开关A。
然后两个事件页设置如下（注意停止时需要 并行处理）