- 威望
- 0
- 金钱
- 6792
- 贡献
- 0
- 最后登录
- 2025-2-16
- 注册时间
- 2024-5-30
- 主题
- 3302
- 精华
- 0
- 帖子
- 3380
|
procedure PlayerOnLogin(Npc: TNormNpc; Player: TPlayObject); //该函数定义位于“系统固定NPC\ManagerNpc”中,角色登陆将触发该函数
begin
if Player.NewHuman then //如果角色是新人
begin
Npc.Give(Player, '乌木剑'); //给乌木剑1把
Npc.Give(Player, '金币', 100000); //给金币10W
Gamelib.BroadcastCenterMessage('欢迎玩家“{S=' + Player.Name + ';C=249}”来到{S=' + Gamelib.ServerName + ';C=250}'); //广播新角色登陆
end; |
|