-- 6.2.1 Q1
function	coroner_question_1040()
	PlayDialog( Coroner, "M1_CORONER_02" )
	UpdateCaseFile( Kylie, VICTIM_CRIMESCENE, "TEXT1118", 100 )
end

AddQuestion ( Coroner, false, nil, "TEXT1040", nil, nil, "coroner_question_1040" )

-- 6.2.1 Q2
function	coroner_question_1041()
	PlayDialog( Coroner, "M1_CORONER_03A" )
	PlayReenactment( "Art\\Reenactments\\Movie\\c1m1_reenact_morgue.xmv", "Art\\Reenactments\\Pictures\\c1m1_reenact_morgue.tga", "TEXT1010", nil, "MISSION01_SQUISHY01" )
	PlayDialog( Coroner, "M1_CORONER_03B" )
end

AddQuestion ( Coroner, false, nil, "TEXT1041", nil, nil, "coroner_question_1041" )

-- 6.2.2 Q1 + 6.2.3 Q1
function	coroner_question_1042_cond()
	return IsQuestionAsked( Coroner, "TEXT1041" )
end

function	coroner_question_1042()
	if HasEvidence(Money) then
		PlayDialog( Coroner, "M1_CORONER_04" )
		UpdateCaseFile( Kylie, VICTIM_CRIMESCENE, "TEXT1111", 100 )
	
		AddEvidence( SkinSample )
		AddEvidenceDescriptionText( SkinSample , "TEXT1195" )
	else
		PlayDialog( Coroner, "M1_CORONER_08" )
		UpdateCaseFile( Kylie, VICTIM_CRIMESCENE, "TEXT1111", 100 )
	
		AddEvidence( SkinSample )
		AddEvidenceDescriptionText( SkinSample , "TEXT1195" )

		AddEvidence( Money )
		AddEvidenceDescriptionText( Money , "TEXT1261" )
	end
end

AddQuestion ( Coroner, false, nil, "TEXT1042", nil, "coroner_question_1042_cond", "coroner_question_1042" )

-- 6.2.3 Q2
function	coroner_question_1044_cond()
	return ( IsQuestionAsked( Coroner, "TEXT1042" ) and HasEvidence(BedSheet) )
end

function	coroner_question_1044()
	PlayDialog( Coroner, "M1_CORONER_05" )
	UpdateCaseFile( Kylie, VICTIM_CRIMESCENE, "TEXT1120", 100 )
	AddEvidenceDescriptionText( BedSheet , "TEXT1215" )
end

AddQuestion ( Coroner, false, nil, "TEXT1044", nil, "coroner_question_1044_cond", "coroner_question_1044" )

-- 6.2.3 Q3
function	coroner_question_1043_cond()
	return ( IsQuestionAsked( Coroner, "TEXT1042" ) and IsQuestionAsked( Coroner, "TEXT1044" ) )
end

function	coroner_question_1043()
	PlayDialog( Coroner, "M1_CORONER_06" )
	UpdateCaseFile( Kylie, VICTIM_CRIMESCENE, "TEXT1117", 100 )
end

AddQuestion ( Coroner, false, nil, "TEXT1043", nil, "coroner_question_1043_cond", "coroner_question_1043" )

-- 6.2.3 Q4
function	coroner_question_1045_cond()
	return HasEvidence( SinkBlood )
end

function	coroner_question_1045()
	PlayDialog( Coroner, "M1_CORONER_07" )
	UpdateCaseFile( Kylie, VICTIM_CRIMESCENE, "TEXT1116", 100 )
end

AddQuestion ( Coroner, false, nil, "TEXT1045", nil, "coroner_question_1045_cond", "coroner_question_1045" )