-- 8
-- 8.1
--function fadein_wilkdoor()
--	FadeIn()
--	ChangeRoom( WilkDoorRoom )
--	PlayDialog( Katy, "M6_CATH_39" )
--	PlayDialog( DrWilk, "M6_DRWILK_01" )
--	PlayDialog( Katy, "M6_CATH_40" )
--	PlayDialog( DrWilk, "M6_DRWILK_02" )
--	PlayDialog( Katy, "M6_CATH_41" )
--	PlayDialog( DrWilk, "M6_DRWILK_03" )
--	AddSuspect( DrWilk, "Dr.Wilkinson", "Art\\Reenactments\\Pictures\\drwilkinson.tga" )
--	UpdateCaseFile( DrWilk, SUSPECT_CRIMESCENE, "TEXT5246", 400 )  -- TEXT5246=Claims to have had his personal and professional reputation damaged.
	
--end

--AddEvent( nil, false, nil, WilkDoor, nil, "fadein_wilkdoor" )


function wilk_door_enter()
	if not IsEventDone( EVDrWilkIntro ) then
		ChangeRoom( WilkDoorRoom )
		FadeIn()
		PlayDialog( Katy, "M6_CATH_39" )
		PlayDialog( DrWilk, "M6_DRWILK_01" )
		PlayDialog( Katy, "M6_CATH_40" )
		PlayDialog( DrWilk, "M6_DRWILK_02" )
		PlayDialog( Katy, "M6_CATH_41" )
		PlayDialog( DrWilk, "M6_DRWILK_03" )
		AddSuspect( DrWilk, "Dr.Wilkinson", "Art\\Reenactments\\Pictures\\drwilkinson.tga" )
		UpdateCaseFile( DrWilk, SUSPECT_CRIMESCENE, "TEXT5246", 100 )  -- TEXT5246=Claims to have had his personal and professional reputation damaged.
	else
		ChangeRoom( WilkDoorRoom )
		FadeIn()
--		DisplayQuestionList( DrWilk )
	end

end

AddEvent( EVDrWilkIntro, true, nil, WilkDoor, nil, "wilk_door_enter" )


function drwilk_show_questionsA()
--	DisplayQuestionList( DrWilk )
	if not DisplayQuestionList( DrWilk ) then
		PlayDialog ( DrWilk, "M6_DRWILK_50")
	end

end

AddEvent( nil, true, nil, DrWilk, nil, "drwilk_show_questionsA" )
AddEvent( nil, true, nil, WilkDoorRoom, nil, "drwilk_show_questionsA" )


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

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

AddEvent( nil,true, nil, WilkDoorKatyCloseup, nil, "wilk_door_katy_hints" )

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