var menuRegions=new Array()
menuRegions[0]='<a href="bell.htm" title="Bell Mountain" >Bell Mountain</a>'
menuRegions[1]='<a href="escon.htm" title="Escondido Valley" >Escondido Valley</a>'
menuRegions[2]='<a href="fred.htm" title="Fredericksburg in the Hill Country" >Fredericksburg (THC)</a>'
menuRegions[3]='<a href="mes.htm" title="Mesilla Valley" >Mesilla Valley</a>'
menuRegions[4]='<a href="texoma.htm" title="Texoma" >Texoma</a>'
menuRegions[5]='<a href="davis.htm" title="Texas Davis Mountains" >Texas Davis Mountains</a>'
menuRegions[6]='<a href="hillcountry.htm" title="Texas Hill Country" >Texas Hill Country</a>'
menuRegions[7]='<a href="highplains.htm" title="Texas High Plains" >Texas High Plains</a>'

var menuGIS=new Array()
menuGIS[0]='<a href="http://tdasurvey.tamu.edu/website/txwineregions_BellMountain" title="Bell Mountain" target="_blank" >Bell Mountain</a>'
menuGIS[1]='<a href="http://tdasurvey.tamu.edu/website/txwineregions_Escondido" title="Escondido Valley" target="_blank" >Escondido Valley</a>'
menuGIS[2]='<a href="http://tdasurvey.tamu.edu/website/txwineregion_Fredericksburg" title="Fredericksburg in the Hill Country" target="_blank" >Fredericksburg (THC)</a>'
menuGIS[3]='<a href="http://tdasurvey.tamu.edu/website/txwineregions_Mesilla" title="Mesilla Valley" target="_blank" >Mesilla Valley</a>'
menuGIS[4]='<a href="http://tdasurvey.tamu.edu/website/txwineregions_Texoma" title="Texoma" target="_blank" >Texoma</a>'
menuGIS[5]='<a href="http://tdasurvey.tamu.edu/website/txwineregions_Davis" title="Texas Davis Mountains" target="_blank" >Texas Davis Mountains</a>'
menuGIS[6]='<a href="http://tdasurvey.tamu.edu/website/txwineregion_HillCountry" title="Texas Hill Country" target="_blank" >Texas Hill Country</a>'
menuGIS[7]='<a href="http://tdasurvey.tamu.edu/website/txwineregions_highplains" title="Texas High Plains" target="_blank" >Texas High Plains</a>'

var menuParams=new Array()
menuParams[0]='<a href="climate.htm" title="Climate">Climate</a>'
menuParams[1]='<a href="topo.htm" title="Topography">Topography</a>'
menuParams[2]='<a href="soil.htm" title="Soils">Soils</a>'

var menuHelp=new Array()
menuHelp[0]='<a href="web_help.htm" title="Help on how to use this website.">Website Navigation</a>'
menuHelp[1]='<a href="gis_help.htm" title="Instructions on how to use GIS website.">GIS Instructions</a>'

var menuwidth='165px'
var DisappearDelay=500;
var ie4=document.all
var ns6=document.getElementById&&!document.all
if (ie4||ns6)
document.write('<div id="dropmenudiv" style="visibility:hidden;width:'+menuwidth+'" onMouseover="clearhidemenu()" onMouseout="dynamichide(event)"></div>')

function getposOffset(what, offsettype){
var totaloffset=(offsettype=="left")? what.offsetLeft : what.offsetTop;
var parentEl=what.offsetParent;
while (parentEl!=null){
totaloffset=(offsettype=="left")? totaloffset+parentEl.offsetLeft : totaloffset+parentEl.offsetTop;
parentEl=parentEl.offsetParent;
}
return totaloffset;
}

function showhide(obj, e, visible, hidden, menuwidth){
if (ie4||ns6)
dropmenuobj.style.left=dropmenuobj.style.top="-500px"
if (menuwidth!=""){
dropmenuobj.widthobj=dropmenuobj.style
dropmenuobj.widthobj.width=menuwidth
}
if (e.type=="click" && obj.visibility==hidden || e.type=="mouseover")
obj.visibility=visible
else if (e.type=="click")
obj.visibility=hidden
}

function iecompattest(){
return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}

function clearbrowseredge(obj, whichedge){
var edgeoffset=0
if (whichedge=="rightedge"){
var windowedge=ie4 && !window.opera? iecompattest().scrollLeft+iecompattest().clientWidth-15 : window.pageXOffset+window.innerWidth-15
dropmenuobj.contentmeasure=dropmenuobj.offsetWidth
if (windowedge-dropmenuobj.x < dropmenuobj.contentmeasure)
edgeoffset=dropmenuobj.contentmeasure-obj.offsetWidth
}
else{
var topedge=ie4 && !window.opera? iecompattest().scrollTop : window.pageYOffset
var windowedge=ie4 && !window.opera? iecompattest().scrollTop+iecompattest().clientHeight-15 : window.pageYOffset+window.innerHeight-18
dropmenuobj.contentmeasure=dropmenuobj.offsetHeight
if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure){ //move up?
edgeoffset=dropmenuobj.contentmeasure+obj.offsetHeight
if ((dropmenuobj.y-topedge)<dropmenuobj.contentmeasure) //up no good either?
edgeoffset=dropmenuobj.y+obj.offsetHeight-topedge
}
}
return edgeoffset
}

function populatemenu(what){
if (ie4||ns6)
dropmenuobj.innerHTML=what.join("")
}

function dropdownmenu(obj, e, menucontents, menuwidth){
if (window.event) event.cancelBubble=true
else if (e.stopPropagation) e.stopPropagation()
clearhidemenu()
dropmenuobj=document.getElementById? document.getElementById("dropmenudiv") : dropmenudiv
populatemenu(menucontents)
if (ie4||ns6){
showhide(dropmenuobj.style, e, "visible", "hidden", menuwidth)
dropmenuobj.x=getposOffset(obj, "left")
dropmenuobj.y=getposOffset(obj, "top")
dropmenuobj.style.left=dropmenuobj.x-clearbrowseredge(obj, "rightedge")+"px"
dropmenuobj.style.top=dropmenuobj.y-clearbrowseredge(obj, "bottomedge")+obj.offsetHeight+"px"
}
//return clickreturnvalue()
}

//function clickreturnvalue(){
//if (ie4||ns6) return false
//else return true
//}

function contains_ns6(a, b) {
while (b.parentNode)
if ((b = b.parentNode) == a)
return true;
return false;
}

function dynamichide(e){
if (ie4&&!dropmenuobj.contains(e.toElement))
delayhidemenu()
else if (ns6&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
delayhidemenu()
}

function hidemenu(e){
if (typeof dropmenuobj!="undefined"){
if (ie4||ns6)
dropmenuobj.style.visibility="hidden"
}
}

function delayhidemenu(){
if (ie4||ns6)
delayhide=setTimeout("hidemenu()",DisappearDelay)
}

function clearhidemenu(){
if (typeof delayhide!="undefined")
clearTimeout(delayhide)
}

document.onclick=hidemenu
