etc.
				if(preg_match('/<(code|pre|kbd|notextile)>/i',$line)){$codepre = true; }
				if(preg_match('/<\/(code|pre|kbd|notextile)>/i',$line)){$codepre = false; }

				if(!preg_match("/<.*>/",$line) && $codepre == false){
					$line = preg_replace($glyph_search,$glyph_replace,$line);
				}

				# convert htmlspecial if between 
				if ($codepre == true){
					$line = htmlspecialchars($line,ENT_NOQUOTES,"UTF-8");
					$line = str_replace("<pre>","
",$line);
					$line = str_replace("<code>","",$line);
					$line = str_replace("<notextile>","",$line);
					$line = str_replace("<kbd>","",$line);
				}

				# each line gets pushed to a new array
			$glyph_out[] = $line;
		}
			# $text is now the new array, cast to a string
		$text = implode('',$glyph_out);
	}

	$text = preg_replace("/(\S)(_*)([[:punct:]]*) *\n([^#*\s])/", "$1$2$3
$4", $text);

	$text = str_replace("l>
", "l>\n", $text);

	$text = preg_split("/\n/",$text);

	array_push($text," ");

			$list = '';
			$pre = false;

			$block_find = array(
				'/^\s?\*\s(.*)/',						# bulleted list *
				'/^\s?#\s(.*)/',						# numeric list #
				'/^bq\. (.*)/',							# blockquote bq.
				'/^h(\d)\(([[:alnum:]]+)\)\.\s(.*)/',	# header hn(class).  w/ css class
				'/^h(\d)\. (.*)/',						# plain header hn.
				'/^p\(([[:alnum:]]+)\)\.\s(.*)/',		# para p(class).  w/ css class
				'/^p\. (.*)/i',	 						# plain paragraph
				'/^([^\t ]+.*)/i'						# remaining plain paragraph
				);

			$block_replace = array(
				"\t\t
$1
",
				"\t\t\t
$1
",
				"\t
$1
",
				"\t$3$4",
				"\t$2$3",
				"\t
$2
$3",
				"\t
$1
",
				"\t
$1
$2"
				);

	foreach($text as $line){

			if(preg_match('/
/i',$line)){$pre = true; }

			if ($pre == false){
				$line = preg_replace($block_find,$block_replace,$line);
			}

			if ($pre == true){
				$line = str_replace("
","\n",$line);
			}
				if(preg_match('/<\/pre>/i',$line)){$pre = false; }

			if ($list == '' && preg_match('/^\t\t
/',$line)){
					$list = "ul";
				$line = preg_replace('/^(\t\t
.*)/',"\t
\n$1",$line);

			} else if ($list == '' && preg_match('/^\t\t\t
/',$line)){
					$list = "ol";
				$line = preg_replace('/^\t(\t\t
.*)/',"\t
\n$1",$line);

			# at the end of a ul
			} else if ($list == 'ul' && !preg_match('/^\t\t
/',$line)){
					$list = '';
				$line = preg_replace('/^(.*)$/',"\t
\n$1",$line);

			# at the end of a ol
			} else if ($list == 'ol' && !preg_match('/^\t\t\t
/',$line)){
					$list = '';
				$line = preg_replace('/^(.*)$/',"\t\n$1",$line);
			}

			$block_out[] = $line;
	}
	$text = implode("\n",$block_out);
	$text = preg_replace('/<\/?notextile>/', "",$text);
	$text = str_replace("x%x%","&",$text);
	$text = str_replace("
","
\n",$text);
	return $text;
}

function callback_url($text,$title='',$url) {
		$out = 'a href="'.$url.'"';
		$out.=($title!='')?' title="'.$title.'"':'';
		$out.='>$text';
		return $out;
	}



function textile_popup_help($name,$helpvar,$windowW,$windowH) {
	$out = $name;
	$out .= ' ?
';
	print $out;
}


function encode_high($text) {
	$cmap = cmap();
	return mb_encode_numericentity($text, $cmap, "UTF-8");
}


function decode_high($text) {
	$cmap = cmap();
	return mb_decode_numericentity($text, $cmap, "UTF-8");
}


function cmap() {

	$f = 0xffff;

	$cmap = array(
	 160,  255,  0, $f,
	 402,  402,  0, $f,
	 913,  929,  0, $f,
	 931,  937,  0, $f,
	 945,  969,  0, $f,
	 977,  978,  0, $f,
	 982,  982,  0, $f,
	 8226, 8226, 0, $f,
	 8230, 8230, 0, $f,
	 8242, 8243, 0, $f,
	 8254, 8254, 0, $f,
	 8260, 8260, 0, $f,
	 8465, 8465, 0, $f,
	 8472, 8472, 0, $f,
	 8476, 8476, 0, $f,
	 8482, 8482, 0, $f,
	 8501, 8501, 0, $f,
	 8592, 8596, 0, $f,
	 8629, 8629, 0, $f,
	 8656, 8660, 0, $f,
	 8704, 8704, 0, $f,
	 8706, 8707, 0, $f,
	 8709, 8709, 0, $f,
	 8711, 8713, 0, $f,
	 8715, 8715, 0, $f,
	 8719, 8719, 0, $f,
	 8721, 8722, 0, $f,
	 8727, 8727, 0, $f,
	 8730, 8730, 0, $f,
	 8733, 8734, 0, $f,
	 8736, 8736, 0, $f,
	 8743, 8747, 0, $f,
	 8756, 8756, 0, $f,
	 8764, 8764, 0, $f,
	 8773, 8773, 0, $f,
	 8776, 8776, 0, $f,
	 8800, 8801, 0, $f,
	 8804, 8805, 0, $f,
	 8834, 8836, 0, $f,
	 8838, 8839, 0, $f,
	 8853, 8853, 0, $f,
	 8855, 8855, 0, $f,
	 8869, 8869, 0, $f,
	 8901, 8901, 0, $f,
	 8968, 8971, 0, $f,
	 9001, 9002, 0, $f,
	 9674, 9674, 0, $f,
	 9824, 9824, 0, $f,
	 9827, 9827, 0, $f,
	 9829, 9830, 0, $f,
	 338,  339,  0, $f,
	 352,  353,  0, $f,
	 376,  376,  0, $f,
	 710,  710,  0, $f,
	 732,  732,  0, $f,
	 8194, 8195, 0, $f,
	 8201, 8201, 0, $f,
	 8204, 8207, 0, $f,
	 8211, 8212, 0, $f,
	 8216, 8218, 0, $f,
	 8218, 8218, 0, $f,
	 8220, 8222, 0, $f,
	 8224, 8225, 0, $f,
	 8240, 8240, 0, $f,
	 8249, 8250, 0, $f,
	 8364, 8364, 0, $f
	 );

	return $cmap;
}


function linkit($text,$title,$url){
    $url = preg_replace("/&(?!amp;)/","&",$url);
    $out = '';

    return $out;
}

// And now for the filters
remove_filter('the_content', 'wpautop');
remove_filter('the_excerpt', 'wpautop');
remove_filter('comment_text', 'wpautop');

remove_filter('the_content', 'wptexturize');
remove_filter('the_excerpt', 'wptexturize');
remove_filter('comment_text', 'wptexturize');

add_filter('the_content', 'textile', 6);
add_filter('the_excerpt', 'textile', 6);
add_filter('comment_text', 'textile', 6);

?>