-- 1.3
function grissom_presentation()
	PlayIntroMovie("Art\\Movie\\Flyin\\c1m1_flyin.xmv")

	PlayMovie( Grissom, "grs_glasses_off.xmv", true )
	
	FadeIn()

	PlayMovie( Grissom, "grs_sit_gesture.xmv" )

	PlayDialog( Grissom, "M1_GRISS_01A" )
	PlaySound( nil, "grissphonering" )
	ChangeRoom( GrissomPhone )
	PlaySound( nil, "grissphonepu" )
	PlayDialog( Grissom, "M1_GRISS_01B" )
--	PlaySound( nil, "grissphonehu" )
	ChangeRoom( GrissomDefaultRoom )
	PlayDialog( Grissom, "M1_GRISS_01C" )

-- nandu: user must change location!
-- tutorial line
--	PlayDialog( nil, "M1_NARR_01"	 );
	ChangeLocation(ChampagneHotel)
end

AddEvent( nil, true, nil, GrissomIntro, nil, "grissom_presentation" )

function grissom_intro()
	ChangeRoom( GrissomIntro )
end

AddEvent( nil, true, nil, GrissomOffice, nil, "grissom_intro" )

function grissom_say_hints()
	if not DisplayQuestionList( Grissom ) then
		PlayDialog( Grissom, "M5_GRISSOM_1701" )
	end
end

AddEvent( nil, true, nil, Grissom, nil, "grissom_say_hints" )

--function grissom_evidence_answering_machine()
--	AddEvidenceHintText( AnsweringMachineTape, "TEXT1210" )
--	ScoreAddEvidenceHint( AnsweringMachineTape )
--end

--AddEvent( nil, false, AnsweringMachineTape, Grissom, nil, "grissom_evidence_answering_machine" )

--function grissom_evidence_bracelet()
--	AddEvidenceHintText( Bracelet, "TEXT1186" )
--	ScoreAddEvidenceHint( Bracelet )
--end

--AddEvent( nil, false, Bracelet, Grissom, nil, "grissom_evidence_bracelet" )

--function grissom_evidence_tvprint()
--	AddEvidenceHintText( TVFingerPrint, "TEXT1180" )
--	ScoreAddEvidenceHint( TVFingerPrint )
--end

--AddEvent( nil, false, TVFingerPrint, Grissom, nil, "grissom_evidence_tvprint" )

--function grissom_evidence_hairsample()
--	AddEvidenceHintText( HairSample, "TEXT1222" )
--	ScoreAddEvidenceHint( HairSample )
--end

--AddEvent( nil, false, HairSample, Grissom, nil, "grissom_evidence_hairsample" )

--function grissom_evidence_receipts()
--	AddEvidenceHintText( Receipts, "TEXT1282" )
--	ScoreAddEvidenceHint( Receipts )
--end

--AddEvent( nil, false, Receipts, Grissom, nil, "grissom_evidence_receipts" )

--function grissom_evidence_medicinebottle()
--	AddEvidenceHintText( MedicineBottle, "TEXT1276" )
--	ScoreAddEvidenceHint( MedicineBottle )
--end

--AddEvent( nil, false, MedicineBottle, Grissom, nil, "grissom_evidence_medicinebottle" )

--function grissom_evidence_money()
--	AddEvidenceHintText( Money, "TEXT1264" )
--	ScoreAddEvidenceHint( Money )
--end

--AddEvent( nil, false, Money, Grissom, nil, "grissom_evidence_money" )

--function grissom_evidence_remoteprint()
--	AddEvidenceHintText( RemoteFingerPrint, "TEXT1228" )
--	ScoreAddEvidenceHint( RemoteFingerPrint )
--end

--AddEvent( nil, false, RemoteFingerPrint, Grissom, nil, "grissom_evidence_remoteprint" )

--function grissom_evidence_bertrapsheet()
--	AddEvidenceHintText( BertRapSheet, "TEXT1288" )
--	ScoreAddEvidenceHint( BertRapSheet )
--end

--AddEvent( nil, false, BertRapSheet, Grissom, nil, "grissom_evidence_bertrapsheet" )

--function grissom_evidence_devonrapsheet()
--	AddEvidenceHintText( DevonRapSheet, "TEXT1288" )
--	ScoreAddEvidenceHint( DevonRapSheet )
--end

--AddEvent( nil, false, DevonRapSheet, Grissom, nil, "grissom_evidence_devonrapsheet" )

--function grissom_evidence_bertdna()
--	AddEvidenceHintText( BertDNA, "TEXT1246" )
--	ScoreAddEvidenceHint( BertDNA )
--end

--AddEvent( nil, false, BertDNA, Grissom, nil, "grissom_evidence_bertdna" )

--function grissom_evidence_devondna()
--	AddEvidenceHintText( DevonDNA, "TEXT1246" )
--	ScoreAddEvidenceHint( DevonDNA )
--end

--AddEvent( nil, false, DevonDNA, Grissom, nil, "grissom_evidence_devondna" )

--function grissom_evidence_berthair()
--	AddEvidenceHintText( BertHair, "TEXT1240" )
--	ScoreAddEvidenceHint( BertHair )
--end

--AddEvent( nil, false, BertHair, Grissom, nil, "grissom_evidence_berthair" )

--function grissom_evidence_devonhair()
--	AddEvidenceHintText( DevonHair, "TEXT1240" )
--	ScoreAddEvidenceHint( DevonHair )
--end

--AddEvent( nil, false, DevonHair, Grissom, nil, "grissom_evidence_devonhair" )

--function grissom_evidence_registrationcard()
--	AddEvidenceHintText( RegistrationCard, "TEXT1270" )
--	ScoreAddEvidenceHint( RegistrationCard )
--end

--AddEvent( nil, false, RegistrationCard, Grissom, nil, "grissom_evidence_registrationcard" )

--function grissom_evidence_skinsample()
--	AddEvidenceHintText( SkinSample, "TEXT1174" )
--	ScoreAddEvidenceHint( SkinSample )
--end

--AddEvent( nil, false, SkinSample, Grissom, nil, "grissom_evidence_skinsample" )

--function grissom_evidence_sinkblood()
--	AddEvidenceHintText( SinkBlood, "TEXT1174" )
--	ScoreAddEvidenceHint( SinkBlood )
--end
--
--AddEvent( nil, false, SinkBlood, Grissom, nil, "grissom_evidence_sinkblood" )

--function grissom_evidence_bedsheet()
--	AddEvidenceHintText( BedSheet, "TEXT1216" )
--	ScoreAddEvidenceHint( BedSheet )
--end
--
--AddEvent( nil, false, BedSheet, Grissom, nil, "grissom_evidence_bedsheet" )

--function grissom_evidence_kylieschedule()
--	AddEvidenceHintText( KylieSchedule, "TEXT1234" )
--	ScoreAddEvidenceHint( KylieSchedule )
--end

--AddEvent( nil, false, KylieSchedule, Grissom, nil, "grissom_evidence_kylieschedule" )

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