--5.1.Q1

function brass_question_4198_cond()
	return (IsEventDone(EVLookBarell) and not IsEventDone(EVOpenBarell))
end

function brass_question_4198()
	PlayDialog(Brass,"M5_BRASS_35")
end

AddQuestion(Brass,false,nil,"TEXT4198",nil,"brass_question_4198_cond","brass_question_4198")

--5.1.Q2
function brass_question_4195_cond()
	return IsEventDone(EVOpenBarell)
end

function brass_question_4195()
	PlayDialog(Brass,"M5_BRASS_28")
	SetCharacterName(Victim, "Sophia Benedetti")
	UpdateCaseFile(Victim,INFORMATION,"TEXT4151")
end

AddQuestion(Brass,false,nil,"TEXT4195",nil,"brass_question_4195_cond","brass_question_4195")

--5.1.Q3
function brass_question_4196_cond()
	return IsQuestionAsked(Brass,"TEXT4195")
end
function brass_question_4196()
	PlayDialog(Brass,"M5_BRASS_29")
end

AddQuestion(Brass,false,nil,"TEXT4196",nil,"brass_question_4196_cond","brass_question_4196")

--5.1.Q4
function brass_question_4197_cond()
	return IsQuestionAsked(Brass,"TEXT4196")
end
function brass_question_4197()
	PlayDialog(Brass,"M5_BRASS_30")
end

AddQuestion(Brass,false,nil,"TEXT4197",nil,"brass_question_4197_cond","brass_question_4197")

--7.1.Q1

function brass_question_4194_cond()
	return HasEvidence(EDPrintFlora) and IsQuestionAsked(Brass,"TEXT4195")
end

function brass_question_4194()
	PlayDialog(Brass,"M5_BRASS_32")	
	AddEvidenceDescriptionText(EDPrintFlora,"TEXT4048")
------------------------------------------------------------------------
-- LOCATION ADDED - GARDEN
	AddLocation(Garden)
------------------------------------------------------------------------
end
AddQuestion(Brass, false, nil, "TEXT4194", nil, "brass_question_4194_cond", "brass_question_4194")

--12.2.Q1
function brass_question_4190_cond()
	return IsQuestionAsked(Coroner,"TEXT4144")
end

function brass_question_4190()
	PlayMovie ( Brass, "brass_to_comp.xmv" )
	SetIdleMovie ( Brass, "brass_atcomp_idle.xmv" )
	SetTalkMovie ( Brass, "brass_atcomp_talk.xmv" )
	PlayDialog(Brass,"M5_BRASS_01A")
	PlayMovie ( Brass, "brass_from_comp.xmv" )
	SetIdleMovie( Brass, "brass_idle.xmv" )
	SetTalkMovie( Brass, "brass_talk.xmv" )
	PlayDialog(Brass,"M5_BRASS_01B")
end
AddQuestion(Brass, false, nil, "TEXT4190", nil, "brass_question_4190_cond", "brass_question_4190")

--12.2.Q2
function brass_question_4191_cond()
	return IsQuestionAsked(Coroner,"TEXT4144") and IsQuestionAsked(Brass,"TEXT4195")
end

function brass_question_4191()
	PlayMovie ( Brass, "brass_to_comp.xmv" )
	SetIdleMovie ( Brass, "brass_atcomp_idle.xmv" )
	SetTalkMovie ( Brass, "brass_atcomp_talk.xmv" )
	PlayDialog(Brass,"M5_BRASS_02")
	PlayMovie ( Brass, "brass_from_comp.xmv" )
	SetIdleMovie( Brass, "brass_idle.xmv" )
	SetTalkMovie( Brass, "brass_talk.xmv" )
	PlayIdleMovie( Brass )
------------------------------------------------------------------
-- LOCATION ADDED - PHARMACY
	AddLocation(Pharmacy)
------------------------------------------------------------------ 
end
AddQuestion(Brass, false, nil, "TEXT4191", nil, "brass_question_4191_cond", "brass_question_4191")

--14.2.Q1
function brass_question_4193_cond()
	return IsQuestionAsked(Leda,"TEXT4202")
