function wopen(){
	var w=wopen.arguments;
	trg="_blank";
	Cw=screen.availWidth;
	Ch=screen.availHeight;
	d=0;
	switch(w.length){
	case 0:
		return;
		break;
	case 1:
		gourl=w[0];
	case 2:
		trg=w[1];
	case 3:
		Cw=w[2];
	case 4:
		Ch=w[3];
	}
	newWin=open(gourl,trg,"height="+Ch+",width="+Cw+",status=0,top=0,left=0,location=0,menubar=0,personalbar=0,resizable=1,dependent=1,directories=0,alwaysLowered=1");
}
function dw(s){document.write (s+"\n");}
function chgtxt(itm0,str){
	if((item1=fndobj(itm0))==null) return;
	if(document.getElementById){
		document.getElementById(itm0).innerHTML=str;
	}
	else if(document.all){
		document.all[itm0].innerHTML=str;
	}
	else if(document.layers){
		with(document.layers[itm0].document){
			open();
			write(str);
			close();
		}
	}
}
function chgcas(d,c){d.className=c;}
function allrpl(fText,rText,s){
	while(s.indexOf(fText)>=0){
		s=s.replace(fText,rText);
	}
	return s;
}
function fndobj(n, d){
	var p,i,x;
	if(!d) d=document;
	if((p=n.indexOf("?"))>0 && parent.frames.length) {
		d=parent.frames[n.substring(p+1)].document;
		n=n.substring(0,p);
	}
	if(!(x=d[n]) && d.all) x=d.all[n];
	for (i=0;!x && i<d.forms.length;i++) x=d.forms[i][n];
	for(i=0;!x && d.layers && i< d.layers.length;i++) x=find_obj(n,d.layers[i].document);
	if(!x && d.getElementById) x=d.getElementById(n);
	return x;
}
function substrcnt(str,needle){
	var y=needle.length;
	var x=str.length-y;
	var k="";
	var n=0;
	for(i=0;i<x;i++){
		k=str.substr(i,y);
		if(k==needle) n++;
	}
	return n;
}
function changeLink2Mailto(obj,mailaddr){
	var x=obj.childNodes;
	mailaddr=mailaddr.replace(/,/g,'.').replace('#','@');
	for(i=x.length-1;i>=0;i--){
		if(x[i].nodeName.toLowerCase()=='a' && x[i].href.match(/email/)){
			tmp=x[i].innerHTML;
			x[i].href=['mailto:',mailaddr].join('');
			x[i].innerHTML=tmp;
		}
	}
}