论坛 › 『传奇技术』 › 91m2引擎判断队伍信息和判断两个角色之间的距离脚本

Bigmerboy 发表于 2020-2-12 03:03:38

91m2引擎判断队伍信息和判断两个角色之间的距离脚本

判断队伍信息

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var
    I: Integer;
    P: TPlayObject;
    S: String;
begin
    if Player.GroupOwner <> nil then //如果存在队长
    begin
      S := '';< /FONT>
      for I := 0 to Player.GroupCount - 1 do //循环队伍里面的角色,Player.GroupCount为当前角色所在队伍的人数(包含当前角色)
      begin
            P := Player.Group; //取出一个角色
            if P <> nil then //如果角色不为空值
            begin
                if S <> '' then
                  S := S + ';';
                S := S + Format('职业:%d，等级:%d，名称：%s', ); //将当前角色的信息拼接到字符串
            end;
      end;
      if S <> '' then
            Npc.MessageBox(Player, S); //如果字符串不为空则弹出对话框显示
    end;
end;


判断两个角色之间的距离

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
begin
if (Abs(Npc.MapX - Player.MapX) > 5) or (Abs(Npc.MapY - Player.MapY)>5) then //ABS为取绝对值函数。此处判断NPC和角色的X坐标或Y坐标距离是否大于5，怪物、NPC及玩家都有MapX和MapY属性
    Npc.Say(Player, '你离我太远了，我看不清楚。。。');
end;

北川かげお 发表于 2020-2-12 13:22:05

楼主呀，，，您太有才了。。。

蜕变的蝴蝶 发表于 2020-2-18 08:10:37

我也来顶一下..

城市生活 发表于 2020-2-18 21:50:00

看起来好像不错的样子

jun1986 发表于 2020-2-26 05:43:08

看起来好像不错的样子

我就是小豆丁 发表于 2020-2-29 08:11:37

LZ是天才，坚定完毕

ccddmmaa2 发表于 2020-3-4 02:04:53

报告！别开枪，我就是路过来看看的。。。

rebecca0479 发表于 2020-3-7 13:46:33

看起来好像不错的样子

梧桐树wts 发表于 2020-3-8 10:28:22

这么强,支持楼主，佩服

传说惠州 发表于 2020-3-31 22:02:17

啊啊啊啊啊啊啊啊啊啊啊

查看完整版本: 91m2引擎判断队伍信息和判断两个角色之间的距离脚本