var ua=navigator.userAgent;
document.open();
tmpo="<p>User agent : <b>"+ua+"</b></p>";
document.write(tmpo);
document.close();


function dec2do(){
	var tmp=document.F.OUTPUT.value;var tmp2="";
	var tmp3;
	var iTmp=new Array();
	var iTmp2=new Array();
	var i,i2;
	
	iTmp=tmp.split("\r");
	for(i=0;i<iTmp.length && iTmp[i]!="";i++){
		if(i!=0){
			tmp2+="\r";
		}
		iTmp2=iTmp[i].split(",");
		for(i2=0;i2<iTmp2.length;i2++){
			tmp3=shousuu2do(iTmp2[i2]);
			if(iTmp2[i2]=="" || tmp3=="NaN"){continue;}
			if(i2!=0){
				tmp2+=",";
			}
			tmp2+=tmp3
		}
		
	}
	document.F.INPUT.value=tmp2;
}
function do2dec(){
	var tmp=document.F.INPUT.value;var tmp2="";
	var tmp3;
	var iTmp=new Array();
	var iTmp2=new Array();
	var i,i2;
	
	iTmp=tmp.split("\r");
	for(i=0;i<iTmp.length && iTmp[i]!="NaN";i++){
		iTmp2=iTmp[i].split(",");
		for(i2=0;i2<iTmp2.length;i2++){
			tmp3=do2shousuu(iTmp2[i2]);
			if(iTmp2[i2]=="" || tmp3==""){continue;}
			if(i2!=0){
				tmp2+=",";
			}
			tmp2+=tmp3
		}
		tmp2+="\r";
	}
	document.F.OUTPUT.value=tmp2;
}

function ndb2jsdata(){
	var i;
	var tmp=document.F.INPUT.value;
	var matchStr=/\;.*\n|MeshSize.*\n/g;
	if(tmp.match(matchStr)!=null)tmp=tmp.replace(matchStr,"");

	matchStr=/([^ ]*) ([^ ]*) ([^ ]*)(.*)/g;
	tmp=tmp.replace(matchStr,"data<<>>=\"1<>1<>0<>>$3<>$2<<>$1<>\";");
	
	matchStr=/(.*<>)>([\d\.]+)<>([\d\.]+)<(<>.*)/;
	for(i=0;tmp.match(matchStr);i++)
		{
		a=	RegExp.$1;d=RegExp.$4;b=RegExp.$2;c=RegExp.$3;
		b=nise2do(b);c=nise2do(c);
		tmp=tmp.replace(matchStr,a+b+"<>"+c+d);
}		
	matchStr=/\n/g;
	if(tmp.match(matchStr))tmp=tmp.replace(matchStr,"");
	
	matchStr=/<<>>/;
	for(i=0;tmp.match(matchStr);i++)
			tmp=tmp.replace(matchStr,"["+i+"]");
	matchStr=/;/g;
	tmp=tmp.replace(matchStr,";\n");
	tmp="data=new Array();\n"+tmp;
	document.F.OUTPUT.value=tmp;
}

function nise2do(str){//ikken shousuunoyoude,60shin dearu Kasimir to ataiwo do nisuru
	var matchStr=/(\d*\.\d\d)(\d\d)(\d\d)/;
	str=str.replace(matchStr,"$1.$2.$3");
	return(str);
}