summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/ibygrk/psibycus.sty
blob: 31374ec84b2d382c7b5858412a1febb078b099fc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
% Pierre A. MacKay, Dept. of Classics, University of Washington
% mackay@cs.washington.edu
% Walter Schmidt 
% w.a.schmidt@gmx.net
% ------------------------
% 2004-10-18  Version 4.5: font definitions moved to separate fd file,  again
% 2003-05-28  Version 4.2: virtual fonts are no longer used
% 2003-04-29  Version 4.1 for VTeX
% 15/7/99  Version for type1 font IbycusHTG-Regular
% 12/7/97  Convert to ibycus4
% 4/12/95  Test for isolatin package and suppress ibycus3.map if it's there
% 31/10/95 Added \input{iby3extr} for editor symbols
% 25/1/95  Created.
%
% For use with LaTeX2e
% Replaces iby4text.tex; does not call setiby4.tex
% Use "\fontsize{14}{17pt}\selectfont" instead of "\setgreek14/17"
% and "{\greek{}...}" instead of "\GK{}...\RM{}"

\ProvidesPackage{psibycus}[2004/10/18 v4.5 Ibycus4 using Type1 fonts (P.A.MacKay/WaS)]
\newtoks\digraphs
\digraphs={tlgsqq}
\chardef \atcode = \the \catcode `\@
\def\unletterat{\catcode`\@ = \the \atcode}
\catcode`\@ = 11
\ifx\@grave@A@grave@\undefined\input{ibycus4.map}
\else\@latex@warning@no@line{%
No GreekKeys upper ASCII. Post-positive ASCII sequences only}\fi
% Don't use the GreekKeys equivalents if isolatin is in use.
\unletterat
\input{Uibycus.fd}
\def\greek{\fontencoding{OT1}\fontfamily{ibycus}\selectfont}
\input{iby4extr}
\DeclareTextFontCommand{\textgreek}{\greek}

\endinput