//   Copyright © 1996-2009 Boby Borisov, All rights reserved.

  ind=new Array();
  dynimg=new Array();
  dynalt=new Array();
  dynlnk=new Array();
  albaut=new Array();
  
  docElm=document.all;if(navigator.appName == "Netscape"){if(parseInt(navigator.appVersion.substring(0, 1))>=5){docElm=document.getElementsByTagName('*')}else{docElm=document.layers}};
  if(typeof(window.innerHeight)=='number'){WinHeight=window.innerHeight;WinWidth=window.innerWidth}
  else if((typeof(document.documentElement.clientHeight)=='number')&&(document.documentElement.clientHeight!=0))
   {WinHeight=document.documentElement.clientHeight;WinWidth=document.documentElement.clientWidth}
   else if(typeof(document.body.clientHeight)=='number')
     {WinHeight=document.body.clientHeight;WinWidth=document.body.clientWidth}
     else {WinHeight=440;WinWidth=680};

  ino=0;
  inp=0;
  iml=parseInt((WinHeight-50)/105)-1; 
  if(iml<1){iml=1}else if(iml>6){iml=6};
   
  function NextInx(z){
   ok=false;
   while(!ok){
    j=0;nxt=parseInt(Math.random()*z);
    for(i=0;i<iml;i++){j=j+(nxt!=ind[i])};
    ok=(j==iml);};
   return nxt
   };
   
  function dynply(z){
   while(inp==ino){inp=parseInt(Math.random()*iml);};
   ind[inp]=NextInx(z);
   if(eval('docElm.dynimg'+inp).filters){eval('docElm.dynimg'+inp).filters.blendTrans.Apply();};
   eval('docElm.dynimg'+inp).src=imgdir+dynimg[ind[inp]];
   eval('docElm.dynimg'+inp).alt=dynalt[ind[inp]];
   if(eval('docElm.dynimg'+inp).filters){eval('docElm.dynimg'+inp).filters.blendTrans.Play();};
   eval('docElm.dynlnk'+inp).href=dynlnk[ind[inp]];
   ino=inp;
   };
   
  function ImgMenu(z){
   if(z==0){z=dynimg.length};
   if(iml>=z){iml=z-1;}
   for(inp=0;inp<iml;inp++){ind[inp]=NextInx(z);};
   document.write('<table border="0" width="100%">');
   for(inp=0;inp<iml;inp++){document.write('<tr><td height="120" align="center" valign="bottom"><a id="dynlnk'+inp+'" href="'+dynlnk[ind[inp]]+'"><img id="dynimg'+inp+'" src="'+imgdir+dynimg[ind[inp]]+'" alt="'+dynalt[ind[inp]]+'" border="0" height="105" width="150" style="filter:blendTrans(duration=1.0)\"></a></td></tr>');};
   ino=inp;
   document.write('</table>');
   window.setInterval('dynply('+z+')',3000);
   };
   
  function LoadImages(){
   function WriteImage(x){document.write('<img src="'+x+'" width="5" height="5" border="0">')};
   document.write('<span class="loadingtext"><p align="center"><br><b>ucdchio.com</b><br><font size="-1">loading</font><br></span>');
   z=dynimg.length;
   for(inp=0;inp<z;inp++){WriteImage(imgdir+dynimg[inp])};
   WriteImage('images/spider.gif');
   WriteImage('images/owl.gif');
   WriteImage('images/borders/left.jpg');
   WriteImage('images/borders/top.jpg');
   };

 function ListPhotos(){
  i=0;
  while(i<dynimg.length){
   document.write('<tr><td align="center"><a name="'+dynimg[i].substr(0,dynimg[i].indexOf('.'))+'"><img src="'+phodir+dynimg[i]+'" alt=""><br><span class="phototext">');
   if(albaut[i]){document.write(albaut[i]);};
   document.write('</span><br>&nbsp;</td></tr>');
   i++;
   };
  };