summaryrefslogtreecommitdiff
path: root/fonts/greek/grtimes
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/greek/grtimes
Initial commit
Diffstat (limited to 'fonts/greek/grtimes')
-rw-r--r--fonts/greek/grtimes/README62
-rw-r--r--fonts/greek/grtimes/font-names60
-rw-r--r--fonts/greek/grtimes/grtimes.dtx355
-rw-r--r--fonts/greek/grtimes/grtimes.ins63
-rw-r--r--fonts/greek/grtimes/inlig27
-rw-r--r--fonts/greek/grtimes/lgr-tex.enc113
6 files changed, 680 insertions, 0 deletions
diff --git a/fonts/greek/grtimes/README b/fonts/greek/grtimes/README
new file mode 100644
index 0000000000..21f8829a43
--- /dev/null
+++ b/fonts/greek/grtimes/README
@@ -0,0 +1,62 @@
+GREEK
+
+ Το πακέτο αυτό κάνει δυνατό την χρησιμοποίηση των γνωστών γραμματοσειρών
+Times New Roman Greek, Courier Greek και Arial Greek με την ελληνική
+επιλογή του πακέτου babel του LaTeX. Οι γραμματοσειρές αυτές είναι
+αναπόσπαστο κομμάτι κάθε υπολογιστή στον οποίο είναι εγκατεστημένο κάποιο
+από τα πρόσφατα λειτουργικά συστήματα της εταιρείας MicroSoft, π.χ.
+Windows95 ή WindowsNT. Οι γραμματοσειρές δεν συμπεριλαμβάνονται στο πακέτο
+καθώς η εταιρεία Monotype δεν επιτρέπει να διαθέτει κανείς παραγώμενες
+γραμματοσειρές. Η τεκμηρίωση του κώδικα του πακέτου, περιέχει περισσότερες
+πληροφορίες.
+
+ Για να δημιουργήσετε τις γραμματοσειρές που απαιτεί το πακέτο πρέπει
+να χρησιμοποιήσετε το πρόγραμμα ttf2mf του Oleg Motygin, που μετατρέπει
+γραμματοσειρές τύπου TrueType σε γραμματοσειρές τύπου METAFONT. Επιπλέον,
+θα πρέπει να έχετε διαλέξει την αντιστοιχία μετάφρασης (encoding)
+lgr-tex.enc η οποία συνοδεύει το πακέτο. Σε κάθε νέα γραμματοσειρά
+θα πρέπει ακριβώς πριν από την τελευταία εντολή να προσθέτετε την εντολή
+
+ input lgrligs.mf
+
+Προς διευκόλυνσή σας το πακέτο συνοδεύεται από το πρόγραμμα inlig το
+οποίο προσθέτει αυτόματα την γραμμήμη σε κάθε αρχείο. Το πρόγραμμα
+είναι γραμμένο σε Perl. Επιπλέον τυα ονόματα των απαραίτητων γραμματοσειρών
+βρίσκονται στο αρχείο font-names.
+
+Για περισσότερες πληροφορίες μπορείτε να μας γράψετε στις ηλεκτρονικές
+μας διευθύνσεις.
+
+_____________________________________________________
+||Απόστολος Συρόπουλος|| apostolo@obelix.ee.duth.gr||
+||Αντώνης Τσολομύτης || atsol@iris.math.aegean.gr ||
+-----------------------------------------------------
+ENGLISH
+
+ The package grtimes is an attempt to provide an alternative font
+for typeseting monotonic Greek text with the Greek option of the
+babel package. Consequently, the package might interest LaTeX users
+whose mother tongue is Greek. The package does not contain either
+the METAFONT files or the TFM files, as Monotype does not allow the
+redistribution of derived fonts.
+
+ The METAFONT files can be created with the ttf2mf utility by Oleg Motygin
+which transforms TrueType fonts into METAFONT sources. In order to
+make a correct translation one should use the lgr-tex.enc encoding file
+which is part of the package. In order to learn more about which fonts
+you should create, please consult the documentation of the package.
+Moreover, just before the last line of
+produced METAFONT file one must include the line
+
+input lgrligs.mf
+
+Since this is quite a time consuming operation, we provide the Perl
+script inlig. Moreover, the various font names can be found in
+file ``font-names''.
+
+For more information and/or to report a bug please send email to either
+_____________________________________________________
+||Apostolos Syropoulos ||apostolo@obelix.ee.duth.gr||
+||Antonis Tsolomytis ||atsol@iris.math.aegean.gr ||
+-----------------------------------------------------
+
diff --git a/fonts/greek/grtimes/font-names b/fonts/greek/grtimes/font-names
new file mode 100644
index 0000000000..f31389e5a0
--- /dev/null
+++ b/fonts/greek/grtimes/font-names
@@ -0,0 +1,60 @@
+grar10.mf
+grar17.mf
+grar5.mf
+grar8.mf
+grar9.mf
+grarb10.mf
+grarb17.mf
+grarb5.mf
+grarb8.mf
+grarb9.mf
+grarbo10.mf
+grarbo17.mf
+grarbo5.mf
+grarbo8.mf
+grarbo9.mf
+graro10.mf
+graro17.mf
+graro5.mf
+graro8.mf
+graro9.mf
+grcr10.mf
+grcr17.mf
+grcr5.mf
+grcr8.mf
+grcr9.mf
+grcrb10.mf
+grcrb17.mf
+grcrb5.mf
+grcrb8.mf
+grcrb9.mf
+grcrbo10.mf
+grcrbo17.mf
+grcrbo5.mf
+grcrbo8.mf
+grcrbo9.mf
+grcro10.mf
+grcro17.mf
+grcro5.mf
+grcro8.mf
+grcro9.mf
+grtm10.mf
+grtm17.mf
+grtm5.mf
+grtm8.mf
+grtm9.mf
+grtmb10.mf
+grtmb17.mf
+grtmb5.mf
+grtmb8.mf
+grtmb9.mf
+grtmbo10.mf
+grtmbo17.mf
+grtmbo5.mf
+grtmbo8.mf
+grtmbo9.mf
+grtmo10.mf
+grtmo17.mf
+grtmo5.mf
+grtmo8.mf
+grtmo9.mf
diff --git a/fonts/greek/grtimes/grtimes.dtx b/fonts/greek/grtimes/grtimes.dtx
new file mode 100644
index 0000000000..43b11d4c9f
--- /dev/null
+++ b/fonts/greek/grtimes/grtimes.dtx
@@ -0,0 +1,355 @@
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+%\iffalse
+%
+% (c) copyright 1999-2002 Apostolos Syropoulos
+% This program can be redistributed and/or modified under the terms
+% of the LaTeX Project Public License Distributed from CTAN
+% archives in directory macros/latex/base/lppl.txt; either
+% version 1 of the License, or any later version.
+%
+% However, the above copyright notice does not apply in the case of
+% ``Crete University Press'' as this publisher is not allowed to
+% use or alter this file in any way.
+%
+% Please report errors or suggestions for improvement to
+%
+% Apostolos Syropoulos
+% 366, 28th October Str.
+% GR-671 00 Xanthi, GREECE
+% apostolo@ocean1.ee.duth.gr or apostolo@obelix.ee.duth.gr
+%
+%\fi
+% \CheckSum{61}
+% \iffalse This is a Metacomment
+%
+%<grtimes >\ProvidesFile{grtimes.sty}
+%<LGRptm, >\ProvidesFile{lgrcmr.fd}
+%<LGRpcr, >\ProvidesFile{lgrpcr.fd}
+%<LGRphv, >\ProvidesFile{lgrphv.fd}
+%
+%<grtimes, > [1999/03/02 v1.0 Package `greek.sty']
+%<LGRptm, > [1999/03/02 v1.0 Greek Times New Roman]
+%<LGRpcr, > [1999/03/02 v1.0 Greek Courier]
+%<LGRphv, > [1999/03/02 v1.0 Greek Arial]
+%
+% \begin{macrocode}
+%<*driver>
+\documentclass{ltxdoc}
+\usepackage{mflogo}
+\GetFileInfo{grtimes.drv}
+\begin{document}
+ \DocInput{grtimes.dtx}
+\end{document}
+%</driver>
+% \end{macrocode}
+% \fi
+%
+%\title{The `grtimes' package}
+%\author{Apostolos Syropoulos\\366, 28th October Str.\\
+%GR-671 00 Xanthi, HELLAS\\
+%Email:\texttt{apostolo@obelix.ee.duth.gr}\\ or \\
+%\hphantom{Email:}\texttt{apostolo@ocean1.ee.duth.gr}}
+% \date{1999/03/20}
+%\maketitle
+%
+%\MakeShortVerb{\|}
+%\StopEventually{}
+%\section{Introduction}
+% This \LaTeX\ package is part of a complete package that makes it possible
+% to typeset Greek text using the Greek option of the \textsf{babel} and
+% the fonts that are used mostly in Greece for ordinary everyday documents,
+% i.e., Times New Roman Greek, Courier Greek and Arial Greek. Since, the
+% present package is supposed to be a companion of the package |times|,
+% it designed to work harmoniously with it. For this reason, the fond
+% definitions, i.e., all the |.fd| files, have been defined in way that
+% matches the definition of the corresponding files of the |times| package.
+% It is important to note that the fonts have been converted to \MF\ files
+% from TrueType sources, which in turn can be downloaded from the URL:
+% \begin{center}
+% |http://www.microsoft.com/typography/fontpack/default.htm|
+% \end{center}
+% However, redistribution of derivative fonts is not allowed and hence we
+% don't provide the \MF\ files and the |.tfm| files. In order to create
+% the \MF\ files one can use the program |ttf2mf| by Oleg Motygin, which
+% can be downloaded from any CTAN node. The names of all necessary fonts
+% are listed in the file |font-names|, which is part of this package.
+%
+% The complete package provides the following \LaTeX\ files:
+%\begin{center}
+% \begin{tabular}{ll}
+% driver & produce a documentation driver file \\
+% grtimes & the package itself \\
+% LGRptm & The Greek Times New Roman font shapes\\
+% LGRpcr & The Greek Courier font shape\\
+% LGRphv & The Greek Arial font shape\\
+% LGRligs & \MF\ ligature table for generated fonts
+% \end{tabular}
+% \end{center}
+%
+% \section{The package `grtimes'}
+% The package `grtimes' changes the roman, san-serif and typewriter
+% families so that the new fonts can be used. Moreover, since we want
+% to be able to use this package in conjuction with the Greek option
+% of the babel package, we must redefine certain macros.
+%
+% \begin{macrocode}
+%<*grtimes>
+\ProvidesFile{grtimes.sty}[1999/03/02 v1.0 grtimes package]
+\renewcommand{\sfdefault}{phv}
+\renewcommand{\rmdefault}{ptm}
+\renewcommand{\ttdefault}{pcr}
+% \end{macrocode}
+%
+% Unfortunately, the fonts we are using do not contain the necesary glyphs
+% in order to typeset Greek numerals, so we must redefine all commands
+% that either use them or produce them. First we redine the command
+% |\stigma| so that it is possible to typeset the Greek numeral for 6.
+% We simply employ the modern way of writing this numeral with the letters
+% sigma and tau. Moreover, we employ a special character that resembles
+% somehow the |\anwtonos| charecter in order to typeset Greek numerals
+% less than 99, just because the fonts do not contain plyphs for the
+% |\qoppa|, |\sampi| and |\katwtonos| symbols.
+% \begin{macrocode}
+\def\stigma{st}
+\DeclareTextCommand{\anwtonos}{LGR}{\char'047\relax}
+\let\katwtonos\relax
+\let\qoppa\relax
+\let\sampi\relax
+%</grtimes>
+% \end{macrocode}
+%
+% \section{The Roman Font}
+% You have opted not to create all possible font sizes, but rather to create
+% the basic ones, since the program |ttf2mf| produces rather large files
+% ($>100\,\mathrm{K}$). The names of the external \MF\ files have the
+% general form: |grtmX| for the normal face, |grtmoX| for the oblique face,
+% |grtmbX| for the bold face, and |grtmboX| for the oblique bold face, where
+% |X| stands for the face size. We first define the new font family and then
+% provide the definition for the normal and the oblique (slanted) face.
+% \begin{macrocode}
+%<*LGRptm>
+\DeclareFontFamily{LGR}{ptm}{}
+\DeclareFontShape{LGR}{ptm}{m}{n}
+ { <5> grtm5
+ <6><7> grtm8
+ <8> <9> <10> gen * grtm
+ <10.95><12><14.4> grtm10
+ <17.28><20.74><24.88> grtm17}{}
+\DeclareFontShape{LGR}{ptm}{m}{sl}
+ { <5> grtmo5
+ <6><7> grtmo8
+ <8> <9> <10> gen * grtmo
+ <10.95><12><14.4> grtmo10
+ <17.28><20.74><24.88> grtmo17}{}
+% \end{macrocode}
+% The font does not include an italic shape as well a caps and small caps
+% shape, so we have to provide some silent substitutions.
+% \begin{macrocode}
+\DeclareFontShape{LGR}{ptm}{m}{it}{ <-> ssub * ptm/m/sl}{}
+\DeclareFontShape{LGR}{ptm}{m}{sc}{ <-> ssub * ptm/m/n}{}
+% \end{macrocode}
+% Now come the definitions for the bold weight versions of the font.
+% \begin{macrocode}
+\DeclareFontShape{LGR}{ptm}{b}{n}
+ { <5> grtmb5
+ <6><7> grtmb8
+ <8> <9> <10> gen * grtmb
+ <10.95><12><14.4> grtmb10
+ <17.28><20.74><24.88> grtmb17}{}
+\DeclareFontShape{LGR}{ptm}{b}{sl}
+ { <5> grtmbo5
+ <6><7> grtmbo8
+ <8> <9> <10> gen * grtmbo
+ <10.95><12><14.4> grtmbo10
+ <17.28><20.74><24.88> grtmbo17}{}
+% \end{macrocode}
+% As previously no italic and caps and small caps shapes exists and so
+% we have to provide again some silent substitutions.
+% \begin{macrocode}
+\DeclareFontShape{LGR}{ptm}{b}{it}{ <-> ssub * ptm/b/sl}{}
+\DeclareFontShape{LGR}{ptm}{b}{sc}{ <-> ssub * ptm/m/sc}{}
+\DeclareFontShape{LGR}{ptm}{bx}{n}{ <-> ssub * ptm/b/n}{}
+\DeclareFontShape{LGR}{ptm}{bx}{it}{ <-> ssub * ptm/b/sl}{}
+\DeclareFontShape{LGR}{ptm}{bx}{sl}{ <-> ssub * ptm/b/sl}{}
+\DeclareFontShape{LGR}{ptm}{bx}{sc}{ <-> ssub * ptm/m/sc}{}
+%</LGRptm>
+% \end{macrocode}
+% \section{The Typewriter font}
+% The typewriter font has excactly the same problems as the roman font.
+% The names of the external \MF\ files have the
+% general form: |grcrX| for the normal face, |grcroX| for the oblique face,
+% |grcrbX| for the bold face, and |grcrboX| for the oblique bold face,
+% where |X| stands for the face size. We first define the normal and slanted
+% faces.
+% \begin{macrocode}
+%<*LGRpcr>
+\DeclareFontFamily{LGR}{pcr}{}
+\DeclareFontShape{LGR}{pcr}{m}{n}
+ { <5> grcr5
+ <6><7> grcr8
+ <8> <9> <10> gen * grcr
+ <10.95><12><14.4> grcr10
+ <17.28><20.74><24.88> grcr17}{}
+\DeclareFontShape{LGR}{pcr}{m}{sl}
+ { <5> grcro5
+ <6><7> grcro8
+ <8> <9> <10> gen * grcro
+ <10.95><12><14.4> grcro10
+ <17.28><20.74><24.88> grcro17}{}
+% \end{macrocode}
+% Next we define some silent substitutions for the non existent italic
+% caps and small caps shapes.
+% \begin{macrocode}
+\DeclareFontShape{LGR}{pcr}{m}{it}{ <-> ssub * pcr/m/sl}{}
+\DeclareFontShape{LGR}{pcr}{m}{sc}{ <-> ssub * pcr/m/n}{}
+% \end{macrocode}
+% Now, we define the normal bold and the slanted bold faces.
+% \begin{macrocode}
+\DeclareFontShape{LGR}{pcr}{b}{n}
+ { <5> grcrb5
+ <6><7> grcrb8
+ <8> <9> <10> gen * grcrb
+ <10.95><12><14.4> grcrb10
+ <17.28><20.74><24.88> grcrb17}{}
+\DeclareFontShape{LGR}{pcr}{b}{sl}
+ { <5> grcrbo5
+ <6><7> grcrbo8
+ <8> <9> <10> gen * grcrbo
+ <10.95><12><14.4> grcrbo10
+ <17.28><20.74><24.88> grcrbo17}{}
+% \end{macrocode}
+% And finally we define some more silent substitutions
+% \begin{macrocode}
+\DeclareFontShape{LGR}{pcr}{b}{it}{ <-> ssub * pcr/b/sl}{}
+\DeclareFontShape{LGR}{pcr}{b}{sc}{ <-> ssub * pcr/m/sc}{}
+\DeclareFontShape{LGR}{pcr}{bx}{n}{ <-> ssub * pcr/b/n}{}
+\DeclareFontShape{LGR}{pcr}{bx}{it}{ <-> ssub * pcr/b/sl}{}
+\DeclareFontShape{LGR}{pcr}{bx}{sl}{ <-> ssub * pcr/b/sl}{}
+\DeclareFontShape{LGR}{pcr}{bx}{sc}{ <-> ssub * pcr/m/sc}{}
+%</LGRpcr>
+% \end{macrocode}
+% \section{The San-serif font}
+% The san-serif font has excactly the same problems as the roman and the
+% typewrite font. So, we will provide any further documentation on the
+% code. The names of the external \MF\ files have the
+% general form: |grarX| for the normal face, |graroX| for the oblique face,
+% |grarbX| for the bold face, and |grarboX| for the oblique bold face, where
+% |X| stands for the face size.
+% \begin{macrocode}
+%<*LGRphv>
+\DeclareFontFamily{LGR}{phv}{}
+\DeclareFontShape{LGR}{phv}{m}{n}
+ { <5> grar5
+ <6><7> grar8
+ <8> <9> <10> gen * grar
+ <10.95><12><14.4> grar10
+ <17.28><20.74><24.88> grar17}{}
+\DeclareFontShape{LGR}{phv}{m}{sl}
+ { <5> graro5
+ <6><7> graro8
+ <8> <9> <10> gen * graro
+ <10.95><12><14.4> graro10
+ <17.28><20.74><24.88> graro17}{}
+\DeclareFontShape{LGR}{phv}{m}{it}{ <-> ssub * phv/m/sl}{}
+\DeclareFontShape{LGR}{phv}{m}{sc}{ <-> ssub * phv/m/n}{}
+\DeclareFontShape{LGR}{phv}{b}{n}
+ { <5> grarb5
+ <6><7> grarb8
+ <8> <9> <10> gen * grarb
+ <10.95><12><14.4> grarb10
+ <17.28><20.74><24.88> grarb17}{}
+\DeclareFontShape{LGR}{phv}{b}{sl}
+ { <5> grarbo5
+ <6><7> grarbo8
+ <8> <9> <10> gen * grarbo
+ <10.95><12><14.4> grarbo10
+ <17.28><20.74><24.88> grarbo17}{}
+\DeclareFontShape{LGR}{phv}{b}{it}{ <-> ssub * phv/b/sl}{}
+\DeclareFontShape{LGR}{phv}{b}{sc}{ <-> ssub * phv/m/sc}{}
+\DeclareFontShape{LGR}{phv}{bx}{n}{ <-> ssub * phv/b/n}{}
+\DeclareFontShape{LGR}{phv}{bx}{it}{ <-> ssub * phv/b/sl}{}
+\DeclareFontShape{LGR}{phv}{bx}{sl}{ <-> ssub * phv/b/sl}{}
+\DeclareFontShape{LGR}{phv}{bx}{sc}{ <-> ssub * phv/m/sc}{}
+%</LGRphv>
+% \end{macrocode}
+% \section{\MF\ Ligature Table}
+%
+% The ligature table is essential in order to emulate the behavior
+% of the LGR encoding. We start by defining that the space character
+% is actually a boundary character. This is necessary for the sigma
+% logarures.
+% \begin{macrocode}
+%<*LGRligs>
+boundarychar:=oct"040";
+% \end{macrocode}
+% Now we define a few simple ligatures
+% like the en-dash, the em-dash, open Greek quotes and close Greek quotes.
+% \begin{macrocode}
+diaer=oct"042";
+ligtable "-": "-" =: oct"000"; % en-dash
+ligtable oct"000": "-" =: oct"177"; % em-dash
+ligtable "(": "(" =: oct"173"; % open quotes
+ligtable ")": ")" =: oct"175"; % close quotes
+% \end{macrocode}
+% In (monotonic) Greek either the letter upsilon or the letter iota
+% can take a diaeresis and possible an acute. If we prepend to either
+% letter the symbol |"| (double quote), it considered to be a diaeresis;
+% moreover if it is followed by the symbol |'| (single quote), then we
+% have both a diaeresis and an acute.
+% \begin{macrocode}
+ligtable diaer: % diaeresis
+ "'" =: oct"043",
+ "i" =: oct"360", "u" =: oct"364",
+ "I" =: oct"333", "U" =: oct"337";
+
+ligtable oct"043": % diaeresis and acute
+ "i" =: oct"362", "u" =: oct"366";
+% \end{macrocode}
+% Next, we define all the possible ligatures that produce an accented
+% vowel, i.e, acute plus vowel. However, we generate the \MF\ file from the
+% TrueType sources we employ an encoding which maps the Greek letters to the
+% possitions assumed by the LGR encoding. But, since all characters
+% are accented, while the LGR encoding assumes that capital letters get
+% their accents and breatings with ligatures, we had to put the capital
+% accented letters in free slots. Since the fonts are monotonic, we opted
+% to put each capital letter in the slot occupied by the lowercase letter
+% accented with greve.
+% \begin{macrocode}
+ligtable "'": % acute
+ diaer =: oct"043", "'" =: oct"035",
+ "a" =: oct"210", "h" =: oct"240", "w" =: oct"270",
+ "e" =: oct"350", "o" =: oct"354", "i" =: oct"320",
+ "u" =: oct"324",
+ "A" =: oct"200", "H" =: oct"230", "W" =: oct"260",
+ "I" =: oct"310", "E" =: oct"340", "U" =: oct"314",
+ "O" =: oct"344";
+% \end{macrocode}
+% Finally, we must treat the proper way the final sigma, i.e., left sigma is
+% replaced with final sigma, while right character is preserved. The code
+% is copied essentialy verbatim from the |cbligs.mf| by Claudio Beccari.
+% \begin{macrocode}
+ligtable "s":"." =:| "c", "," =:| "c", ";" =:| "c",
+ ":" =:| "c", "?" =:| "c", "!" =:| "c",
+ ")" =:| "c", "/" =:| "c", "]" =:| "c",
+ oct"052" =:| "c", oct"035" =:| "c", oct"040" =:| "c";
+endinput;
+%</LGRligs>
+% \end{macrocode}
+% \section*{Acknowledgement}
+% I must thank Antonis Tsolomitis for his help during the preparation of
+% this package.
+% \Finale
diff --git a/fonts/greek/grtimes/grtimes.ins b/fonts/greek/grtimes/grtimes.ins
new file mode 100644
index 0000000000..9b37590283
--- /dev/null
+++ b/fonts/greek/grtimes/grtimes.ins
@@ -0,0 +1,63 @@
+%% Copyright 1999 Apostolos Syropoulos
+%%
+%% This file is part of the `grtimes' package.
+%% You are not allowed to modify its contents.
+%%
+\def\filedate{2002/01/23}
+\def\batchfile{grtimes.ins}
+\input docstrip.tex
+
+{\ifx\generate\undefined
+\Msg{**********************************************}
+\Msg{*}
+\Msg{* This installation requires docstrip}
+\Msg{* version 2.3c or later.}
+\Msg{*}
+\Msg{* An older version of docstrip has been input}
+\Msg{*}
+\Msg{**********************************************}
+\errhelp{Move or rename old docstrip.tex.}
+\errmessage{Old docstrip in input path}
+\batchmode
+\csname @@end\endcsname
+\fi}
+
+\preamble
+
+ (c) copyright 1999-2002 Apostolos Syropoulos
+ This program can be redistributed and/or modified under the terms
+ of the LaTeX Project Public License Distributed from CTAN
+ archives in directory macros/latex/base/lppl.txt; either
+ version 1 of the License, or any later version.
+
+ However, the above copyright notice does not apply in the case of
+ ``Crete University Press'' as this publisher is not allowed to
+ use or alter this file in any way.
+
+ Please report errors or suggestions for improvement to
+
+ Apostolos Syropoulos
+ 366, 28th October Str.
+ GR-671 00 Xanthi, GREECE
+ apostolo@ocean1.ee.duth.gr or apostolo@obelix.ee.duth.gr
+
+\endpreamble
+
+
+\keepsilent
+
+\generate{\generateFile{grtimes.sty}{f}{\from{grtimes.dtx}{grtimes}}
+ \generateFile{lgrptm.fd}{f}{\from{grtimes.dtx}{LGRptm}}
+ \generateFile{lgrpcr.fd}{f}{\from{grtimes.dtx}{LGRpcr}}
+ \generateFile{lgrphv.fd}{f}{\from{grtimes.dtx}{LGRphv}}}
+\postamble
+\endpostamble
+ \generateFile{lgrligs.mf}{f}{\from{grtimes.dtx}{LGRligs}}
+\Msg{**********************************************************}
+\Msg{* To finish installation you have to copy}
+\Msg{* the .fd files, the .mf file and the .sty}
+\Msg{* file in the appropriate directories and to}
+\Msg{* rehash your TeX, if it is required to do so.}
+\Msg{* Happy Greek TeXing!}
+\Msg{**********************************************************}
+\endinput
diff --git a/fonts/greek/grtimes/inlig b/fonts/greek/grtimes/inlig
new file mode 100644
index 0000000000..f590840b97
--- /dev/null
+++ b/fonts/greek/grtimes/inlig
@@ -0,0 +1,27 @@
+#!/usr/bin/perl
+#############################################################################
+#Program : inligs
+#Author : Apostolos Syropoulos
+#E-mail : apostolo@obelix.ee.duth.gr or apostolo@ocean1.ee.duth.gr
+#Functionality: Includes the cbligs.mf file in METAFONT files generated with
+# ttf2mf and the cb-tex.enc encoding.
+############################################################################
+die "Usage: inlig <METAFONT file>\n" if !(@ARGV);
+$file=$ARGV[0];
+$tmpf="temp.tmp";
+open(TEMP,">$tmpf")||die "Can't create temporal file!\n";
+open(MF,"$file")||die "can't open file $file!\n";
+while(<MF>)
+{
+ if (/^end\.$/)
+ {
+ print TEMP "input cbligs.mf\nend.";
+ }
+ else
+ {
+ print TEMP;
+ }
+}
+close;
+rename $tmpf, $file;
+__END__
diff --git a/fonts/greek/grtimes/lgr-tex.enc b/fonts/greek/grtimes/lgr-tex.enc
new file mode 100644
index 0000000000..4e7dd1f429
--- /dev/null
+++ b/fonts/greek/grtimes/lgr-tex.enc
@@ -0,0 +1,113 @@
+'000 '226
+'034 145
+'035 146
+'034 147
+'035 148
+'047 '047
+'173 '253
+'174 '056
+'175 '273
+'133 '133
+'135 '135
+'362 192
+'101 193
+'102 194
+'107 195
+'104 196
+'105 197
+'132 198
+'112 200
+'111 201
+'113 202
+'114 203
+'115 204
+'116 205
+'130 206
+'117 207
+'120 208
+'122 209
+'123 211
+'124 212
+'125 213
+'106 214
+'121 215
+'131 216
+'127 217
+'333 218
+'337 219
+'210 220
+'350 221
+'240 222
+'320 223
+'364 '373
+'366 224
+'141 225
+'142 226
+'147 227
+'144 228
+'145 229
+'172 230
+'150 231
+'152 232
+'151 233
+'153 234
+'154 235
+'155 236
+'156 237
+'170 238
+'157 239
+'160 240
+'162 241
+'143 242
+'163 243
+'164 244
+'165 245
+'146 246
+'161 247
+'171 248
+'177 '227
+'167 249
+'360 250
+'354 251
+'354 252
+'324 253
+'270 254
+'031 '211
+'200 '242
+'230 '271
+'240 '336
+'110 '307
+'260 '277
+'310 '272
+'340 '270
+'314 '276
+'344 '274
+'045 '045
+'041 '041
+'042 '222
+'043 '250
+'050 '050
+'051 '051
+'052 '052
+'053 '053
+'054 '054
+'055 '055
+'056 '056
+'057 '057
+'060 '060
+'061 '061
+'062 '062
+'063 '063
+'064 '064
+'065 '065
+'066 '066
+'067 '067
+'070 '070
+'071 '071
+'072 '072
+'073 '267
+'074 -1
+'075 '075
+'076 '222
+'077 '073
+