function devon_ask_questions()
	if not DisplayQuestionList( Devon ) then
		PlayDialog( Devon, "M1_DEVON_22" )
	end
end

AddEvent( nil, true, nil, Devon, nil, "devon_ask_questions" )

-- 10.1

function start_interro_devon()
	if not IsEventDone(DevonStartInterogationEvent) then	
		PlayDialog( BrassInactive, "M1_BRASS_20" )
		PlayDialog( Devon, "M1_DEVON_02" )
	end

--	SetBackRoom( InterroSuspect01_Devon, BrassRoom02 )
	if not DisplayQuestionList( Devon ) then
		PlayDialog( Devon, "M1_DEVON_22" )
	end
end

AddEvent( DevonStartInterogationEvent, true, nil, Interro_Devon, nil, "start_interro_devon" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q1: What was your relationship with Kylie?
-- text_id: 1106
-- cond: none, it's the first question
----------------------------------------------------------------------------------------------
function fq_Devon_1106()
	PlayDialog( Devon, "M1_DEVON_03" )
	PlayDialog( Grissom, "M1_GRISS_52" )
	PlayDialog( Devon, "M1_DEVON_04" )
	PlayDialog( Grissom, "M1_GRISS_53" )
	PlayDialog( Devon, "M1_DEVON_05" )

	UpdateCaseFile( Devon, SUSPECT_VICTIM, "TEXT1128", 300 )
end

AddQuestion( Devon, false, Q_Devon_1106, "TEXT1106", nil, nil, "fq_Devon_1106" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q2: When did you last see Kylie?
-- text_id: 1100
-- cond: q1106
----------------------------------------------------------------------------------------------
function fq_Devon_1100_cond()
	return IsQuestionAsked( Devon, "TEXT1106" )
end

function fq_Devon_1100()
	PlayDialog( Devon, "M1_DEVON_06" )
end

AddQuestion( Devon, false, Q_Devon_1100, "TEXT1100", nil, "fq_Devon_1100_cond", "fq_Devon_1100" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q3: We have evidence that you saw Kylie recently.
-- text_id: 1101
-- cond: q1100 and devon_partial_print_match (remote?)
----------------------------------------------------------------------------------------------
function fq_Devon_1101_cond()
	return ( IsQuestionAsked( Devon, "TEXT1100" ) and IsEventDone(RemoteFingerPrintMatchEvent) )
end

function fq_Devon_1101()
	PlayDialog( Devon, "M1_DEVON_07" )
	PlayDialog( Grissom, "M1_GRISS_55" )
	PlayDialog( Devon, "M1_DEVON_08" )

	UpdateCaseFile( Devon, SUSPECT_CRIMESCENE, "TEXT1129", 200 )
end

AddQuestion( Devon, false, Q_Devon_1100, "TEXT1101", nil, "fq_Devon_1101_cond", "fq_Devon_1101" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q4: Do you have any cuts or scratches that you are not telling us about?
-- text_id: 1102
-- cond: SkinSample, GregComparesBertDNASinkBlood, GregComparesDevonDNASinkBlood
----------------------------------------------------------------------------------------------
function fq_Devon_1102_cond()
	return ( HasEvidence( SkinSample ) or IsEventDone( GregAnalyzedSinkBlood ) )
end

function fq_Devon_1102()
	PlayDialog( Devon, "M1_DEVON_09" )
	PlayDialog( Grissom, "M1_GRISS_56" )

	UpdateCaseFile( Devon, SUSPECT_CRIMESCENE, "TEXT1127", 200 )

	if ( IsQuestionAsked( Devon, "TEXT1103" ) and IsQuestionAsked( Devon, "TEXT1104" )  ) then
		fq_Devon_story()
	end
end

AddQuestion( Devon, false, Q_Devon_1102, "TEXT1102", nil, "fq_Devon_1102_cond", "fq_Devon_1102" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q5: Why was your skin was under Kylie’s nails? 
-- text_id: 1103
-- cond: 1101 and devonblood_dna_match
----------------------------------------------------------------------------------------------
function fq_Devon_1103_cond()
	return ( IsQuestionAsked( Devon, "TEXT1101" ) and IsEventDone( GregComparesDevonDNASkinSample ) )
end

function fq_Devon_1103()
	PlayDialog( Devon, "M1_DEVON_10" )

	UpdateCaseFile( Devon, SUSPECT_VICTIM, "TEXT1125", 300 )

	if ( IsQuestionAsked( Devon, "TEXT1102" ) and IsQuestionAsked( Devon, "TEXT1104" )  ) then
		fq_Devon_story()
	end
end

AddQuestion( Devon, false, Q_Devon_1103, "TEXT1103", nil, "fq_Devon_1103_cond", "fq_Devon_1103" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q6: Did you know Kylie had hepatitis?
-- text_id: 1104
-- cond: 1106 and kylie_hepatitis
----------------------------------------------------------------------------------------------
function fq_Devon_1104_cond()
	return ( IsQuestionAsked( Devon, "TEXT1101" ) and IsEventDone( KylieHasHepatitisEvent ) )
end

function fq_Devon_1104()
	PlayDialog( Devon, "M1_DEVON_11" )

	UpdateCaseFile( Devon, SUSPECT_VICTIM, "TEXT1132", 300 )

	if ( IsQuestionAsked( Devon, "TEXT1102" ) and IsQuestionAsked( Devon, "TEXT1103" ) ) then
		fq_Devon_story()
	end
end

AddQuestion( Devon, false, Q_Devon_1104, "TEXT1104", nil, "fq_Devon_1104_cond", "fq_Devon_1104" )

----------------------------------------------------------------------------------------------
-- 10.1 Devon Q7: Can we take a reference DNA sample?
-- text_id: 1105
-- cond: devon_dna_warrant
----------------------------------------------------------------------------------------------
function fq_Devon_1105_cond()
	return IsQuestionAsked( Brass, "TEXT1085" )
end

function fq_Devon_1105()
	PlayDialog( Devon, "M1_DEVON_12" )
	PlayDialog( Grissom, "M1_GRISS_57" )
	PlayDialog( Devon, "M1_DEVON_13" )
	PlayDialog( Grissom, "M1_GRISS_86" )

--	SetActive( InterroDevonHairHotspot, true )
--	SetActive( InterroDevonMouthHotspot, true )
--	SetActive( Devon, false )
	
--	EndDisplayQuestionList()
-- temp hack
	AddEvidence( DevonHair )
	PlayDialog( Devon, "M1_DEVON_20" )
	AddEvidenceHintText( DevonHair, "TEXT1236" )
	AddEvidenceDescriptionText( DevonHair, "TEXT1237" )
-- temp hack
	AddEvidence( DevonDNA )
	PlayDialog( Devon, "M1_DEVON_21" )
	AddEvidenceHintText( DevonDNA, "TEXT1242" )
	AddEvidenceDescriptionText( DevonDNA, "TEXT1243" )
end

-- 10.2	
function get_devon_hair_cond()
	return false
	-- temp hack instead of: return IsQuestionAsked( Devon, "TEXT1105" )
end

function get_devon_hair()
-- temp hack
	return false

--	AddEvidence( DevonHair )
--	PlayDialog( Devon, "M1_DEVON_20" )
--	AddEvidenceHintText( DevonHair, "TEXT1236" )
--	AddEvidenceDescriptionText( DevonHair, "TEXT1237" )
--
--	if HasEvidence(DevonDNA) then
--		SetActive( InterroDevonHairHotspot, false )
--		SetActive( InterroDevonMouthHotspot, false )
--	
--		SetActive( Devon, true )
--		SetBackRoom( InterroSuspect01_Devon, BrassRoom02 )
--	end
end

-- 10.3
function get_devon_dna_cond()
	return false
	-- temp hack instead of: return IsQuestionAsked( Devon, "TEXT1105" )
end

function get_devon_dna()
-- temp hack
	return false

--	AddEvidence( DevonDNA )
--	PlayDialog( Devon, "M1_DEVON_21" )
--	AddEvidenceHintText( DevonDNA, "TEXT1242" )
--	AddEvidenceDescriptionText( DevonDNA, "TEXT1243" )
--
--	if HasEvidence(DevonHair) then
--		SetActive( InterroDevonHairHotspot, false )
--		SetActive( InterroDevonMouthHotspot, false )
--	
--		SetActive( Devon, true )
--		SetBackRoom( InterroSuspect01_Devon, BrassRoom02 )
--	end
end

AddQuestion( Devon, false, Q_Devon_1105, "TEXT1105", nil, "fq_Devon_1105_cond", "fq_Devon_1105" )
AddEvent( DevonHairPick, false, tweezers, InterroDevonHairHotspot, "get_devon_hair_cond", "get_devon_hair" )
AddEvent( DevonDNAPick, false, swab, InterroDevonMouthHotspot, "get_devon_dna_cond", "get_devon_dna" )

----------------------------------------------------------------------------------------------
-- 10.1 End of story
-- text_id:
-- cond: 1102 and 1103 and 1104
----------------------------------------------------------------------------------------------
function fq_Devon_story_cond()
	return ( IsQuestionAsked( Devon, "TEXT1102" ) and IsQuestionAsked( Devon, "TEXT1103" ) and IsQuestionAsked( Devon, "TEXT1104" )  )
end

function fq_Devon_story()
	PlayDialog( Grissom, "M1_GRISS_95" )

	PlayReenactment( "art\\reenactments\\movie\\c1m1_reenact_finalstory.xmv", "art\\reenactments\\pictures\\c1m1_reenact_finalstory.tga", "TEXT1014", nil, "reenactment01" )

--	PlayMovie( Devon, "interro_devon_angry_in.xmv" )

	PlayDialog( Devon, "M1_DEVON_18" )
	PlayDialog( Grissom, "M1_GRISS_66" )
	PlayDialog( Devon, "M1_DEVON_19" )
	
	PlayDialog( BrassInactive, "M1_BRASS_21" )

--	PlayMovie( Devon, "interro_devon_angry_out.xmv" )

	EndDisplayQuestionList()
	
	------------------------------------
	-- grissom office cut-scene
	ChangeLocation( GrissomOffice )
	FadeIn()
	PlayDialog( Grissom, "M1_GRISS_67" )
	------------------------------------

	EndGame()

	-----------------
	-- END MISSION --
	-----------------
end

AddEvent( nil, false, nil, PlayFinalStory, nil, "fq_Devon_story_cond", "fq_Devon_story" )