// insert_link():
// fuegt an der aktiven Stelle einen Link ein.
// fragt die Adresse etc. ab.
	
	function insert_link(id) {
		var myField = document.getElementById(id);
		var tscrolling = myField.scrollTop;
		var lscrolling = myField.scrollLeft;
		var default_txt = 'Ihr Text';
		var sel = get_selection(id);
		var txt = '';
		var sel_txt;
		
		if(sel.text != null){
			sel_txt = sel.text;
		} else {
			sel_txt = sel;
		}

		var url = prompt("Bitte Linkziel/URL eingeben: ", "http://");
		
		if(url != 'http://' && url != '' && url != null){
			if(sel === false || sel_txt == ''){
				link_name = prompt("Bitte Linkname eingeben: ", "");
				txt = '[link='+ url +']' + link_name + '[/link]';
				lscrolling = myField.scrollLeft + txt;

				if (document.selection) {
					myField.focus();
					sel = document.selection.createRange();
					sel.text = txt;
				} else {
					if (myField.selectionStart || myField.selectionStart == '0') {
						var startPos = myField.selectionStart;
						var endPos = myField.selectionEnd;
						myField.value = myField.value.substring(0, startPos)
						+ txt
						+ myField.value.substring(endPos, myField.value.length);
					} else {
						myField.value = myField.value + txt ;
					}
				}
			} else {
				txt = myField.value;
				replace = '[link='+ url +']' + sel_txt + '[/link]';
			
				if(document.selection){
					var range = document.selection.createRange();
					var stored_range = range.duplicate();
					stored_range.moveToElementText( myField );
					stored_range.setEndPoint( 'EndToEnd', range );
					myField.selectionStart = stored_range.text.length - range.text.length;
					myField.selectionEnd = myField.selectionStart + range.text.length;
				}
			
				if (myField.selectionStart != null && myField.selectionEnd != null) {
					var start = myField.selectionStart;
					var end = myField.selectionEnd;
					
					txt = txt.substring(0, start) + replace + txt.substring(end, txt.length);
					myField.value = txt;
				} else {				
					txt = str_replace(sel_txt, replace, txt);
					myField.value = txt;
				}
			}
		
			myField.scrollTop = tscrolling;
			myField.scrollLeft = lscrolling;
		}
		
		myField.focus();
	}