-- 24.  
-- 24.2     Trebuie un Room pt KatyCloseUp
-- Prima intrare in locatie
function storage_first_enter()
	ChangeRoom( StorageIngateOpen)      -- Trebuie schimbat pe room-ul StorageIngateClosed
	FadeIn()
	PlayDialog( nil, "M6_CATH_96" )
	SetActive( HStorageLockerDoor, false )
end

AddEvent( nil, false, nil, Storage, nil, "storage_first_enter" )


-- 24.2 Before obtaining keys in 5.6. Event 1
function storage_enter_general()
	if not HasEvidence( EIKeySmall ) then 
		ChangeRoom( StorageIngateOpen)
		FadeIn()
	end
	
	
end

AddEvent( EVStorageIntro1, true, nil, Storage, nil, "storage_enter_general" )


-- 24.3 After obtaining keys in 5.6. Event 1
function storage_enter_key_cond()
	return HasEvidence( EIKeySmall )

end

function storage_enter_key_intro()
	ChangeRoom( StorageIngateOpen)    -- Trebuie schimbat pe room-ul StorageIngateClosed
	PlayDialog( nil, "M6_CATH_97" )
--	PlayMovie( "Art\\Movie\\Storage\\18_gate_opening.xmv, "M6_CATH_98" )

end

AddEvent( nil, false, nil, Storage, "storage_enter_key_cond", "storage_enter_key_intro" )

function storage_enter_key()
	if not IsEventDone( EVGateOpen1 ) or not IsEventDone( EVGateOpen2 ) then
		ChangeRoom( StorageIngateOpen)     -- Trebuie pus Room-ul cu poarta deschisa
		FadeIn()
	end
	
	if IsEventDone( EVGateOpen1 ) and not ISQuestionAsked( Brass, "TEXT5296" ) then
		ChangeRoom( StorageIngateOpen)   -- Trebuie schimbata camera in StorageIngateOpen ( a trebuit sa modific pt ca nu aveam intrebarea 5296)
		FadeIn()
	end

	if IsEventDone( EVGateOpen1 ) and ISQuestionAsked( Brass, "TEXT5296" ) then
		ChangeRoom( StorageIngateOpen)
		FadeIn()
		PlayDialog( nil, "M6_CATH_100" )
		PlayDialog( nil, "M6_CATH_101" )
--		PlayMovie( ...., "nume_film" )   -- Trebuie play-at un fil  + 25.3.2
	end
	
	if IsEventDone( EVGateOpen2 )then
		ChangeRoom( StorageIngateOpen)              -- StorageIngateOpen 
		FadeIn()
	end

end

AddEvent( EVStorageIntro2, true, nil, Storage, "storage_enter_key_cond", "storage_enter_key" )


---------------------------------------------------------------------------------------------------------------
-- Trebuie creat un Room cu poarta deschisa si HOTSPOT pe poarta
---------------------------------------------------------------------------------------------------------------

-- 25
-- 25.2 Before the keys are analyzed     
-- function storage_gate_before_cond()
--	return not ISQuestionAsked( Brass, "TEXT5296" )
-- end

-- function storage_gate_before()
--	ChangeRoom( StorageIngateOpen )             
--	PlayDialog( nil, "M6_CATH_99" )
-- end

-- AddEvent( EVGateOpen1, false, nil, HStorageGate, "storage_gate_before_cond", "storage_gate_before" )




-- 25.3 After Brass has found the unit number in 22.1.Q3     -- Trebuie creat un Room cu poarta deschisa si HOTSPOT pe poarta
-- function storage_gate_after_cond()
--	return ISQuestionAsked( Brass, "TEXT5296" )
-- end

-- function storage_gate_after()
--	ChangeRoom( StorageIngateOpen )
--	PlayDialog( nil, "M6_CATH_100" )
--	PlayDialog( nil, "M6_CATH_101" )
--	PlayMovie( ...., "nume_film" )              -- Trebuie play-at un fil  + 25.3.2
-- end

-- AddEvent( EVGateOpen2, false, nil, HStorageGate, "storage_gate_after_cond", "storage_gate_after" )

--------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
-- Cand se intra in locatie dupa ce intrebarea TEXT5296: "Can you check what locker matches key #10072?" este pusa, user-ul nu trebuie sa mai poata iesi de aici 
----------------------------------------------------------------------------------------------------------

-- 25.4
-- 25.4.1
function storage_oil_drum_dialog()
	PlayDialog( nil, "M6_CATH_106" )
end

AddEvent( nil, false, nil, StorageBarrel, nil, "storage_oil_drum_dialog" )


-- 25.4.2
function storage_oil_drum_pick()
	SetVisible( OStorageBarrel, false )
	SetVisible( OStorageBarrelFar, false )
	SetActive( HStorageBarrel, false )
	SetActive( HStorageBarrelFar, false )
		
	AddEvidence( EIBarrel )
	AddEvidenceDescriptionText( EIBarrel , "TEXT5336" )
	
	if not HasEvidence( EIPipe ) then
		NewEvent( EVKatyElse, nil )
	else
		NewEvent( EVKatyAll, nil)
	end


end

AddEvent( nil, false, gloves, HStorageBarrel, nil, "storage_oil_drum_pick" )


-- 25.4.3
function storage_dumpster_dialog()
	PlayDialog( nil, "M6_CATH_107" )
end

AddEvent( nil, false, nil, StoragePipe, nil, "storage_dumpster_dialog" )


-- 25.4.4
function storage_iron_rod_pick()
	SetVisible( OStoragePipe, false )
	SetActive( HStoragePipe, false )
	SetActive( HStorageDumpster, false )
		
	AddEvidence( EIPipe )
	AddEvidenceDescriptionText( EIPipe , "TEXT5163" )
	
	if not HasEvidence( EIBarrel ) then
		NewEvent( EVKatyElse, nil )
	else
		NewEvent( EVKatyAll, nil)
	end

end

AddEvent( nil, false, gloves, HStoragePipe, nil, "storage_iron_rod_pick" )


-- 25.4.5
function storage_katy_else()
	PlayDialog( nil, "M6_CATH_108" )

end

AddEvent( EVKatyElse, false, EVKatyElse, nil, nil, "storage_katy_else" )


-- 25.4.6    +  26
function storage_katy_all()
	PlayDialog( nil, "M6_CATH_109" )
--	PlayMovie(nil, "Art\\Movie\\Storage\\18_gate_opening.xmv" )                      -- Trebuie play-at filmul cu usile de la garaj care se deschid: anim_lockeropen2.mov      
	ChangeRoom( StorageInteriorEstab )
	PlayDialog( nil, "M6_CATH_105" )
	PlayDialog( nil, "M6_GRISS_01" )
	PlayDialog( nil, "M6_CATH_110" )
	PlayDialog( nil, "M6_GRISS_02" )
	PlayDialog( nil, "M6_CATH_111" )
	PlayDialog( nil, "M6_GRISS_03" )
	PlayDialog( nil, "M6_CATH_112" )
	PlayDialog( nil, "M6_GRISS_04" )
	PlayDialog( nil, "M6_CATH_113" )

	
--	PlayMovie( Brass, "brass_est02_tocomp.xmv" )
--	SetIdleMovie( Brass, "brass_est02_atcomp_idle.xmv" )              -- Ne trebuiesc filmuletele
--	SetTalkMovie( Brass, "brass_est02_atcomp_talk.xmv" )  
	ChangeLocation( GrissomOffice )
	ChangeRoom( GrissomOfficeRoom )
	FadeIn()
	PlayDialog( Grissom, "M6_GRISS_05A" )                     -- Film
--	PlayDialog( Grissom, "M6_GRISS_05B" )
--	PlayDialog( Grissom, "M6_GRISS_05C" )                     -- Film

		EndGame()


end

AddEvent( EVKatyAll, false, EVKatyAll, nil, nil, "storage_katy_all" )





-- Conditie iesire din Locatie
function exit_storage()
	if (not IsEventDone( EVGateOpen2 )) and (not IsEventDone( EVStorageIntro1 )) and (not IsEventDone( EVStorageIntro2 )) then     -- doar primele 2 trebuiesc pastrate( ultimul ev doar pt teste)
		OpenLocationsMenu()
	
	end

end

AddEvent( nil, true, Storage, nil, nil, "exit_storage" )



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

--function storage_ext_katy_hints()
--	DisplayQuestionList( Katy )
--end

--AddEvent( nil,true, nil, StorageIngateClosed, nil, "storage_ext_katy_hints" )


--function storage_int_katy_hints()
--	DisplayQuestionList( Katy )
--end

--AddEvent( nil,true, nil, StorageIngateOpen, nil, "storage_int_katy_hints" )

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