77M2引擎如何增加一个行会的称号，91M2引擎如何加入或离开队伍教程

如何增加一个行会的称号
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
begin
  if Player.Guild <> nil then
   begin
    if Player.Guild.AddRankName(2{称号编号,不可重复}, '猛虎队'{称号名称,不可重复}) then
      Player.Messagebox('称号添加成功');
  end;

===========================================
如何加入或离开队伍
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var
P: TPlayObject;
begin
//加入队伍
P := Gamelib.FindPlayer('张三');
if P <> nil then
begin         
   //JoinGroup时,如果双方都没有队伍,则调用JoinGroup函数的角色为队长
   //如果对方为队长,则调用JoinGroup函数的角色加入对方的队伍
   //JoinGroup第二个参数为是否显示对话框,如果为false,则直接加入队伍,如果为true,则
   //对方会收到组队邀请或申请
   Player.JoinGroup(P, False{是否显示对话框});
end;      
//离开队伍  
Player.LeaveGroup; //如果Player是队长则队伍解散
end;