function select_text(tarea)
{
	if (window.getSelection) // mozilla
	{
		source = document.forms['adm_form'].elements[tarea];
		source_text = source.value;
		selected_start = source.selectionStart;
		selected_stop = source.selectionEnd;
		check_sel_val = source_text.substr(selected_start, selected_stop - selected_start);
	}
	else
	{
		if (document.selection) // msie
		{
			check_sel_val = document.selection.createRange().text;
		}
	}

	return check_sel_val;
}

function insert_text(tarea, itext)
{
	if (window.getSelection) // mozilla
	{
		target = document.forms['adm_form'].elements[tarea];
		selStart = target.selectionStart;
		selEnd = target.selectionEnd;
		txtLen = target.value.length;
		txtbefore = target.value.substring(0,selStart);
		txtafter =  target.value.substring(selEnd, txtLen);
		target.value = txtbefore + itext + txtafter;
	}
	else
	{
		if (document.selection) // msie
		{
			document.selection.createRange().text = itext;
		}
	}
}

// funktion fuer einfache tags (bold, italic ...) [kann jetzt schon mehr!!!!!]
function tag01(wohin,info,anfang,ende)
{
	strSelection = select_text(wohin);
	if (strSelection == "") {
		ausgabe = 'Bitte geben Sie hier den Text ein der '+info+' sein soll:';
		eingabe = prompt(ausgabe,"");
	}	
	else {
		eingabe = strSelection;
	}
	document.forms['adm_form'].elements[wohin].focus();
	//document.selection.createRange().text = anfang + eingabe + ende;
	itext = anfang + eingabe + ende;
	insert_text(wohin, itext);
	
	return;
}



// funktion fuer externe links
function lnk01(wohin,typ)
{
	strSelection = select_text(wohin);
	ausgabe1 = 'Bitte geben Sie hier die URL des externen Links ein (z.B. http://www.e-dvertising.at):';
	ausgabe2 = 'Bitte geben Sie hier den zu verlinkenden Text ein:';
	anfang  = '-l_open-';
	// von typ abhaengig ...
	mitte   = '-' + typ + '-';
	ende    = '-l_close-';

	eingab1 = prompt(ausgabe1,"");

	if (strSelection == "") {
		eingab2 = prompt(ausgabe2,"");
	}
	else {
		eingab2 = strSelection;
	}

	//document.adm_form[wohin].focus(); OLD!!!
	document.forms['adm_form'].elements[wohin].focus();
	//document.selection.createRange().text = anfang + eingab1 + mitte + eingab2 + ende;
	itext = anfang + eingab1 + mitte + eingab2 + ende;
	insert_text(wohin, itext);
	return;
}

// funktion fuer interne links
function lnk02(wohin,typ)
{
	strSelection = select_text(wohin);
	ausgabe1 = 'Bitte geben Sie hier den internen Link ein (z.B. /de/wellness/):';
	ausgabe2 = 'Bitte geben Sie hier den zu verlinkenden Text ein:';
	anfang  = '-l_open-';
	// von typ abhaengig ...
	mitte   = '-' + typ + '-';
	ende    = '-l_close-';

	eingab1 = prompt(ausgabe1,"");

	if (strSelection == "") {
		eingab2 = prompt(ausgabe2,"");
	}
	else {
		eingab2 = strSelection;
	}
	//document.adm_form[wohin].focus(); OLD!!!
	document.forms['adm_form'].elements[wohin].focus();
	//document.selection.createRange().text = anfang + eingab1 + mitte + eingab2 + ende;
	itext = anfang + eingab1 + mitte + eingab2 + ende;
	insert_text(wohin, itext);
	return;
}

// funktion fuer mailto links
function mail01(wohin,typ)
{
	strSelection = select_text(wohin);
	ausgabe1 = 'Bitte geben Sie hier die Email-Adresse ein (z.B. info@e-dvertising.at):';
	ausgabe2 = 'Bitte geben Sie hier den mit der Email-Adresse zu verlinkenden Text ein:';
	anfang  = '-mailto-';
	// von typ abhaengig ...
	mitte   = '-external-';
	ende    = '-l_close-';

	eingab1 = prompt(ausgabe1,"");

	if (strSelection == "") {
		eingab2 = prompt(ausgabe2,"");
	}
	else {
		eingab2 = strSelection;
	}
	//document.adm_form[wohin].focus(); OLD!!!
	document.forms['adm_form'].elements[wohin].focus();
	//document.selection.createRange().text = anfang + eingab1 + mitte + eingab2 + ende;
	itext = anfang + eingab1 + mitte + eingab2 + ende;
	insert_text(wohin, itext);
	return;
}

// beim listing NICHTS markieren, sondern nur den cursor setzen!
// funktion fuer listings
function lst01(wohin,typ)
{
	eingabe = '';
	ausgabe1= 'Bitte geben Sie hier einen ';
	ausgabe2= 'Listenpunkt ein \n(Lassen Sie dieses Feld leer, um die Liste zu schließen):';
	ausgabe = ausgabe1 + ausgabe2; 
	eingabx = prompt(ausgabe,"");

	while (eingabx != "") {
		ausgabe = ausgabe1 + 'weiteren ' + ausgabe2;
		eingabe = eingabe + '-li-' + eingabx + '\n';
		eingabx = prompt(ausgabe,"");
	}

	anfang   = '\n-' + typ + 'l-\n';
	ende     = '-/' + typ + 'l-\n';

	strSelection = select_text(wohin);
	//document.adm_form[wohin].focus(); OLD!!!
	document.forms['adm_form'].elements[wohin].focus();
	//document.selection.createRange().text = anfang + eingabe + ende;
	itext = anfang + eingabe + ende;
	insert_text(wohin, itext);
}