Tradutor Google

Publicado por Fábio Berbert de Paula 11/12/2002

[ Hits: 24.952 ]

Homepage: https://fabio.automatizando.dev

Download tr.google.zip




Script usado para traduzir texto em diversos idiomas usando a engine do translate.google.com como fonte de pesquisa.

  



Esconder código-fonte

<!-- tr.google.php -->
<?
/*
-------------------------------------------------------------------
Programado por Fábio Berbert de Paula <fabio@vivaolinux.com.br>
http://www.vivaolinux.com.br

Script usado para traduzir texto em diversos idiomas usando a engine 
do translate.google.com como fonte de pesquisa.

Rio de Janeiro, 25/09/2002
-------------------------------------------------------------------
*/

$traducao = '-';
// se text está definido, temos texto a traduzir
if ($text) {
   $traducao = traduzir($text,$langpair);
}
?>
<html>
<head>
<title>tr.google.php</title>

<style>
<!--
  body {margin-right: 1em; margin-left: 1em;}
-->
</style>
</head>

<body bgcolor="#ffffff" text="#000000" link="#0000cc" vlink="551a8b" 
alink="#ff0000">

<table width="100%" border=0 cellspacing=0 cellpadding=1>
<tr bgcolor=#ffffff>
<td>
<form method=post>
<font face="arial,sans-serif" size=-1>Traduzir texto:</font>
<br>
<textarea name=text rows=5 cols=45 wrap=PHYSICAL><? echo $text; ?></textarea><br>
<font face="arial,sans-serif" size=-1>De</font>
<select name=langpair>
<option value="en|de">Inglês para Alemão</option>
<option value="en|es">Inglês para Espanhol</option>
<option value="en|fr">Inglês para Francês</option>
<option value="en|it">Inglês para Italiano</option>
<option value="en|pt" selected>Inglês para Português</option>
<option value="de|en">Alemão para Inglês</option>
<option value="de|fr">Alemão para Francês</option>
<option value="es|en">Espanhol para Inglês</option>
<option value="fr|en">Francês para Inglês</option>
<option value="fr|de">Francês para Alemão</option>
<option value="it|en">Italiano para Inglês</option>
<option value="pt|en">Português para Inglês</option>
</select>

<input type=hidden name=hl value="en">
<input type=hidden name=ie value="Unknown">
<input type=hidden name=oe value="ASCII">
<input type=submit value=" Traduzir ">
</form>
</td></tr>

<tr><td>
<br><br>
<font face="arial,sans-serif" size=-1>
Texto traduzido:<Br>
<pre><? echo $traducao; ?></pre>
</font>
</table>

</body>
</html>

<?
function traduzir($text,$langpair) {
   // definição de variáveis
   $host = 'translate.google.com';
   $vars = "hl=en&ie=Unknown&oe=ASCII&langpair=$langpair&text=" . urlencode($text);
   $url  = "/translate_t?$vars";

   // efetuando conexão com o google
   $fp = fsockopen ($host, 80, $errno, $errstr, 30);
   if (!$fp) {
       echo "Ocorreu um erro ao tentar conexão com $host: $errstr ($errno)<br>\n";
       exit;
   } else {
       $addinfo .= "Accept-Language: en\r\nAccept-Charset: iso-8859-1,*,utf-8\r\n";
       fputs ($fp, "GET $url HTTP/1.1\r\nHost: $host\r\n$addinfo\r\n");
       while (!feof($fp)) {
           $html .= fgets ($fp,128);
       }
       fclose ($fp);
   }
   // removendo quebras de linhas do resultado
   $html = ereg_replace("\n"," ",$html);

   // capturando o texto traduzido
   ereg("name=q rows=[0-9]* cols=[0-9]* wrap=PHYSICAL>(.*)</textarea>",$html,$saida);
   $traducao = $saida[1];
   $traducao = ereg_replace(">.*$","",$traducao);
   return($traducao);
}
?>

Scripts recomendados

Babelfish Translator

Cria gráficos para monitoramento de consumo de CPU e Memória a partir de arquivos [Atualização].

PortScan em PHP com post usando fsockopen

Script PHP para autenticacao web dos usuarios do proprio linux

Verifica porta aberta por faixa de ip's


  

Comentários
[1] Comentário enviado por [IG]_D-TOX em 26/09/2003 - 10:50h

Gostei da ideia, muita fixe

[2] Comentário enviado por kelvinz em 09/05/2004 - 04:19h

Instalei esse sisteminha, ele busca as palavra certinhas so q pelo menos no meu server demora muito para ele dar tradução isso é normal cara ou n~çao????

[3] Comentário enviado por claudiomsena em 02/06/2004 - 10:54h

gut ein


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts