var ie3 = false
var ie4 = false
var ie5 = false
var ie55 = false
var nn3 = false
var nn4 = false
var nn6 = false
var oldn = false
var mac = false
var ie = false
var nn = false
var rech = 'msie'
var lngch = 3

if(navigator.appName.toLowerCase().indexOf('netscape') != -1)
{
	nn = true
	if(parseInt(navigator.appVersion.charAt(0)) >= 3)
	{
		nn3 = true
	}
	if(parseInt(navigator.appVersion.charAt(0)) >= 4)
	{
		nn4 = true
	}
	if(parseInt(navigator.appVersion.charAt(0)) >= 5)
	{
		nn6 = true
	}
}

if(navigator.appName.toLowerCase().indexOf('microsoft') != -1)
{
	ie = true
	if(parseInt(navigator.appVersion.charAt(0)) >= 3)
	{
		ie3 = true
	}
	if(parseInt(navigator.appVersion.charAt(0)) >= 4)
	{
		ie4 = true
	}
	fpos = navigator.appVersion.toLowerCase().indexOf(rech)+rech.length+1
	fsub = navigator.appVersion.substring(fpos,fpos+lngch)
	if(parseFloat(fsub) >= 5.0)
	{
		ie5 = true
	}
	if(parseFloat(fsub) >= 5.5)
	{
		ie55 = true
	}
}

if(navigator.appName.toLowerCase().indexOf('microsoft') == -1 && navigator.appName.toLowerCase().indexOf('netscape') == -1)
{
	oldn = true
}

if(navigator.appVersion.toLowerCase().indexOf('macintosh') != -1)
{
	mac = true
}

//-----------------------------------------------------------------

var addr

function alobj(nom,chem,sty)
{
	var pprt = ''
	var sprt = ''
	if(ie5 || nn6)
	{
		pprt = 'getElementById("'
		if(sty != 0)
		{
			sprt = '").style'
		}
		else
		{
			sprt = '")'
		}
		chem = ""
	}
	if(ie4)
	{
		pprt = 'all.'
		if(sty != 0)
		{
			sprt = '.style'
		}
		else
		{
			sprt = ''
		}
		chem = ""
	}
	if(typeof nom == "string")
	{
		addr = eval(chem+"document."+pprt+nom+sprt)
		return addr
	}
}


//-----------------------------------------------------------------

var unit = 'px'

function pempl()
{
	if(nn4 && !nn6)
	{
		pcv = arguments[0].pageY
		pch = arguments[0].pageX
		return
	}
	if(nn6)
	{
		rdecaldoc()
		if(rdecalpv==0)
		{
			pcv = arguments[0].clientY
		}
		else
		{
			pcv = arguments[0].clientY+rdecalpv
		}
		if(rdecalph==0)
		{
			pch = arguments[0].clientX
		}
		else
		{
			pch = arguments[0].clientX+rdecalph
		}
		return
	}
	if(ie4)
	{
		rdecaldoc()
		if(rdecalpv==0)
		{
			pcv = window.event.clientY
		}
		else
		{
			pcv = window.event.clientY+rdecalpv
		}
		if(rdecalph==0)
		{
			pch = window.event.clientX
		}
		else
		{
			pch = window.event.clientX+rdecalph
		}
		return
	}
}

function rdecaldoc()
{
	if(ie4)
	{
		rdecalph = document.body.scrollLeft
		rdecalpv = document.body.scrollTop
		return
	}
	if(nn4)
	{
		rdecalph = window.pageXOffset
		rdecalpv = window.pageYOffset
		return
	}
}

function wdecaldoc(dlft,dtp)
{
	if(ie4)
	{
		document.body.scrollLeft = dlft
		document.body.scrollTop = dtp
	}
	if(nn4)
	{
		window.scrollTo(dlft,dtp)
	}
}

function wtail(nom,chem,wobjh,wobjv)
{
	wtlobj = alobj(nom,chem,1)
	if(ie4 || nn6)
	{
		wtlobj.width = wobjh+unit
		wtlobj.height = wobjv+unit
	}
	if(nn4 && !nn6)
	{
		wtlobj.resizeTo(wobjh,wobjv)
	}
}

