SetMenuData( DevonDNA , "trace7_bt", "cur_DevonDNA" );
SetMenuData( DevonHair , "trace2_bt", "cur_DevonHair" );


SetEvidenceProperties( DevonDNA, "TEXT1242", "evd_victim_dna", false, nil, COMPUTER_DNA, "devon_DNA", 1 )
SetEvidenceProperties( DevonHair, "TEXT1236", "evd_devon_hair_samples", true, "devonHair", false, nil, 1 )

AddEvidenceSample( DevonDNA, DNA2SampleObject )
AddEvidenceSample( DevonDNA, DNA1SampleObject )
AddEvidenceSample( DevonDNA, DNA3SampleObject )
AddEvidenceSample( DevonDNA, DNA5SampleObject )
AddEvidenceSample( DevonDNA, DNA4SampleObject )

-- pic_DevonDNA / Hair: normal picture to show as evidence
-- pic_DevonDNA_CE: enhanced picture for the computer
-- pic_DevonHair_ME: enhanced picture for the microscope/viewfinder