// Copyright by Kruglov S. A. (kruglov.ru) 2003
 function initKLayers(){
   isDOM=document.getElementById?true:false
   isOpera=isOpera5=window.opera && isDOM
   isOpera6=isOpera && window.print
   isOpera7=isOpera && document.readyState
   isMSIE=isIE=document.all && document.all.item && !isOpera
   isStrict=document.compatMode=='CSS1Compat'
   isNN=isNC=navigator.appName=="Netscape"
   isNN4=isNC4=isNN && !isDOM
   isMozilla=isNN6=isNN && isDOM
 
   if(!isDOM && !isNC && !isMSIE && !isOpera){
     KLayers=false
     return false
   }
 
   pageLeft=0
   pageTop=0
 
   KL_imgCount=0
   KL_imgArray=new Array()
 
   KL_imageRef="document.images[\""
   KL_imagePostfix="\"]"
   KL_styleSwitch=".style"
   KL_layerPostfix="\"]"
 
   if(isNN4){
     KL_layerRef="document.layers[\""
     KL_styleSwitch=""
   }
 
   if(isMSIE){
     KL_layerRef="document.all[\""
   }
 
   if(isDOM){
     KL_layerRef="document.getElementById(\""
     KL_layerPostfix="\")"
   }
 
   KLayers=true
   return true
 }
 
 initKLayers()
 
 // document and window functions:
 
 function KL_getBody(w){
   if(!w) w=window
   if(isStrict){
     return w.document.documentElement
   }else{
     return w.document.body
   }
 }
 var KL_LAYER=0
 
 function KL_findObject(what,where,type){
   var i,j,l,s
   var len=eval(where+".length")
   for(j=0;j<len;j++){
     s=where+"["+j+"].document.layers"
     if(type==KL_LAYER){
       l=s+"[\""+what+"\"]"
     }
     if(type==KL_IMAGE){
       i=where+"["+j+"].document.images"
       l=i+"[\""+what+"\"]"
     }
     if(eval(l)) return l
     l=KL_findObject(what,s,type)
     if(l!="null") return l
   }
   return "null"
 }
 
 function KL_getObjectPath(name,parent,type){
   var l=((parent && isNN4)?(parent+"."):(""))+((type==KL_LAYER)?KL_layerRef:KL_imageRef)+name+((type==KL_LAYER)?KL_layerPostfix:KL_imagePostfix)
   if(eval(l))return l
   if(!isNN4){
     return l
   }else{
     return KL_findObject(name,"document.layers",type)
   }
 }
 
 function layer(name){
   return new KLayer(name,null)
 }
 // class "KLayer":
 function KLayer(name,parent){
   this.path=KL_getObjectPath(name,parent,KL_LAYER)
   this.object=eval(this.path)
   if(!this.object)return
   this.style=this.css=eval(this.path+KL_styleSwitch)
 }
 
 KLP=KLayer.prototype
 
 KLP.isExist=KLP.exists=function(){
   return (this.object)?true:false
 }
 
 KLP.setLeft=KLP.moveX=function(x){
   x+=pageLeft
   if(isOpera){
     this.css.pixelLeft=x
   }else if(isNN4){
     this.object.x=x
   }else{
     this.css.left=x+"px"
   }
 }
 
 KLP.setTop=KLP.moveY=function(y){
   y+=pageTop
   if(isOpera){
     this.css.pixelTop=y
   }else if(isNN4){
     this.object.y=y
   }else{
     this.css.top=y+"px"
   }
 }
 
 KLP.moveTo=KLP.move=function(x,y){
   this.setLeft(x)
   this.setTop(y)
 }
 
 KLP.setVisibility=function(v){
   this.css.visibility=(v)?(isNN4?"show":"visible"):(isNN4?"hide":"hidden")
 }
 
 KLP.show=function(){
   this.setVisibility(true)
 }
 
 KLP.hide=function(){
   this.setVisibility(false)
 }
 
 KLP.write=function(str){
   var o=this.object
   if(isNN4){
     var d=o.document
     d.open()
     d.write(str)
     d.close()
   }else{
     o.innerHTML=str
   }
 }