function rmtoscript(nod) {
	par = nod.parentNode;
	if(!par) return false;
	while(true) {
		sib = nod.nextSibling;
		if (!sib || String(sib.tagName).toLowerCase() === 'script')
			break;
		par.removeChild(sib);
		}
	return true;
	}

function mkem(el, pt3, pt1, pt4, pt2, txt, prenot, br) {
	if(!document.getElementById)
		return;
	var addr = pt2+String.fromCharCode(0x40)+pt3;
	var lnk = document.getElementById(el);
	if (!lnk)
		return;
	if (!rmtoscript(lnk))
		return;
	addr = pt1+addr;
	addr += pt4;
	par = lnk.parentNode;
	if (prenot) {
		if (br)
			par.insertBefore(document.createElement('br'), lnk);
		par.insertBefore(document.createTextNode('E-mail:\u00a0'), lnk);
		}
	lnk.setAttribute('href', 'mailto:'+addr);
	if (!txt)
		txt=addr;
	var txtN = document.createTextNode(txt);
	if (lnk.firstChild)
		lnk.replaceChild(txtN,lnk.firstChild);
	else
		lnk.appendChild(txtN);
	}