-- Regis' Home
function fadein_regis_home()
	if not IsEventDone ( EVEnterRegisHome )
	 	then
		PlayIntroMovie("Art\\Movie\\Flyin\\city_regishome01a.xmv")
	end
	ChangeRoom( RegisHomeEstab )
	if IsQuestionAsked ( WarrantSuspects, QIDInterroRegis )
		then
		SetVisible ( Regis, false )
		SetActive ( HRegisHomeRegis, false )
	end
	FadeIn()
	if not IsQuestionAsked ( Regis, "_TB_Q934" )
		then
		SetActive ( HRegisHomeSinkEstab, false ) 
		SetActive ( HRegisHomeThermosEstab, false )
		SetActive ( HRegisHomeShoesEstab, false )
		SetActive ( HRegisHomeDrawerEstab, false )
		SetActive ( HRegisHomeBookShelfEstab, false )
--		SetVisible ( ORegisHomeSoapEstab, false )
--		SetVisible ( ORegisHomeThermosEstab, false )
--		SetVisible ( ORegisHomeShoesEstab, false )
	end

end

AddEvent( EVEnterRegisHome, true, nil, RegisHome, nil, "fadein_regis_home" )


------------------------------------------------------------------------------------
--33.0000
function regis_questions () 
	if not DisplayQuestionList ( Regis )
		then
		PlayDialog ( Regis, "M4_CLAYTON_1980")
	end
end
AddEvent ( nil, true, nil, RegisHomeRegis, nil, "regis_questions")
---------------------------------------------------------------------------------------------------------
--33.0000
function regis_questions_click_on_regis () 
	if not DisplayQuestionList ( Regis ) 
		then
		PlayDialog ( Regis, "M4_CLAYTON_1980")
	end
end
AddEvent ( nil, true, nil, Regis, nil, "regis_questions_click_on_regis")
---------------------------------------------------------------------------------------------------------
--35.1010
function regis_enter_view_soap_holes ()
	PlayDialog ( Nick, "M4_NICK_1950" )
end
AddEvent ( nil, false, nil, RegisHomeSoap, nil, "regis_enter_view_soap_holes" )
---------------------------------------------------------------------------------------------------------
--35.1020
function regis_acquire_soap_gloves ()
	SetActive ( HRegisHomeSoapCU, false )
	SetVisible ( ORegisHomeSoapCU, false )
	SetActive ( HRegisHomeSinkSoap, false )
	SetVisible ( ORegisHomeSinkSoap, false )
	SetVisible ( ORegisHomeSoapEstab, false )
	if HasEvidence ( EIThermos )
		then 
		SetActive ( HRegisHomeSinkEstab, false )
	end
	AddEvidence ( EISoap )
	AddEvidenceDescriptionText ( EISoap, "_TB_E2702" )
end	
AddEvent ( EVAcquireSoap, false, gloves, HRegisHomeSoapCU, nil, "regis_acquire_soap_gloves")
---------------------------------------------------------------------------------------------------------
--35.1030
function regis_enter_view_drawer_opened ()
	PlayDialog ( Nick, "M4_NICK_1951" )
end
AddEvent ( nil, false, nil, RegisHomeDrawerOpen, nil, "regis_enter_view_drawer_opened" )
---------------------------------------------------------------------------------------------------------
--35.1040
function regis_acquire_pliers_gloves ()
	SetActive ( HRegisHomePliersCU, false )
	SetVisible ( ORegisHomePliersCU, false )
	SetActive ( HRegisHomePliers, false )
	SetVisible ( ORegisHomePliers, false )
	SetActive ( HRegisHomeDrawerEstab, false )
	AddEvidence ( EIPliersTool )
	AddEvidenceDescriptionText ( EIPliersTool, "_TB_E2704" )
end	
AddEvent ( nil, false, gloves, HRegisHomePliersCU, nil, "regis_acquire_pliers_gloves")
---------------------------------------------------------------------------------------------------------
--35.1050
function regis_acquire_thermos_sink_gloves ()
	SetActive ( HRegisHomeThermosCU, false )
	SetVisible ( ORegisHomeThermosCU, false )
	SetActive ( HRegisHomeSinkThermos, false )
	SetVisible ( ORegisHomeSinkThermos, false )
	SetActive ( HRegisHomeThermosEstab, false )
	SetVisible ( ORegisHomeThermosEstab, false )
	if IsEventDone ( EVAcquireSoap )
		then 
		SetActive ( HRegisHomeSinkEstab, false )
	end	
	SetActive ( HRegisHomeThermosEstab, false )
	SetVisible ( ORegisHomeThermosEstab, false )
	AddEvidence ( EIThermos )
	AddEvidenceDescriptionText ( EIThermos, "_TB_E2705" )
end	
AddEvent ( EVAcquireThermosSink, false, gloves, HRegisHomeThermosCU, nil, "regis_acquire_thermos_sink_gloves")
---------------------------------------------------------------------------------------------------------
--35.1060
function regis_acquire_brown_shoes_gloves ()
	SetActive ( HRegisHomeShoesCU, false )
	SetVisible ( ORegisHomeShoesCU, false )
	SetActive ( HRegisHomeShoesEstab, false )
	SetVisible ( ORegisHomeShoesEstab, false )
	PlayDialog ( Nick, "M4_NICK_1952" )
	AddEvidence ( EILoafers )
	AddEvidenceDescriptionText ( EILoafers, "_TB_E3264" )
end	
AddEvent ( nil, false, gloves, HRegisHomeShoesCU, nil, "regis_acquire_brown_shoes_gloves")
---------------------------------------------------------------------------------------------------------
function regis_enter_view_book_shelf ()
	SetActive ( HRegisHomeBookShelfEstab, false )
	PlayDialog ( Nick, "M4_NICK_1953" )
end
AddEvent ( nil, false, nil, RegisHomeHeart, nil, "regis_enter_view_book_shelf" )
---------------------------------------------------------------------------------------------------------



IncludeFile("Script\\GameLogic\\RegisQuestions.lua")