function enter_corry_interro_estab_room()
	DisplayQuestionList( Corry )
end
AddEvent( nil, true, nil, InterroCorryEstab, nil, "enter_corry_interro_estab_room")
----------------------------------------------------------------------------------

--_TB_Q158 : Did you hire Leslie Handleman to sabotage Ace's bike?
--33.0000
function corry_interro_TB_Q158_cond ()
	return IsQuestionAsked ( WarrantSuspects, QIDInterroCorry )
end
function corry_interro_TB_Q158 ()
	PlayDialog ( Corry, "M1_CORY_334" )
	UpdateCaseFile ( Corry, INFORMATION, "_TB_E4626" )
--	SetBackRoom ( InterroCorryEstab, BrassRoom01 )
end
AddQuestion ( Corry, false, nil, "_TB_Q158", nil, "corry_interro_TB_Q158_cond", "corry_interro_TB_Q158" )
--------------------------------------------------------------------------------------------------------
-- folosit la intrebarea urmatoare
function show_corry_money_envelope_cond()
	return EvidenceEnablesQuestion ()
end
function show_corry_money_envelope()
	PlayDialog ( Corry, "M1_CORY_2062" )
	ChangeRoom ( InterroCorryEstab )
end
AddEvent( EVShowCorryEnvelope, false, EIVegasMotoEnvelope, Corry, "show_corry_money_envelope_cond", "show_corry_money_envelope")
--------------------------------------------------------------------------------------------------------
--_TB_Q159 : Why did you give Leslie Handleman an envelope of cash?
--33.1000
function corry_interro_TB_Q159_cond ()
	return (IsEventDone ( EVLabComparePrints4 ) or IsEventDone ( EVLabEnvelopePrints )) and IsQuestionAsked ( Corry, "_TB_Q158" ) and ( IsEventDone ( EVShowCorryEnvelope ) or not EvidenceEnablesQuestion () ) and HasEvidence ( EIVegasMotoEnvelope )
end
--33.2000
function corry_interro_TB_Q159 ()
	PlayDialog ( Corry, "M1_CORY_335" )
--33.3000
	PlayDialog ( Katy, "M1_CAT_336" )
--33.3050
	PlayDialog ( Corry, "M1_CAT_2031" )
--33.4000
	PlayDialog ( Corry, "M1_CORY_337" )
	if IsQuestionAsked ( Corry, "_TB_Q160" )
		then
		NewEvent ( EVPlayBrassConclusion, nil )
	end	

end
AddQuestion ( Corry, false, nil, "_TB_Q159", nil, "corry_interro_TB_Q159_cond", "corry_interro_TB_Q159" )
--------------------------------------------------------------------------------------------------------
--_TB_Q160 : Did you ask David McLadden to tamper with the accident scene?
--34.0000
function corry_interro_TB_Q160_cond ()
	return IsQuestionAsked ( WarrantSuspects, QIDInterroCorry  ) and IsQuestionAsked ( David, "_TB_Q128" ) 
end
--34.1000
function corry_interro_TB_Q160 ()
	ChangeRoom ( InterroCorry3 )
--34.1500
	PlayDialog ( Corry, "M1_CORY_338" )
--34.2000
	PlayDialog ( Katy, "M1_CAT_339" )
--34.2500
	EndDisplayQuestionList ( Corry )
	ChangeRoom ( InterroCorryEstab )


	PlayDialog ( Corry, "M1_CORY_398" )
--34.3000
	PlayDialog ( Katy, "M1_CAT_340" )
	if IsQuestionAsked ( Corry, "_TB_Q159" )
		then
		NewEvent ( EVPlayBrassConclusion, nil )
	end		
end
AddQuestion ( Corry, false, nil, "_TB_Q160", nil, "corry_interro_TB_Q160_cond", "corry_interro_TB_Q160" )
---------------------------------------------------------------------------------------------------------
-- tot pentru dialogul de mai sus, concluzia lui Brass

function brass_conclusion ()
--34.3000
	PlayDialog ( Brass, "M1_BRASS_2120" )
--34.3200
	PlayDialog ( Brass, "M1_BRASS_2642" )
--34.4000	
	PlayDialog ( Corry, "M1_CORY_400" )
--34.4500	
	PlayDialog ( Corry, "M1_CORY_2038" )
	PlayReenactment( "Art\\Reenactments\\Movie\\rnct_producerfinal01a.xmv", "Art\\Reenactments\\Pictures\\rnct_producerfinal01a.tga", "_TB_Z921", nil, "M1_CORY_342" )
--34.7000
	PlayDialog ( Corry, "M1_CORY_401" )
	PlayDialog ( Katy, "M1_CAT_343" )
	ChangeLocation ( GrissomOffice )
end
AddEvent ( EVGrissomFinalSpeech, false, EVPlayBrassConclusion, nil, nil, "brass_conclusion" )
----------------------------------------------------------------------------------------------------------