Abundando sobre lo dicho:

On Thu, 20 May 2004 17:35:40 +0200, JL Diaz <[log in para visualizar]> wrote:
>
> la cosa es complicadilla, porque necesitaríamos definir el retorno de
> carro como \\, *salvo* cuando haya dos retornos seguidos, en cuyo caso
> debe ser equivalente a \par.
> 
> De momento no veo muy claro como lograrlo (el tema de los catcodes
> siempre se me ha atragantado). 

Bueno, pues me lo he tomado como un ejercicio para ahondar mi
conocimiento de las interioridades de TeX, y despues de algunas
vueltas lo he logrado. Aqui tienes el entorno poema que habias pedido:

\makeatletter
\newenvironment{poema}{
\def\mipar{\futurelet\next\mi@par}
\def\mi@par{\ifx\next\mipar\let\nxt\mi@@par \else\let\nxt\\ \fi\nxt}%
\def\mi@@par{\oldpar\@gobblecr}
\let\par=\mipar\obeylines%
\begin{verse}\let\oldpar=\par\@gobblecr}
{\end{verse}}
\makeatother

Que se usa como tú querías, es decir, retorno de carro separa versos,
linea en blanco separa estrofas. [Cuidado, la solución aún no es del
todo perfecta y falla si dejas más de una línea en blanco entre las
estrofas]

Soy consciente de que el código que he escrito es críptico (como casi
todo el código TeX), pero estoy dispuesto a explicarlo detalladamente
si a alguien le interesa :-)

Y ya puestos, si algún gurú del TeX está leyendo esto, me gustaría
escuchar alguna crítica sobre el código anterior, para seguir
aprendiendo. (Y cómo se solucionaría lo de las varias líneas blancas
entre estrofas).

--
 JL Diaz

----------------------------------------------------
Archivos de ES-TEX: http://listserv.rediris.es/archives/es-tex.html
------------------------------------------------------