<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
</head>
<body>
Liebe TUSTEP-Liste,<br>
<br>
auf der Suche nach einer guten Garamond-Schrift für TUSTEP bin ich
auf die interessante Realisation <b>EB Garamond</b> gestoßen.
Dieses sog. Egenolff-Berner-Specimen von 1592 wurde von Georg
Duffner nachgezeichnet und von Google weiterentwickelt. Die
kostenlosen Fonts verfügen über einen umfangreichen Zeichensatz mit
Kerning-Angaben und sind hier erhältlich:<br>
<br>
<a class="moz-txt-link-freetext" href="https://fonts.google.com/specimen/EB+Garamond">https://fonts.google.com/specimen/EB+Garamond</a><br>
<a class="moz-txt-link-freetext" href="https://www.1001fonts.com/eb-garamond-font.html">https://www.1001fonts.com/eb-garamond-font.html</a> (hier mit einer
gesonderten Kapitälchenschrift)<br>
<br>
Es ist mir gelungen, EB Garamond zu integrieren. Weitere Angaben zum
Vorgehen finden sich im TUSTEP-Wiki:<br>
<a class="moz-txt-link-freetext" href="https://wiki.itug.de/doku.php?id=tustep:loesungen:satz_mit_modul_satz:schriften">https://wiki.itug.de/doku.php?id=tustep:loesungen:satz_mit_modul_satz:schriften</a><br>
<br>
<b>Einzig die Kapitälchen lassen sich nicht einschalten</b>, und aus
diesem Grund wende ich mich an die Liste. Zunächst gilt es bei
benutzereigenen Fonts, die Datei <b>gara.def</b> zu erstellen, die
für <font face="Courier New, Courier, monospace">#SATZ</font> und <font
face="Courier New, Courier, monospace">#*PSAUS</font> aus den
*.afm-Dateien die notwendigen Schriftinformationen zusammenstellt.
Diese Definitionsdatei muss über den Parameter <font face="Courier
New, Courier, monospace">SCHRIFTEN</font> angegeben werden <br>
<br>
Inhalt der TUE-Datei <b>garadef.tu</b>:<br>
<br>
<font face="Courier New, Courier, monospace">
<blockquote type="cite"><font face="Courier New, Courier,
monospace">#- Erstellt Fontdefinitionen<br>
#- =========================<br>
#de,va=*<br>
fafm1=C:\psfonts\EBGaramond-Regular.afm<br>
fafm2=C:\psfonts\EBGaramond-Italic.afm<br>
fafm3=C:\psfonts\EBGaramond-SemiBold.afm<br>
fafm4=C:\psfonts\EBGaramond12-SC.afm<br>
fafm5=C:\psfonts\EBGaramond-SemiBoldItalic.afm<br>
*eof<br>
<br>
#da,<b>gara.def</b>,seq-ap<br>
#lo,gara.def<br>
#da,afm1'afm2'afm3'afm4'afm5,fdf-ap<br>
<br>
#*upload,<fafm1>,afm1,lo=+,me=-<br>
#*psfont,afm1,gara.def,num=49021<br>
#*upload,<fafm2>,afm2,lo=+,me=-<br>
#*psfont,afm2,gara.def,num=49022<br>
#*upload,<fafm3>,afm3,lo=+,me=-<br>
#*psfont,afm3,gara.def,num=49023<br>
#*upload,<fafm4>,afm4,lo=+,me=-<br>
#*psfont,afm4,gara.def,num=49024<br>
#*upload,<fafm5>,afm5,lo=+,me=-<br>
#*psfont,afm5,gara.def,num=49025<br>
<br>
#lo,,afm1'afm2'afm3'afm4'afm5</font></blockquote>
</font><br>
Der Grundschrift gab ich hier die Nummer 49021. Entsprechend werden
die Schrägschrift (49022), die Halbfettschrift (49023), die
Kapitälchen (49024) und die halbfette Schrägschrift (49025) mit
Nummern versehen. <br>
<br>
Der erste Teil der Satzroutine <b>gara.sa</b> sieht wie folgt aus.
Die Kapitälchenschrift 49024 muss im dritten Umschaltbereich liegen.
Die halbfette Schrägschrift habe ich auf den sechsten
Umschaltbereich gelegt:<br>
<br>
<blockquote type="cite"><font face="Courier New, Courier, monospace">#an,gara.tf'gara.def<br>
#da,ziel'prot'aus,fr=-<br>
<br>
#sa,gara.tf,ziel,t,+,*,aus,prot,<b>sch=gara.def</b><br>
abb 999999<br>
sch 49021 49022 49024 49023 31901 49025<br>
gro 10,5+2 9+1 8,5//10 10,5+2 12+2 10+3 8,5+2 8,5+2<br>
bre 299<br>
hoe 480 1 0 0 3<br>
sei 1 -2<br>
mon 1 0 299 56 56<br>
aus 0 0 0 1/10 1/3 1<br>
sil 10 1/6 1/12 5 2 2<br>
$ 0 3/2 -10.<br>
&&& 0 2! 0 0 20<br>
&& 2 1 0 2 8<br>
& 2 1 0 1 5<br>
mac <pp>$$$<br>
mac </pp><br>
mac <bz/>$$$=$$$<br>
mac <i>#/+<br>
mac </i>#/-<br>
mac <b>#f+<br>
mac </b>#f-<br>
mac <c>#k+<br>
mac </c>#k-<br>
mac <e21/>&!(#U49021\e.sc\480)<br>
mac <n21/>&!(#U49021\n.sc\605)<br>
mac <o21/>&!(#U49021\o.sc\616)<br>
mac <r21/>&!(#U49021\r.sc\540)<br>
mac <e24/>&!(#U49024\e\480)<br>
*eof<br>
<br>
#da,temp.ps'gara.ps'gara.pdf,fdf-ap<br>
#*psaus,aus,1-1,100,-9+166,lo=+,ko=-,da=temp.ps,op=a4,<b>sch=gara.def</b></font></blockquote>
<br>
Weiter müssen die neuen Schriften auch Ghostscript bekannt gemacht
werden. Leider genügt es in meinem Fall mit Ghostscript 9.10 nicht,
wenn ich (via GhostView) in den erweiterten Optionen meinen Fontpfad
C:\psfonts\ sowohl bei den <i>Options </i>wie auch beim <i>Include
Path</i> angebe. Deshalb kopiere ich die *.pfa-Schriften, wie von
Herrn Ott empfohlen, vor die von <font face="Courier New, Courier,
monospace">#*PSAUS </font>ausgegebene Postscriptdatei <font
face="Courier New, Courier, monospace">temp.ps</font>:<br>
<br>
Zweiter Teil der Satzroutine <b>gara.sa</b>: <br>
<br>
<blockquote type="cite"><font face="Courier New, Courier, monospace">#-
Fonts vor temp.ps kopieren:<br>
#- ---------------------------<br>
#makro<br>
$$ mode TUSCRIPT, {}<br>
fpfa1 = "C:\psfonts\EBGaramond-Regular.pfa"<br>
define fpfa1<br>
fpfa2 = "C:\psfonts\EBGaramond-Italic.pfa"<br>
define fpfa2<br>
fpfa3 = "C:\psfonts\EBGaramond-SemiBold.pfa"<br>
define fpfa3<br>
fpfa4 = "C:\psfonts\EBGaramond12-SC.pfa"<br>
define fpfa4<br>
fpfa5 = "C:\psfonts\EBGaramond-SemiBoldItalic.pfa"<br>
define fpfa5<br>
source = full_name (TUSTEP,"temp.ps")<br>
dest = full_name (TUSTEP,"gara.ps")<br>
execute "copy {fpfa1}+{fpfa2}+{fpfa3}+{fpfa4}+{fpfa5}+{source}
{dest}"<br>
*eof<br>
#lo,,temp.ps<br>
<br>
#*ps2pdf,gara.ps,gara.pdf,br=415,ho=615<br>
#*zepdf,gara.pdf </font></blockquote>
<br>
Mit dieser Satzroutine möchte ich jetzt den folgenden Beispieltext <b>gara.tf</b>
setzen:<br>
<br>
<blockquote type="cite"><font face="Courier New, Courier, monospace"><pp>Ich
<i>wusste wohl</i>, mein ++Brutus++{,<br>
dass, als ich das, was die geistreichsten und gelehrtesten<br>
Philosophen in <b>griechischer Sprache</b> behandelt
hatten, in<br>
lateinischer wiedergab, meine Arbeit mancherlei Tadel finden
würde.</pp><br>
<bz/><br>
<pp>Die <c>Tadler</c> und die
T<o21/><r21/><e21/><n21/><br>
trinken T<e24/><e24/>.</pp><br>
<bz/><br>
<pp>""Da steh' ich nun, ich armer Tor,</pp><br>
<pp>Und bin so klug als wie zuvor!""{</pp></font></blockquote>
<br>
Hier versuche ich, die Kapitälchen sowohl über den dritten
Umschaltbereich <font face="Courier New, Courier, monospace">++ ...
++{</font> wie auch über die Makros <font face="Courier New,
Courier, monospace"><c>#k+ ... </c>#k-</font>
anzusprechen, leider beide Male ohne Erfolg. Die Kapitälchen lassen
sich trotzdem hervorlocken, wenn man sie direkt als Zeichen mit <font
face="Courier New, Courier, monospace">&!(#Ummmmm\zeichenname\dickte)</font>
einsetzt, sowohl aus der Kapitälchenschrift 49024 wie auch aus der
Grundschrift 49021, die in diesem Fall die Kapitälchen mit der
Namensendung *.sc bereits enthält. Die halbfette Schrägschrift
hingegen lässt sich über den sechsten Umschalt bereich <font
face="Courier New, Courier, monospace">"" ... ""{</font> bestens
anwenden:<br>
<br>
<blockquote type="cite"><img
src="cid:part1.8Unp76OK.Pcs0gAEu@paracelsus-project.org" alt=""></blockquote>
<br>
Woran liegt das wohl? Hat <font face="Courier New, Courier,
monospace">EBGaramond12-SC.pfa </font>ein falsches Format? An der
Stelle der Kleinbuchstaben a, b, c, ... stehen die entsprechenden
Kapitälchen. Ich habe die verschiedensten Sachen ausprobiert, zum
Beispiel ein K in Klammern hinter die Fontnummern gesetzt usw. Auch
habe ich versucht, mit <font face="Courier New, Courier, monospace">#*PSFONTVOR</font>
und dem Parameter <font face="Courier New, Courier, monospace">ze=kap</font>
die Kapitälchen aus der Grundschrift <font face="Courier New,
Courier, monospace">EBGaramond-Regular.pfa</font>, welche ja echte
Kapitälchen enthält, zu extrahieren und eine entsprechende
*.afm-Datei zu erstellen:<br>
<br>
<blockquote type="cite"><font face="Courier New, Courier, monospace">#de,va=*<br>
fafm1=C:\psfonts\EBGaramond-Regular.afm<br>
*eof<br>
<br>
#da,afm1'afm2,fdf-ap<br>
#da,sc,fr=-<br>
<br>
#*upload,<fafm1>,afm1,lo=+,me=-<br>
#*psfontvor,afm1,sc,lo=+,ze=kap<br>
#um,sc,afm2,mo=-1,co=ascii,nl=win,lo=+<br>
#*download,afm2,C:\psfonts\EBGaramond-SmallCaps.afm,lo=+,me=-<br>
<br>
#lo,,afm1'afm2 </font></blockquote>
<br>
Aber dann wusste ich nicht, was ich mit der neuen *.afm-Datei
anfangen sollte. Zudem enthielt sie doppelte Namenseinträge, was von
<font face="Courier New, Courier, monospace">#*PSFONT</font> prompt
beanstandet wurde. Vielleicht müssten die doppelten Einträge von
Hand gelöscht werden.<br>
<br>
Ich möchte mich für den langen Eintrag entschuldigen, aber die Sache
ist komplex und ich wollte sie möglichst genau darstellen. Wenn
Interesse an meinen Fontdateien besteht, können sie hier
heruntergeladen werden (5,4 MB):<br>
<a class="moz-txt-link-freetext" href="https://www.paracelsus-project.org/docs/garafonts.zip">https://www.paracelsus-project.org/docs/garafonts.zip</a><br>
<br>
<br>
Mit vielem Dank voraus und besten Grüßen<br>
<br>
Urs Leo Gantenbein<br>
<br>
<br>
<div class="moz-signature">---<br>
<b>Urs Leo Gantenbein, Dr. med. M. Sc. ETH</b><br>
Project Leader of the Zurich Paracelsus Project, University of
Zurich<br>
Ackeretstrasse 16, CH-8400 Winterthur, SWITZERLAND<br>
<a href="https://www.paracelsus.uzh.ch/">www.paracelsus.uzh.ch</a><br>
<br>
Research Affiliate:<br>
Paleopathology and Mummy Studies Group<br>
Institute of Evolutionary Medicine, University of Zurich<br>
<a href="https://www.iem.uzh.ch/">www.iem.uzh.ch</a><br>
Institute of Swiss Reformation History, University of Zurich<br>
<a href="https://www.irg.uzh.ch/">www.irg.uzh.ch</a><br>
</div>
</body>
</html>