<?php

  global $message;

$message=strtolower($message);

function translate($message)
{
  $message=" ".$message." ";

  if ("$message"!=="")
  {
    $message = str_replace("ё","е",$message);
    $message = str_replace("a","а",$message);
    $message = str_replace("o","о",$message);
    $message = str_replace("p","р",$message);
    $message = str_replace("<","&lt;",$message);
    $message = str_replace(">","&gt;",$message);
    $message = str_replace("\n","<br_/>",$message);

    $message = str_replace("?!","?",$message);
    $message = str_replace("!?","?",$message);
    $message = str_replace("?","?.",$message);
    $message = str_replace(";",";.",$message);
    $message = str_replace("!","!.",$message);

    $message=str_replace(" - "," -_",$message);
    $message=str_replace(" в "," в_",$message);
    $message=str_replace(" у "," у_",$message);
    $message=str_replace(" с "," с_",$message);
    $message=str_replace(" к "," к_",$message);
    $message=str_replace(" и ","_и_",$message);
    $message=str_replace(" на "," на_",$message);
    $message=str_replace(" ни "," ни_",$message);
    $message=str_replace(" не "," не_",$message);
    $message=str_replace(" но "," но_",$message);
    $message=str_replace(" из "," из_",$message);
    $message=str_replace(" по "," по_",$message);
    $message=str_replace(" со "," со_",$message);
    $message=str_replace(" до "," до_",$message);
    $message=str_replace(" от "," от_",$message);
    $message=str_replace(" без "," без_",$message);
    $message=str_replace(" под "," под_",$message);
    $message=str_replace(" над "," над_",$message);
    $message=str_replace(" как "," как_",$message);
    $message=str_replace(" для "," для_",$message);
    $message=str_replace(" ряда "," ряда_",$message);
    $message=str_replace(" через "," через_",$message);
    $message=str_replace(" перед "," перед_",$message);
    $message=str_replace(" вообще "," вообще_",$message);
    $message=str_replace(" таким же "," таким_же ",$message);
    $message=str_replace(" такой же "," такой_же ",$message);
    $message=str_replace(" так же "," так_же ",$message);
    $message=str_replace(" так и "," так_и ",$message);
    $message=str_replace(" ли ","_ли ",$message);
    $message=str_replace("ему ","ему+",$message);
    $message=str_replace("ую ","ую+",$message);
    $message=str_replace("юю ","юю+",$message);
    $message=str_replace("их ","их+",$message);
    $message=str_replace("ие ","ие+",$message);
    $message=str_replace("ая ","ая+",$message);
    $message=str_replace("ом ","ом+",$message);
    $message=str_replace("ий ","ий+",$message);
    $message=str_replace("ой ","ой+",$message);
    $message=str_replace("ое ","ое+",$message);
    $message=str_replace("ей ","ей+",$message);
    $message=str_replace("ый ","ый+",$message);
    $message=str_replace("ым ","ым+",$message);
    $message=str_replace("ые ","ые+",$message);

    $predl=explode(".",$message);
    for ($ii=0;$ii<sizeof($predl);$ii++) {
      $znak[$ii]=substr($predl[$ii],-1);
      $predl[$ii]=str_replace("!","",$predl[$ii]);
      $predl[$ii]=str_replace("?","",$predl[$ii]);
      $predl[$ii]=str_replace(";","",$predl[$ii]);
    };       

    for ($kk=0;$kk<sizeof($predl);$kk++) {

      $chains=explode(",",$predl[$kk]);

      for ($jj=0;$jj<sizeof($chains);$jj++) {

        $words=explode(" ",$chains[$jj]);

        $siz=sizeof($words);
        shuffle($words);
        for ($ii=0;$ii<$siz;$ii++) {
          if (strpos($words[$ii],"+")!==false) {
            $swords=explode("+",$words[$ii]);
            shuffle($swords);
            $words[$ii]=implode(" ",$swords);
          };
        };
        $chains[$jj]=implode(" ",$words);
      };
      $predl[$kk]=ucfirst(trim(implode(", ",$chains)));
      if (($znak[$kk]=="?")||($znak[$kk]=="!")||($znak[$kk]==";")) { $predl[$kk]=$predl[$kk].$znak[$kk]; };
    };
    $message=implode(". ",$predl);
    $message=str_replace("_"," ",$message);
    $message=str_replace(" . ",". ",$message);
    $message=str_replace(" , ",", ",$message);
    $message=str_replace("+"," ",$message);
    $message = str_replace("\\","",$message);
    $message = str_replace("?. ","? ",$message);
    $message = str_replace(";. ",". ",$message);
    $message = str_replace("!. ","! ",$message);
  };
  $message=trim($message);
  return $message;
}

printf(translate($message));

?>
<br /><br />
<tr><td valign=top align=center style="border: 1px solid #ccc"><b>Перевести текст:</b><br />

<form enctype="multipart/form-data" accept-charset="windows-1251" method="post" name=mat action="">
<textarea name=message rows=20 cols=45></textarea><br />
<input type=button onclick=mat.submit() value="перевести">

</body>
</html>