/***********************************************************/
/*  Nutzung oder Veroeffentlichung dieser Programme ist    */
/*  nicht ohne Genehmigung gestattet!                      */
/***********************************************************/


/////////////////////////////////////////////////////////////
// 
//  BTH4 
//  Programm zum kompfortablen Bildertausch
//  Version 6.14
//  Autor:             M.Haeger
//  Kontakt:           bth4@netwood.de
//  Erstellung:        01.04.2001
//  letzte Aenderung:  10.05.2002
//  Kunde:             
//
//
/////////////////////////////////////////////////////////////

/* public */
function CP(order)
 {
   var p=new Array();
   if(typeof(order)=='object')p=order;
   else for(var i=0;i<arguments.length;i++)p[i]=arguments[i];
   if(!p.length)return;
   if(!/^(.+\D+)(\d*)$/.test(p[0]))return;
   var name=RegExp.$1;
   var nr=(RegExp.$2)?RegExp.$2:0;
   if(!CP.Pics[name]||!CP.Pics[name][nr])return;
   if(p[2]==0)CP.Pics[name][nr].blocked=0;
   if(CP.Pics[name][nr].blocked)return;
   if(p[2]==1)
    {
      if(typeof(p[1])=='undefined')p[1]=1;
      CP.Pics[name][nr].blocked=1;
      if(CP.blocked!=-1)CP([CP.blocked,0,0]);
      CP.blocked=name+nr;
    }   
   with(CP.Pics[name][nr])
    {
      if(!ref)return;
      zustand=(p[1]==0||p[1]==1)?p[1]:!zustand;
      if(p[2]==1&&mcl)ref.src=mcl.src;
      else ref.src=zustand?mov.src:mou.src;   
    }
 } 
CP.Pics=new Array();
CP.blocked=-1;

/* privat */
if(typeof(CPQuelle)=='undefined')CPQuelle="";
else if(CPQuelle.charAt(CPQuelle.length-1)!="/")CPQuelle+="/";
if(typeof(CPMouseOver)=='undefined')CPMouseOver="_on";
if(typeof(CPMouseOut)=='undefined')CPMouseOut="_off";
if(typeof(CPMouseClick)=='undefined')CPMouseClick="_click";
function _InitCP()
 {
    function gr(f,d)     
     {
       var m=new RegExp(f[0]+"(\\d*)$"),n;
       var m2=new RegExp(f[0]+"(\\d*)("+CPMouseOut+"|"+CPMouseOver+")\."+f[1]);
       var idoc=d?d.document:document;
       if(document.layers){gr.pics=idoc.images;}
       if(!gr.pics)return;
       for(var i=0;i<gr.pics.length;i++)
        if(m.test(gr.pics[i].name)||m2.test(gr.pics[i].src))
         {
           n=(RegExp.$1)?RegExp.$1:0;
           CP.Pics[f[0]][n]=new _CPObj(gr.pics[i],f);
         }
       if(document.layers)
        for(i=0;i<idoc.layers.length;i++)gr(f,idoc.layers[i]);
     }  
    gr.pics=document.getElementsByTagName?document.getElementsByTagName("IMG"):document.all?document.all.tags("IMG"):0;  
    for(var i=0;i<CPNamen.length;i++)
     {
       var f=CPNamen[i].split(":");
       if(f.length==1)f[1]="gif";
       if(!f[1])f[1]="gif";
       CP.Pics[f[0]]=new Array();
       gr(f);
     }
 }
if(typeof(window.onload)!='function')window.onload=_InitCP;
else
 {
   _InitCP.onLoader=window.onload;
   window.onload=function(){_InitCP.onLoader();_InitCP();};
 }
function _CPObj(ref,f)
 {
   this.id      = f[0];
   this.zustand = false;
   this.mov     = new Image();
   this.mov.src = CPQuelle+f[0]+CPMouseOver+"."+f[1];
   this.mou     = new Image();
   this.mou.src = CPQuelle+f[0]+CPMouseOut+"."+f[1];    
   this.mcl     = f[2]?new Image():0;
   this.mcl.src = f[2]?CPQuelle+f[0]+CPMouseClick+"."+f[1]:0; 
   this.ref     = ref;
   this.blocked = 0;
 }
function _CPPreCF()
 {
   var p,i,l;
   for(i=0;i<CPNamen.length;i++)
    {
      p=CPNamen[i].split(":");
      if(p.length==1)p[1]="gif";
      l=_CPPreC.length;
      _CPPreC[l]=new Image();
      _CPPreC[l].src=CPQuelle+p[0]+CPMouseOver+"."+p[1];
      _CPPreC[l+1]=new Image();
      _CPPreC[l+1].src=CPQuelle+p[0]+CPMouseOut+"."+p[1];
      if(p[2])
       {
        _CPPreC[l+2]=new Image();
        _CPPreC[l+2].src=CPQuelle+p[0]+CPMouseClick+"."+p[1];
       }
    }
 }
if(typeof(CPPreCache)=='undefined')CPPreCache=0;
if(CPPreCache!=-1)
 {
  var _CPPreC=new Array();
  if(CPPreCache)setTimeout("_CPPreCF();",10);
  else
   {
     if(typeof(window.onload)!='function')window.onload=_CPPreCF;
     else
      {
        _CPPreCF.onLoader=window.onload;
        window.onload=function(){_CPPreCF.onLoader();_CPPreCF();};
      }
   }
 }