end
function brass_question_4193()
	PlayDialog(Brass,"M5_BRASS_03A")
	PlayMovie ( Brass, "brass_to_comp.xmv" )
	SetIdleMovie ( Brass, "brass_atcomp_idle.xmv" )
	SetTalkMovie ( Brass, "brass_atcomp_talk.xmv" )
	PlayDialog(Brass,"M5_BRASS_03B")
	PlayMovie ( Brass, "brass_from_comp.xmv" )
	SetIdleMovie( Brass, "brass_idle.xmv" )
	SetTalkMovie( Brass, "brass_talk.xmv" )
	PlayDialog(Brass,"M5_BRASS_03C")
	UpdateCaseFile(DrWilk,SUSPECT_VICTIM,"TEXT4173",100)
end	
AddQuestion(Brass, false, nil,"TEXT4193", nil, "brass_question_4193_cond", "brass_question_4193")

--19.2.Q1
function brass_question_4240a_cond()
	return (not IsEventDone(EVWarrickConclusion1) and IsEventDone(EVPickPaperGarage))
end
function brass_question_4240a()
	PlayDialog(Brass, "M5_BRASS_05")
end
AddQuestion(Brass, false, nil, "TEXT4240", nil, "brass_question_4240a_cond", "brass_question_4240a", QIDFireCall1)

--19.2.Q2
 function brass_question_4240b_cond()
	return (IsEventDone(EVWarrickConclusion1) and IsEventDone(EVPickPaperGarage))
end
function brass_question_4240b()
	PlayDialog(Brass, "M5_BRASS_06A")
	PlayMovie ( Brass, "brass_to_comp.xmv" )
	SetIdleMovie ( Brass, "brass_atcomp_idle.xmv" )
	SetTalkMovie ( Brass, "brass_atcomp_talk.xmv" )
	PlayDialog(Brass, "M5_BRASS_06B")
	PlayMovie ( Brass, "brass_from_comp.xmv" )
	SetIdleMovie( Brass, "brass_idle.xmv" )
	SetTalkMovie( Brass, "brass_talk.xmv" )
	PlayDialog(Brass, "M5_BRASS_06C")
	UpdateCaseFile(Leda, SUSPECT_VICTIM, "TEXT4162", 200)
	UpdateCaseFile(DrWilk, SUSPECT_VICTIM, "TEXT4177", 100)
end
AddQuestion(Brass, false, nil, "TEXT4240", nil, "brass_question_4240b_cond", "brass_question_4240b", QIDFireCall2)

--19.2.Q3
function brass_question_4242_cond()
	return (IsEventDone(EVWarrickConclusion1) and not IsQuestionAsked(MrsWilk,"TEXT4222"))
end
function brass_question_4242()
	PlayDialog(Brass,"M5_BRASS_07")
end
AddQuestion(Brass, true, nil, "TEXT4242", nil, "brass_question_4242_cond", "brass_question_4242", QIDWilkInterro1)

--19.2.Q4
function brass_question_4241_cond()
	return (IsEventDone(EVWarrickConclusion1) and not IsQuestionAsked(MrsWilk,"TEXT4222"))
end
function brass_question_4241()
	PlayDialog(Brass,"M5_BRASS_08")
end
AddQuestion(Brass, true, nil, "TEXT4241", nil, "brass_question_4241_cond", "brass_question_4241", QIDMrsWilkInterro1)

--19.2.Q5
function brass_question_4242a_cond()
	return (IsEventDone(EVWarrickConclusion1) and IsQuestionAsked(MrsWilk,"TEXT4222"))
end
function brass_question_4242a()
	SetVisible(DrWilk, true)
	SetActive(DrWilk, true)	
	if not IsQuestionAsked (Brass, QIDWilkInterro2) then
	PlayDialog(Brass,"M5_BRASS_09")
	end
	ChangeRoom(InterroDrWilk)
	EndDisplayQuestionList()
	
-- din pacate am acelasi obiect/hotspot in ambele room-uri (cea de interogare si cea de docoffice) - DrWilk	
      
end
AddQuestion(Brass, true, nil, "TEXT4242", nil, "brass_question_4242a_cond", "brass_question_4242a", QIDWilkInterro2)

function wilk_dialog()
--	DisplayQuestionList(DrWilk)
	if not DisplayQuestionList(DrWilk) then
		PlayDialog(DrWilk, "M5_DRWILK_50")
	end

end
AddEvent( nil, true, nil, DrWilk, nil, "wilk_dialog" )


function wilk_dialog_interro()
	if not IsEventDone ( EVEnterInterroDrWilk ) then
	PlayDialog(Brass,"M5_BRASS_12")
	PlayDialog(Warrick,"M5_WARR_51")
	end
