function RND_img_line(images,img_attributes)
{
 begin_index = 0; 
 count_index=0;
 this_count=0;
 imageSet = new Array();
 end_index = images.length;
  for (i=1;i<end_index;i++) {
    if (images.charAt(i) == ' ' || images.charAt(i) == ',') {
      imageSet[this_count] = images.substring(begin_index,i);
      this_count++;
      begin_index=i+1;
      }
    }
  ind = Math.floor(Math.random() *this_count);
  document.write("<img "+img_attributes+" src="+imageSet[ind]+" alt=\""+imageSet[ind]+"\">");
}

function RND_img(images)
{
  RND_img_line(images," ");
}

function RND_img_lnk(images,urls,img_attributes,href_attributes)
{
 imageSet = new Array();
 urlSet = new Array();
 begin_index = 0; 
 count_index=0;
 this_count=0;
 end_index = images.length;
  for (i=1;i<end_index;i++) {
    if (images.charAt(i) == ' ' || images.charAt(i) == ',') {
      imageSet[this_count] = images.substring(begin_index,i);
      this_count++;
      begin_index=i+1;
      }
    }
  ind = Math.floor(Math.random() *this_count);
 begin_index = 0; 
 count_index=0;
 this_count=0;
 end_index = urls.length;
  for (i=1;i<end_index && this_count <=ind ;i++) {
    if (urls.charAt(i) == ' ' || urls.charAt(i) == ',') {
      urlSet[this_count] = urls.substring(begin_index,i);
      this_count++;
      begin_index=i+1;
      }
    }

  document.write("<a "+href_attributes+" href=\""+urlSet[ind]+"\"><img "+img_attributes+" src="+imageSet[ind]+" alt=\""+imageSet[ind]+"\"></a>");
}

function RND_img_lnk_sz(images,urls,img_attributes)
{
  RND_img_lnk(images,urls,img_attributes,"");
}

function RND_img_urls(images,urls)
{
  RND_img_lnk(images,urls,'border=0',"");
}