function rtail(nom,chem)
{
	rtlobj = alobj(nom,chem,0)
	if(ie4)
	{
		robjh = rtlobj.offsetWidth
		robjv = rtlobj.offsetHeight
		return
	}
	if(nn4 && !nn6)
	{
		robjh = rtlobj.document.width
		robjv = rtlobj.document.height
		return
	}
	if(nn6)
	{
		dh = document.defaultView.getComputedStyle(document.getElementById(nom),null).getPropertyValue('width')
		dv = document.defaultView.getComputedStyle(document.getElementById(nom),null).getPropertyValue('height')
		robjh = parseInt(dh)
		robjv = parseInt(dv)
		return
	}

}

function wtapp(nom,chem,ctp,crgt,cbt,clft)
{
	wtpob = alobj(nom,'',1)
	if(ie4 || nn6)
	{
		wtpob.clip = 'rect('+ctp+unit+', '+crgt+unit+', '+cbt+unit+', '+clft+unit+')'
	}
	if(nn4 && !nn6)
	{
		wtail(nom,chem,cbt-ctp,crgt-clft)
	}
}

/*function rtapp(nom,chem)
{
	rtpob = alobj(nom,chem,1)
	if(nn4 && !nn6)
	{
		rtaph = rtpob.clip.width
		rtapv = rtpob.clip.height
		return
	}
}*/

function wempl(nom,chem,wch,wcv)
{
	wemobj = alobj(nom,chem,1)
	if(nn4 && !nn6)
	{
		wemobj.top = wcv
		wemobj.left = wch
	}
	if(ie4)
	{
		wemobj.pixelTop = wcv
		wemobj.pixelLeft = wch
	}
	if(nn6)
	{
		wemobj.top = wcv+unit
		wemobj.left = wch+unit
	}
}

function rempl(nom,chem)
{
	remobj = alobj(nom,chem,0)
	if(nn4 && !nn6)
	{
		rcv = remobj.top 
		rch = remobj.left
		return
	}
	if(ie4)
	{
		rcv = remobj.offsetTop+document.body.clientTop
		rch = remobj.offsetLeft+document.body.clientLeft
		return
	}
	if(nn6)
	{
		dh = document.defaultView.getComputedStyle(document.getElementById(nom),null).getPropertyValue('left')
		dv = document.defaultView.getComputedStyle(document.getElementById(nom),null).getPropertyValue('top')
		rch = parseInt(dh)
		rcv = parseInt(dv)
		return
	}
}


//-----------------------------------------------------------------

function wmontr(nom,chem,tst)
{
	var vue = ""
	var cach = ""
	if (nn4 && !nn6)
	{
		vue = "show"
		cach = "hide"
	}
	if(ie4 || nn6)
	{
		vue = "visible"
		cach = "hidden"
	}
	wmtobj = alobj(nom,chem,1)
	if (tst == 0)
	{
		wmtobj.visibility = cach
	}
	else
	{
		wmtobj.visibility = vue
	}
}

function rmontr(nom,chem)
{
	rmtobj = alobj(nom,chem,1)
	rvsb = rmtobj.visibility
	return rvsb
}

function wordr(nom,chem,rng)
{
	worobj = alobj(nom,chem,1)
	worobj.zIndex = rng
}

function rordr(nom,chem)
{
	rorobj = alobj(nom,chem,1)
	rng = rorobj.zIndex
	return rng
}


//-----------------------------------------------------------------

function rdfen()
{
	if(ie4)
	{
		dimfh = document.body.offsetWidth
		dimfv = document.body.offsetHeight
		return
	}
	if(nn4)
	{
		dimfh = window.innerWidth
		dimfv = window.innerHeight
		return
	}
}

function rdfscroll()
{
	if(ie4)
	{
		dfh = document.body.clientWidth
		dfv = document.body.clientHeight
		return
	}
	if(nn4)
	{
		dfh = window.innerWidth
		dfv = window.innerHeight
		return
	}
}

//-----------------------------------------------------------------

function dimavsc()
{
	scavh = screen.availWidth
	scavv = screen.availHeight
	return
}

function dimsc()
{
	sch = screen.width
	scv = screen.height
	return
}

//-----------------------------------------------------------------