Manuel

2012/11/17 Hans Hagen <pragma@wxs.nl>

On 11/15/2012 9:20 AM, Procházka Lukáš Ing. - Pontex s. r. o. wrote:

On Thu, 15 Nov 2012 09:07:55 +0100, MANUEL GONZALEZ SUAREZ
<gonzalezsmanuel@uniovi.es> wrote:

Hello.

I wish someone would help me "translate" this code LaTeX to ConTeXt.
It is a
command to do word by word translations, so that a word appears under
another.

Here's the code:

\newcommand\dos[2]{\begin{tabular}{@{}c}{\textDidot{\footnotesize#1}}\\{\scriptsize\em#2}\end{tabular}}

A picture of the result would be nice - we probably won't know what to
reach.

Thanks

Something like this?

----
%
\newcommand\dos[2]{\begin{tabular}{@{}c}{\textDidot{\footnotesize#1}}\\{\scriptsize\em#2}\end{tabular}}

\define[2]\dos{%
\bTABLE
\setupTABLE[align=middle]
\setupTABLE[r][1][style=\small]
\setupTABLE[r][2][style={\small\small\em}]
\bTR\bTD#1\eTD\eTR
\bTR\bTD#2\eTD\eTR
\eTABLE
}

\starttext
Some text \dos{Abc}{Def}
\stoptext

more efficient:

\unexpanded\def\dos#1#2%
{\dontleavehmode
\begingroup
\setbox0\struttedbox{#1}%
\setbox2\struttedbox{#2}%
\ifdim\wd0>\wd2
\setbox2\hbox to \wd0{\hss\box2\hss}%
\else
\setbox0\hbox to \wd2{\hss\box0\hss}%
\fi
\box0
\kern-\wd2
\raise\lineheight\box2
\endgroup}

--

-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
| www.pragma-pod.nl
-----------------------------------------------------------------
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://tex.aanhet.net
archive : http://foundry.supelec.fr/projects/contextrev/
wiki : http://contextgarden.net
___________________________________________________________________________________