--	DisplayQuestionList(DrWilk)
	if not DisplayQuestionList(DrWilk) then
		PlayDialog(DrWilk, "M5_DRWILK_50")
	end

end
AddEvent( EVEnterInterroDrWilk, true, nil, InterroDrWilk, nil, "wilk_dialog_interro" )


--19.2.Q6
function brass_question_4241a_cond()
	return (IsEventDone(EVWarrickConclusion1) and IsQuestionAsked(MrsWilk,"TEXT4222"))
end
function brass_question_4241a()
	SetVisible(MrsWilk, true)
	SetActive(MrsWilk, true)
	if not IsQuestionAsked (Brass, QIDMrsWilkInterro2) then
		PlayDialog(Brass,"M5_BRASS_10")
	end
	ChangeRoom(InterroMrsWilk)
	EndDisplayQuestionList()
	

end
AddQuestion(Brass, true, nil, "TEXT4241", nil, "brass_question_4241a_cond", "brass_question_4241a", QIDMrsWilkInterro2)

function mrswilk_dialog()
--	DisplayQuestionList(MrsWilk)
	if not DisplayQuestionList(MrsWilk) then
		PlayDialog(MrsWilk, "M5_MRSWILK_50")
	end
end
AddEvent( nil, true, nil, MrsWilk, nil, "mrswilk_dialog" )

function mrswilk_dialog_interro()
	if not IsEventDone (EVEnterInterroMrsWilk) then
		PlayDialog(Brass, "M5_BRASS_14")
		PlayDialog(Warrick, "M5_WARR_52")
		PlayDialog(MrsWilk, "M5_MRSWILK_09")
	end
--	DisplayQuestionList(MrsWilk)	
	if not DisplayQuestionList(MrsWilk) then
		PlayDialog(MrsWilk, "M5_MRSWILK_50")
	end
end
AddEvent( EVEnterInterroMrsWilk, true, nil, InterroMrsWilk, nil, "mrswilk_dialog_interro" )


--19.2.Q7
function brass_question_4243_cond()
	return (IsQuestionAsked(Brass, QIDFireCall2) and not IsEventDone(EVLedaDNA))
end
function brass_question_4243()
	SetVisible(Leda, true)
	SetActive(Leda, true)
	
	if not IsQuestionAsked (Brass, QIDLedaInterro1) then

	PlayDialog(Brass, "M5_BRASS_11")

	end
	ChangeRoom(InterroLeda)
	EndDisplayQuestionList()
			
end
AddQuestion(Brass, true, nil, "TEXT4243", nil, "brass_question_4243_cond", "brass_question_4243", QIDLedaInterro1)

function leda_dialog()
--	DisplayQuestionList(Leda)
	if (not DisplayQuestionList(Leda) and IsQuestionAsked (Brass, QIDLedaInterro1)) then
		PlayDialog(Leda, "M5_LEDA_50")
	end

end
AddEvent( nil, true, nil, Leda, nil, "leda_dialog" )


function leda_dialog_interro()
	if not IsEventDone (EVEnterInterroLeda) then
	 PlayDialog(Brass, "M5_BRASS_15")
	 PlayDialog(Warrick, "M5_WARR_54")
	end
--	DisplayQuestionList(Leda)
	if not DisplayQuestionList(Leda)then
		PlayDialog(Leda, "M5_LEDA_50")
	end
end
AddEvent( EVEnterInterroLeda, true, nil, InterroLeda, nil, "leda_dialog_interro" )

--19.2.Q8
function brass_question_4243a_cond()
	return IsEventDone(EVLedaDNA) 
end
function brass_question_4243a()
	SetVisible(Leda, true)
	SetActive(Leda, true)
	if not IsQuestionAsked (Brass, QIDLedaInterro2) then
		PlayDialog(Brass,"M5_BRASS_31")
	end
	ChangeRoom(InterroLeda)
	EndDisplayQuestionList()	
end
AddQuestion(Brass, true, nil, "TEXT4243", nil, "brass_question_4243a_cond", "brass_question_4243a", QIDLedaInterro2)

IncludeFile("Script\\Gamelogic\\InterroLedaQuestions.lua" )
IncludeFile("Script\\Gamelogic\\InterroMrsWilkQuestions.lua" )
IncludeFile("Script\\Gamelogic\\InterroDrWilkQuestions.lua" )