``` procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); var I: Integer; begin //Player.Missions 玩家的任务对象 for I := 0 to Player.Missions.Count - 1 do //已接任务 begin Player.SendMessage('已接任务:' + Player.Missions.Items[I].Subject); end; for I := 0 to Player.Missions.LinkCount - 1 do //未接任务 begin Player.SendMessage('未接任务:' + Player.Missions.LinkItems[I].Subject); end; //可以对任务的描述、奖励及关联NPC等属性进行读取和修改 end; ```