--5.1020
--TB_Q917	: Can you recover the body for us?

function morgue_question_TB_Q917 ()
	PlayDialog ( Coroner, "M4_ROBBINS_2690" )
	FadeOut ()
	SetVisible ( OMorgueMaryFront, true )
	FadeIn ()
	SetVisible ( OPanoBody, false )
	SetActive ( HPanoBody, false )

end
AddQuestion ( Coroner, false, nil, "_TB_Q917", nil, nil, "morgue_question_TB_Q917" )
---------------------------------------------------------------------------------------
--5.1050
--TB_Q863	: What was the cause of death?

function morgue_question_TB_Q863_cond ()
	return IsQuestionAsked ( Coroner, "_TB_Q917" )
end
function morgue_question_TB_Q863 ()

	PlayReenactment( "Art\\Reenactments\\Movie\\rcns_fragments01a.xmv", "Art\\Reenactments\\Pictures\\rcns_fragments01a_tb.tga", "_TB_Z2216", nil, "M4_ROBBINS_1792" )
	UpdateCaseFile ( Victim, VICTIM_CRIMESCENE, "_TB_E4344", 200 )
end
AddQuestion ( Coroner, false, nil, "_TB_Q863", nil, "morgue_question_TB_Q863_cond", "morgue_question_TB_Q863" )
--------------------------------------------------------------------------------------
--5.1080
--TB_Q864	: Can you determine the time of death?

function morgue_question_TB_Q864_cond ()
	return IsQuestionAsked ( Coroner, "_TB_Q917" )
end
function morgue_question_TB_Q864 ()
	SetVisible ( OMorgueMaryOver, true )
	ChangeRoom ( MorgueOver )
	PlayDialog ( Coroner, "M4_ROBBINS_1794" )
	ChangeRoom ( MorgueEstab )
 	UpdateCaseFile ( Victim, VICTIM_CRIMESCENE, "_TB_E4345", 200 )
	UpdateCaseFile ( Victim, VICTIM_CRIMESCENE, "_TB_E4729", 200 )
end
AddQuestion ( Coroner, false, nil, "_TB_Q864", nil, "morgue_question_TB_Q864_cond", "morgue_question_TB_Q864" )
--------------------------------------------------------------------------------------
--5.1030
--TB_Q956	: Can we look at the body?

function morgue_question_TB_Q956_cond ()
	return IsQuestionAsked ( Coroner, "_TB_Q917" ) and not IsQuestionAsked ( Carter, "_TB_Q868" )
end
function morgue_question_TB_Q956 ()
	PlayDialog ( Coroner, "M4_ROBBINS_2455" )
	EndDisplayQuestionList ()
	if not IsEventDone ( EVAcquireUVLightBruising ) or not IsEventDone ( EVAcquireMorgueUVLightBruising )
		then
		SetActive ( HMorgueMaryFace, true )	
	end
--	SetActive ( HMorgueMaryBlood, false )
--	SetActive ( HMorgueMaryFace, false )	
	ChangeRoom ( MorgueMaryEstab, true )
	SetBackRoom ( MorgueMaryEstab, MorgueEstab )
end
AddQuestion ( Coroner, true, nil, "_TB_Q956", nil, "morgue_question_TB_Q956_cond", "morgue_question_TB_Q956" )
--------------------------------------------------------------------------------------
--5.1100
--TB_Q865	: Were you able to recover anything from the wounds?
function morgue_question_TB_Q865_cond ()
	return IsQuestionAsked ( Coroner, "_TB_Q863" ) and IsQuestionAsked ( Coroner, "_TB_Q864" )
end
function morgue_question_TB_Q865 ()
	PlayDialog ( Coroner, "M4_ROBBINS_1795" )
	AddEvidence ( EIBulletFragMorgue )
	AddEvidenceDescriptionText ( EIBulletFragMorgue, "_TB_E2407" )
	UpdateCaseFile ( Victim, INFORMATION, "_TB_E4346" )
end
AddQuestion ( Coroner, false, nil, "_TB_Q865", nil, "morgue_question_TB_Q865_cond", "morgue_question_TB_Q865" )
--------------------------------------------------------------------------------------
--5.1130
--TB_Q866	: Did you notice anything else out of the ordinary?
function morgue_question_TB_Q866_cond ()
	return IsQuestionAsked ( Coroner, "_TB_Q865" )
end
function morgue_question_TB_Q866 ()
	PlayDialog ( Coroner, "M4_ROBBINS_1797" )
	UpdateCaseFile ( Victim, INFORMATION, "_TB_E4730" )
end
AddQuestion ( Coroner, false, nil, "_TB_Q866", nil, "morgue_question_TB_Q866_cond", "morgue_question_TB_Q866" )
--------------------------------------------------------------------------------------
--8.0000
--TB_Q957	: Can we look at the body?

function morgue_question_TB_Q957_cond ()
	return IsQuestionAsked ( Carter, "_TB_Q868" ) 
end
function morgue_question_TB_Q957 ()
	PlayDialog ( Coroner, "M4_ROBBINS_2121" )
	EndDisplayQuestionList ()
	ChangeRoom ( MorgueMaryEstab, true )
	SetBackRoom ( MorgueMaryEstab, MorgueEstab )

end
AddQuestion ( Coroner, true, nil, "_TB_Q957", nil, "morgue_question_TB_Q957_cond", "morgue_question_TB_Q957" )
--------------------------------------------------------------------------------------