idc 11
查看: 271|回复: 5

77M2引擎若何增添一个行会的称谓,91M2引擎若何加入或脱离队伍教程。

[复制链接]

3377

主题

3417

帖子

6万

积分

管理员

Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100Rank: 100

积分
60303

最佳新人活跃会员热心会员推广达人灌水之王突出贡献优秀版主荣誉管理论坛元老

QQ
发表于 2022-3-21 21:06:40 | 显示全部楼层 |阅读模式
  

  





若何增添一个行会的称谓

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;

回复

使用道具 举报

0

主题

40

帖子

41

积分

新手上路

Rank: 1

积分
41
发表于 2022-3-21 21:12:03 | 显示全部楼层
看了LZ的帖子,我只想说一句很好很强大!

回复

使用道具 举报

0

主题

28

帖子

29

积分

新手上路

Rank: 1

积分
29
发表于 2022-3-21 21:13:04 | 显示全部楼层
果断MARK,前十有我必火!

回复

使用道具 举报

0

主题

32

帖子

33

积分

新手上路

Rank: 1

积分
33
发表于 2022-3-21 21:15:10 | 显示全部楼层
找传奇版本,传奇教程就到301传奇论坛

回复

使用道具 举报

0

主题

43

帖子

44

积分

新手上路

Rank: 1

积分
44
发表于 2022-3-21 21:18:25 | 显示全部楼层
果断MARK,前十有我必火!

回复

使用道具 举报

0

主题

53

帖子

64

积分

注册会员

Rank: 2

积分
64
发表于 2022-3-21 21:19:29 | 显示全部楼层
果断MARK,前十有我必火!

回复

使用道具 举报