function nospamEncode(inStr){
	var code;
	var outStr = "";
	for(i = 0; i < inStr.length; i++){
		code = inStr.charCodeAt(i);
		outStr += (code < 0x10 ? "0" : "") + code.toString(16);
	}
	return outStr;
}

function createMailto(n){
	var addr, body, attr;
	if(n){
		addr = document.fm1.address.value;
		if(addr.match(/^[a-z\d_\-\.]+@([a-z\d_\-]+\.)+[a-z]+$/)){
			document.fm1.output.value = "<script type=\"text/javascript\"><!-\-\naddrAnc = \"mailtoAnc(this, &quot;" + nospamEncode(addr) + "&quot;)\";\ndocument.write(\"<a href=\\\"\" + mailzu + \"\\\" onmouseover=\\\"\" + addrAnc +\"\\\" onfocus=\\\"\" + addrAnc +\"\\\" onclick=\\\"\" + addrAnc +\"\\\" onkeypress=\\\"\" + addrAnc +\"\\\">\");\ndocument.write(\"メールはこちらへ\");\ndocument.write(\"<\\/a>\");\n//-\-><\/script>";
		}
		else document.fm1.output.value = "メールアドレスに誤りがあります";
	}
	else {
		addr = document.fm2.address.value;
		attr = document.fm2.attr.value;
		if(!attr.match(/^ *([a-z\-]+( *= *(\"[^\"<>]*\" *|\'[^\'<>]*\' *|[^\"\'<>]+ +))?)*([a-z\-]+( *= *(\"[^\"<>]*\"|\'[^\'<>]*\'|[^\"\'<>]+))?)? *$/i)){
			document.fm2.output.value = "Aタグに追加する属性に誤りがあります。";
			return false;
		}
		attr = attr.replace(/\\/g, "\\\\").replace(/\"/g, "\\\"").replace(/\r\n/g, "\n").replace(/\r/g, "\n").replace(/\n/g, "\\n").replace(/-\-/g, "-\\-").replace(/-\-/g, "-\\-");
		body = document.fm2.input.value.replace(/\\/g, "\\\\").replace(/\"/g, "\\\"").replace(/-\-/g, "-\\-").replace(/-\-/g, "-\\-").replace(/<\//g, "<\\/");
		if(addr.match(/^[a-z\d_\-\.]+@([a-z\d_\-]+\.)+[a-z]+$/)){
			document.fm2.output.value = "<script type=\"text/javascript\"><!-\-\naddrAnc = \"mailtoAnc(this, &quot;" + nospamEncode(addr) + "&quot;)\";\ndocument.write(\"<a href=\\\"\" + mailzu + \"\\\" onmouseover=\\\"\" + addrAnc +\"\\\" onfocus=\\\"\" + addrAnc +\"\\\" onclick=\\\"\" + addrAnc +\"\\\" onkeypress=\\\"\" + addrAnc +\"\\\"" + attr + ">\");\ndocument.write(\"" + body + "\");\ndocument.write(\"<\\/a>\");\n//-\-><\/script>";
		}
		else document.fm2.output.value = "メールアドレスに誤りがあります";
	}
}