如何在大地图上让一个怪追着另一个怪打 - Project1

class Game_Character
attr_accessor :move_target # 移动的目标事件
# 启动移动到目标
def startMoveTo(event)
@move_target = event
@move_type = 4
end
#--------------------------------------------------------------------------
# ● 计算距离事件的横向距离
#--------------------------------------------------------------------------
def distance_x_from_event(event)
sx = @x - event.x
if $game_map.loop_horizontal? # 横向循环的场合
if sx == 1 - $game_map.width
sx += $game_map.width
elsif sx.abs > $game_map.width / 2 # 是否大于地图宽度
sx -= $game_map.width # 减除地图宽度
end
end
return sx
end
#--------------------------------------------------------------------------
# ● 计算距离事件的纵向距离
#--------------------------------------------------------------------------
def distance_y_from_event(event)
sy = @y - event.y
if $game_map.loop_vertical? # 纵像循环的场合
if sy == 1 - $game_map.height
sy += $game_map.height
elsif sy.abs > $game_map.height / 2 # 是否大于地图高度
sy -= $game_map.height # 减除地图高度
end
end
return sy
end
#--------------------------------------------------------------------------
# ● 接近事件
#--------------------------------------------------------------------------
def move_toward_event(event)
sx = distance_x_from_event(event)
sy = distance_y_from_event(event)
sx += $game_map.width * 2 if $game_map.loop_horizontal? and sx < - $game_map.width and sx > - $game_map.width * 2
sy += $game_map.height * 2 if $game_map.loop_vertical? and sy < - $game_map.height and sy > - $game_map.height * 2
if sx != 0 or sy != 0
if sx.abs > sy.abs # 横向距离较大
sx > 0 ? move_left : move_right # 优先往左右走
if @move_failed and sy != 0
sy > 0 ? move_up : move_down
end
else # 纵向距离较大
sy > 0 ? move_up : move_down # 优先往上下走
if @move_failed and sx != 0
sx > 0 ? move_left : move_right
end
end
end
end
#--------------------------------------------------------------------------
# ● 更新画面 (本身行动)
#--------------------------------------------------------------------------
def update_self_movement
if @stop_count > 30 * (5 - @move_frequency)
case @move_type
when 1; move_type_random
when 2; move_type_toward_player
when 3; move_type_custom
when 4: move_toward_event(@move_target)
end
end
end
end

复制代码