﻿function getfocus(){

Focus = new Array
Focus[0] = "MCZ-1124_01a.jpg | Secodontosaurus obtusidens | 525 | 394 | <i>Secodontosaurus obtusidens</i>, first discovered skull of this genus, Permo-Carboniferous Period, Wichita Group, Aarcher Co., Texas, MCZ 1124  |  |  | "
Focus[1] = "MCZ-3667_01.jpg | Hesperocyon gregarius | 525 | 271 | <i>Hesperocyon gregarius</i> Middle oligocene Period, Lower Brule Formation, Converse County, Wyoming, MCZ 3667  |  |  | "
Focus[2] = "MCZ-5368_02.jpg | Lates gracilis | 525 | 385 | <i>Lates gracilis</i> Agassiz, Upper Eocene Period, Mt. Bolca, Near Verona, Italy, MCZ 5368  |  |  | "
Focus[3] = "MCZ-8960_04.jpg | Notaelurodon kitchingi | 525 | 420 | <i>Notaelurodon kitchingi</i> Broom 1936, Permian Period, Cistecephalus Zone, Beaufort Series, Karoo Basin, Murrysburg District, South Africa, MCZ 8960  |  |  | "
Focus[4] = "MCZ1674_Buettneria_perfecta_detail1.jpg | Buettneria perfecta | 525 | 400 | <i>Buettnaria perfecta</i> bone bed, Upper Triassic, MCZ 1674  |  |  | "
Focus[5] = "MCZ1674_Buettneria_perfecta_detail2.jpg | Buettneria perfecta | 525 | 400 | <i>Buettnaria perfecta</i> bone bed, Upper Triassic, MCZ 1674  |  |  | "
Focus[6] = "MCZ1674_Buettneria_perfecta_full.jpg | Buettneria perfecta | 525 | 400 | <i>Buettnaria perfecta</i> bone bed, Upper Triassic, MCZ 1674  |  |  | "

array_index = Math.floor(Math.random() * Focus.length);

FocusInfo = Focus[array_index].split(" | ");

FocusFileName = FocusInfo[0]
FocusAlt = FocusInfo[1]
FocusWidth = FocusInfo[2]
FocusHeight = FocusInfo[3]
FocusCaption = FocusInfo[4]
FocusLinkURL = FocusInfo[5]
FocusLinkText = FocusInfo[6]
FocusCredit = FocusInfo[7]

document.write('<img src="images/rotate/' + FocusFileName + '" alt="' + FocusAlt + '" width="' + FocusWidth + '" height="' + FocusHeight + '" border="0" >');

}