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;
|
|