Griechisch in extra Font setzen

[msellhoff]

Hallo zusammen,

ich versuche, griechische Textpassagen in einer vom Rest des Textes abweichenden Schrift zu setzen (der GFS Didot). Bisher haben Google & die Suche im Forum nicht geholfen.

Hier ein Minimalbsp., das ich unter Zuhilfenahme dieser großartig klingenden Tips von Ulrike Fischer http://www.ureader.de/msg/136219841.aspx gebastelt habe:

\documentclass[12pt]{book}
\usepackage[utf8x]{inputenc}
\usepackage[LGR,T1]{fontenc}
\usepackage[polutonikogreek,ngerman]{babel}
\usepackage{amsmath,amssymb,color}
\usepackage{palatino}

\newcommand{\gk}[1]{\selectlanguage{polutonikogreek}\fontfamily{gsfdidot}#1\selectlanguage{ngerman}} 

\makeatletter
\addto\extraspolutonikogreek{%
 \let\my@currentfamily\f@family 
 \fontfamily{gfsdidot}\selectfont\color{red}}
\addto\noextraspolutonikogreek{\fontfamily{\my@currentfamily}\selectfont\color{black}}

\begin{document}

Der Eröffnungssatz seines verschollenen Werks, das den Titel
\gk{$\text{\textgreek{>A}}\lambda \text{\textgreek{}}\vartheta
\varepsilon \iota \alpha $} (Wahrheit) oder \gk{$K\alpha \tau
\alpha \beta \text{\textgreek{}}\lambda \lambda o\nu \tau \varepsilon
\varsigma $} (Niederwerfende [Reden]) getragen haben soll, lautet nach
der Überlieferung: „Aller Dinge (\gk{$\chi \rho \eta \mu
\text{\textgreek{'a}}\tau \omega \nu $}) Maß ist der Mensch, der
seienden, daß (\gk{$\text{\textgreek{

Der Text wird "normally" kompiliert, es tauchen jedoch folgende Warnungen auf (Auszug):

LaTeX Font Info:    Try loading font information for LGR+gfsdidot on input line
 11.
LaTeX Font Info:    No file LGRgfsdidot.fd. on input line 11.


LaTeX Font Warning: Font shape `LGR/gfsdidot/m/n' undefined
(Font)              using `LGR/cmr/m/n' instead on input line 11.

LaTeX Font Info:    Try loading font information for T1+gfsdidot on input line 
15.
LaTeX Font Info:    No file T1gfsdidot.fd. on input line 15.

LaTeX Font Warning: Font shape `T1/gfsdidot/m/n' undefined
(Font)              using `T1/cmr/m/n' instead on input line 15.

[...]
Package utf8x.def Warning: Character(s)159 etc.gotredefinedsomewhere.
(utf8x.def)                Restoringtoitsutf8x-meaning on input line 16.

(/usr/local/texlive/2010/texmf-dist/tex/latex/ucs/ucsencs.def
File: ucsencs.def 2003/11/29 Fixes to fontencodings LGR, T3

[...]

LaTeX Font Info:    Try loading font information for LGR+ppl on input line 20.
LaTeX Font Info:    No file LGRppl.fd. on input line 20.


LaTeX Font Warning: Font shape `LGR/ppl/m/n' undefined
(Font)              using `LGR/cmr/m/n' instead on input line 20.

LaTeX Font Info:    Try loading font information for U+msa on input line 20.
(/usr/local/texlive/2010/texmf-dist/tex/latex/amsfonts/umsa.fd
File: umsa.fd 2009/06/22 v3.00 AMS symbols A
)
LaTeX Font Info:    Try loading font information for U+msb on input line 20.

(/usr/local/texlive/2010/texmf-dist/tex/latex/amsfonts/umsb.fd
File: umsb.fd 2009/06/22 v3.00 AMS symbols B
)
LaTeX Font Info:    Try loading font information for LGR+gsfdidot on input line
 20.
LaTeX Font Info:    No file LGRgsfdidot.fd. on input line 20.


LaTeX Font Warning: Font shape `LGR/gsfdidot/m/n' undefined
(Font)              using `LGR/cmr/m/n' instead on input line 20.

LaTeX Font Info:    Try loading font information for T1+gsfdidot on input line 
20.
LaTeX Font Info:    No file T1gsfdidot.fd. on input line 20.

LaTeX Font Warning: Font shape `T1/gsfdidot/m/n' undefined
(Font)              using `T1/cmr/m/n' instead on input line 20.

(/usr/local/texlive/2010/texmf-dist/tex/latex/ucs/data/uni-32.def
File: uni-32.def 2004/10/17 UCS: Unicode data U+2000..U+20FF
) [1{/home/michael/.texlive2010/texmf-var/fonts/map/pdftex/updmap/pdftex.map}

Es tut mir ja leid, aber ich verstehe es nicht :-(

Ich habe die Installation der Didot überprüft, ist m.E. ok. Handelt es sich nun um ein Codierungs-Problem, oder was mache ich falsch??

Ich danke im voraus für alle Bemühungen & Hinweise!

Gruß
Michael

[u_fischer]

LaTeX Font Info:    No file LGRgfsdidot.fd. on input line 11.

Ich kann auf CTAN auch keine derartige Datei finden. Es gibt aber lgrudidot.fd. Also versuche \fontfamily{udidot} ....

[msellhoff]

Vielen Dank, ein Lichtstreif am Horizont!

Es werden, so sieht es zumindest im pdf aus, genau diejenigen Zeichen in der Didot gesetzt, die wegen ihrer Akzente mit \textgreek eingegeben werden, also

"\textgreek{>A}, \textgreek{'a}, \textgreek{
[irgendwie geht hier bei der Eingabe des "<" und des "w" immer was verloren ...], alle anderen werden weiterhin ersetzt:

LaTeX Font Info:    Try loading font information for LGR+ppl on input line 20.
LaTeX Font Info:    No file LGRppl.fd. on input line 20.


LaTeX Font Warning: Font shape `LGR/ppl/m/n' undefined
(Font)              using `LGR/cmr/m/n' instead on input line 20.

LaTeX Font Info:    Try loading font information for LGR+udidot on input line 2
0.
(/usr/local/texlive/2010/texmf/tex/latex/GFS/Didot/lgrudidot.fd)
LaTeX Font Info:    Font shape `LGR/udidot/m/n' will be
(Font)              scaled to size 12.47992pt on input line 20.
LaTeX Font Info:    Try loading font information for U+msa on input line 20.

(/usr/local/texlive/2010/texmf-dist/tex/latex/amsfonts/umsa.fd
File: umsa.fd 2009/06/22 v3.00 AMS symbols A
)
LaTeX Font Info:    Try loading font information for U+msb on input line 20.

(/usr/local/texlive/2010/texmf-dist/tex/latex/amsfonts/umsb.fd
File: umsb.fd 2009/06/22 v3.00 AMS symbols B
)
LaTeX Font Info:    Font shape `LGR/udidot/m/n' will be
(Font)              scaled to size 8.31995pt on input line 20.
LaTeX Font Info:    Font shape `LGR/udidot/m/n' will be
(Font)              scaled to size 6.23996pt on input line 20.
LaTeX Font Info:    Try loading font information for T1+udidot on input line 20

Nur: Warum wird bei der einen "griechischen Eingabe" die udidot angesprochen, bei allen anderen nicht??

Fragt, weiterhin verwirrt & lernbegierig, mit dankbaren Grüßen
Michael

[u_fischer]

Nur: Warum wird bei der einen "griechischen Eingabe" die udidot angesprochen, bei allen anderen nicht??

Ich weiß nicht so recht, was du meinst. Allerdings fehlt in deinem \gk-Befehl ein \selectfont hinter \fontfamily{udidot}.

[msellhoff]

Ungefähr so? (Mit dieser Ergänzung hat sich übrigens am Ergebnis nichts geändert.)

\newcommand{\gk}[1]{\selectlanguage{polutonikogreek}\fontfamily{udidot}#1\selectfont
\selectlanguage{ngerman}}

Was ich meine: In dem Wort

\gk{$\text{\textgreek{>A}}\lambda \text{\textgreek{}}\vartheta
\varepsilon \iota \alpha $}

wird (erkennbar andere Type) nur der erste Buchstabe in der Didot gesetzt, die folgenden Zeichen weiterhin ersetzt.

Zufall oder nicht, in jedem der griechischen Worte wird genau dasjenige Zeichen in der Didot dargestellt (und nicht durch cm ersetzt), das durch

\textgreek{...}

eingegeben wird.

Hoffentlich habe ich mich jetzt verständlich ausgedrückt?

Gruß
Michael

[u_fischer]

\fontfamily{udidot}#1\selectfont

Du musst natürlich \selectfont vor dem Argument #1 ausführen.

[rstuby]

Der Buchstabe heißt Theta. Aber wie man ihn korrekt aufruft, da kann ich dir leider auch nicht helfen...

[u_fischer]

Vartheta ist meines Wissens nicht im LGR-encoding. Allerdings ist es in OML, du kannst daher einen entsprechenden Befehl \textvartheta definieren. Du musst dann nur noch inputenc erklären, dass dein Input \textvartheta aufrufen soll. Wie es mit ucs/utf8x geht weiß ich nicht (ich würde die Option sowieso nicht empfehlen). Mit utf8 ginge es so:

\documentclass[12pt]{book}
\usepackage[utf8]{inputenc}
\usepackage[LGR,T1]{fontenc}
\usepackage[polutonikogreek,ngerman]{babel}
\DeclareTextSymbol{\textvartheta}{OML}{35}
\DeclareTextSymbolDefault{\textvartheta}{OML}
\DeclareUnicodeCharacter{03D1}{\textvartheta}

\DeclareRobustCommand{\gk}[1]{\leavevmode{\fontfamily{udidot}\greektext #1}}
\begin{document}
\gk{Ἀλήϑεια}

\end{document}

Eventuell musst du dir noch die Datei lgrenc.dfu besorgen (google), kopiere sie in einen lokalen Baum in \tex\generic\babel\lgrenc.dfu und erneuere die FNDB.

[msellhoff]

Hm. Nach Deinen Schritten bekomme ich im Minimalbsp. nun Fehler für alle anderen Zeichen; da fehlt bei mir offensichtlich etwas.

Ich habe aber das OK bekommen, es beim bisher Erreichten zu belassen.

Hab ganz herzlichen Dank, ich habe sehr viel gelernt und wäre ohne Deine Hilfe kaum so weit gekommen!

Beste Grüße
Michael

[u_fischer]

Hm. Nach Deinen Schritten bekomme ich im Minimalbsp. nun Fehler für alle anderen Zeichen; da fehlt bei mir offensichtlich etwas.

Deswegen schrieb ich ja:

"Eventuell musst du dir noch die Datei lgrenc.dfu besorgen ..."

[msellhoff]

Ja, auch diesen Schritt dachte ich erledigt zu haben. Es gibt nur ein Vereichnis, wie Du es bezeichnet hast, dort liegt nun diese Datei ...

Aber wie gesagt, das bisherige Ergebnis mit dem "eingeflickten" \vartheta stellt alle Beteiligten zufrieden.

Nochmals großen Dank für Dein Engagement!