91M2引擎的传奇如何加入一个指定的行会脚本分享

如何加入一个指定的行会

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

var

  guild: TGuild;

begin

  guild := Gamelib.FindGuild(‘天下第一会’); //查找行会

  if guild <> nil then

  begin

   if not guild.IsFull then //如果没有满员

   begin

     if guild.AddMember(Player.Name) then //如果加入当前角色名称成功

     begin   

        Player.SendGuildMessage(Format(‘欢迎{S=%s;C=250}加入到行会！！！’, [Player.Name])); //发送行会消息

        Npc.MessageBox(Player, ‘加入行会成功’);

     end;

   end

   else

      Npc.MessageBox(Player, ‘已经满员！！！’);

  end

else

    Npc.MessageBox(Player, ‘没有该行会信息！！！’);

end;