diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex')
-rw-r--r-- | Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex | 38 |
1 files changed, 28 insertions, 10 deletions
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex index fcbacc1ec87..784d2d61a2e 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2020.08.10 +% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2020.08.30 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass[a4paper]{article} \usepackage{graphicx} @@ -13,19 +13,24 @@ \textheight=280mm \parindent=0mm \setlength\columnsep{8mm} -%------------------------------------------------------------------------------- +%----------------------------------------------------------------------------- \makeatletter% -\newbox \@stringbox% -\newcount \fontnum% +\newbox \f@box% +\newcount \f@num% \newcount \tnum% \tnum=0% \font\labelM=cmtt8 at 6pt\relax% -%------------------------------------------------------------------------------- +%----------------------------------------------------------------------------- \newif\ifCONT@% \newread\@auxf% %------------------------------------------------------------------------ -\fontnum=1% +\f@num=1% \unitlength=0.01mm% +%------------------------------------------------------------------------ +\edef\jobname{mcf_exa_soc}% +\edef\f@ext{pk}% +%%%%\edef\f@ext{mps}% +%%%%\edef\f@ext{png}% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \begin{document} \begin{center} @@ -37,24 +42,30 @@ ** MW:Molecular weight calculated by mcf2graph}\vspace{3mm}\\ %------------------------------------------------------------------------ \noindent% -\openin\@auxf=mcf_exa_soc-info.aux% +\openin\@auxf=\jobname-info.aux% \CONT@true% \loop% \read\@auxf to \@info% \ifeof\@auxf\CONT@false\else\@sfor\@info{\tag@var\@list}% %------------------------------------------------------------ \begin{picture}(3750,3300)% - \put(20,3000){\footnotesize\bf \the\fontnum:\EN}% + \put(20,3000){\footnotesize\bf \the\f@num:\EN}% \put(20,2750){\labelM MW:\mw { / }FM:\fm}% \put(20,2530){\labelM MW:\MW(data)}% \put( 0,0){% \makebox(3750,2530){% - \font\@strufont=\File\relax\hbox{\@strufont\char\Char}% + \ifx\f@ext\@pk{\font\@font=\jobname\@font\char\f@num}% + \else% + \edef\f@file{\jobname-\z@num\f@num.\f@ext}% + \setbox\f@box=\hbox{\font\@font=\jobname\@font\char\f@num}% + \includegraphics[width=\wd\f@box,height=\ht\f@box]{\f@file}% +%%%% \includegraphics{\f@file}% + \fi% }% }% \end{picture}% %------------------------------------------------------------ - \advance\fontnum1\relax% + \advance\f@num1\relax% \advance\tnum1\relax% \ifnum\tnum=5 \\ \tnum=0 \fi% \fi% @@ -63,3 +74,10 @@ %------------------------------------------------------------------------ \end{document} %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +tnum=5 \\ \tnum=0 \fi% +\fi% +\ifCONT@ \repeat% +\closein\@auxf% +%------------------------------------------------------------------------ +\end{document} +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |