Serienbrief für Einladungen mit LaTeX bzw. XeTeX

Bei uns im Hause wird gerade eingeladen, also wollte ich meine Kenntnisse in LaTeX nutzen, um dies "schön" zu machen.

Dabei sollte man dann einfach anstatt LaTeX XeTeX nehmen, welches durch fontenc sämtliche Schriften des laufenden Systems verwenden kann.

Und wenn man dann die Leute eingetragen hat in eine solche Tabelle:

Hans;Wurst;0
Klaus;Müller;1
Maria;Müller;0
Peter;Huber;2
Katrin;Ingens;0 

Dann kreiert folgender Code drei Querseiten a la:

--------------------------------------------------------------

|                            |                               |

|     Namen                  |        Du/Ihr                 |

|                            |                               |

--------------------------------------------------------------

1. Hans Wurst
2. Klaus und Maria Müller
3. Peter Huber und Katrin Ingens

 \documentclass[12pt,a4]{scrartcl}   
 \pagestyle{empty}  

 \usepackage[landscape]{geometry}  
 \geometry{a4paper,left=40mm,right=30mm, top=1cm, bottom=2cm}
  
 \usepackage{fontspec}  
 \usepackage{xunicode}  
 \usepackage{xltxtra}  
 %\setmainfont[Mapping=tex-text]{TeX Gyre Chorus}  
 \setmainfont[Mapping=tex-text]{URW Chancery L}  


  \def\chopline#1;#2;#3 \\{  
  \def\vorname{#1}  
  \def\name{#2}  
  \def\couple{#3}  
  }  


  \usepackage{ifthen}  
  \newif\ifmore \moretrue  



  \begin{document} 

 
  \newread\quelle  
  \openin\quelle=Daten.dat 


 
  \loop  

  \read\quelle to \zeile  

  \ifeof\quelle  
   \global\morefalse  
  \else  
   \expandafter\chopline\zeile\\ 


 
   \ifthenelse{\equal{\couple}{0}}  
                  {  
                  \begin{minipage}{0.6\textwidth}  
                  \fontsize{25pt}{18pt}\selectfont  
                  \vorname~\name  
                  \end{minipage}  
                  \begin{minipage}{0.6\textwidth}  
                  \vspace*{3cm}  
                  Du bist eingeladen!  
                  \end{minipage}  
                  \pagebreak  
                  }                   
                  {          \begin{minipage}{0.6\textwidth}  
                            \fontsize{25pt}{18pt}\selectfont  
         \vorname \ifthenelse{\equal{\couple}{2}}{~\name}{}~und~
                            \read\quelle to \zeile  
                            \expandafter\chopline\zeile\\  
                            \hspace*{-0.7cm}\vorname ~\name  
                            \end{minipage}  
                            \begin{minipage}{0.6\textwidth}  
                            \vspace*{3cm}  
                            Ihr seid eingeladen!  
                            \end{minipage}  
                            \pagebreak                   
                  }  
   \pagebreak  
  \fi  
 \ifmore\repeat 
 
 \closein\quelle 

 
  \end{document}  

Zwar ist der Code durch die ifthenelse-Abfrage redundant, aber nunja......

PS: in den nächsten Tage kommt ein Update dieses Codes in english.