``` procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); begin //AddTitle函数执行时会判断是否已经拥有该称号,如果没拥有才可以添加 if Player.AddTitle('初入江湖') then Player.Messagebox('获得了称号“初入江湖”'); end; ```