function getEmailAddressWithTitle(address, linked, linkTitle)
{
    var coded,key;
    var link="";
    switch(address)
    {
     case "info":
        coded = "Sf26@NwCQOXahNaPQ.P6B";
        key = "OmkSs2yC1JD9wIoKqWhPYgBQdnUvZ8xpuA760lGjRbEHiNf4rLtzMaFV35XecT";
        break;     
     case "support":
        coded = "SURRcnV@0JneNFUv0Uqe.qcp";
        key = "lsuaemcQ9HfNzhy5xD4tYIwWFSUJvpqd1MBKGrL2APkVoE8Ojb3gTRZ06XC7in";
        break;        
     case "sales":
        coded = "RdyTR@3d4lhyvT3vBl.B5i";
        key = "6CWURnpQGYdNzKbg5BuElAFewV7ZMrOL3xqIh9tmvHySsT18fDa4XJP0ocj2ki";
        break;        
     case "careers":
        coded = "mPHooHr@zPHvkuZozZmv.mQ4";
        key = "F9LIJl0v7oUsBOVXzE8mfbA6Da3SNuiw2QnrtMqhxTK4pk1e5PYCWZdgycRHGj";
        break;
     case "noreply":
        coded = "pRqOBmU@uAqLEmMOuMyL.yR1";
        key = "2Jpy50OSbgq1HfhaM47KR8xL6lBU3NdIEwsPzGtAnciveCFYrmjTVXuDWQo9Zk";
        break;
     case "neil":
        coded = "lxQW.KjFFWxJ@Fj0UzW7xF7VU.VML";
        key = "Q4VLMB2sFu03KD5kqgbTNHJWCtSnefYvai8cmo76AdIrUh1zRPwOEXpylx9ZGj";
        break;
     case "peter":
        coded = "rUvUH.vCHCZ@oCHBRjbUob6B.6ig";
        key = "JWSTvA6I0f3NZehBQKyrmMLRlFia7u8Edz59Y2t4cUD1xGsHgkPnjpqCwbXVoO";
        break;
    }    
    shift=coded.length;    
    for (i=0; i<coded.length; i++) {
     if (key.indexOf(coded.charAt(i))==-1) {
       ltr = coded.charAt(i);
       link += (ltr);
     }
     else {     
       ltr = (key.indexOf(coded.charAt(i))-shift+key.length) % key.length;
       link += (key.charAt(ltr));
     }
    }
    if(linkTitle==null) linkTitle=link;
    if(linked) link="<a href='mailto:"+link+"'>"+linkTitle+"</a>";
    return link;
}

function getEmailAddress(address, linked)
{ return getEmailAddressWithTitle(address, linked, null); }

function mailTo(address, subjectLine)
{ location.href = "mailto:"+ getEmailAddress(address, false) +"?subject="+ subjectLine; }