function mto (tld,domain,mailbox,link,subject,body)
{
    result = '<a class=nav href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}

function mto_ws100 (tld,domain,mailbox,link,subject,body)
{
    result = '<a class=navlink href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}

function mto_navlink (tld,domain,mailbox,link,subject,body)
{
    result = '<a class=navlink href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}

function mto_button (tld,domain,mailbox,link,subject,body)
{
    result = '<a class=button href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}

function mto_white (tld,domain,mailbox,link,subject,body)
{
    result = '<a class=white href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}

function mto_dotted (tld,domain,mailbox,link,subject,body)
{
    result = '<a class=dotted href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}
 
function mto_plain (tld,domain,mailbox,link,subject,body)
{
    result = '<a href="mai' + 'lto:' + escape (mailbox);
    result += '@' + escape (domain + '.' + tld);
    if (subject != '' || body != '') result += '?';
    if (subject != '') result += 'Subject=' + escape (subject);
    if (subject != '' && body != '') result += '&';
    if (body != '') result += 'Body=' + escape (body);
    if (link == '') link = escape (mailbox) + '@' + escape (domain + '.' + tld);
    return result + '">' + link + '</a>';
}