//specify whether contents should be auto copied to clipboard (memory)
	//Applies only to IE 4+
	//0=no, 1=yes
	var copytoclip=1
	
	function Select(theField) {
		var tempval = eval("document." + theField);
		tempval.focus();
		tempval.select();
		if (document.all && copytoclip == 1){
			therange = tempval.createTextRange();
			therange.execCommand("Copy");
			window.status = "Contents highlighted and copied to clipboard!";
			setTimeout("window.status=''",1800);
		}
	}


	function update(){
		document.form1.outy.value = document.form1.inny.value;
	}
	
	function Clear(){
		document.form1.outy.value = "";
		document.form1.inny.value = "";
	}
	function lister(){
		var entry = new String(document.form1.inny.value);
		var stringLength = entry.length;
		var returns = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "\n"){
				returns = returns + 1;
			}
		}
		var paragraphs = entry.split("\n");
		var outry = "<ul>\n";
		for(n=0; n <= returns; n++){
			if(paragraphs[n].search(/\w/)==(-1)){
				continue;
			}
			if(n!=returns){
				outry = outry + "<li>" + paragraphs[n] + "</li>\n";
			}else{
				outry = outry + "<li>" + paragraphs[n] + "</li>";
			}
		}
		outry = outry + "\n</ul>";
		document.form1.outy.value = outry;
	}
	
	function lister2(){
		var entry = new String(document.form1.inny.value);
		var stringLength = entry.length;
		var returns = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "\n"){
				returns = returns + 1;
			}
		}
		var paragraphs = entry.split("\n");
		var outry = "";
		for(n=0; n <= returns; n++){
			if(paragraphs[n].search(/\w/)==(-1)){
				continue;
			}
			if(n!=returns){
				outry = outry + "<a href=\"\">" + paragraphs[n] + "</a>\n";
			}else{
				outry = outry + "<a href=\"\">" + paragraphs[n] + "</a>";
			}
		}
		outry = outry + "";
		document.form1.outy.value = outry;
	}
	
	function transform1(){
		var entry = new String(document.form1.inny.value);
		var stringLength = entry.length;
		var returns = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "\n"){
				returns = returns + 1;
			}
		}
		var paragraphs = entry.split("\n");
		var outry = "";
		for(n=0; n < paragraphs.length; n++){
			paragraphs[n] = paragraphs[n] + "\n";
		}
		for(n=0; n <= returns; n++){
			if(paragraphs[n].search(/\w/)==(-1)){
				continue;
			}
			if(n!=returns){
				outry = outry + "<p>" + paragraphs[n] + "</p>\n";
			}else{
				outry = outry + "<p>" + paragraphs[n] + "</p>";
			}
		}
		document.form1.outy.value = outry;
	}
	
	function transform2(){
		var entry = new String(document.form1.inny.value);
		var stringLength = entry.length;
		var returns = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "\n"){
				returns = returns + 1;
			}
		}
		var paragraphs = entry.split("\n");
		var outry = "<p>";
		for(n=0; n <= returns; n++){
			if(n!=returns){
				if(paragraphs[n].search(/\w/)==(-1)){
					outry = outry + "</p>\n<p>" + paragraphs[n];
				}else{
					if(paragraphs[n+1].search(/\w/)!=(-1)){
						outry = outry + paragraphs[n] + "<br />";
					}else{
						outry = outry + paragraphs[n];
					}
				}
			}
		}
		outry = outry + paragraphs[returns] +"</p>\n";
		document.form1.outy.value = outry;
	}
	
	function emaillinks(){
		var entry = new String(document.form1.outy.value);
		var stringLength = entry.length;
		var addresses = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "@"){
				addresses = addresses + 1;	//find number of emails/length of array count
			}
		}
		if(addresses > 0){
			var count = entry.split("@");		//split the entry at @
			for(n=0; n< addresses; n++){		//add the @s back
				count[n] = count[n] + "@";
			}
			var fulladdress1="";
			var beginning = "";
			var ending = "";
			var fulladdress = "";
			for(n=0; n<= addresses; n++){
				if(n > 0){
					for(t=0; t<count[n].length; t++){		//get the ending and insert the </a>
						ending= ending + count[n].charAt(t);
						if(count[n].charAt(t+1) == " " || count[n].charAt(t+1) == "<" || count[n].charAt(t+1) == "\n"){
							var replace = "";
							for(r=0;r<count[n].length; r++){
								replace = replace + count[n].charAt(r);
								if(r==t){
									replace = replace + "</a>";
								}
							}
							count[n] = replace;
							break;
						}
					}
				}
				if(n > 0){
					fulladdress = new String(beginning + ending);
					beginning = "";
					ending = "";
					fulladdress1 = fulladdress1 + fulladdress + ", ";
					replace = "";
					for(t=(count[n-1].length-1); t >= 0; t--){
						var once = 0;
						if(count[n-1].charAt(t-1) == " " || count[n-1].charAt(t-1) == ">" || count[n-1].charAt(t-1) == "\n"){
							for(r=(count[n-1].length-1); r>=0; r--){
								replace = count[n-1].charAt(r) + replace;
								if((r==t)&& (once!=1)){
									replace = "<a href=\"mailto:" + fulladdress + "\">" + replace;
									once = 1;
								}
							}
							count[n-1] = replace;
							break;
						}
					}
				}
				if(n <addresses){			
					for(t=(count[n].length-1); t >= 0; t--){	//get the beginning and insert the <a href="address">
						beginning= count[n].charAt(t) + beginning;
						if(count[n].charAt(t-1) == " " || count[n].charAt(t-1) == ">" || count[n].charAt(t-1) == "\n"){
							break;
						}
					}
				}
				fulladdress = "";
			}
			if(document.form1.listmails.checked == true){
				document.writeln(fulladdress1);
			}
			var outry = "";		//this is the final product
			for(q=0;q<count.length;q++){
				outry= outry+count[q];
			}
			document.form1.outy.value = outry;
		}
	}
	
	
	function capWords(inputString) {
		var tmpStr, tmpChar, preString, postString, strlen;
		tmpStr = "";
		tmpStr = inputString.toLowerCase();
		var stringLen = tmpStr.length;
		if (stringLen > 0){
			for (i = 0; i < stringLen; i++){
				if (i == 0){
					tmpChar = tmpStr.substring(0,1).toUpperCase();
					postString = tmpStr.substring(1,stringLen);
					tmpStr = tmpChar + postString;
				}
				else{
					tmpChar = tmpStr.substring(i,i+1);
					if (tmpChar == " " && i < (stringLen-1)){
						tmpChar = tmpStr.substring(i+1,i+2).toUpperCase();
						preString = tmpStr.substring(0,i+1);
						postString = tmpStr.substring(i+2,stringLen);
						tmpStr = preString + tmpChar + postString;
					}
				}
			}
		}
		return tmpStr;
	}
	

	
	function labelizer(){
		alert("this is being tweaked but usable")
		//alert("This is under construction!!! \n                    --David Wiggins")
		
		var entry = new String(document.form1.inny.value);
		var stringLength = entry.length;
		var returns = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "\n"){
				returns = returns + 1;
			}
		}
		var paragraphs = entry.split("\n");
		var outry = "";
		var hungName = "";
		
		for(n=0; n < (returns+1); n++){

			if(paragraphs[n].search(/\w/)==(-1)){	//skips empty or one word questions
				//alert("hey")
				continue;		//eliminates extra lines
			}
			hungName = "";
			
			
			paragraphs[n] = capWords(paragraphs[n]);		//capitalize words in the name	
			
			for(y=0; y < paragraphs[n].length; y++){		//eliminate spaces in the name
				if(paragraphs[n].charAt(y) != " ")
					hungName = hungName + paragraphs[n].charAt(y);
			}
			
			var hungName1="";
			for(y=0; y < (hungName.length-1); y++){			//cut the name off at the ?
				
				if(hungName.charAt(y).search(/\w/)!=(-1)){
					hungName1 = hungName1 + hungName.charAt(y);
				}
				
				if(hungName.charAt(y+1) == "?")
					break;
			}
			if(hungName1.length < 60){
				hungName = hungName1;
			}else{
				hungName = "";
			}
			
			
			outry = outry + "\n<label for=\"" + hungName + "\">" + paragraphs[n] + "</label>\n" + "<input type=\"text\" name=\"" + hungName + "\" id=\"" + hungName + "\"><br />\n";

		}/*
		
		
		if(paragraphs[returns].search(/\w/)==(-1)){	//skips empty or one word questions
			//alert("hey")
			continue;		//eliminates extra lines
		}
		hungName = "";
		
		
		paragraphs[returns] = capWords(paragraphs[returns]);		//capitalize words in the name	
		
		for(y=0; y < paragraphs[returns].length; y++){		//eliminate spaces in the name
			if(paragraphs[returns].charAt(y) != " ")
				hungName = hungName + paragraphs[returns].charAt(y);
		}
		
		var hungName1="";
		for(y=0; y < (hungName.length-1); y++){			//cut the name off at the ?
			
			if(hungName.charAt(y).search(/\w/)!=(-1)){
				hungName1 = hungName1 + hungName.charAt(y);
			}
			
			if(hungName.charAt(y+1) == "?")
				break;
		}
		if(hungName1.length < 60){
			hungName = hungName1;
		}else{
			hungName = "";
		}
		*/
		
		outry = outry + "\n<label for=\"" + hungName + "\">" + paragraphs[returns] + "</label>\n" + "<input type=\"text\" name=\"" + hungName + "\" id=\"" + hungName + "\"><br />\n";
	
			
		document.form1.outy.value = outry;
		
	}
	
	
	
	function sel(){
		var entry = new String(document.form1.inny.value);
		var stringLength = entry.length;
		var returns = 0;
		for(n=0; n<stringLength; n++){
			if(entry.charAt(n) == "\n"){
				returns = returns + 1;
			}
		}
		var setting = "";
		var paragraphs = entry.split("\n");
		if(document.form1.selec[0].checked){
			setting = "0";
		}else if(document.form1.selec[1].checked){
			setting = "1";
		}else{
			setting = "2";
		}
		
		var outry = "";
		switch(setting){
			case "0":
				outry = "<select id=\"\" name=\"\" size=\"\" > \n";
				break;
			default :
				break;
		}
		var index = (-1);

		for(n=0; n <= returns; n++){
			if(paragraphs[n].search(/\w/)==(-1)){
				continue;
			}
			index++;
			switch(setting){
				case "0":
					outry = outry + "<option value=\"" + paragraphs[n] + "\">" + paragraphs[n] + "</option> \n";
					break;
				case "1":
					outry = outry + "<input type=\"radio\" name=\"rad\" value=\"" + paragraphs[n] + "\">"+ paragraphs[n] +  "<br /> \n";
					break;
				case "2":
					outry = outry + "<input type=\"checkbox\" name=\"" + paragraphs[n] + "\" value=\"" + paragraphs[n] + "\">"+ paragraphs[n] +  "<br /> \n";
					break;
				default :
					break;
			}
			
		}
		if(document.form1.selec[0].checked)
			outry = outry + "</select>";
		document.form1.outy.value = outry;
	}