/* ----------------------------------------- */
/* Roll Over Images                          */
/* Usage: Roll_Over('image1', 'mt.gif')      */
/* ----------------------------------------- */
function Roll_Over(Link_Name, Roll_Image)
{
  var Temp_Image, Check_Image, Object_Src;
  if (document.images) {
    Object_Src = Get_Image_ID(Roll_Image);
    if (Object_Src == -1) return;
    document.images[Link_Name].src=document.Page_Images[Object_Src].src;
  }
}

/* ----------------------------------------- */
/* Preload Page Images                       */
/* Usage: Preload_Images('image1.gif',...)   */
/* ----------------------------------------- */
function Preload_Images()
{
  var i, j;

  if (document.images) {
    if (document.Page_Images == null) {
      document.Page_Images = new Array();
      i = 0;
    } else i = document.Page_Images.length;
    for (j=0; j<Preload_Images.arguments.length; j++) {
      document.Page_Images[i]=new Image();
      document.Page_Images[i].src=Preload_Images.arguments[j];
      i++;
    }
  }
}

/* ----------------------------------------- */
/* Get_Image_ID                              */
/* Usage: Get_Image_ID('mt.gif')             */
/* ----------------------------------------- */
function Get_Image_ID(Image_Lookup)
{
  var Check_Image, Object_ID=-1, i;
  var Image_Name, Temp_Image;

  Image_Name = new String(Image_Lookup);
  if (document.Page_Images == null) Preload_Images(Image_Name);

  // Remove .. if present in Image_Name
  if (Image_Name.charAt(0) == '.') {
    Temp_Image = Image_Name.substr(2);
  } else {
    Temp_Image = Image_Name;
  }

  for (i=0; i<document.Page_Images.length; i++) {
    // Get only the same length text (from last charater) from Path_Images as Temp_Image.
    Check_Image = document.Page_Images[i].src.substr(document.Page_Images[i].src.length-Temp_Image.length);
    if (Check_Image == Temp_Image) {
      Object_ID = i;
      i=document.Page_Images.length;
    }
  }

  // If not in List, Add to List
  if (Object_ID == -1) {
    Preload_Images(Image_Name);
    Object_ID = document.Page_Images.length-1;
  }
  return (Object_ID);
}
