")|| ($resto==")")) {
$resta2=substr($resta, -1);
if (($resta2==".") || ($resta2=="\"") || ($resta2==";") || ($resta2==":") || ($resta2=="\'") || ($resta2==",")|| ($resta2=="]")|| ($resta2==">")|| ($resta2==")")) {
$resta=substr($resta, 0, -1);
}
$exp[$z]=htmlentities($exp[$z]);
$exp[$z]="$exp[$z]";
}
else {
$exp[$z]="$exp[$z]";
}
}
elseif ($su) {
$su=trim($su);
$restc = substr("$su", -1);
$restd= substr("$su", 0, -1);
if (($restc==".") || ($restc=="\"") || ($restc==";") || ($restc==":") || ($restc=="\'") || ($restc==",") || ($restc=="]")|| ($restc==">")|| ($restc==")")) {
$restc2=substr($restd, -1);
if (($restc2==".") || ($restc2=="\"") || ($restc2==";") || ($restc2==":") || ($restc2=="\'") || ($restc2==",")|| ($restc2=="]")|| ($restc2==">")|| ($restc2==")")) {
$restd=substr($restd, 0, -1);
}
$exp[$z]=htmlentities($exp[$z]);
$exp[$z]="$exp[$z]";
}
else {
$exp[$z]="$exp[$z]";
}
}
elseif ($sv) {
$sv=trim($sv);
$restg = substr("$sv", -1);
$restf= substr("$sv", 0, -1);
if (($restg==".") || ($restg=="\"") || ($restg==";") || ($restg==":") || ($restg=="\'") || ($restg==",") || ($restg=="]")|| ($restg==">")|| ($restg==")")) {
$restg2=substr($restf, -1);
if (($restg2==".") || ($restg2=="\"") || ($restg2==";") || ($restg2==":") || ($restg2=="\'") || ($restg2==",")|| ($restg2=="]")|| ($restg2==">")|| ($restg2==")")) {
$restf=substr($restf, 0, -1);
}
$exp[$z]=htmlentities($exp[$z]);
$exp[$z]="$exp[$z]";
}
else {
$exp[$z]="$exp[$z]";
}
}
else {
$rest = substr("$exp[$z]", -1);
$expo=substr($exp[$z], 0, -1);
$expi=trim($exp[$z]);
$mel=strchr($expo,"@");
$point=strchr($expo,".");
$changer=0;
if ($mel && $point) {
if (($rest==".") || ($rest=="\"") || ($rest==";") || ($rest==":") || ($rest=="\'") || ($rest==",")|| ($rest=="]")|| ($rest==">")|| ($rest==")")) {
$expi=substr($expi, 0, -1);
$expites=substr($expi, -1);
if (($expites==".") || ($expites=="\"") || ($expites==";") || ($expites==":") || ($expites=="\'") || ($expites==",")|| ($expites=="]")|| ($expites==">")|| ($expites==")")) {
$expi=substr($expi, 0, -1);
}
}
$expibis=substr($expi, 0, 1);
if (($expibis==".") || ($expibis=="\"") || ($expibis==";") || ($expibis==":") || ($expibis=="\'") || ($expibis==",")|| ($expibis=="]")|| ($expibis=="<")|| ($expibis=="(")) {
$expi=substr($expi, 1);
$expiter=substr($expi, 0, 1);
if (($expiter==".") || ($expiter=="\"") || ($expiter==";") || ($expiter==":") || ($expiter=="\'") || ($expiter==",")|| ($expiter=="]")|| ($expiter=="<")|| ($expiter=="(")) {
$expi=substr($expi, 1);
}
}
$exp[$z]=htmlentities($exp[$z]);
$exp[$z]="$exp[$z]";
}
}
if ((!$st)&&(!$su)&&(!$sv)&&(!($mel && $point))) {
$exp[$z]=htmlentities($exp[$z]);
}
}
$contenido=implode(" ",$exp);
$contenido = str_replace("$esp", "
", $contenido);
?>