diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-12 23:46:03 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-12 23:46:03 +0000 |
commit | 873660d1a83ece926fe7206288dda9c36b349c1b (patch) | |
tree | a48f77125c309a355b5d0eb58d6b24446abe9d62 /Master/texmf-dist/tex/generic/ibycus | |
parent | 2939242967231097459df0fc3150fabc2f639111 (diff) |
generic 1
git-svn-id: svn://tug.org/texlive/trunk@613 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/ibycus')
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/README | 303 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/Uibycus.fd | 30 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/Uibycus4.fd | 27 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/iby4extr.tex | 18 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/iby4text.tex | 47 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/ibycus4.map | 222 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/ibycus4.sty | 30 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/ibycus4.tex | 26 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/ibycusps.tex | 26 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/psibycus.RME | 99 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/psibycus.sty | 31 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/psibycus.tex | 48 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/pssetiby.tex | 35 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/setiby4.tex | 35 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/tlgsqq.tex | 135 | ||||
-rw-r--r-- | Master/texmf-dist/tex/generic/ibycus/version4.tex | 5 |
16 files changed, 1117 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/ibycus/README b/Master/texmf-dist/tex/generic/ibycus/README new file mode 100644 index 00000000000..189e8b1935e --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/README @@ -0,0 +1,303 @@ +[This is ./doc/fonts/ibycus4/tex/README + 12 July, 1997. [For some of the previous history see the + final notes on Ibycus 3, from May 30, 1966 in README.ibycus3] + + ( THIS IS A TDS-CONFORMANT PACKAGE ) + +BE SURE THAT ibycus4.map HAS BEEN MADE ACCESSIBLE AS DESCRIBED BELOW + +FOR INCOMPATIBILITIES WITH IBYCUS3, SEARCH FOR %%%%%%%%%%%% on page 3. + +Like its predecessors, Ibycus4 is based on Silvio Levy's +realization of a classic Didot cut of Greek type from around 1800. +Ibycus4 is as close as possible to Ibycus3 in all possible +respects, but there are some improved set widths and pair-kernings +which might clobber old carefully adjusted text spacings +such as Alexandrian shaped poetry. + +A sample input file is provided in iby4text.tex or ibycus4.ltx + +PLAIN TeX USAGE: \input iby4text + + then: \setgreek10/12 (or other reasonable combination + of pointsize and leading) + + then: Latin text \GK{}a)rxai=a gra'mmata\RM{} Latin again. + + NOTE that the ) is a smooth breathing, not a parenthesis. + +LaTeX2e USAGE: \usepackage{ibycus4} + + then: Latin text {\greek{a)rxai=a gra'mmata}} Latin again. + (Note the double braces, there is a font change here.) + + change font size with the \fontsize macro, thus: + + \fontsize{14}{17pt}\selectfont + + +The TeX files in $TEXMF/tex/generic/ibycus4 together with the METAFONT +files in $TEXMF/fonts/source/public/ibycus4 {\em especially +ibycus4.map} are intended to provide a reasonable degree of +compatibility between David Packard Jr.'s Ibycus/TLG system, and the +TeX and METAFONT environment. If you are not using Karl Berry's +path-searching or its equivalent, these TeX files may have to be moved +to an appropriate branch directory of $TEXMF/tex/ + continues . . . + + README Page 2 + +The TeX files are: + + 1. $TEXMF/tex/generic/ibycus4/ibycus4.tex + + The driver file for this package (in plain tex). + + 1a. $TEXMF/tex/generic/ibycus4/ibycus4.sty + + The driver file for this package (in LaTeX2e). + + 2. $TEXMF/tex/generic/ibycus4/setiby4.tex + + Included by ibygrk.tex unless newnep format is running + + 3. $TEXMF/tex/generic/ibycus4/tlgsqq.tex + + The name suggests the association with coding of the + Thesaurus Linguae Graecae. + + This file provides uniquely named macros for all combinations + of letter and accent, so that any invocation of the macro will + produce a sequence of characters corresponding with the + entries put into the TFM ligature table. These sequences may + always be used to generate accented characters. They are + based, with some slight modifications where David Packard's Ibycus + input coding seems too misleading, on the Ibycus adaptation of + TLG beta-code. + + For input coding, the parentheses, ) and ( are used for + breathings, ' (ASCII char '047--acute or single quote) and ` + (ASCII char '140--grave) are used for oxytone and barytone (to + avoid preemption of the usual TeX excape character) and = + (ASCII char '075) is used for perispomenon to avoid preemption + of the active tie character in plain.tex. + is used for + dieresis after u or i and for some other special characters. + | is used for iota subscript and ! (ASCII char '041--\bang) is + used to call out the "dot-under" convention for partially + preserved letters in manuscript or epigraphical texts. Order + is significant. Breathings or diereses come first, after the + affected letter, then accents, then iota subscript or \bang. + These codings represent the input coding convention, not the + mapping in the font itself. + + The digraphs, trigraphs etc. can be read from tlgsqq.tex + Postpositives fall into three order-dependent and + exclusive classes--only one from each class may be used + in any single accented cluster. + + 1 2 3 + nil nil nil + ( [asper] ' [oxytone] | [iota subscript] + ) [lenis] ` [barytone] ! [dot below letter] + + [other] = [perispomene] + + continues . . . + + README Page 3 + + Some special digraphs are K+ Koppa, k+ koppa, C+ lunate Cigma, + c+ lunate cigma, s+ sampi (lowercase late form only) and s| which + forces a medial sigma. + << and >> give guillemets (not guillemots as Adobe + ornithologically supposes) and (( )) give single parentheses + though care must be taken that the first ( or ) is not + interpreted as a breathing. {((} and {))} are safe. + + %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + NOTE: THE FOLLOWING CODINGS ARE NOT COMPATIBLE WITH IBYCUS3 + %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + I have tried to keep incompatible codings to the minimum + but the ibycus3 versions of the following were extremely + undesirable. These are all simplifications of ibycus3 coding. + %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + The mark of elision is ' or {'} (the form in braces may be + needed to prevent ' from being read as an accent). + Single quotes may be provided by ` {`} and ' {'}, (isolate them + in braces if necessary). Double quotes are `` {``} and + '' {''} (isolate in braces if necessary). < and > are the + angle brackets used for conjectural supplements. + %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + + 4. ibycus4.map + + This is {\em exactly} the same file as is used by METAFONT. + Copy $TEXMF/fonts/source/public/ibycus4/ibycus4.map + to the same directory as ibycus4.tex + or, even better, link it with a symbolic link. + It is so structured that it can be read by either + TeX or Metafont. The mapping is very close to that of GreekKeys, + which is distributed for the Macintosh by the American + Philological Association. Other mappings can be created + in the same manner. + + 5. $TEXMF/tex/generic/ibycus4/Uibycus4.fd + + Supporting fd file for LaTeX2e. + + 6. $TEXMF/tex/generic/ibycus4/iby4extr.tex + + Access to some editorial symbols for classical editions. + + continues . . . + + README Page 4 + + 7. $TEXMF/tex/generic/ibygrk/ibycus4.ltx + $TEXMF/tex/generic/ibygrk/iby4text.tex + The exquisite little poem by Ibycus of Rhegium, until recently + almost the only thing known by him. (The Ibycus system + developed by David Packard is only indirectly named after + the poet. The direct inspiration was Packard's cat.) + + M E T A F O N T + +The METAFONT part of the package consists of a set of files which use +the original characters of Silvio Levy's greek fonts and combine them +in ways which reflect the increased capabilities of TeX and METAFONT +developed since Levy did the original greek for TeX. The Levy source +files can be got from one of the CTAN archives and placed in +$TEXMF/fonts/source/public/levy + where they will automatically become +accessible if you are using a TeX Directory Structure [TDS] layout of +files. If you are not using a file searching system like Karl Berry's +"kpathsea", see $TEXMF/fonts/source/public/ibycus4/ibycus4.mf for +hints on making the Levy source available. For directions on the +use and management of Karl Berry's path searching, consult "The TeX +Live Guide, version 2" by Sebastian Rahtz and Michael Goosens, in +{\it TUGboat}. Volume 18 (1997). Pages 81-112, especially pp. 87--9. +Web2c TeX for Unix systems, Thomas Esser's teTeX, and the Solaris package +referenced at http://smc.vnet.net/solaris_2.5.html all use Karl +Berry's path searching. + +Ibycus4 METAFONT files are in $TEXMF/fonts/source/public/ibycus4 + +The most significant changes are: + + 1. The large repertory of initial/medial sigma + letter pairs + is suppressed from the new fonts, and the new enhanced TFM + ligature scheme is used instead to provide for the automatic + differentiation between medial and final sigma. + + 2. The cells thus opened up in the font mapping are used for + a variety of additional characters: + + a. A full repertory of vowels with breathings and + barytone accents (many of these were absent from the + original). The various forms of long epsilon and + omicron with perispomene accent needed for early Attic + and similar local scripts are provided. + + b. Lunate sigma, digamma, koppa and sampi are + provided (the last in its lowercase late form + only, since earlier forms are rather problematic + and are virtually unused even in epigraphical texts). + + c. A simple iota subscript in a 0.5em character space + is provided at position '174 for use in unusual + + continues . . . + + README Page 5 + + groupings. For all normal usages three additional + occurences of the glyph are kerned (in the traditional + sense) far to the left so that they will fit under + alpha, eta and omega respectively. These characters + are called out automatically through the TeX TFM + ligature system, for which see below. The glyph under + eta is shortened slightly to give better clearance + under the left stem of lowercase eta. The iota + subscript glyph retains its simple form in 300dpi + renditions, and in any bitmap which drops below + 500dpi, but it thins out and develops a slight + rightward hook at 600dpi and above. + + d. The mechanism of drastic left kerning is also used + to set dots under letters which cannot be read + completely from the manuscript or stone. These dota + are likewise called out automatically through the TFM + ligature system. A final ! {\bang} after any letter + or letter with postpositive accents (except those + with iota subscripts) will produce the dotted form. + + e. Angle brackets, half brackets, double quotes, braces, + a dagger and a doubledagger are now provided (see + iby4extr.tex). + + 3. All characters have been named. The constructs + ASCII"A" and oct"000" appear only at lower levels + of programming. + + 4. Character spacing has been adjusted through kerning tables, + particularly around lowercase iota (file ibylig4.mf). + There is better separation between breathings and accents + (this has required a redesign of almost all accents) and + clearance between accent and base letter has been increased. + The perispomene has been restored to its traditional form with + a thick center and tapered ends, and the breathings have been + given shorter, tapered tails. The deep ink trap between the + bulb and tail of the breathings has been eliminated. Accents + over epsilon have been raised and slightly shortened to give + better clearance. The accents with diaeresis have been shifted + up and laterally to clear the dot they lean toward. + + 5. Font mapping is specified independently of other + parameters, in a distinct and separate file (file ibycus4.map). + In some cases it may be more effective to remap the font + than to struggle with TeX remapping. + + continues . . . + + README Page 6 + + 6. A programming error which produced the wrong displacement + value with free-standing accents has been corrected. Accents + before uppercase vowels are kerned (in the traditional sense) + out left to a negative left side bearing of about one unit + (1/18em) unit so that their escapement does not leave + excessive space after the preceding word or at the start of a + line. They have also been properly pair-kerned with the + uppercase vowels. + +A new naming convention uses "ibycus4" wherever possible, and +the shorter string "iby4" where that would lead to ambiguity. +some of the individual METAFONT character files are simply +taged with the number 4. 8+3 filename compatibility is preserved. +(under protest and with difficulty). + +The names of PK and TFM files follow Karl Berry's font name convention +( 84 is the encoding for Ibycus 4). + +Foundry Facename Weights Variants Encoding_Variants DesignSize + +f ib [r], b r, o 84 [10], 9, 8 + +fibr84 fibo84 fibb84 + + with METAFONT design-size additions +fibr848 fibo848 fibb848 +fibr849 fibo849 fibb849 + +Driver files for the Bold Oblique variant can be provided but their use +is discouraged. These Didot-derived characters do not stand up well +to either boldfacing or obliqueing, and the combination is quite +unfortunate. The typewriter style originally offered with these +designs is quietly forgotten, although the code for it is still +embedded in Silvio Levy's source. + + Also in the works, a type1 version. + +Pierre A. MacKay +Department of Classics +University of Washington +mackay@cs.washington.edu diff --git a/Master/texmf-dist/tex/generic/ibycus/Uibycus.fd b/Master/texmf-dist/tex/generic/ibycus/Uibycus.fd new file mode 100644 index 00000000000..315eaddead7 --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/Uibycus.fd @@ -0,0 +1,30 @@ +% Uibycus.fd-- P. A. MacKay --July 7, 2000 +% A more confident version in which all sizes of +% upright and obliqued, regular weight, are +% taken from the type1 font. Suggested by +% Peter.Heslin@ucd.ie. +% +% Uibycus.fd-- P.A. MacKay -- July 15.1999 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% for use with nfss2. Takes the regular weight only from the type1 +% font IbycusHTG-Regular. Bold should be used very rarely in any case. +% +\ProvidesFile{Uibycus.fd} +% +% OT1 is rather a lie, but it works for all directly addressed +% glyphs. Apparently it is not possible to use the U designation +% outside of math mode. I still think it unwise to call this an +% OT1 fd. It isn't. +% +\DeclareFontFamily{OT1}{ibycus}{} +\DeclareFontShape{OT1}{ibycus}{m}{n}{% + <5> <6> <7> <8> <9> <10> <10.95> <12> <14.40> <17.28> <20.74> <24.88> fibr}{} +\DeclareFontShape{OT1}{ibycus}{m}{sl}{% + <5> <6> <7> <8> <9> <10> <10.95> <12> <14.40> <17.28> <20.74> <24.88> fibo84}{} +\DeclareFontShape{OT1}{ibycus}{m}{it}{<->ssub * ibycus/m/sl}{} +\DeclareFontShape{OT1}{ibycus}{b}{n}{% + <5> <6> <7> <8> fibb848 + <9> fibb849 + <10> <10.95> <12> <14.40> <17.28> <20.74> <24.88> fibb84}{} diff --git a/Master/texmf-dist/tex/generic/ibycus/Uibycus4.fd b/Master/texmf-dist/tex/generic/ibycus/Uibycus4.fd new file mode 100644 index 00000000000..9cb8993736c --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/Uibycus4.fd @@ -0,0 +1,27 @@ +% Uibycus4.fd-- P.A. MacKay -- July 12.1997 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% for use with nfss2 +% +\ProvidesFile{Uibycus4.fd} +% +% OT1 is rather a lie, but it works for all directly addressed +% glyphs. Apparently it is not possible to use the U designation +% outside of math mode. I still think it unwise to call this an +% OT1 fd. It isn't. +% +\DeclareFontFamily{OT1}{ibycus}{} +\DeclareFontShape{OT1}{ibycus}{m}{n}{% + <5> <6> <7> <8> fibr848 + <9> fibr849 + <10> <10.95> <12> <14.40> <17.28> <20.74> <24.88> fibr84}{} +\DeclareFontShape{OT1}{ibycus}{m}{sl}{% + <5> <6> <7> <8> fibo848 + <9> fibo849 + <10> <10.95> <12> <14.40> <17.28> <20.74> <24.88> fibo84}{} +\DeclareFontShape{OT1}{ibycus}{m}{it}{<->ssub * ibycus/m/sl}{} +\DeclareFontShape{OT1}{ibycus}{b}{n}{% + <5> <6> <7> <8> fibb848 + <9> fibb849 + <10> <10.95> <12> <14.40> <17.28> <20.74> <24.88> fibb84}{} diff --git a/Master/texmf-dist/tex/generic/ibycus/iby4extr.tex b/Master/texmf-dist/tex/generic/ibycus/iby4extr.tex new file mode 100644 index 00000000000..8cfbce85b8e --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/iby4extr.tex @@ -0,0 +1,18 @@ +% iby4extr.tex-- P.A. MacKay -- July 12, 1997 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% Provides traditional text-editor symbols for critical edition +% The control sequences follow Adobe naming conventions, to keep +% them from any likely conflict with plain.tex. +% I use \let\!=\dagger +% as a short and convenient way of getting at it +% +\def\braceleft{\char'333} +\def\braceright{\char'337} +\def\bracketleftbt{\char'363} +\def\bracketrightbt{\char'367} +\def\dagger{\char'375} +\def\dbldagger{\char'376} + +\input version4 diff --git a/Master/texmf-dist/tex/generic/ibycus/iby4text.tex b/Master/texmf-dist/tex/generic/ibycus/iby4text.tex new file mode 100644 index 00000000000..00f38270ac1 --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/iby4text.tex @@ -0,0 +1,47 @@ +% iby4text.tex-- P.A. MacKay -- July 16, 1997 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% An example of ibycus4 using plain TeX +% +% Text from D. L. Page, {\it Greek Melic Poets}, (Oxford, 1962), p. 148 +% accepting the emendations of Mehlhorn and Hermann. +% +\hsize 4in +\input ibycus4 +\setgreek11/14 +\let\!=\dagger + +\GK + +\centerline{IBUKOU TOU RHGINOU} + +\bigskip + +\leavevmode\llap{)=}Hri me`n ai(' te Kudw'niai + +mhli'des a)rdo'menai r(oa=n + +e)k pota'mwn i('na Parqe'nwn + +kh=pos a)kh'ratos, ai(' t' oi)nanqi'des + +au)co'menai skie'roisin u(f' e('rnesin + +oi)nare'ois qale'qoisin; e)moi` d' e)'ros + +ou)demi'an kata'koitos w('ran. + +<a)ll' a('>q' u(po` steropa=s fle'gwn + +Qrhi+'kios Bore'as a)i's|- + +\quad swn para` Ku'pridos a)zale'ais mani'aisin e)remno`s a)qambh`s + +e)gkrate'ws pedo'qen \!fla'sen\! + +h(mete'ras fre'nas. + +\RM + +\end diff --git a/Master/texmf-dist/tex/generic/ibycus/ibycus4.map b/Master/texmf-dist/tex/generic/ibycus/ibycus4.map new file mode 100644 index 00000000000..0efb0e0a2fe --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/ibycus4.map @@ -0,0 +1,222 @@ +% +% These macros make it possible to read *.map files as either +% \TeX{} or METAFONT input +% See the $TEXMFROOT/tex/languages/greek/ibygrk directory for +% use of this file as TeX input +% +% A well-known conditional test in METAFONT; +% It creates mismatch of character tokens 'k' and 'n' in TeX +\if known cmbase: % Interpret as a METAFONT file + let re_catcode=relax; let let_=gobble; let no_let=gobble; + else: + message "Must have cmbase loaded for this, or else some macros from it" ; +% +% END OF METAFONT INTERPRETATION---TeX INTERPRETATION FOLLOWS +% + \else % Interpret as a TeX file + \catcode`\_11 % allow underscore in csnames as in METAFONT + \def\re_catcode{\catcode`\=12 \catcode`\;12 \catcode`\_8}% + \def\ignore_to_comment#1#2{}% +% Now activate all the characters from ^^80 to ^^ff + \count255=`\^^80 + \loop \ifnum\count255 < `\^^ff + \catcode\count255\active \advance\count255 by 1 \repeat + % \catcode`\^^ff\active % If you want it, I don't in this case. + \expandafter\input\the\digraphs % Filename in a \toks register + \catcode`\;0 % treat the first ; (required by METAFONT) as an escape + \catcode`\=14 % treat the = in the METAFONT part as a comment character + \let\let_\let \let\no_let\ignore_to_comment + \fi +% +% This is a rather specialized version of the map file, +% developed for Greek only. There are certain restrictions +% in this case, because we do not want to alter Silvio Levy's +% source code---only the mappings. +% The upper level codes (^^80---^^ff) are based on a version of +% Greek Keys (a word-processor package for Macintosh, distributed +% through the American Philological Association), but the mapping +% is worked out by experience not from any documentation, and +% local customization often alters even this mapping. +% Consistency is provided by the ASCII digraphs +% and trigraphs to which all word-processor codes are remapped +% before they are used in TeX. These digraphs and trigraphs +% (even tetragraphs in the case of iota subscript) are very close +% to Ibycus/TLG betacode, except for the unfortunate uppercasing +% of betacode. +% +% a known set of word-processor Some "hidden" characters +% equivalents is "let_" for TeX Only METAFONT needs to know +% \no_let is used where there what is in this column +% seems to be no certain mapping +% +\let_ ^^80;quotesnglright = ASCII"'"; endash = oct"046"; +\let_ ^^81;quotesnglleft = ASCII"`"; emdash = oct"177"; +\let_ ^^82;peri_spomenon = ASCII"="; null_space = ASCII" "; +\let_ ^^83;sp_lenis = ASCII")"; dieresis = oct"053"; % use plus sign +\let_ ^^84;sp_asper = ASCII"("; minute = ASCII"&"; % prime for numbers +\let_ ^^85;lenis_oxy = oct"136"; asper_glyph = oct"303"; +\let_ ^^86;lenis_bary = oct"137"; lenis_glyph = oct"307"; +\let_ ^^87;lenis_peri = oct"134"; guillemotleft = ASCII"{"; %two small +\let_ ^^88;asper_oxy = oct"207"; guillemotright = ASCII"}"; % awks +\let_ ^^89;asper_bary = oct"203"; iotasubscript = ASCII"|"; +\let_ ^^8a;asper_peri = oct"100"; dubious = ASCII"!"; +\no_let \dmy;bary_tone = oct"275"; quotedblleft = oct"253"; +\no_let \dmy;oxy_tone = oct"276"; quotedblright = oct"257"; +\no_let \dmy;diaeroxy = oct"043"; bracketleftbt = oct"363"; +\no_let \dmy;diaerbary = oct"044"; bracketrightbt = oct"367"; +% +% alpha with accents +% +\let_ ^^8b;a_oxy = oct"210"; Digamma = ASCII"V"; +\let_ ^^8c;a_bary = oct"200"; digamma = ASCII"v"; +\let_ ^^8d;a_peri = oct"220"; boundarychar := oct"377"; % N.B. := +\let_ ^^8e;a_len = oct"202"; +\let_ ^^8f;a_aspr = oct"201"; +\let_ ^^90;a_lenoxy = oct"212"; +\let_ ^^91;a_asproxy = oct"211"; cigmalunate=ASCII"J"; +\let_ ^^92;a_lenbary = oct"223"; % "J" is all that's available +\let_ ^^93;a_asprbary = oct"213"; sigmafinal=ASCII"j"; +\let_ ^^94;a_lenperi = oct"222"; r_aspr = oct"373"; % GreekKeys "="!! +\let_ ^^95;a_asprperi = oct"221"; r_len = oct"374"; +% +% alpha with accents and iota subscript +% +\let_ ^^fb;a_isub = oct"370"; % Kerned back iotasubscript only +\let_ ^^96;a_oxyisub = oct"214"; e_peri = oct"214"; +\let_ ^^97;a_baryisub = oct"204"; e_asprperi = oct"204"; +\let_ ^^98;a_periisub = oct"224"; e_lenperi = oct"224"; +\let_ ^^99;a_lenisub = oct"206"; Koppa = oct"206"; +\let_ ^^9a;a_asprisub = oct"205"; o_asprperi = oct"205"; +\let_ ^^9b;a_lenoxyisub = oct"216"; koppa = oct"216"; +\let_ ^^9c;a_asproxyisub = oct"215"; o_peri = oct"215"; +\let_ ^^9d;a_lenbaryisub = oct"227"; +\let_ ^^9e;a_asprbaryisub = oct"217"; sampi = oct"217"; +\let_ ^^9f;a_lenperiisub = oct"226"; Cigmalunate=oct"226"; +\let_ ^^a0;a_asprperiisub = oct"225"; o_lenperi = oct"225"; +% +% epsilon with accents +% +\let_ ^^a1;e_oxy = oct"350"; angleleft = ASCII"<"; +\let_ ^^a2;e_bary = oct"340"; angleright = ASCII">"; +\let_ ^^a4;e_len = oct"342"; braceleft = oct"333"; +\let_ ^^a5;e_aspr = oct"341"; braceright = oct"337"; +\let_ ^^a6;e_lenoxy = oct"352"; dagger = oct"375"; +\let_ ^^a7;e_asproxy = oct"351"; daggerdbl = oct"376"; +\let_ ^^a8;e_lenbary = oct"343"; aspirate = oct"377"; +\let_ ^^a9;e_asprbary = oct"353"; +% +% eta with accents +% +\let_ ^^ae;h_oxy = oct"240"; +\let_ ^^af;h_bary = oct"230"; +\let_ ^^b0;h_peri = oct"250"; +\let_ ^^b1;h_len = oct"232"; +\let_ ^^b2;h_aspr = oct"231"; +\let_ ^^b3;h_lenoxy = oct"242"; +\let_ ^^b4;h_asproxy = oct"241"; +\let_ ^^b5;h_lenbary = oct"243"; +\let_ ^^b6;h_asprbary = oct"233"; +\let_ ^^b7;h_lenperi = oct"252"; +\let_ ^^b8;h_asprperi = oct"251"; +% +% eta with accents and iota subscript +% +% In this section and in the "omega with accents and iota subscript" +% section at the end, the octal values are assigned twice. The coding +% originally followed the pattern of GreekKeys fonts in giving a map +% position to every iota subscript composite. But this is wasteful, since +% there are only three correct positions for iota subscript. Current +% coding follows the practice seen in the Linotype Times Ten Greek of +% kerning one of three iotasubscripts under the appropriate a, h, or w. +% This does, unfortunately mean that the current mapping cannot be used +% directly with GreekKeys input, but nobody seems ever to do that +% anyway. +% +\let_ ^^fa;h_isub = oct"371"; % The redundancy below here is +\let_ ^^b9;h_oxyisub = oct"244"; doti = oct"244"; % unavoidable +\let_ ^^ba;h_baryisub = oct"234"; dotI = oct"234" % It derives in +\let_ ^^bb;h_periisub = oct"254"; dote = oct"254"; % part from the +\let_ ^^bc;h_lenisub = oct"236"; dotbt = oct"236"; % older coding +\let_ ^^bd;h_asprisub = oct"235"; dotJdlmnpqu = oct"235"; % Now the +\let_ ^^be;h_lenoxyisub = oct"246"; dotkos = oct"246"; % only +\let_ ^^bf;h_asproxyisub = oct"245"; dotGZ = oct"245"; % isub +\let_ ^^c0;h_lenbaryisub = oct"247"; dotCEVaw = oct"247"; % code +\let_ ^^c1;h_asprbaryisub = oct"237"; dotchjz = oct"237"; % in MF +\let_ ^^c2;h_lenperiisub = oct"256"; dotBFLNPRSTW = oct"256"; % is the +\let_ ^^c3;h_asprperiisub = oct"255"; dotH = oct"255"; % first +% +%iota with accents +% +\let_ ^^db;i_oxy = oct"320"; +\let_ ^^dc;i_bary = oct"310"; +\let_ ^^dd;i_peri = oct"330"; +\let_ ^^de;i_len = oct"312"; +\let_ ^^df;i_aspr = oct"311"; +\let_ ^^e0;i_lenoxy = oct"322"; +\let_ ^^e1;i_asproxy = oct"321"; +\let_ ^^e2;i_lenbary = oct"323"; +\let_ ^^e3;i_asprbary = oct"313"; +\let_ ^^e4;i_lenperi = oct"332"; +\let_ ^^e5;i_asprperi = oct"331"; +\let_ ^^f3;i_diaer = oct"360"; +\let_ ^^fd;i_diaeroxy = oct"362"; +\let_ ^^fe;i_diaerbary = oct"361"; +% +% omicron with accents +% +\let_ ^^f1;o_oxy = oct"354"; +\let_ ^^f2;o_bary = oct"344"; +\let_ ^^f4;o_len = oct"346"; +\let_ ^^f5;o_aspr = oct"345"; +\let_ ^^f6;o_lenoxy = oct"356"; +\let_ ^^f7;o_asproxy = oct"355"; +\let_ ^^f8;o_lenbary = oct"357"; +\let_ ^^f9;o_asprbary = oct"347"; +% +% upsilon with accents +% +\let_ ^^e6;u_oxy = oct"324"; +\let_ ^^e7;u_bary = oct"314"; +\let_ ^^e8;u_peri = oct"334"; +\let_ ^^e9;u_len = oct"316"; +\let_ ^^ea;u_aspr = oct"315"; +\let_ ^^eb;u_lenoxy = oct"326"; +\let_ ^^ec;u_asproxy = oct"325"; +\let_ ^^ed;u_lenbary = oct"327"; +\let_ ^^ee;u_asprbary = oct"317"; +\let_ ^^ef;u_lenperi = oct"336"; +\let_ ^^f0;u_asprperi = oct"335"; +\no_let \dmy;u_diaer = oct"364"; % ^^23, but it's not worth the effort +\no_let \dmy;u_diaeroxy = oct"366"; % ^^40, ditto +\let_ ^^a3;u_diaerbary = oct"365"; +% +% omega with accents +% +\let_ ^^c5;w_oxy = oct"270"; +\let_ ^^c6;w_bary = oct"260"; +\let_ ^^c7;w_peri = oct"300"; +\let_ ^^c8;w_len = oct"262"; +\let_ ^^c9;w_aspr = oct"261"; +\let_ ^^ca;w_lenoxy = oct"272"; +\let_ ^^cb;w_asproxy = oct"271"; +\let_ ^^cc;w_lenbary = oct"273"; +\let_ ^^cd;w_asprbary = oct"263"; +\let_ ^^ce;w_lenperi = oct"302"; +\let_ ^^cf;w_asprperi = oct"301"; +% +% omega with accents and iota subscript +% +\let_ ^^c4;w_isub = oct"372"; % Kerned back iotasubscript only +\let_ ^^d0;w_oxyisub = oct"274"; dotAOQUXY = oct"274"; +\let_ ^^d1;w_baryisub = oct"264"; dotDK = oct"264"; +\let_ ^^d2;w_periisub = oct"304"; dotM = oct"304"; +\let_ ^^d3;w_lenisub = oct"266"; dotgx = oct"266"; +\let_ ^^d4;w_asprisub = oct"265"; dotfy = oct"265"; +\let_ ^^d5;w_lenoxyisub = oct"276"; % oxy_tone +\let_ ^^d6;w_asproxyisub = oct"275"; % bary_tone +\let_ ^^d7;w_lenbaryisub = oct"277"; dotr = oct"277" +\let_ ^^d8;w_asprbaryisub = oct"267"; dotkoppa = oct"267"; +\let_ ^^d9;w_lenperiisub = oct"306"; longum = oct"306"; +\let_ ^^da;w_asprperiisub = oct"305"; breve = oct"305"; + +\re_catcode diff --git a/Master/texmf-dist/tex/generic/ibycus/ibycus4.sty b/Master/texmf-dist/tex/generic/ibycus/ibycus4.sty new file mode 100644 index 00000000000..880eb991b2e --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/ibycus4.sty @@ -0,0 +1,30 @@ +% ibycus4.sty-- P.A. MacKay -- July 12, 1997 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% 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{}" +% The fd file is named as it should be, for ``Unknown'' encoding +% even though I have to use OT1 in the actual file +% +\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{Uibycus4.fd} +\def\greek{\fontfamily{ibycus}\selectfont} +\input{iby4extr} + diff --git a/Master/texmf-dist/tex/generic/ibycus/ibycus4.tex b/Master/texmf-dist/tex/generic/ibycus/ibycus4.tex new file mode 100644 index 00000000000..464c4b4882d --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/ibycus4.tex @@ -0,0 +1,26 @@ +\newtoks\digraphs +\digraphs={tlgsqq}% +% +\newif\ifrestoreat +\expandafter\ifnum\the\catcode`\@=11 + \restoreatfalse + \else\global\count9=\the\catcode`\@ + \catcode`\@=11 + \restoreattrue + \fi +% +\input ibycus4.map +% +\ifx\newneploaded\undefined\input setiby4 \fi +\gdef\GK{\ifx\gr@@kbaselineskip\undefined + \expandafter\csname\the\gr@@kpoint\endcsname\else\gr@@kpoint\fi + \begingroup + \def\GK{\relax} + \def\RM{\rm\endgroup}% + \ifx\gr@@kbaselineskip\undefined % newnep takes care of this + \else\normalbaselineskip\gr@@kbaselineskip\normalbaselines\fi + \expandafter\let\noexpand\it\gksl\gk}% +\gdef\RM{\relax}% +\ifrestoreat\catcode`\@=\the\count9 \fi % back to normal +\global\count9=0 +\input iby4extr diff --git a/Master/texmf-dist/tex/generic/ibycus/ibycusps.tex b/Master/texmf-dist/tex/generic/ibycus/ibycusps.tex new file mode 100644 index 00000000000..0a45161af71 --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/ibycusps.tex @@ -0,0 +1,26 @@ +\newtoks\digraphs +\digraphs={tlgsqq}% +% +\newif\ifrestoreat +\expandafter\ifnum\the\catcode`\@=11 + \restoreatfalse + \else\global\count9=\the\catcode`\@ + \catcode`\@=11 + \restoreattrue + \fi +% +\input ibycus4.map +% +\ifx\newneploaded\undefined\input pssetiby \fi +\gdef\GK{\ifx\gr@@kbaselineskip\undefined + \expandafter\csname\the\gr@@kpoint\endcsname\else\gr@@kpoint\fi + \begingroup + \def\GK{\relax}% + \def\RM{\rm\endgroup}% + \ifx\gr@@kbaselineskip\undefined % newnep takes care of this + \else\normalbaselineskip\gr@@kbaselineskip\normalbaselines\fi + \expandafter\let\noexpand\it\gksl\gk}% +\gdef\RM{\relax}% +\ifrestoreat\catcode`\@=\the\count9 \fi % back to normal +\global\count9=0 +\input iby4extr
\ No newline at end of file diff --git a/Master/texmf-dist/tex/generic/ibycus/psibycus.RME b/Master/texmf-dist/tex/generic/ibycus/psibycus.RME new file mode 100644 index 00000000000..0abc81d1dae --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/psibycus.RME @@ -0,0 +1,99 @@ +This file is psibycus.RME + +The Type1 version of the Ibycus Greek font (regular weight only) +available on orhan.classics.washington.edu, in the directory +/ftp/pub/tex has been sell enough received that it is being added to +the ibycus4 package. The font is still largely unhinted, but I am +beginning to wonder whether that matters. I did plan to provide a +rather thorough set of hints, since the primary purpose for making up +this font was to get away from the crude bitmap scaling that is all +you can get out of PDF readers. Hinting, however, is even worse than +filing matrices. It is a soul-destroying bore, and I cannot do very +much of it at any given session. The absence of hints will not be +noticed at resolutions of 600dpi and above. On paper, the weight is +just about right. In PDF files created with Adobe Distiller, the +screen appearance is remarkably good. In xdvi it is even better. In +ghostscript the rasterization uncontrolled by hints produces too dark +an effect, but it does make it that much more readable. The font has +a private UniqueID in the open range for now, but a registered +UniqueID will be applied for. + +The original METAFONT realization of ibycus4 remains the controlling +form of the font. The TeX user will see absolutely no difference +in the set-widths of the Type1 font because the set widths in the +TFM file are directly related (with infinitesimal roundings) to +those in the the TFM file for the METAFONT version. NOTE: My previous +hope that I could use exactly the same TFM for the type1 version +and the METAFONT version failed because some renderers such as +pdftex choke on even the slightest difference in set width. + +The Type1 control points have been derived from METAFONT log output +generated by "tracingspecs". This is not impossible, as has sometimes +been claimed, but it does take work. + +The additions to the METAFONT based package consist of: + +1. IbycusHTG-Regular.pfa ( = fibr.pfa = IBYHTGR_.PFB ). + The character designs are Silvio Levy's. Some small differences + in accent positioning and vertical positioning on the classic + METAFONT typeface grid have been allowed. My own lowercase lunate + sigma has been improved. These changes will ultimately be read + back into the ibycus4 METAFONT source. + +2. fibr.tfm (blended from the TFM file produced by afm2tfm and + the ligature and kerning from fibr84.tfm. The use of the Type1 font + is specified by calling on fibr, rather than fibr84. + Obliqued versions are invoked with fibo.tfm (derived in the same way). + Bold versions of the font are still exclusively METAFONT. + They will continue to be invoked as fibb84[89]? + until I make up Type1 versions of them (if I ever do). + +3. fibr.vf (fibo.vf), which serves to provide a reference into a dvips map + file. The raw TFM for this VF file is fibr84.tfm (fibo84.tfm), which + has the interesting effect of making METAFONT generated PK files a + fail-safe alternative in sizes above 10pt if the dvips map lookup fails. + The checksums for fibr.tfm fibr84.tfm and fibr.vf are identical. + likewise for fibo.tfm fibo84.tfm and fibo.vf. + This is arbitrary, since fibr.vf has integer escapement values + rounded from the METAFONT values in the tfm files. + +4. config.iby and iby.map. The iby.map file shows how to associate + fibr84 and fibo84 with IbycusHTG-Regular. + fibr84 IbycusHTG-Regular <IbycusHTG-Regular.pfa + fibo84 IbycusHTG-Regular ".167 SlantFont" <IbycusHTG-Regular.pfa + or + fibr84 IbycusHTG-Regular <fibr.pfa + fibo84 IbycusHTG-Regular ".167 SlantFont" <fibr.pfa + If you still use the large explicit psfonts.map from the web2c + days, these lines can be copied into psfonts.map for general use. + A better idea is to put them into a file iby.map and add the + line p +iby.map to the sort of psfonts.map that is provided + with teTeX. + +5. IbycusHTG-Regular.afm and IbycusHTG.enc. These are provided for + information only. The AFM file contains only the character info + and the pair-kerning data. There is no point in going further + since the Adobe convention for AFM is incapable of specifying the + ligature sequences needed for ibycus4. The encoding file could + supply both ligatures and pair-kerns, but to what purpose? + +6. Various TeX input files rewritten to use the fibr invocation in + place of the fibr84 invocation. (This is the only change that + users will need to make, other than installing the above files in + the TEXMF directory tree). + +IbycusHTG-Regular is licensed without charge for use in the creation of +documents in all media, in accordance with the included copyright +notice. Users are welcome and indeed encouraged to adapt the font +to other typesetting systems. Note that iota subscript is applied to +the affected vowel as a following zero-width character kerned +drastically to the left. (Other well-known Polytonic Greek fonts +do the same thing. This trick saves many, many glyph spaces for more +constructive use.) + + mackay@cs.washington.edu Pierre A. MacKay +Smail: Department of Classics Emeritus Druid for + Denny Hall, Box 353110 Unix-flavored TeX + University of Washington + Seattle, WA 98195 + (206) 543-2268 (Message recorder) diff --git a/Master/texmf-dist/tex/generic/ibycus/psibycus.sty b/Master/texmf-dist/tex/generic/ibycus/psibycus.sty new file mode 100644 index 00000000000..0101c6907ca --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/psibycus.sty @@ -0,0 +1,31 @@ +% psibycus.sty-- P.A. MacKay -- July 16, 1999 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% 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{}" +% The fd file is named as it should be, for ``Unknown'' encoding +% even though I have to use OT1 in the actual file +% +\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{\fontfamily{ibycus}\selectfont} +\input{iby4extr} + diff --git a/Master/texmf-dist/tex/generic/ibycus/psibycus.tex b/Master/texmf-dist/tex/generic/ibycus/psibycus.tex new file mode 100644 index 00000000000..10a7f370473 --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/psibycus.tex @@ -0,0 +1,48 @@ +% psibycus.tex-- P.A. MacKay -- July 16, 1999 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +% An example of ibycus4 using plain TeX and invoking the type1 font +% IbycusHTG-Regular +% +% Text from D. L. Page, {\it Greek Melic Poets}, (Oxford, 1962), p. 148 +% accepting the emendations of Mehlhorn and Hermann. +% +\hsize 4in +\input ibycusps +\setgreek11/14 +\let\!=\dagger + +\GK + +\centerline{IBUKOU TOU RHGINOU} + +\bigskip + +\leavevmode\llap{)=}Hri me`n ai(' te Kudw'niai + +mhli'des a)rdo'menai r(oa=n + +e)k pota'mwn i('na Parqe'nwn + +kh=pos a)kh'ratos, ai(' t' oi)nanqi'des + +au)co'menai skie'roisin u(f' e('rnesin + +oi)nare'ois qale'qoisin; e)moi` d' e)'ros + +ou)demi'an kata'koitos w('ran. + +<a)ll' a('>q' u(po` steropa=s fle'gwn + +Qrhi+'kios Bore'as a)i's|- + +\quad swn para` Ku'pridos a)zale'ais mani'aisin e)remno`s a)qambh`s + +e)gkrate'ws pedo'qen \!fla'sen\! + +h(mete'ras fre'nas. + +\RM + +\end diff --git a/Master/texmf-dist/tex/generic/ibycus/pssetiby.tex b/Master/texmf-dist/tex/generic/ibycus/pssetiby.tex new file mode 100644 index 00000000000..718cbada9a8 --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/pssetiby.tex @@ -0,0 +1,35 @@ +\newfam\gkf@m +\newskip\gr@@kbaselineskip +\font\twelvegrk=fibr at 12pt +\font\twelvegrksl=fibo84 scaled \magstep1 +\font\elevengrk=fibr at 10.95pt +\font\elevengrksl=fibo84 scaled \magstephalf +\font\tengrk=fibr at 10pt +\font\tengrksl=fibo84 +\font\ninegrk=fibr849 +\font\ninegrksl=fibo849 +\font\eightgrk=fibr848 +\font\eightgrksl=fibo848 +\gdef\setgreek#1/#2 {% + \def\f@ntp@int##1{\ifcase##1\toks0={zero}% + \or\toks0={zero}\or\toks0={zero}\or\toks0={zero}% 1,2,3 + \or\toks0={zero}\or\toks0={zero}\or\toks0={zero}% 4,5,6 + \or\toks0={zero}% 7 + \or\toks0={eight}\or\toks0={nine}\or\toks0={ten} + \or\toks0={eleven}\or\toks0={twelve}\fi + }% + \def\gksizep@int##1{\expandafter\gdef\csname ##1point\endcsname{%% + \textfont\gkf@m=\csname ##1grk\endcsname + \gdef\gk{\fam\gkf@m\csname ##1grk\endcsname}% + \edef\gksl{\csname ##1grksl\endcsname}% + }}% + \global\gr@@kbaselineskip=#2pt + \f@ntp@int{#1}% + % Get the English for the fontsize into \toks0 + \expandafter\expandafter\expandafter\gksizep@int{\the\toks0}% + \edef\gr@@kpoint{% + \expandafter\noexpand\csname\the\toks0point\endcsname}% + \csname\the\toks0point\endcsname +} +\message{Type \noexpand\setgreek10/12 to set 10pt greek on 12pt leading} +\message{ \noexpand\GK to start, \noexpand\RM to end greek } diff --git a/Master/texmf-dist/tex/generic/ibycus/setiby4.tex b/Master/texmf-dist/tex/generic/ibycus/setiby4.tex new file mode 100644 index 00000000000..586f1efabfe --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/setiby4.tex @@ -0,0 +1,35 @@ +\newfam\gkf@m +\newskip\gr@@kbaselineskip +\font\twelvegrk=fibr84 scaled \magstep1 +\font\twelvegrksl=fibo84 scaled \magstep1 +\font\elevengrk=fibr84 scaled \magstephalf +\font\elevengrksl=fibo84 scaled \magstephalf +\font\tengrk=fibr84 +\font\tengrksl=fibo84 +\font\ninegrk=fibr849 +\font\ninegrksl=fibo849 +\font\eightgrk=fibr848 +\font\eightgrksl=fibo848 +\gdef\setgreek#1/#2 {% + \def\f@ntp@int##1{\ifcase##1\toks0={zero}% + \or\toks0={zero}\or\toks0={zero}\or\toks0={zero}% 1,2,3 + \or\toks0={zero}\or\toks0={zero}\or\toks0={zero}% 4,5,6 + \or\toks0={zero}% 7 + \or\toks0={eight}\or\toks0={nine}\or\toks0={ten} + \or\toks0={eleven}\or\toks0={twelve}\fi + }% + \def\gksizep@int##1{\expandafter\gdef\csname ##1point\endcsname{%% + \textfont\gkf@m=\csname ##1grk\endcsname + \gdef\gk{\fam\gkf@m\csname ##1grk\endcsname}% + \edef\gksl{\csname ##1grksl\endcsname}% + }}% + \global\gr@@kbaselineskip=#2pt + \f@ntp@int{#1}% + % Get the English for the fontsize into \toks0 + \expandafter\expandafter\expandafter\gksizep@int{\the\toks0}% + \edef\gr@@kpoint{% + \expandafter\noexpand\csname\the\toks0point\endcsname}% + \csname\the\toks0point\endcsname +} +\message{Type \noexpand\setgreek10/12 to set 10pt greek on 12pt leading} +\message{ \noexpand\GK to start, \noexpand\RM to end greek } diff --git a/Master/texmf-dist/tex/generic/ibycus/tlgsqq.tex b/Master/texmf-dist/tex/generic/ibycus/tlgsqq.tex new file mode 100644 index 00000000000..7e4314dcf2d --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/tlgsqq.tex @@ -0,0 +1,135 @@ +\def\sp_lenis{\char'076}% +\def\sp_asper{\char'074}% +\def\lenis_oxy{)'}% +\def\lenis_bary{)`}% +\def\lenis_peri{)=}% +\def\asper_oxy{('}% +\def\asper_bary{(`}% +\def\asper_peri{(=}% +\def\a_{a}% +\def\a_bary{a`}% +\def\a_aspr{a(}% +\def\a_len{a)}% +\def\a_isub{a|}% +\def\a_baryisub{a`|}% +\def\a_asprisub{a(|}% +\def\a_lenisub{a)|}% +\def\a_isub{a|}% +\def\a_oxy{a'}% +\def\a_asproxy{a('}% +\def\a_asprbary{a(`}% +\def\a_lenoxy{a)'}% +\def\a_lenbary{a)`}% +\def\a_oxyisub{a'|}% +\def\a_asproxyisub{a('|}% +\def\a_asprbaryisub{a(`|}% +\def\a_lenoxyisub{a)'|}% +\def\a_lenbaryisub{a)`|}% +\def\a_peri{a=}% +\def\a_asprperi{a(=}% +\def\a_lenperi{a)=}% +\def\a_periisub{a=|}% +\def\a_asprperiisub{a(=|}% +\def\a_lenperiisub{a)=|}% +\def\a_isub{a|}% +\def\e_{e}% +\def\e_bary{e`}% +\def\e_aspr{e(}% +\def\e_len{e)}% +\def\e_oxy{e'}% +\def\e_asproxy{e('}% +\def\e_asprbary{e(`}% +\def\e_lenoxy{e)'}% +\def\e_lenbary{e)`}% +\def\h_{h}% +\def\h_bary{h`}% +\def\h_aspr{h(}% +\def\h_isub{h|}% +\def\h_len{h)}% +\def\h_baryisub{h`|}% +\def\h_asprisub{h(|}% +\def\h_lenisub{h)|}% +\def\h_oxy{h'}% +\def\h_asproxy{h('}% +\def\h_asprbary{h(`}% +\def\h_lenoxy{h)'}% +\def\h_lenbary{h)`}% +\def\h_oxyisub{h'|}% +\def\h_asproxyisub{h('|}% +\def\h_asprbaryisub{h(`|}% +\def\h_lenoxyisub{h)'|}% +\def\h_lenbaryisub{h)`|}% +\def\h_peri{h=}% +\def\h_asprperi{h(=}% +\def\h_lenperi{h)=}% +\def\h_periisub{h=|}% +\def\h_asprperiisub{h(=|}% +\def\h_lenperiisub{h)=|}% +\def\h_isub{h|}% +\def\i_{i}% +\def\i_bary{i`}% +\def\i_aspr{i(}% +\def\i_len{i)}% +\def\i_oxy{i'}% +\def\i_asproxy{i('}% +\def\i_asprbary{i(`}% +\def\i_lenoxy{i)'}% +\def\i_lenbary{i)`}% +\def\i_peri{i=}% +\def\i_asprperi{i(=}% +\def\i_lenperi{i)=}% +\def\i_diaer{i+}% +\def\i_barydiaer{i+`}% +\def\i_oxydiaer{i+'}% +\def\i_peridiaer{i+=}% +\def\o_{o}% +\def\o_bary{o`}% +\def\o_aspr{o(}% +\def\o_len{o)}% +\def\o_oxy{o'}% +\def\o_asproxy{o('}% +\def\o_asprbary{o(`}% +\def\o_lenoxy{o)'}% +\def\o_lenbary{o)`}% +\def\u_{u}% +\def\u_bary{u`}% +\def\u_aspr{u(}% +\def\u_len{u)}% +\def\u_oxy{u'}% +\def\u_asproxy{u('}% +\def\u_asprbary{u(`}% +\def\u_lenoxy{u)'}% +\def\u_lenbary{u)`}% +\def\u_peri{u=}% +\def\u_asprperi{u(=}% +\def\u_lenperi{u)=}% +\def\u_diaer{u+}% +\def\u_barydiaer{u+`}% +\def\u_oxydiaer{u+'}% +\def\u_peridiaer{u+=}% +\def\w_{w}% +\def\w_bary{w`}% +\def\w_aspr{w(}% +\def\w_len{w)}% +\def\w_isub{w|}% +\def\w_baryisub{w`|}% +\def\w_asprisub{w(|}% +\def\w_lenisub{w)|}% +\def\w_oxy{w'}% +\def\w_asproxy{w('}% +\def\w_asprbary{w(`}% +\def\w_lenoxy{w)'}% +\def\w_lenbary{w)`}% +\def\w_oxyisub{w'|}% +\def\w_lenoxyisub{w)'|}% +\def\w_lenbaryisub{w)`|}% +\def\w_asproxyisub{w('|}% +\def\w_asprbaryisub{w(`|}% +\def\w_peri{w=}% +\def\w_asprperi{w(=}% +\def\w_lenperi{w)=}% +\def\w_periisub{w=|}% +\def\w_asprperiisub{w(=|}% +\def\w_lenperiisub{w)=|}% +\def\w_isub{w|}% + diff --git a/Master/texmf-dist/tex/generic/ibycus/version4.tex b/Master/texmf-dist/tex/generic/ibycus/version4.tex new file mode 100644 index 00000000000..4e3499ad4f6 --- /dev/null +++ b/Master/texmf-dist/tex/generic/ibycus/version4.tex @@ -0,0 +1,5 @@ +% version4.tex-- P.A. MacKay -- July 15, 1997 +% Pierre A. MacKay, Dept. of Classics, University of Washington +% mackay@cs.washington.edu +% ------------------------ +\message{Ibycus Greek. Version 4. 15 July 1997} |