NN4=((parseInt(navigator.appVersion)>=4 && parseInt(navigator.appVersion)<5)&&(navigator.appName.indexOf("Netscape")!=-1))?1:0
NN6=((parseInt(navigator.appVersion)>=5)&&(navigator.appName.indexOf("Netscape")!=-1))?1:0
MS4=((parseInt(navigator.appVersion)>=4)&&(navigator.appName.indexOf("Microsoft")!=-1))?1:0

function set_html(elem,txt)
{
if(document.all){
	document.getElementById(elem).innerHTML = txt;
	} 
else{
	document.getElementById(elem).innerHTML = txt;
	}
}

function f_get_elem(i)
{
if(NN6)			return(document.getElementById(i));
else if(NN4)	return(document.layers[i]);
else				return(document.all[i]);
}

function f_get_doc_elem(doc,i)
{
if(NN6)			return(doc.getElementById(i));
else if(NN4)	return(doc.layers[i]);
else				return(doc.all[i]);
}


function f_set_elem(i,x)
{
//alert("nn4="+NN4+",nn6="+NN6+",ms4="+MS4);
//alert("i="+i+",x="+x);
if(NN6)			document.getElementById(i).childNodes[0].nodeValue = x;
else if(NN4)	document.layers[i].innerText = x;
else			document.all[i].innerText = x;
}

function f_set_html(i,x)
{
if(NN6)	{		
	document.getElementById(i).innerHTML = x;
	}
else if(NN4) {
	document.layers[i].innerHTML = x;
	}
else {
	document.all[i].innerHTML = x;
	}
}


function f_get_radio_value(obj)
{
if(isNaN(obj.length)==true) {
	if(obj.checked==true) 
		return(obj.value );
	}
else {
	for(a=0;a<obj.length;a++) {
		if(obj[a].checked==true) 
			return( obj[a].value );
		}
	}
return("");
}


function makeRequest(url,ctrl) {
    var httpRequest;

    if (window.XMLHttpRequest) { // Mozilla, Safari, ...
        httpRequest = new XMLHttpRequest();
        if (httpRequest.overrideMimeType) {
            httpRequest.overrideMimeType('text/xml');
            // See note below about this line
        }
    } 
    else if (window.ActiveXObject) { // IE
        try {
            httpRequest = new ActiveXObject("Msxml2.XMLHTTP");
            } 
            catch (e) {
                       try {
                            httpRequest = new ActiveXObject("Microsoft.XMLHTTP");
                           } 
                         catch (e) {}
                      }
                                   }

    if (!httpRequest) {
        alert('Giving up :( Cannot create an XMLHTTP instance');
        return false;
    }
    httpRequest.onreadystatechange = function() { alertContents(httpRequest,ctrl); };
    httpRequest.open('GET', url, true);
    httpRequest.send('');
}



function alertContents(httpRequest,ctrl) 
{
	var htm;
  if (httpRequest.readyState == 4) {
      if (httpRequest.status == 200) {
          htm = httpRequest.responseText;
      } else {
          htm = "There was a problem with the request.  status code=" + httpRequest.status;
      }
	if(ctrl=="chart") {
		//alert(htm);
		updateChartXML("chart",htm);
		}
	else if(ctrl=="dMap") { 

		f_set_html(ctrl,htm);
		replot();	

		}
	else {
		//alert(htm);
		f_set_html(ctrl,htm);
		//document.all[ctrl].innerHTML = htm;
		}
  }
}


var url = "http://www.advantagerenttoown.com/tucson_events.php";
var title = "Tucson Events Calendar";


function makeLink()
{
if(document.all)
window.external.AddFavorite(url,title)
}