var at_sign = "@";
var at_text = "<em>&#97;&#116;</em>";
var colon = ":";
var dot = "." ;
var dot_text = "<em>dot</em>" ;
var tag = "mailto";
var tag_encoded = "%6D%61%69%6C%74%6F";

var fullname;
var areacode;
var exchange;
var pnumber;
var tld;
var domain;
var uname;
var subject = "";

function write_phone_number(areacode, exchange, pnumber)
{
    if ( areacode != "" ) {
    	document.write("(" + areacode + ") ");
    }
    document.write(exchange + "-" + pnumber);
}

function assembled_mailto(tld, uname, domain)
{
    var returnval;
    returnval = tag + colon + uname + at_sign + domain + dot + tld;
    // subject line : ?SUBJECT=
    if ( subject != "" ) {
    	returnval = returnval + "?SUBJECT=" + subject ;
    }
    return returnval;
 }

function obfuscated_email_text_simple()
{
    document.writeln(uname + "<!--clutter");
    document.writeln("to obscure");
    document.writeln("from robots");
    document.writeln("-->&nbsp;&nbsp;" + at_text + "&nbsp;<!--");
    document.writeln("more clutter");
    document.writeln("-->&nbsp;" + domain + "&nbsp; " + dot_text + "&nbsp;<!--");
    document.writeln("even more clutter");
    document.write("-->&nbsp;" + tld);	// no NL - creates trailing space
}

function obfuscated_email_text_table()
{
    document.writeln("<table cellspacing=0 cellpadding=0><tr><td>");
    document.writeln(uname + "</td><!--clutter");
    document.writeln("to obscure");
    document.writeln("from robots");
    document.writeln("--><td>" + at_sign + "</td><!--");
    document.writeln("more clutter");
    document.writeln("--><td>" + domain + "</td><td>" + dot_text + "</td><!--");
    document.writeln("even more clutter");
    document.writeln("--><td>" + tld);
    document.write("</td></tr></table>");    // no NL - creates trailing space
}

function obfuscated_email_text()
{
    // table version creates undesirable new-line without additional cmds
    obfuscated_email_text_simple();
}

function a_href_mailto()
{
    var fakeuname = "nobody@nowhere.fakeTLD";
    document.writeln(
	"<a href=\"" + tag + colon + fakeuname + "\""
	);
    document.writeln(
	"    onclick=\"this.href=assembled_mailto('" +
	     tld + "','" +
	     uname + "','" +
	     domain +
	     "');\""
	);
    document.writeln(
	"    onMouseOver=\"window.status=assembled_mailto('" +
	     tld + "','" +
	     uname + "','" +
	     domain +
	     "');return true;\""
	);
    document.writeln(
	"    onmouseout=\"window.status='';return true;\""
	);
    document.writeln(
    	">"
	);
}

function a_href_mailto_w_text(which_text)
{
  if ( tld != "" ) {
    a_href_mailto();
    	// no NL between text and </a> - creates trailing space on text
    switch ( which_text ) {
	case "click" :
	    document.write("<span>click here to send e-mail</span>");
	    break;
   	case "address" :
	    obfuscated_email_text();
	    break;
	case "fullname" :
	    document.write(fullname);
	    break;
	default :
	    document.write(which_text);
	    break;
    }

    document.writeln(
	"</a>");
  } else {
    	document.writeln("<em>email address not available</em>");
  }
}

function address_line()
{
    document.writeln(fullname + ",");
    if ( pnumber != "" ) {
    	write_phone_number(areacode, exchange, pnumber);
	document.writeln(", ");
    }
    a_href_mailto_w_text("address");
}

