1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

# ----------------------------------------------------------------------------
# http://wwwtios.cs.utwente.nl/traduk/
# Dicionário de Esperanto em inglês, português e alemão.
# Possui busca por palavra nas duas direções. O padrão é português-esperanto.
# Uso: zzdicesperanto [idioma] palavra
# Ex.: zzdicesperanto disquete
#      zzdicesperanto EO-PT espero
#
# Autor: Fernando Aires <fernandoaires (a) gmail com>
# Desde: 2005-05-20
# Versão: 1
# Licença: GPL
# ----------------------------------------------------------------------------
zzdicesperanto ()
{
	zzzz -h dicesperanto "$1" && return

	[ "$1" ] || { zztool uso dicesperanto; return 1; }

	local L='PT-EO'
	local I='DE-EO EN-EO EO-DE EO-EN EO-PT PT-EO '

	[ "${I% $1 *}" != "$I" ] && L=$1 && shift

	$ZZWWWDUMP "http://wwwtios.cs.utwente.nl/traduk/$L/Traduku/?$1" |
		grep -v ^THE_ |
		grep -v ___ |
		grep -v /cxefpagxo\] |
		grep -v Traduku:\ $1
}