如何让事件在一定范围内接近玩家。

feishzz

{:2_270:} 我是想做一个门卫一样的人物，然后在玩家靠近门的时候跑过去和他说话，可是一设定就疯狂地跑向玩家了。
然后我在门口设了个事件，不可穿透玩家接触可穿透的，但是玩家可穿透事件也可穿透了。。。
然后门卫就像疯子一样一直跟着我，没办法了，求各位大大解决办法
就是在一定范围内接近玩家的。事件怎么设定

yjl494356020

RUBY 代码复制

#==============================================================================
# +++ MOG - Event Sensor Range (v1.0) +++
#==============================================================================
# By Moghunter
# [url]http://www.atelier-rgss.com[/url]
#==============================================================================
# Permite que o evento tenha dois comportamentos, de curta distância e de 
# longa distância.
#===============================================================================
# - Utilização
# Crie uma página com a condição de ativação Self Switch D, está página será 
# usada quando o player estiver perto do evento.
# Defina a area do sensor do evento colocando este nome no evento.
#
# <SensorX> 
#
# X = Area do Sensor
#
#===============================================================================
module MOG_EVENT_SENSOR
  #Definição da letra da Self Switch que ativará a página de curta distância.
  SENSOR_SELF_SWITCH = "D"
end
 
#===============================================================================
# ■ GAME EVENT
#===============================================================================
class Game_Event < Game_Character
 
  attr_reader   :sensor_range
 
  #--------------------------------------------------------------------------
  # ● Initialize
  #--------------------------------------------------------------------------            
  alias mog_event_sensor_initialize initialize
  def initialize(map_id, event)
      mog_event_sensor_initialize(map_id, event)
      setup_event_sensor
  end
 
  #--------------------------------------------------------------------------
  # ● Setup Event Sensor
  #--------------------------------------------------------------------------          
  def setup_event_sensor
      @sensor_range =  @event.name =~ /<Sensor(\d+)>/ ? $1.to_i : 0
  end  
 
  #--------------------------------------------------------------------------
  # ● Update
  #--------------------------------------------------------------------------            
  alias mog_event_sensor_update update 
  def update
      mog_event_sensor_update
      update_event_sensor 
  end  
 
  #--------------------------------------------------------------------------
  # ● Update Sensor
  #--------------------------------------------------------------------------        
  def update_event_sensor 
      return if @sensor_range == 0
      distance = ($game_player.x - self.x).abs + ($game_player.y - self.y).abs
      enable   = (distance <= @sensor_range)
      key = [$game_map.map_id, self.id, MOG_EVENT_SENSOR::SENSOR_SELF_SWITCH]
      last_enable = $game_self_switches[key]
      execute_sensor_effect(enable,key) if enable != last_enable
    end
 
  #--------------------------------------------------------------------------
  # ● Execute_Sensor Effect
  #--------------------------------------------------------------------------            
  def execute_sensor_effect(enable,key)      
      @pattern = 0
      @pattern_count = 0               
      $game_self_switches[key] = enable
      self.refresh
  end
 
end
 
$mog_rgss3_event_sensor = true

#==============================================================================


# +++ MOG - Event Sensor Range (v1.0) +++


#==============================================================================


# By Moghunter


# [url]http://www.atelier-rgss.com[/url]


#==============================================================================


# Permite que o evento tenha dois comportamentos, de curta distância e de 


# longa distância.


#===============================================================================


# - Utilização


# Crie uma página com a condição de ativação Self Switch D, está página será 


# usada quando o player estiver perto do evento.


# Defina a area do sensor do evento colocando este nome no evento.


#


# <SensorX> 


#


# X = Area do Sensor


#


#===============================================================================


module MOG_EVENT_SENSOR


  #Definição da letra da Self Switch que ativará a página de curta distância.


  SENSOR_SELF_SWITCH = "D"


end


 


#===============================================================================


# ■ GAME EVENT


#===============================================================================


class Game_Event < Game_Character


 


  attr_reader   :sensor_range


 


  #--------------------------------------------------------------------------


  # ● Initialize


  #--------------------------------------------------------------------------            


  alias mog_event_sensor_initialize initialize


  def initialize(map_id, event)


      mog_event_sensor_initialize(map_id, event)


      setup_event_sensor


  end


 


  #--------------------------------------------------------------------------


  # ● Setup Event Sensor


  #--------------------------------------------------------------------------          


  def setup_event_sensor


      @sensor_range =  @event.name =~ /<Sensor(\d+)>/ ? $1.to_i : 0


  end  


 


  #--------------------------------------------------------------------------


  # ● Update


  #--------------------------------------------------------------------------            


  alias mog_event_sensor_update update 


  def update


      mog_event_sensor_update


      update_event_sensor 


  end  


 


  #--------------------------------------------------------------------------


  # ● Update Sensor


  #--------------------------------------------------------------------------        


  def update_event_sensor 


      return if @sensor_range == 0


      distance = ($game_player.x - self.x).abs + ($game_player.y - self.y).abs


      enable   = (distance <= @sensor_range)


      key = [$game_map.map_id, self.id, MOG_EVENT_SENSOR::SENSOR_SELF_SWITCH]


      last_enable = $game_self_switches[key]


      execute_sensor_effect(enable,key) if enable != last_enable


    end


 


  #--------------------------------------------------------------------------


  # ● Execute_Sensor Effect


  #--------------------------------------------------------------------------            


  def execute_sensor_effect(enable,key)      


      @pattern = 0


      @pattern_count = 0               


      $game_self_switches[key] = enable


      self.refresh


  end


 


end


 


$mog_rgss3_event_sensor = true

事件范围的脚本，使用方法：
首先，更改事件名称为XXX<Sensor3>，也就是事件的名称加上<Sensor3>，其中3可以替换成其他数字，也就是事件触发的范围；
第一页可以设定为事件固定或随机移动。

然后是第二页，点选独立开关D开启时，也就是在玩家的3格范围内，事件的动作，这时可以设定为接近玩家移动。

这样的效果就是，该事件在玩家3格范围内时，会接近玩家，并触发战斗。

勇者k

学到了。

xggzga117

多谢1楼的脚本，收下了。