summaryrefslogtreecommitdiff
path: root/macros/text1/compugraphics_8600/et8.textext
diff options
context:
space:
mode:
Diffstat (limited to 'macros/text1/compugraphics_8600/et8.textext')
-rw-r--r--macros/text1/compugraphics_8600/et8.textext37
1 files changed, 37 insertions, 0 deletions
diff --git a/macros/text1/compugraphics_8600/et8.textext b/macros/text1/compugraphics_8600/et8.textext
new file mode 100644
index 0000000000..ad30284fa6
--- /dev/null
+++ b/macros/text1/compugraphics_8600/et8.textext
@@ -0,0 +1,37 @@
+\font\cgetVIIIrm=etr at 8pt\font\cgetVIIIit=eti at 8pt
+\font\cgetVIIIbd=etb at 8pt \font\cgetVIIImi=mthit at 8pt
+\font\cgetVIIIsy=symbola at 8pt \font\cgetVIIIex=ext at 8pt
+\font\cgetVIIIbi=etbi at 8pt \font\cgetVIIItt=elite at 8pt
+\font\cgetVIIIcc=etsc at 8pt\font\cgetVIIImrm=mthrm at 8pt
+\expandafter\newdimen\csname\the\naMEtok ilsviiiet\endcsname
+\global\csname\the\naMEtok ilsviiiet\endcsname=\bAseSkip
+\ifdim\csname\the\naMEtok ilsviiiet\endcsname=0pt
+\csname\the\naMEtok ilsviiiet\endcsname=10pt\fi%
+\expandafter\xdef\csname\the\naMEtok\endcsname{%
+ \def\noexpand\rm{\fam0\cgetVIIIrm}%
+ \def\noexpand\mi{\fam1\cgetVIIImi}%
+ \def\noexpand\sy{\fam2\cgetVIIIsy}%
+ \def\noexpand\ex{\fam3\cgetVIIIex}%
+ \textfont0=\cgetVIIImrm \textfont1=\cgetVIIImi
+ \textfont2=\cgetVIIIsy \textfont3=\cgetVIIIex
+ \textfont\itfam=\cgetVIIIit\textfont\bifam=\cgetVIIIbi
+ \textfont\ttfam=\cgetVIIItt \textfont\bffam=\cgetVIIIbd
+ \textfont\ccfam=\cgetVIIIcc
+ \def\noexpand\bd{\fam\bffam\cgetVIIIbd}%
+ \def\noexpand\it{\fam\itfam\cgetVIIIit}%
+ \def\noexpand\bi{\fam\bifam\cgetVIIIbi}%
+ \def\noexpand\tt{\fam\ttfam\cgetVIIItt}%
+ \def\noexpand\cc{\fam\ccfam\cgetVIIIcc}%
+\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 ilsviiiet\noexpand\endcsname}}%