-- 2.2105
-- _TB_Q6 =Can you determine time of death?

function coroner_question_6()
	PlayDialog( Coroner, "M2_ROBBINS_10" )

	UpdateCaseFile( Victim, INFORMATION, "_TB_E1165" )
	UpdateCaseFile( Victim, VICTIM_CRIMESCENE, "_TB_E944", 200 )
	
end

AddQuestion ( Coroner, false, nil, "_TB_Q6", nil, nil, "coroner_question_6" )




-- 2.2106
-- _TB_Q7=What kind of alcohol was used?
function coroner_question_7()
	PlayDialog( Coroner, "M2_ROBBINS_11" )

	UpdateCaseFile( Victim, INFORMATION, "_TB_E1166" )
	
end

AddQuestion ( Coroner, false, nil, "_TB_Q7", nil, nil, "coroner_question_7" )




-- 2.2107
-- _TB_Q8=Can we look at the body?
function coroner_question_8()
	PlayDialog( Coroner, "M2_ROBBINS_12" )
	UpdateCaseFile( Victim, INFORMATION, "_TB_E1167" )
	ChangeRoom( MorgueVictim )
	EndDisplayQuestionList()
	SetBackRoom( MorgueVictim, MorgueEstab )
end

AddQuestion ( Coroner, false, nil, "_TB_Q8", nil, nil, "coroner_question_8" )




-- 2.2110
-- _TB_Q949=Can we look at the body again?
function coroner_question_949_cond()
	return IsQuestionAsked( Coroner, "_TB_Q8" )

end

function coroner_question_949()
	PlayDialog( Coroner, "M2_ROBBINS_2102" )
	ChangeRoom( MorgueVictim )
	EndDisplayQuestionList()
	SetBackRoom( MorgueVictim, MorgueEstab )	
end

AddQuestion ( Coroner, true, nil, "_TB_Q949", nil, "coroner_question_949_cond", "coroner_question_949" )




-- 7.5200
-- _TB_Q11=Any traces of diphacinone rat poison in the body?
function coroner_powder_show_cond()
	return EvidenceEnablesQuestion()
end

function coroner_powder_show()
	ChangeRoom( MorgueEstab )
end

AddEvent( EVMorguePowderShow, false, ETDiscFoodSubstance, HCoroner, "coroner_powder_show_cond", "coroner_powder_show" )

function coroner_question_11_cond()
	return IsEventDone( EVLabPowderAnalyzed ) and (IsEventDone( EVMorguePowderShow ) or (not EvidenceEnablesQuestion()))

end

function coroner_question_11()
	PlayDialog( Coroner, "M2_ROBBINS_349" )
	PlayReenactment("Art\\Reenactments\\Movie\\rcns_poison01a.xmv", "Art\\Reenactments\\Pictures\\poison.tga", "_TB_Z394", nil, "M2_ROBBINS_350" )
	PlayDialog( Coroner, "M2_ROBBINS_351" )
	
end

AddQuestion ( Coroner, false, nil, "_TB_Q11", nil, "coroner_question_11_cond", "coroner_question_11" )




-- 12.1523
-- _TB_Q9=Were there any traces of blowflies on the body?
function coroner_blowflies_show_cond()
	return EvidenceEnablesQuestion()
end

function coroner_blowflies_show()
	ChangeRoom( MorgueEstab )
end

AddEvent( EVMorgueBlowfliesShow, false, EILarvaAsylum, HCoroner, "coroner_blowflies_show_cond", "coroner_blowflies_show" )

function coroner_question_9_cond()
	return HasEvidence(EILarvaAsylum) and (IsEventDone( EVMorgueBlowfliesShow ) or (not EvidenceEnablesQuestion()))

end

function coroner_question_9()
	PlayDialog( Coroner, "M2_ROBBINS_18" )
	
end

AddQuestion ( Coroner, false, nil, "_TB_Q9", nil, "coroner_question_9_cond", "coroner_question_9" )




-- 24.2200
-- _TB_Q12=What size was the victimÕs ring finger?
function coroner_ring_show_cond()
	return EvidenceEnablesQuestion()
end

function coroner_ring_show()
	ChangeRoom( MorgueEstab )
end

AddEvent( EVMorgueRingShow, false, EIRing, HCoroner, "coroner_ring_show_cond", "coroner_ring_show" )

function coroner_question_12_cond()
	return IsEventDone( EVLabRing ) and (IsEventDone( EVMorgueRingShow ) or (not EvidenceEnablesQuestion()))
end

function coroner_question_12()
	PlayDialog( Coroner, "M2_ROBBINS_22" )
	
end

AddQuestion ( Coroner, false, nil, "_TB_Q12", nil, "coroner_question_12_cond", "coroner_question_12" )




-- 29.4130
-- _TB_Q292=How tall was the victim?
function coroner_question_292_cond()
	return IsQuestionAsked( Markus, "_TB_Q18" )
end

function coroner_question_292()
	PlayDialog( Coroner, "M2_ROBBINS_1314" )

	UpdateCaseFile( Victim, INFORMATION, "_TB_E4237" )
	
end

AddQuestion ( Coroner, false, nil, "_TB_Q292", nil, "coroner_question_292_cond", "coroner_question_292" )