``` procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); begin Npc.MessageBox(Player, Format('你的PK等级为%d，PK点数为%d', [Player.PkLevel, Player.PkPoint])); //Format函数为格式化显示 end; ```