summaryrefslogtreecommitdiff
path: root/macros/text1/compugraphics_8600/et10.textext
diff options
context:
space:
mode:
Diffstat (limited to 'macros/text1/compugraphics_8600/et10.textext')
-rw-r--r--macros/text1/compugraphics_8600/et10.textext37
1 files changed, 37 insertions, 0 deletions
diff --git a/macros/text1/compugraphics_8600/et10.textext b/macros/text1/compugraphics_8600/et10.textext
new file mode 100644
index 0000000000..5b2e237237
--- /dev/null
+++ b/macros/text1/compugraphics_8600/et10.textext
@@ -0,0 +1,37 @@
+\font\cgetXrm=etr at 10pt\font\cgetXit=eti at 10pt
+\font\cgetXbd=etb at 10pt \font\cgetXmi=mthit at 10pt
+\font\cgetXsy=symbola at 10pt \font\cgetXex=ext at 10pt
+\font\cgetXbi=etbi at 10pt \font\cgetXtt=elite at 10pt
+\font\cgetXcc=etsc at 10pt\font\cgetXmrm=mthrm at 10pt
+\expandafter\newdimen\csname\the\naMEtok ilsxet\endcsname
+\global\csname\the\naMEtok ilsxet\endcsname=\bAseSkip
+\ifdim\csname\the\naMEtok ilsxet\endcsname=0pt
+\csname\the\naMEtok ilsxet\endcsname=12pt\fi%
+\expandafter\xdef\csname\the\naMEtok\endcsname{%
+ \def\noexpand\rm{\fam0\cgetXrm}%
+ \def\noexpand\mi{\fam1\cgetXmi}%
+ \def\noexpand\sy{\fam2\cgetXsy}%
+ \def\noexpand\ex{\fam3\cgetXex}%
+ \textfont0=\cgetXmrm \textfont1=\cgetXmi
+ \textfont2=\cgetXsy \textfont3=\cgetXex
+ \textfont\itfam=\cgetXit\textfont\bifam=\cgetXbi
+ \textfont\ttfam=\cgetXtt \textfont\bffam=\cgetXbd
+ \textfont\ccfam=\cgetXcc
+ \def\noexpand\bd{\fam\bffam\cgetXbd}%
+ \def\noexpand\it{\fam\itfam\cgetXit}%
+ \def\noexpand\bi{\fam\bifam\cgetXbi}%
+ \def\noexpand\tt{\fam\ttfam\cgetXtt}%
+ \def\noexpand\cc{\fam\ccfam\cgetXcc}%
+\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 ilsxet\noexpand\endcsname}}%