关于一个ARPG带宠物攻击的效果

兔毛鹿

角色带一个宠物，平时为接近主角，假设地图中1号~10号事件是敌人，并行处理当1号~10号事件中某一个与宠物事件的坐标差绝对值小于5，宠物事件就自动接近敌人事件攻击，那么如何让宠物事件自动接近敌人事件呢？？

---

此贴于 2009-6-9 5:01:10 被版主darkten提醒，请楼主看到后对本贴做出回应。

---

版务信息：本贴由楼主自主结贴～

TLF

顶一下，我也求此问题解答……

★_茄孓

范例：
http://rpg.blue/upload_program/d ... ect60_124829740.rar

在main前放上该脚本：

1. class Game_Character
   
2.   #--------------------------------------------------------------------------
   
3.   # ● 接近某事件
   
4.   #--------------------------------------------------------------------------
   
5.   def move_toward_events(id)
   
6.     # 求得与主角的坐标差
   
7.     sx = @x - $game_map.events[id].x
   
8.     sy = @y - $game_map.events[id].y
   
9.     # 坐标相等情况下
   
10.     if sx == 0 and sy == 0
    
11.       return
    
12.     end
    
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

复制代码

以上其他效果都达到的话，让某事件接近某事件应该可以用：

假设  敌人事件id为x

在宠物事件并行处理 写上脚本
$game_map.events[@event].move_toward_events(x)
这样就可以让宠物事件接近敌人事件了

---

系统信息：本贴获得楼主认可，66RPG感谢您的热情解答～

632808263

好东西收下了