summaryrefslogtreecommitdiff
path: root/language/greek/misc
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 /language/greek/misc
Initial commit
Diffstat (limited to 'language/greek/misc')
-rw-r--r--language/greek/misc/README.1ST21
-rw-r--r--language/greek/misc/cblstded.tex423
-rw-r--r--language/greek/misc/cbstdedt.tex470
-rwxr-xr-xlanguage/greek/misc/gendrv51
-rw-r--r--language/greek/misc/special.map64
5 files changed, 1029 insertions, 0 deletions
diff --git a/language/greek/misc/README.1ST b/language/greek/misc/README.1ST
new file mode 100644
index 0000000000..f7b409f6c1
--- /dev/null
+++ b/language/greek/misc/README.1ST
@@ -0,0 +1,21 @@
+In this directory you can find auxiliary stuff regarding the cb fonts.
+
+ File ``cblstded.tex'' can be used to generate all the driver files for
+big (slide-size) cb fonts. As a side effect this program generates either
+a batch file (Unix ``sh'' file or DOS ``bat'' file), which can be used
+to automatically generate all the TFM files.
+
+ File ``cbstdedt.tex'' has the same functionality as cblstded.tex except
+that it is for the normal-size cb fonts.
+
+ File ``gendrv'' is a simple Perl script which can produce a driver
+file and from it the corresponding TFM and PK files.
+
+ The contents of file ``special.map'' should be appended to file
+teTeX/texmf/fontname/special.map of the standard teTeX distribution.
+
+ Apostolos Syropoulos
+ apostolo@platon.ee.duth.gr or
+ apostolo@obelix.ee.duth.gr
+
+ April 8, 1999.
diff --git a/language/greek/misc/cblstded.tex b/language/greek/misc/cblstded.tex
new file mode 100644
index 0000000000..821121df37
--- /dev/null
+++ b/language/greek/misc/cblstded.tex
@@ -0,0 +1,423 @@
+****************************************************************
+% cblstded.tex
+%
+% (c) Copyright 1997, 1998 Apostolos Syropoulos
+%
+% The above copyright notice applies *only* to changes and enhancements
+% made to the original files ecstded.tex, to which the following
+% copyright notices apply:
+%
+% (c) Copyright 1995, 1996, 1997 J"org Knappen
+% (c) Copyright 1990, 1992 Norbert Schwarz
+%
+% This file is part of cbgreek fonts version 2.0
+%
+% Generating MF-files for the cbgreek fonts
+%
+% Running TeX with this file as an input results in a lot of
+% Metafont font driver files (grmn0500.mf, grmn0600.mf, ..). The files
+% which should be generated are marked in the following macro
+% \FontsToBeGenerated. For each font there has to be an entry
+% with the pt sizes the font should be generate with. Additionally
+% in the heading \tablevalues all used pt sizes have to be mentioned,
+% just to get a fine printout.
+%
+% Furthermore there is a batch file which can be customized for the
+% Metafont batch run.
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% please change only here:
+%
+\long\def\FontsToBeGenerated{
+
+ \tablevalues ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+
+ \makefont glic ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glin ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glio ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glii ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gliu ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gljc ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gljn ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gljo ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glji ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glju ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glmc ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glmn ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glmo ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glmi ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glmu ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gltc ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gltn ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glto ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glti ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont gltu ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glwc ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glwn ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glwo ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glwi ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glwu ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glxc ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glxn ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glxo ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glxi ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+ \makefont glxu ( 7[0700] 8[0800] 10[1000] 12[1200] 13.82[1382]
+ 16.59[1659] 19.91[1991] 23.89[2389] 28.66[2866]
+ 34.40[3440] 41.28[4128])
+}
+% If a font with a fraction, e.g. "7.5", should be generated
+% and the file name is not allowed to contain a period, an
+% optional file name part can be specified.
+%
+% 7.5[0750]
+%
+% result in - may be - "grmn0750.mf" and an entry of "gensize:=7.5;"
+% Although, cb fonts do not need the gensize information, some METAFONT
+% installations seem to have trouble if this information is not preset.
+% (The new value has to be specified in the \tablevalues-line too!)
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% The Batch file entries ( #1 contains the fontname )
+%
+% should be of the following form:
+%
+% \def\BatchOutput{\BatchLine{...}%
+% ...
+% \BatchLine{...}}
+%
+%
+% preset value, change \BatchOutput if you like ....
+%
+{\endlinechar=-1
+\message{Configuration phase.}
+\message{--------------------}
+\message{ }
+\message{What kind of operating system do you use? W(in32)/U(nix)}
+\read16 to\opsystem
+\global\let\OS=\opsystem
+\message{By specifying the default resolution the}
+\message{generated Unix shell/Win32 batch file will}
+\message{be able to produce both the TFM and the PK files.}
+\message{(The default resolution for EmTeX is 300dpi, and}
+\message{ MikTeX and Web2c 600dpi.)}
+\message{Do you want to specify the default resolution}
+\message{of your system? y/n}
+\read16 to\answer
+\if\answer y
+ \message{Enter default resolution}
+ \read16 to\RESOLUTION
+ \global\let\resolution=\RESOLUTION
+\fi
+\if\opsystem U
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{mf '\string\mode=localfont; scrollmode; input #1'}
+ \BatchLine{gftopk #1.\resolution gf}
+ \BatchLine{rm #1.\resolution gf}
+ \BatchLine{rm *.log}}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{mf '\string\mode=localfont; scrollmode; input #1'}
+ \BatchLine{rm *gf}
+ \BatchLine{rm *.log}}
+\fi
+\else %You have choosen Win32
+\message{Which TeX installation do you use:}
+\message{M(ikTeX), E(mTeX), or W(eb2c)?}
+\read16 to\wininst
+\if\wininst E % User has selected EmTeX
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.\resolution}
+ \BatchLine{del *.\resolution}
+ \BatchLine{del *.log}}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.300}
+ \BatchLine{del *.300}
+ \BatchLine{del *.log}}
+\fi
+\else\if\wininst M % User has selected MikTeX
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{maketfm #1}
+ \BatchLine{makepk #1 \resolution\space \resolution\space localfont}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{maketfm #1}
+ \BatchLine{makepk #1 600 \space 600 \space localfont}
+\fi
+\else % User has selected Web2c
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.\resolution gf}
+ \BatchLine{del #1.\resolution gf}
+ \BatchLine{del *.log}}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.600gf}
+ \BatchLine{del #1.600gf}
+ \BatchLine{del *.log}}
+\fi %\if\answer y
+\fi\fi
+\fi
+}
+%
+% File naming conventions:
+%
+\if\OS U
+\def\BatchFileName{cblstded.sh}
+\else
+\def\BatchFileName{cblstded.bat}
+\fi
+%
+%
+\def\MetafontFileExtension{.mf}
+%
+\def\modedef{} %e.g. \def\modedef{\string\mode:=ljfour;}
+%%CB What about really using this variable, instead of calling localfont?
+%
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% please n o changes from here, thanks !
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+%
+% (Avoiding inspecting the macros (sigh!)
+%
+% Norbert Schwarz, Dezember 1990
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\magnification\magstep1
+\overfullrule=0pt
+%\tracingonline1
+%\tracingcommands=1
+%\tracingmacros=1
+% some token handling
+\let\EA\expandafter
+\def\JoinToks#1=(#2+#3){#1=\EA\EA\EA{\EA\the\EA#2\the#3}}
+\def\UpToHere{\relax}
+\def\IgnoreRest#1#2\UpToHere{#1}
+\def\IgnoreFirst#1#2\relax\UpToHere{#2}
+\def\First#1{\EA\IgnoreRest\the#1{}\UpToHere}
+\def\FirstOf#1{\EA\EA\EA{\EA\IgnoreRest\the#1{}\UpToHere}}
+\def\MoveFirst(#1to#2){#2\FirstOf#1}
+\def\Rest#1{\EA\IgnoreFirst\the#1\relax\UpToHere}
+\def\RestOf#1{\EA\EA\EA{\EA\IgnoreFirst\the#1\relax\UpToHere}}
+\def\MoveRest(#1to#2){#2=\RestOf{#1}}
+% borrowed from p. 132 in N.Schwarz, Introduction to TeX (some advertising ..)
+
+\newtoks\Basis
+\newtoks\Table
+\def\storetoks#1{\toks0={#1}\JoinToks\Table=(\Table+\toks0)}
+\Table={}
+%
+\def\hash{##}
+\newwrite \batchoutput
+\newwrite \fontoutput
+\def\today{\ifcase\month\or
+ January\or Februar\or March\or April\or May\or June\or
+ July\or August\or September\or October\or November\or December\fi,
+ \number\day,
+ \space\number\year}
+
+\def\BatchLine#1{\immediate\write\batchoutput{#1}}
+\immediate\openout\batchoutput=\BatchFileName
+
+\def\empty{}
+\def\minus{-}
+\def\blank{ }
+\def\singlefont#1 {%
+ \def\fontsize{#1}%\message{<#1>}%
+ \ifx\fontsize\minus\let\next\relax
+ \else
+ \ifx\fontsize\empty\let\next\singlefont
+ \else
+ \ifx\fontsize\blank\let\next\singlefont
+ \else
+ \let\next\dofont
+ \fi\fi\fi
+ \next}
+
+\def\doentry{\MoveFirst(\Workbase to\Htok)%
+ \Workbase=\RestOf\Workbase
+ \edef\doou{\the\Htok}%
+ \ifx\doou\fontsize
+ \def\dooU{\storetoks{\hfill $\bullet$\hfill&}}%
+ \let\weiter\dooU
+ \else
+ \def\weiter{\storetoks{~\hfill&}\doentry}%
+ \fi\weiter}
+
+
+\def\singletablevalue#1 {%
+ \def\fontsize{#1}%
+ \ifx\fontsize\blank\let\next\singletablevalue
+ \else
+ \ifx\minus\fontsize\let\next\relax
+ \else\let\next\dotablevalue\fi
+ \fi
+ \next}
+
+\newtoks\Htok
+\newtoks\Workbase
+\def\dotablevalue{\edef\dooo{\Htok={{\fontsize}}}%
+ \dooo
+ \EA\storetoks\EA{\fontsize&}%
+ \JoinToks\Basis=(\Basis+\Htok)\singletablevalue}
+
+\def\tablevalues(#1){\storetoks{\bf Fonts &}\singletablevalue#1 -
+ \storetoks{\cr}}
+
+\def\makefont #1 (#2){\JoinToks\Workbase=(\Basis+\Basis)%
+ \myc=0\immediate\write15{}%
+ \edef\fontnamebody{#1}%
+ \def\dostoretoks{\storetoks{#1 &}}\dostoretoks
+ \singlefont #2 - \storetoks{\cr}}
+
+\def~{\ifdim\dimen0>0pt
+ \message{\number\dimen0}%
+ \global\advance\dimen0 by -5.25pt
+ \message{ }\fi}
+
+\newcount\myc
+\def\extraspaces{\setbox0=\hbox{\tt\fontname}%
+\dimen0=78.75pt
+\advance\dimen0 by -\wd0\relax
+ \advance\myc by 1
+ \ifnum \myc=5
+ \immediate\write15{}%
+ \myc=0 \fi}
+
+
+\def\dofonttest#1[#2]#3\nothing{%
+\def\fontsize{#2}%
+\ifx\fontsize\empty
+ \def\fontsizename{#1}%
+ \def\fontsize{#1}%
+\else
+ \def\fontsize{#1}%
+ \def\fontsizename{#2}%
+\fi}
+\def\dofont{\doentry\expandafter\dofonttest\fontsize[]\nothing\Dofont}
+
+{\catcode`\%=11
+\catcode`\|=14
+\gdef\Dofont{|
+ \edef\fontname{\fontnamebody\fontsizename\MetafontFileExtension}|
+ \edef\dowrite{|
+ \immediate\openout \fontoutput = \fontname|
+ \immediate\write
+ \fontoutput {% This is \fontname\space
+ in text format as of \today}|
+ \immediate\write \fontoutput {}|
+ \immediate\write \fontoutput {\modedef}|
+\immediate\write \fontoutput {gensize:=\fontsize;}|
+ \immediate\write \fontoutput {input \fontnamebody}|
+ \immediate\closeout \fontoutput|
+ \BatchOutput{\fontnamebody\fontsizename}
+ \message{\fontname\blank}|\extraspaces~~~~~~~~~~~|
+}\dowrite\singlefont}}
+\immediate\write15{generated mf-files:}
+\immediate\write15{-------------------}
+
+\nopagenumbers
+
+\def\minimumbox#1{\setbox0=\hbox{#1}%
+ \ifdim\wd0>15pt \box0\else \hbox to 15pt{\hfil
+ \box0\hfil}\fi}
+\storetoks{\hrule
+\medskip
+\centerline{Overview CB - Font Set for Slides}
+\medskip
+\hrule
+\bigskip
+\noindent The following table describes the generated {*.mf} files which
+are needed for the setup of the slides cb-font set.
+\bigskip
+\bigskip
+$$\vbox\bgroup\nointerlineskip\halign\bgroup\hash\hfil\quad&&\strut
+ \quad\minimumbox{\hash}\cr
+\noalign{\medskip}}
+
+
+
+%\tracingonline1
+%\tracingmacros2
+%\tracingcommands1
+
+\FontsToBeGenerated
+
+\storetoks{\egroup\egroup$$}
+
+\let\hash=#
+\the\Table
+\end
diff --git a/language/greek/misc/cbstdedt.tex b/language/greek/misc/cbstdedt.tex
new file mode 100644
index 0000000000..64e2dc2bb3
--- /dev/null
+++ b/language/greek/misc/cbstdedt.tex
@@ -0,0 +1,470 @@
+% cbstdedt.tex
+%
+% (c) Copyright 1997, 1998 Apostolos Syropoulos
+%
+% The above copyright notice applies *only* to changes and enhancements
+% made to the original files ecstded.tex, to which the following
+% copyright notices apply:
+%
+% (c) Copyright 1995, 1996, 1997 J"org Knappen
+% (c) Copyright 1990, 1992 Norbert Schwarz
+%
+% This file is part of cbgreek fonts version 1.0
+%
+% Generating MF-files for the cb fonts
+%
+% Running TeX with this file as an input results in a lot of
+% Metafont font driver files (grmn0500.mf, grmn0600.mf, ..). The files
+% which should be generated are marked in the following macro
+% \FontsToBeGenerated. For each font there has to be an entry
+% with the pt sizes the font should be generate with. Additionally
+% in the heading \tablevalues all used pt sizes have to be mentioned,
+% just to get an fine printout.
+%
+% Furthermore there is a batch file which can be customized for the
+% Metafont batch run.
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% please change only here:
+%
+\long\def\FontsToBeGenerated{
+
+ \tablevalues ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grmc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grmi ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grmu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grmn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grmo ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grxc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grxi ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grxu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grxn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont grxo ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsmc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsmi ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsmu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsmn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsmo ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsxc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsxi ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsxu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsxn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gsxo ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gttc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gtti ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gttu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gttn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gtto ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gomc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gomi ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gomu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gomn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont gomo ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont goxc ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont goxn ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont goxo ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont goxi ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+
+ \makefont goxu ( 5[0500] 6[0600] 7[0700] 8[0800] 9[0900] 10[1000]
+ 10.95[1095] 12[1200] 14.4[1440] 17.28[1728]
+ 20.74[2074] 24.88[2488])
+}
+% If a font with a fraction, e.g. "7.5", should be generated
+% and the file name is not allowed to contain a period, an
+% optional file name part can be specified.
+%
+% 7.5[0750]
+%
+% result in - may be - "grmn0750.mf" and an entry of "gensize:=7.5;"
+% Although, cb fonts do not need the gensize information, some METAFONT
+% installations seem to have trouble if this information is not preset.
+% (The new value has to be specified in the \tablevalues-line too!)
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% The Batch file entries ( #1 contains the fontname )
+%
+% should be of the following form:
+%
+% \def\BatchOutput{\BatchLine{...}%
+% ...
+% \BatchLine{...}}
+%
+%
+% preset value, change \BatchOutput if you like ....
+%
+{\endlinechar=-1
+\message{Configuration phase.}
+\message{--------------------}
+\message{ }
+\message{What kind of operating system do you use? W(in32)/U(nix)}
+\read16 to\opsystem
+\global\let\OS=\opsystem
+\message{By specifying the default resolution the}
+\message{generated Unix shell/Win32 batch file will}
+\message{be able to produce both the TFM and the PK files.}
+\message{(The default resolution for EmTeX is 300dpi, and}
+\message{ MikTeX and Web2c 600dpi.)}
+\message{Do you want to specify the default resolution}
+\message{of your system? y/n}
+\read16 to\answer
+\if\answer y
+ \message{Enter default resolution}
+ \read16 to\RESOLUTION
+ \global\let\resolution=\RESOLUTION
+\fi
+\if\opsystem U
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{mf '\string\mode=localfont; scrollmode; input #1'}
+ \BatchLine{gftopk #1.\resolution gf}
+ \BatchLine{rm #1.\resolution gf}
+ \BatchLine{rm *.log}}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{mf '\string\mode=localfont; scrollmode; input #1'}
+ \BatchLine{rm *gf}
+ \BatchLine{rm *.log}}
+\fi
+\else %You have choosen Win32
+\message{Which TeX installation do you use:}
+\message{M(ikTeX), E(mTeX), or W(eb2c)?}
+\read16 to\wininst
+\if\wininst E % User has selected EmTeX
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.\resolution}
+ \BatchLine{del *.\resolution}
+ \BatchLine{del *.log}}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.300}
+ \BatchLine{del *.300}
+ \BatchLine{del *.log}}
+\fi
+\else\if\wininst M % User has selected MikTeX
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{maketfm #1}
+ \BatchLine{makepk #1 \resolution\space \resolution\space localfont}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{maketfm #1}
+ \BatchLine{makepk #1 600 \space 600 \space localfont}
+\fi
+\else % User has selected Web2c
+\if\answer y
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.\resolution gf}
+ \BatchLine{del #1.\resolution gf}
+ \BatchLine{del *.log}}
+\else
+\gdef\BatchOutput#1{
+ \BatchLine{mf \string\mode=localfont; scrollmode; input #1}
+ \BatchLine{gftopk #1.600gf}
+ \BatchLine{del #1.600gf}
+ \BatchLine{del *.log}}
+\fi %\if\answer y
+\fi\fi
+\fi
+}
+%
+% File naming conventions:
+%
+\if\OS U
+\def\BatchFileName{cbstdedt.sh}
+\else
+\def\BatchFileName{cbstdedt.bat}
+\fi
+%
+%
+\def\MetafontFileExtension{.mf}
+%
+\def\modedef{} %e.g. \def\modedef{\string\mode:=ljfour;}
+%
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% please n o changes from here, thanks !
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+%
+% (Avoiding inspecting the macros (sigh!)
+%
+% Norbert Schwarz, Dezember 1990
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\magnification\magstep1
+\overfullrule=0pt
+%\tracingonline1
+%\tracingcommands=1
+%\tracingmacros=1
+% some token handling
+\let\EA\expandafter
+\def\JoinToks#1=(#2+#3){#1=\EA\EA\EA{\EA\the\EA#2\the#3}}
+\def\UpToHere{\relax}
+\def\IgnoreRest#1#2\UpToHere{#1}
+\def\IgnoreFirst#1#2\relax\UpToHere{#2}
+\def\First#1{\EA\IgnoreRest\the#1{}\UpToHere}
+\def\FirstOf#1{\EA\EA\EA{\EA\IgnoreRest\the#1{}\UpToHere}}
+\def\MoveFirst(#1to#2){#2\FirstOf#1}
+\def\Rest#1{\EA\IgnoreFirst\the#1\relax\UpToHere}
+\def\RestOf#1{\EA\EA\EA{\EA\IgnoreFirst\the#1\relax\UpToHere}}
+\def\MoveRest(#1to#2){#2=\RestOf{#1}}
+% borrowed from p. 132 in N.Schwarz, Introduction to TeX (some advertising ..)
+
+\newtoks\Basis
+\newtoks\Table
+\def\storetoks#1{\toks0={#1}\JoinToks\Table=(\Table+\toks0)}
+\Table={}
+%
+\def\hash{##}
+\newwrite \batchoutput
+\newwrite \fontoutput
+\def\today{\ifcase\month\or
+ January\or Februar\or March\or April\or May\or June\or
+ July\or August\or September\or October\or November\or December\fi,
+ \number\day,
+ \space\number\year}
+
+\def\BatchLine#1{\immediate\write\batchoutput{#1}}
+\immediate\openout\batchoutput=\BatchFileName
+
+\def\empty{}
+\def\minus{-}
+\def\blank{ }
+\def\singlefont#1 {%
+ \def\fontsize{#1}%\message{<#1>}%
+ \ifx\fontsize\minus\let\next\relax
+ \else
+ \ifx\fontsize\empty\let\next\singlefont
+ \else
+ \ifx\fontsize\blank\let\next\singlefont
+ \else
+ \let\next\dofont
+ \fi\fi\fi
+ \next}
+
+\def\doentry{\MoveFirst(\Workbase to\Htok)%
+ \Workbase=\RestOf\Workbase
+ \edef\doou{\the\Htok}%
+ \ifx\doou\fontsize
+ \def\dooU{\storetoks{\hfill $\bullet$\hfill&}}%
+ \let\weiter\dooU
+ \else
+ \def\weiter{\storetoks{~\hfill&}\doentry}%
+ \fi\weiter}
+
+
+\def\singletablevalue#1 {%
+ \def\fontsize{#1}%
+ \ifx\fontsize\blank\let\next\singletablevalue
+ \else
+ \ifx\minus\fontsize\let\next\relax
+ \else\let\next\dotablevalue\fi
+ \fi
+ \next}
+
+\newtoks\Htok
+\newtoks\Workbase
+\def\dotablevalue{\edef\dooo{\Htok={{\fontsize}}}%
+ \dooo
+ \EA\storetoks\EA{\fontsize&}%
+ \JoinToks\Basis=(\Basis+\Htok)\singletablevalue}
+
+\def\tablevalues(#1){\storetoks{\bf Fonts &}\singletablevalue#1 -
+ \storetoks{\cr}}
+
+\def\makefont #1 (#2){\JoinToks\Workbase=(\Basis+\Basis)%
+ \myc=0\immediate\write15{}%
+ \edef\fontnamebody{#1}%
+ \def\dostoretoks{\storetoks{#1 &}}\dostoretoks
+ \singlefont #2 - \storetoks{\cr}}
+
+\def~{\ifdim\dimen0>0pt
+ \message{\number\dimen0}%
+ \global\advance\dimen0 by -5.25pt
+ \message{ }\fi}
+
+\newcount\myc
+\def\extraspaces{\setbox0=\hbox{\tt\fontname}%
+\dimen0=78.75pt
+\advance\dimen0 by -\wd0\relax
+ \advance\myc by 1
+ \ifnum \myc=5
+ \immediate\write15{}%
+ \myc=0 \fi}
+
+
+\def\dofonttest#1[#2]#3\nothing{%
+\def\fontsize{#2}%
+\ifx\fontsize\empty
+ \def\fontsizename{#1}%
+ \def\fontsize{#1}%
+\else
+ \def\fontsize{#1}%
+ \def\fontsizename{#2}%
+\fi}
+\def\dofont{\doentry\expandafter\dofonttest\fontsize[]\nothing\Dofont}
+
+{\catcode`\%=11
+\catcode`\|=14
+\gdef\Dofont{|
+ \edef\fontname{\fontnamebody\fontsizename\MetafontFileExtension}|
+ \edef\dowrite{|
+ \immediate\openout \fontoutput = \fontname|
+ \immediate\write
+ \fontoutput {% This is \fontname\space
+ in text format as of \today}|
+ \immediate\write \fontoutput {}|
+ \immediate\write \fontoutput {\modedef}|
+\immediate\write \fontoutput {gensize:=\fontsize;}|
+ \immediate\write \fontoutput {input \fontnamebody}|
+ \immediate\closeout \fontoutput|
+ \BatchOutput{\fontnamebody\fontsizename}
+ \message{\fontname\blank}|\extraspaces~~~~~~~~~~~|
+}\dowrite\singlefont}}
+\immediate\write15{generated mf-files:}
+\immediate\write15{-------------------}
+
+\nopagenumbers
+
+\def\minimumbox#1{\setbox0=\hbox{#1}%
+ \ifdim\wd0>15pt \box0\else \hbox to 15pt{\hfil
+ \box0\hfil}\fi}
+\storetoks{\hrule
+\medskip
+\centerline{Overview CB - Standard font set}
+\medskip
+\hrule
+\bigskip
+\noindent The following table describes the generated {*.mf} files which
+are needed for the setup of the standard cb-font set.
+\bigskip
+\bigskip
+$$\vbox\bgroup\nointerlineskip\halign\bgroup\hash\hfil\quad&&\strut
+ \quad\minimumbox{\hash}\cr
+\noalign{\medskip}}
+
+
+
+%\tracingonline1
+%\tracingmacros2
+%\tracingcommands1
+
+\FontsToBeGenerated
+
+\storetoks{\egroup\egroup$$}
+
+\let\hash=#
+\the\Table
+\end
diff --git a/language/greek/misc/gendrv b/language/greek/misc/gendrv
new file mode 100755
index 0000000000..eeb8feba74
--- /dev/null
+++ b/language/greek/misc/gendrv
@@ -0,0 +1,51 @@
+#!/usr/bin/perl
+# (c) 1997, Apostolos Syropoulos
+# This simple perl script generates a driver file for the
+# cb font bundle. From this file it generates the TFM and a PK file
+#
+die "Usage: gendrv driver-name [resolution]\n" if(!@ARGV);
+$driver=$ARGV[0];
+shift @ARGV;
+if(!@ARGV && $ARGV[0] =~ /(\d)+/)
+{
+ $resolution=$ARGV[0];
+}
+else
+{
+ $resolution=600;
+}
+$font_family=substr($driver,0,4);
+$font_size=substr($driver,4);
+$date=`date`;
+open(DRV,">$driver.mf")||die "Can't create file $driver\n";
+print DRV "%This is file $driver created on $date";
+print DRV "%\n";
+print DRV "gensize:=$font_size\n";
+print DRV "input $font_family;";
+close DRV;
+$gf="$driver." . "$resolution" . "gf";
+$pk="$driver." . "$resolution" . "pk";
+print "Now we try to generate the TFM and the PK file.\n";
+`mf '\\scrollmode; mode:=localfont; mag:=1; input $driver'`;
+if(-e $gf)
+{
+ print "TFM file has been generated!\n";
+ `rm $driver.log`;
+}
+else
+{
+ print "File $gf hasn't been generated!\n";
+ print "Maybe there is no $font_family font family.\n";
+ exit(0);
+}
+`gftopk $gf`;
+if (-e $pk)
+{
+ print "PK file has been generated!\n";
+ `rm $gf`;
+}
+else
+{
+ print "File $pk hasn't been generated!\n";
+ print "Perhaps your system does not support the gftopk command\n";
+}
diff --git a/language/greek/misc/special.map b/language/greek/misc/special.map
new file mode 100644
index 0000000000..6e6ab57f07
--- /dev/null
+++ b/language/greek/misc/special.map
@@ -0,0 +1,64 @@
+@c %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+@c Original author Thomas Ziegler (zie@LTE.E-TECHNIK.uni-erlangen.de) %%%%%%%
+@c enhancement and corrections by %%%%%%%
+@c Apostolos Syropoulos (apostolo@platon.ee.duth.gr) %%%%%%%
+@c The new Greek cb fonts %%%%%%%
+@c %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+glic public cbgreek
+glin public cbgreek
+glio public cbgreek
+gljc public cbgreek
+gljn public cbgreek
+gljo public cbgreek
+glmc public cbgreek
+glmn public cbgreek
+glmo public cbgreek
+gltc public cbgreek
+gltn public cbgreek
+glto public cbgreek
+glwc public cbgreek
+glwn public cbgreek
+glwo public cbgreek
+glxc public cbgreek
+glxn public cbgreek
+glxo public cbgreek
+gomc public cbgreek
+gomn public cbgreek
+gomo public cbgreek
+goxc public cbgreek
+goxn public cbgreek
+goxo public cbgreek
+grmc public cbgreek
+grmn public cbgreek
+grmo public cbgreek
+grxc public cbgreek
+grxn public cbgreek
+grxo public cbgreek
+gsmc public cbgreek
+gsmn public cbgreek
+gsmo public cbgreek
+gsxc public cbgreek
+gsxn public cbgreek
+gsxo public cbgreek
+gttc public cbgreek
+gttn public cbgreek
+gtto public cbgreek
+glii public cbgreek
+glji public cbgreek
+glmi public cbgreek
+glti public cbgreek
+glwi public cbgreek
+glxi public cbgreek
+gomi public cbgreek
+goxi public cbgreek
+grmi public cbgreek
+grxi public cbgreek
+gsmi public cbgreek
+gsxi public cbgreek
+gtti public cbgreek
+
+
+
+
+
+