-- 15.1

function motel_intro()
	FadeIn()
	
	PlayDialog( Bert, "M6_MOWNER_01" )
	PlayDialog( Katy, "M6_CATH_66" )
	PlayDialog( Bert, "M6_MOWNER_02" )
	PlayDialog( Katy, "M6_CATH_67" )
	ChangeRoom( HotelPanoRoom )
	EndQuestionList( Bert )
end

AddEvent( EVMotelIntro, false, nil, HotelEstablishment, nil, "motel_intro" )


function fadein_motel()
	
	if not IsEventDone ( EVMotelEnter ) then
		ChangeRoom( HotelEstablishment )
	else
 		FadeIn()
	end

end

AddEvent( EVMotelEnter, true, nil, Motel, nil, "fadein_motel" )


-- 15.2

function bert_quest_condition()
	return IsEventDone( EVMotelIntro )
end

function bert_quest()
--	DisplayQuestionList( Bert )
	if not DisplayQuestionList( Bert ) then
		PlayDialog ( Bert, "M6_MOWNER_50")
	end

end

AddEvent( nil, true, nil, HotelBertCloseup, "bert_quest_condition", "bert_quest" )
AddEvent( nil, true, nil, Bert, "bert_quest_condition", "bert_quest" )

function cath_expo_condition()
	return IsQuestionAsked ( Bert, "TEXT5202" ) 
end


-- 15.3

--function cath_expo()
--	ChangeRoom( HotelBertCloseup )
--	PlayDialog( Katy, "M6_CATH_68" )
--	ChangeRoom( HotelPanoRoom )
--	SetBackRoom( HotelBertCloseup, HotelPanoRoom ) 
--end

--AddEvent( nil, false, nil, HotelKatyCloseup, "cath_expo_condition", "cath_expo" )


-- 15.4

function window_CU()
	PlayDialog( nil, "M6_CATH_69" )
end

AddEvent( nil, false, nil, HotelWindowInterior, nil, "window_CU" )


-- 15.5

function window_CU_exterior()
	PlayDialog( nil, "M6_CATH_70" )
end

AddEvent( nil, false, nil, HotelWindowExterior, nil, "window_CU_exterior" )


-- 15.6

function CU_exterior_smudge()
	PlayReenactment( "Art\\Reenactments\\Movie\\reenact3.xmv", "Art\\Reenactments\\Pictures\\reenact3.tga", "TEXT5327", nil, "REENACT3" )
end

AddEvent( nil, false, nil, HotelWindowSmudge, nil, "CU_exterior_smudge" )


-- 15.6.5

function exterior_smudge_pick()
	SetActive( HHotelWindowSmudge, false )
	AddEvidence( ETWindowSmudge )
	AddEvidenceDescriptionText( ETWindowSmudge , "TEXT5133" )
end

AddEvent( nil, false, swab, HHotelWindowSmudge, nil, "exterior_smudge_pick" )


--------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------
-- HINTS
--------------------------------------------------------------------------------------

function motel_katy_hints()
	if not DisplayQuestionList( Katy ) then
		PlayDialog( Katy, "M1_CAT_1214" )
	end
end

AddEvent( nil,true, nil, HotelKatyCloseup, nil, "motel_katy_hints" )

----------------------------------------------------------------------------------------
		


IncludeFile( "Script\\Gamelogic\\BertQuestions.lua" )