-- 9.0009
-- _TB_Q21=Did you know J.J. Thomas?
function markus_credit_card_show_cond()
	return EvidenceEnablesQuestion()
end

function markus_credit_card_show()
	PlayDialog( Markus, "M2_MARKUS_2068" )
	if IsInRoom( RestaurantMarkus ) then
		ChangeRoom( RestaurantMarkus )
		SetBackRoom( RestaurantMarkus, RestaurantEstab )
	else	
		ChangeRoom( InterroMarkusEstab )
	end

end

AddEvent( EVMarkusCreditShow, false, EDCardSlipRestOwner, Markus, "markus_credit_card_show_cond", "markus_credit_card_show" )

function markus_question_21_cond()
	return (IsEventDone( EVMarkusCreditShow ) or ( not EvidenceEnablesQuestion())) and IsQuestionAsked( Markus, "_TB_Q15" ) and IsEventDone( EVCompCreditCard )
end

function markus_question_21()
	PlayDialog( Markus, "M2_MARKUS_34" )
	UpdateCaseFile( Markus, INFORMATION, "_TB_E1266" )

end

AddQuestion ( Markus, false, nil, "_TB_Q21", nil, "markus_question_21_cond", "markus_question_21" )




-- 10.1000
-- _TB_Q25=Do you go into the alley often?
function markus_question_25_cond()
	return IsQuestionAsked( WarrantSuspects, "_TB_Q24" )
end

function markus_question_25()
	PlayDialog( Markus, "M2_MARKUS_52" )

end

AddQuestion ( Markus, false, nil, "_TB_Q25", nil, "markus_question_25_cond", "markus_question_25" )




-- 10.1100
-- _TB_Q26=Did you put the razor wire up?
function markus_question_26_cond()
	return IsQuestionAsked( Markus, "_TB_Q25" )
end

function markus_question_26()
	PlayDialog( Markus, "M2_MARKUS_53" )

end

AddQuestion ( Markus, false, nil, "_TB_Q26", nil, "markus_question_26_cond", "markus_question_26" )




-- 10.1110
-- _TB_Q27=Is it possible a homeless man died in your alley?
function markus_question_27_cond()
	return IsQuestionAsked( Markus, "_TB_Q25" )
end

function markus_question_27()
	ChangeRoom( InterroMarkus1 )
	PlayDialog( Markus, "M2_MARKUS_54" )
	ChangeRoom( InterroMarkusEstab )
	EndDisplayQuestionList( Markus )
--	SetBackRoom( InterroMarkusEstab, BrassRoom01 )

end

AddQuestion ( Markus, false, nil, "_TB_Q27", nil, "markus_question_27_cond", "markus_question_27" )




-- 10.1120
-- _TB_Q28=Do you use poison to keep homeless people out of your alley?
function markus_powder_food_show_cond()
	return IsQuestionAsked( WarrantSuspects, "_TB_Q24" ) and EvidenceEnablesQuestion()
end

function markus_powder_food_show()
	PlayDialog( Markus, "M2_MARKUS_2068" )
	ChangeRoom( InterroMarkusEstab )
end

AddEvent( EVMarkusPowderShow, false, ETDiscFoodSubstance, Markus, "markus_powder_food_show_cond", "markus_powder_food_show" )

function markus_question_28_cond()
	return (IsEventDone( EVMarkusPowderShow ) or ( IsQuestionAsked( WarrantSuspects, "_TB_Q24" ) and (not EvidenceEnablesQuestion()))) and IsQuestionAsked( Markus, "_TB_Q26" ) and IsQuestionAsked( Markus, "_TB_Q27" ) and IsEventDone( EVLabPowderAnalyzed )
end

function markus_question_28()
	ChangeRoom( InterroMarkus2 )
	PlayDialog( Markus, "M2_MARKUS_55" )
	ChangeRoom( InterroCSI2 )
	PlayDialog( Warrick, "M2_WARRICK_357" )
	PlayReenactment("Art\\Reenactments\\Movie\\rnct_poison01a.xmv", "Art\\Reenactments\\Pictures\\rnct1.tga", "_TB_Z396", nil, "M2_WARRICK_56" )                                                -- rnct_poison01a.bik
	PlayDialog( Warrick, "M2_WARRICK_358" )
	ChangeRoom( InterroMarkus1 )
	PlayDialog( Markus, "M2_MARKUS_359" )
	ChangeRoom( InterroCSI1 )
	PlayDialog( Warrick, "M2_WARRICK_1320" )
	ChangeRoom( InterroMarkusEstab )
	EndDisplayQuestionList( Markus )
--	SetBackRoom( InterroMarkusEstab, BrassRoom01 )

	UpdateCaseFile( Markus, SUSPECT_VICTIM, "_TB_E1267", 200 )

end

AddQuestion ( Markus, false, nil, "_TB_Q28", nil, "markus_question_28_cond", "markus_question_28" )




-- 10.1240
-- _TB_Q29=Can we take a DNA sample?
function markus_question_29_cond()
	return IsQuestionAsked( Markus, "_TB_Q28" ) and IsQuestionAsked( Markus, "_TB_Q27" ) and IsQuestionAsked( Markus, "_TB_Q26" )
end

function markus_question_29()
	PlayDialog( Markus, "M2_MARKUS_57" )
	
	AddEvidence( ETDNASampleMarkus )
	AddEvidenceDescriptionText( ETDNASampleMarkus, "_TB_E956" )
	AddEvidenceDescriptionText( ETDNASampleMarkus, "_TB_E349" )

	if IsEventDone( EVCompDNA1Compare) and IsEventDone( EVMicroHairCompare ) and IsQuestionAsked( Brass, "_TB_Q36" ) and IsQuestionAsked( Markus, "_TB_Q30" ) then
		NewEvent( EVRebeccaRemove, nil )
	end

end

AddQuestion ( Markus, false, nil, "_TB_Q29", nil, "markus_question_29_cond", "markus_question_29" )




-- 10.2500
-- _TB_Q30=Can we take your fingerprints?
function markus_question_30_cond()
	return IsQuestionAsked( Markus, "_TB_Q28" ) and IsQuestionAsked( Markus, "_TB_Q27" ) and IsQuestionAsked( Markus, "_TB_Q26" )
end

function markus_question_30()
	PlayDialog( Markus, "M2_MARKUS_58" )
	
	AddEvidence( ETFingerprintsMarkus )
	AddEvidenceDescriptionText( ETFingerprintsMarkus, "_TB_E957" )

	if IsEventDone( EVCompDNA1Compare) and IsEventDone( EVMicroHairCompare ) and IsQuestionAsked( Brass, "_TB_Q36" ) and IsQuestionAsked( Markus, "_TB_Q29" ) then
		NewEvent( EVRebeccaRemove, nil )
	end

end

AddQuestion ( Markus, false, nil, "_TB_Q30", nil, "markus_question_30_cond", "markus_question_30" )




-- 29.4126
-- _TB_Q18=Do you remember Clair Thomas?
function markus_question_18_cond()
	return IsQuestionAsked( Markus, "_TB_Q15" ) and IsQuestionAsked( Rebecca, "_TB_Q56" )
end

function markus_question_18()
	PlayDialog( Markus, "M2_MARKUS_31" )

	UpdateCaseFile( Markus, INFORMATION, "_TB_E955" )
	
end

AddQuestion ( Markus, false, nil, "_TB_Q18", nil, "markus_question_18_cond", "markus_question_18" )