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;