🚀 go-pugleaf

Ich will einen Text in etwa so setzen, wie es z.B. frueher in der Bibel ueblich
war, also eine grosse Initiale (I) ueber mehrere Zeilen umgeben von Text. Etwa
so:

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

(I)   Text asfkd asjkdflkj asdflkj asfdlkj safd
      lasjdflskjd  lskjfd  lasjkfd  lskafjd dkl
asfjd lsfjkd jsfkadlk jklsafjd sak sdfj skslkdj
alsdjas djlsdjf sjdlfjslkjfs djlskjdf slkd ...

////////////////////////////////////////////////

Wie fange ich das am besten an?

Versuche, die Initiale in Box mbinit und den Rest in Box mbrest zu
stecken, wie folgt:

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
\documentstyle{article}
\setlength{\parindent}{0pt}
\begin{document}

\newbox\mbinit      % nimmt Initiale auf
\newbox\mbrest      % Rest des Textes

\newdimen\mbrestdim
\newdimen\mbinitdim

\setbox\mbinit=\hbox{
        \Huge (I)
    }
\mbinitdim=\wd\mbinit

\mbrestdim=\textwidth
\addtolength\mbrestdim{-\mbinitdim}

\setbox\mbrest=\vbox{
        \hsize=\mbrestdim
        alskdjf slfkdj asfjdkl aslfjk
        slfdj  slafjkd sajfdllkjsa fdjlkfjd aslkdjf sakdfjlsjkdf alsdjfa
        sflkasjdf asldfkjas dflkasjdflasfkdja sdflkjasd falsfjkd saldjkas
        ...
        }

\vbox{
    \hbox{\box\mbinit \vsplit\mbrest to \ht\mbinit}
                                       %^^^^^^^^^^
    \vbox{\hsize=\textwidth \unvbox\mbrest}
    }
\end{document}
//////////////////////////////////////////

fuehrten zu etwa folgendem Ergebnis:

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

(I)   Text asfkd asjkdflkj asdflkj asfdlkj safd
      lasjdflskjd  lskjfd  lasjkfd  lskafjd dkl
                                    <<<<<<<<<<<<<<<<<
asfjd lsfjkd jsfkadlk jklsafjd sak sdfj s
alsdjas djlsdjf sjdlfjslkjfs djlskjdf ...

////////////////////////////////////////////////

*   Wie schaffe ich es, dass der zweite Teil des Textes auf die volle
    Text-Weite kommt?

*   Wie kann ich "\ht\mbinit" durch eine Groesse "xdim" ersetzen, sodass
    der Abstand "<<<<<<" gleich dem normalen Zeilenabstand ist?

Zur Not koennte man sich vielleicht mit

    \parshape = ...

behelfen. Das Problem ist hier jedoch die Anpassung an "xdim", das mit
verschiedenen Boxenhoehen "mbinit" und verschiedenen Schrifthoehen in
"mbrest" variiert und verschieden viele in "\parshape" zu
beruecksichtigende Zeilen erfordert.

Hat jemand eine Idee? Oder vielleicht schon einen fertigen Style? (bitte
nicht FTP!!!)

Vielen Dank,

Franz