diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/text1/macros/cm7.textext |
Initial commit
Diffstat (limited to 'macros/text1/macros/cm7.textext')
-rw-r--r-- | macros/text1/macros/cm7.textext | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/macros/text1/macros/cm7.textext b/macros/text1/macros/cm7.textext new file mode 100644 index 0000000000..894bff8b2c --- /dev/null +++ b/macros/text1/macros/cm7.textext @@ -0,0 +1,45 @@ +\global\newif\ifVIIbierr +\global\newif\ifVIIbderr +\global\newif\ifVIItterr +\global\newif\ifVIIccerr +\font\cmVIIit=cmti7 +\expandafter\newdimen\csname\the\naMEtok ilsvii\endcsname +\global\csname\the\naMEtok ilsvii\endcsname=\bAseSkip +\ifdim\csname\the\naMEtok ilsvii\endcsname=0pt +\csname\the\naMEtok ilsvii\endcsname=9pt\fi% +\expandafter\xdef\csname\the\naMEtok\endcsname{% +\def\noexpand\rm{\fam0\sevenrm}% +\def\noexpand\mi{\fam1\seveni}% +\def\noexpand\sy{\fam2\sevensy}% +\def\noexpand\ex{\fam3\tenex}% + \textfont0=\sevenrm \textfont1=\seveni + \textfont2=\sevensy \textfont3=\tenex + \textfont\itfam=\cmVIIit + \textfont\bffam=\sevenbf +\def\noexpand\it{\fam\itfam\cmVIIit}% +\def\noexpand\bd{\fam\bffam\sevenbf}% +\def\noexpand\tt{\noexpand\ifVIItterr\noexpand\rm% +\noexpand\else\noexpand\rm\noexpand\message{<TEXT1> Warning. % +No typewriter font in CM7. Will print roman font .}% +\noexpand\global\noexpand\VIItterrtrue \noexpand\fi}% +\def\noexpand\bi{\noexpand\ifVIIbierr\noexpand\it% +\noexpand\else\noexpand\it\noexpand\message{<TEXT1> Warning. % +No bold italic font in CM7. Will print italic font .}% +\noexpand\global\noexpand\VIIbierrtrue \noexpand\fi}% +\def\noexpand\cc{\noexpand\ifVIIccerr\noexpand\rm% +\noexpand\else\noexpand\rm\noexpand\message{<TEXT1> Warning. % +No small caps font in CM7. Will print roman font .}% +\noexpand\global\noexpand\VIIccerrtrue \noexpand\fi}% +\noexpand\rm% +\noexpand\nonIBM% +\noexpand\let\noexpand\italic=\noexpand\it% +\noexpand\let\noexpand\bold=\noexpand\bd% +\noexpand\let\noexpand\bolditalic=\noexpand\bi% +\noexpand\let\noexpand\caps=\noexpand\cc% +\noexpand\let\noexpand\typewriter=\noexpand\tt% +\noexpand\let\noexpand\roman=\noexpand\rm% +\noexpand\let\noexpand\symbol=\noexpand\sy% +\noexpand\let\noexpand\mathitalic=\noexpand\mi% +\noexpand\let\noexpand\extension=\noexpand\ex% +\noexpand\interlineskip{% +\noexpand\csname\the\naMEtok ilsvii\noexpand\endcsname}}% |