◇逍遥◆MIR2◇ 发表于 2022-9-19 09:57:07

91M2引擎如何获取坐标上指定范围内的全部怪物脚本

如何获取坐标上指定范围内的全部怪物

unit Q2;

inte**ce
uses Classes, SysUtils;

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);

implementation

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var
AActorList: TActorList;
AActor: TActor;
I: Integer;
begin
//取出指定范围里的对象列表
AActorList := Player.Map.GetActorListAt(Player.MapX + 1, Player.MapY, '白野猪'{如果不指定名称则取出的是全部对象}); //取出一个坐标上的全部白野猪列表
try
    for I := 0 to AActorList.Count - 1 do//循环处理列表中的对象
    begin
      AActor := AActorList.Items;
      try
      //针对AActor做些处理
      except
      end;
    end;
finally
    AActorList.Free; //这个列表需要执行Free释放掉
end;
//取出以某坐标为中心范围内的怪物列表
AActorList := Player.Map.GetActorListInRange(Player.MapX, Player.MapY, 3{3格范围}, '白野猪'{如果不指定名称则取出的是全部对象});   
try
    for I := 0 to AActorList.Count - 1 do//循环处理列表中的对象
    begin
      AActor := AActorList.Items;
      try
      //针对AActor做些处理
      except
      end;
    end;
finally
    AActorList.Free;
end;
end;

end.

byscp 发表于 2022-9-19 10:26:20

看到这帖子真是高兴!

today_gg 发表于 2022-9-20 11:09:28

强烈支持楼主ing……

295608944 发表于 2022-9-24 06:52:03

真是被感动的痛哭流涕……

1yuqunchenggong 发表于 2022-9-24 20:41:46

真是被感动的痛哭流涕……

叛逆牛仔 发表于 2022-9-25 23:29:52

真是难得给力的帖子啊。

animarui 发表于 2022-9-28 06:10:08

看到这帖子真是高兴!

php_z 发表于 2022-10-2 19:27:19

激动人心,无法言表!

egn 发表于 2022-10-3 20:58:29

真是难得给力的帖子啊。

go_dxy 发表于 2022-10-4 10:52:03

太生气了,无法HOLD啦 >_<......
页: [1] 2
查看完整版本: 91M2引擎如何获取坐标上指定范围内的全部怪物脚本