
var browserName=navigator.appName;var browserVer=parseInt(navigator.appVersion);var version="";var msie4=(browserName=="Microsoft Internet Explorer"&&browserVer>=4);if((browserName=="Netscape"&&browserVer>=3)||msie4||browserName=="Konqueror"||browserName=="Opera"){version="n3";}else{version="n2";}
function blurLink(theObject){if(msie4){theObject.blur();}}
function decryptCharcode(n,start,end,offset){n=n+offset;if(offset>0&&n>end){n=start+(n-end-1);}else if(offset<0&&n<start){n=end-(start-n-1);}
return String.fromCharCode(n);}
function decryptString(enc,offset){var dec="";var len=enc.length;for(var i=0;i<len;i++){var n=enc.charCodeAt(i);if(n>=0x2B&&n<=0x3A){dec+=decryptCharcode(n,0x2B,0x3A,offset);}else if(n>=0x40&&n<=0x5A){dec+=decryptCharcode(n,0x40,0x5A,offset);}else if(n>=0x61&&n<=0x7A){dec+=decryptCharcode(n,0x61,0x7A,offset);}else{dec+=enc.charAt(i);}}
return dec;}
function linkTo_UnCryptMailto(s){location.href=decryptString(s,-1);}
function validateForm(theFormname,theFieldlist,goodMess,badMess,emailMess){var formObject=document[theFormname];if(!formObject){formObject=document.getElementById(theFormname);}
if(formObject&&theFieldlist){var index=1;var theField=split(theFieldlist,",",index);var msg="";var theEreg='';var theEregMsg='';var specialMode='';while(theField){theEreg='';specialMode='';if(theField=='_EREG'){specialMode=theField;index++;theEregMsg=unescape(split(theFieldlist,",",index));index++;theEreg=unescape(split(theFieldlist,",",index));}else if(theField=='_EMAIL'){specialMode=theField;}
if(specialMode){index++;theField=split(theFieldlist,",",index);}
index++;theLabel=unescape(split(theFieldlist,",",index));theField=unescape(theField);if(formObject[theField]){var fObj=formObject[theField];var type=fObj.type;if(!fObj.type){type="radio";}
var value="";switch(type){case"text":case"textarea":case"password":value=fObj.value;break;case"select-one":if(fObj.selectedIndex>=0){value=fObj.options[fObj.selectedIndex].value;}
break;case"select-multiple":var l=fObj.length;for(a=0;a<l;a++){if(fObj.options[a].selected){value+=fObj.options[a].value;}}
break;case"radio":var len=fObj.length;if(len){for(a=0;a<len;a++){if(fObj[a].checked){value=fObj[a].value;}}}else{if(fObj.checked){value=fObj.value;}}
break;default:value=1;}
switch(specialMode){case"_EMAIL":var theRegEx_notValid=new RegExp("(@.*@)|(\.\.)|(@\.)|(\.@)|(^\.)","gi");var theRegEx_isValid=new RegExp("^.+\@[a-zA-Z0-9\-\.]+\.([a-zA-Z]{2,4}|[0-9]{1,3})$","");if(!theRegEx_isValid.test(value)){msg+="\n"+theLabel+' ('+(emailMess?unescape(emailMess):'Email address not valid!')+')';}
break;case"_EREG":var theRegEx_isValid=new RegExp(theEreg,"");if(!theRegEx_isValid.test(value)){msg+="\n"+theLabel+' ('+theEregMsg+')';}
break;default:if(!value){msg+="\n"+theLabel;}}}
index++;theField=split(theFieldlist,",",index);}
if(msg){var theBadMess=unescape(badMess);if(!theBadMess){theBadMess="You must fill in these fields:";}
theBadMess+="\n";alert(theBadMess+msg);return false;}else{var theGoodMess=unescape(goodMess);if(theGoodMess){alert(theGoodMess);}
return true;}}}
function split(theStr1,delim,index){var theStr=''+theStr1;var lengthOfDelim=delim.length;sPos=-lengthOfDelim;if(index<1){index=1;}
for(a=1;a<index;a++){sPos=theStr.indexOf(delim,sPos+lengthOfDelim);if(sPos==-1){return null;}}
ePos=theStr.indexOf(delim,sPos+lengthOfDelim);if(ePos==-1){ePos=theStr.length;}
return(theStr.substring(sPos+lengthOfDelim,ePos));}
