77m2引擎传奇中如何使用升级加属性点的方法讲解
如何使用升级加属性点首先角色升级触发的是函数是QFunctionNPC中的函数PlayerLevelUp,定义如下:
procedure PlayerLevelUp(Npc: TNormNpc; Player: TPlayObject; const Level: Integer);
示例:
procedure PlayerLevelUp(Npc: TNormNpc; Player: TPlayObject; const Level: Integer);
begin
case Level of
0..10: Player.BonusPoint := Player.BonusPoint + 5; //10级前每升1级+5点
11..20: Player.BonusPoint := Player.BonusPoint + 7; //11-20级级前每升1级+7点
21..40: Player.BonusPoint := Player.BonusPoint + 10; //21-40级前每升1级+10点
else
Player.BonusPoint := Player.BonusPoint + 12; //高于40级每升一级+12点
end;
//注意: 当角色升级1级1级递增的时候,上面的处理是正确的;实际上可能还存在代码调整等级
//的情况,这个时候则需要在代码调整等级的地方计算
end; 我是个凑数的。。。 看起来不错 我是个凑数的。。。 very good 非常好,顶一下 报告!别开枪,我就是路过来看看的。。。 有空一起交流一下 这么强,支持楼主,佩服 支持,赞一个