``` procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); begin //查看所有任务列表是否包含某个任务(包含当前任务列表) if Player.Missions.ContainMissionIDInDB('R000001') then begin Player.Messagebox('你曾经接受过这个任务'); end; //注意下面的区别: //查看当前任务列表是否包含某个任务 if Player.Missions.ContainMissionID('R000002') then begin Player.Messagebox('你当前的任务列表中含有这个任务'); end; end; ```