function init_post_request(){this.fn_request=false;if(window.XMLHttpRequest){this.fn_request=new XMLHttpRequest();if(this.fn_request.overrideMimeType){this.fn_request.overrideMimeType('text/html');}}
else if(window.ActiveXObject){try{this.fn_request=new ActiveXObject("Msxml2.XMLHTTP");}catch(e){try{this.fn_request=new ActiveXObject("Microsoft.XMLHTTP");}catch(e){}}}
if(!this.fn_request){alert('Cannot create XMLHTTP instance');return false;}}
function post_request(obj,url,parameters){obj.open('POST',url,true);obj.setRequestHeader("Content-type","application/x-www-form-urlencoded");obj.setRequestHeader("Content-length",parameters.length);obj.setRequestHeader("Connection","close");obj.send(parameters);}
function build_query(frm){var str="";var element,i=0;while((element=document.getElementById(frm).elements[i++])!=null){var qc=toQueryComponent(element);if(qc!="")str+="&"+qc;}
return str.substring(1);}
function toQueryComponent(input){if(!input.name||input.disabled)
return"";var n=urlencode(input.name);switch(input.type){case"text":case"password":case"submit":case"hidden":return n+"="+urlencode(input.value);case"textarea":var v=input.value.split(/\r\n|\r|\n/).join("\r\n");return n+"="+urlencode(v);case"checkbox":case"radio":if(!input.checked)
return"";var v=input.value;if(v===null)v="on";return n+"="+urlencode(v);case"select-one":case"select-multiple":var nvp=[];var opt,i=0;while((opt=input.options[i++])!=null){if(opt.selected){var v=getRealValue(opt);if(v===null)v=opt.text;nvp[nvp.length]=n+"="+urlencode(v);}}
return nvp.join("&");default:return"";}}
function urlencode(str){var v;try{v=encodeURIComponent(str);}catch(e){v=escape(str);}
return v.replace(/%20/g,"+");}
function getRealValue(input){var attr=input.getAttributeNode("value");return(attr&&attr.specified)?input.getAttribute("value"):null;}
function launch_js(data){data=data.replace("<!--","");data=data.replace("-->","");var ScriptFragment='(?:<script.*?>)((\n|\r|.)*?)(?:<\/script>)';var match=new RegExp(ScriptFragment,'img');var scripts=data.match(match);if(scripts){var js='';for(var s=0;s<scripts.length;s++){var match=new RegExp(ScriptFragment,'im');js+=scripts[s].match(match)[1];}
eval(js);}}
function change_opacity(id,opacStart,opacEnd,millisec){var speed=Math.round(millisec/100);var timer=0;if(opacStart>opacEnd){for(i=opacStart;i>=opacEnd;i--){setTimeout("changeOpac("+i+",'"+id+"')",(timer*speed));timer++;}}else if(opacStart<opacEnd){for(i=opacStart;i<=opacEnd;i++)
{setTimeout("changeOpac("+i+",'"+id+"')",(timer*speed));timer++;}}}
function changeOpac(opacity,id){var object=document.getElementById(id).style;object.opacity=(opacity/100);object.filter="alpha(opacity="+opacity+")";}
var featured_req="";function show_featured(doc_id){var url="/ajax/featured_articles.ajx.php?doc_id="+doc_id;query="";tmp_http_req=new init_post_request();featured_req=tmp_http_req.fn_request;featured_req.onreadystatechange=update_featured;post_request(featured_req,url,query);}
function update_featured(){if(featured_req.readyState==4||featured_req.readyState=="complete"){data=featured_req.responseText;change_opacity('featured_div',100,0,500);setTimeout("document.getElementById(\"featured_div\").innerHTML = data; change_opacity('featured_div', 0, 100, 200);",500);}}
var subscribe_req="";function subscribe(){email_add=document.getElementById("subscribe_email").value;subscriber=document.getElementById("subscribe_name").value;if(subscriber==""||subscriber=="name"){alert("Please enter your name.")
return false;}
if(email_add.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/)==-1){alert("Please enter a valid email address.")
return false;}else{var url="/index.php?cmd=subscribe&email="+email_add+"&name="+subscriber;query="";document.getElementById("subscribe_td").innerHTML="Saving...";tmp_http_req=new init_post_request();subscribe_req=tmp_http_req.fn_request;subscribe_req.onreadystatechange=update_subscribe;post_request(subscribe_req,url,query);}}
function update_subscribe(){if(subscribe_req.readyState==4||subscribe_req.readyState=="complete"){data=subscribe_req.responseText;document.getElementById("subscribe_td").innerHTML=data;}}
var map_update_req=""
function update_map(map_id){var url="/ajax/maps.ajx.php?map_id="+map_id;var query="";document.getElementById('map_details').innerHTML="Loading...";tmp_http_req=new init_post_request();map_update_req=tmp_http_req.fn_request;map_update_req.onreadystatechange=update_map_details;post_request(map_update_req,url,query);}
function update_map_details(){if(map_update_req.readyState==4||map_update_req.readyState=="complete"){data=map_update_req.responseText;document.getElementById('map_details').innerHTML=data;launch_js(data);}}
var survey_req=""
function submit_survey(survey_id){var radio_btn=document.survey_frm.poll;var chk=false;for(var i=0;i<radio_btn.length;i++){if(radio_btn[i].checked){chk=true;break;}}
if(!chk){alert("Please select your answer.");}else{var url="/ajax/survey.ajx.php";var query=build_query("survey_frm");tmp_http_req=new init_post_request();survey_req=tmp_http_req.fn_request;survey_req.onreadystatechange=update_survey_result;post_request(survey_req,url,query);}}
function update_survey_result(){if(survey_req.readyState==4||survey_req.readyState=="complete"){data=survey_req.responseText;document.getElementById('poll_result').innerHTML=data;}}