summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex')
-rw-r--r--Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex74
1 files changed, 30 insertions, 44 deletions
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex
index a9f6a37c336..71403126466 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 2015.8.7
+% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2015.8.14
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\documentclass[a4paper]{article}
\usepackage{graphicx}
@@ -12,68 +12,54 @@
\setlength\columnsep{8mm}
%-------------------------------------------------------------------------------
\makeatletter%
-\newbox \@stringbox%
+\newbox \@stringbox%
\newcount \fontnum%
\newcount \tnum%
-\newcount \Cnt@xlen%
-\newcount \Cnt@row%
-\newcount \fontw%
-\newdimen \font@dim%
%-------------------------------------------------------------------------------
\def\mol@sel#1{%
- \if#1\empty\relax\else%
- \edef\@first{\expandafter\@first@param#1;}%
- \edef\@second{\expandafter\@second@param#1;}%
- \ifx\@first\@EN@ \edef\MOLnameE{\@second}\fi%
- \ifx\@first\@JN@ \edef\MOLnameJ{\@second}\fi%
- \ifx\@first\@NO@ \edef\MOLnumber{\@second}\fi%
- \ifx\@first\@CAS@ \edef\MOLcas{\@second}\fi%
- \ifx\@first\@MW@ \edef\MOLmw{\@second}\fi%
- \ifx\@first\@FM@ \edef\MOLfomura{\@second}\fi%
- \ifx\@first\@USE@ \edef\MOLuse{\@second}\fi%
- \ifx\@first\@XLogP@ \edef\MOLXLogP{\@second}\fi%
- \ifx\@first\@EXA@ \edef\MOLextA{\@second}\fi%
- \ifx\@first\@EXB@ \edef\MOLextB{\@second}\fi%
- \fi%
-}%
+\if#1\empty\relax\else%
+ \edef\@fst{\expandafter\@fst@param#1;}%
+ \edef\@sec{\expandafter\@sec@param#1;}%
+ \ifx\@fst\@F\edef\MOLfile{\@sec}\fi \ifx\@fst\@C\edef\MOLchar{\@sec}\fi%
+ \ifx\@fst\@Lx\edef\MOLlenx{\@sec}\fi \ifx\@fst\@Ly\edef\MOLleny{\@sec}\fi%
+ \ifx\@fst\@EN\edef\MOLnameE{\@sec}\fi \ifx\@fst\@JN\edef\MOLnameJ{\@sec}\fi%
+ \ifx\@fst\@CAS\edef\MOLcas{\@sec}\fi \ifx\@fst\@MW\edef\MOLmw{\@sec}\fi%
+ \ifx\@fst\@FM\edef\MOLfomura{\@sec}\fi \ifx\@fst\@USE\edef\MOLuse{\@sec}\fi%
+ \ifx\@fst\@logP\edef\MOLlogP{\@sec}\fi \ifx\@fst\@EXA\edef\MOLextA{\@sec}\fi%
+ \ifx\@fst\@EXB\edef\MOLextB{\@sec}\fi \ifx\@fst\@NO\edef\MOLnum{\@sec}\fi\fi}%
+%-------------------------------------------------------------------------------
+\def\@F{F}\def\@C{C}\def\@EN{EN}\def\@JN{JN}\def\@CAS{CAS}\def\@MW{MW}%
+\def\@FM{FM}\def\@Lx{Lx}\def\@Ly{Ly}\def\@NO{NO}%
+\def\@USE@{USE}\def\@logP@{logP}\def\@EXA@{EXA}\def\@EXB@{EXB}%
%-------------------------------------------------------------------------------
-\def\@first@param#1:#2;{#1}\def\@second@param#1:#2;{#2}%
-\def\@EN@{EN}\def\@JN@{JN}\def\@CAS@{CAS}\def\@NO@{NO}\def\@MW@{MW}\def\@FM@{FM}%
-\def\@USE@{USE}\def\@XLogP@{XLogP}\def\@EXA@{EXA}\def\@EXB@{EXB}%
-\def\MOL@info@aux#1#2#3{\mol@sel{#1}\mol@sel{#2}\mol@sel{#3}}%
-\def\MOLinfo#1#2#3#4#5#6#7#8#9{%
- \edef\MOLnameE{}\edef\MOLnameJ{}\edef\MOLnumber{}\edef\MOLcas{}\edef\MOLmw{}%
- \edef\MOLfomura{}\edef\MOLuse{}\edef\MOLXLogP{}\edef\MOLextA{}\edef\MOLextB{}%
- \mol@sel{#1}\mol@sel{#2}\mol@sel{#3}\mol@sel{#4}\mol@sel{#5}\mol@sel{#6}%
- \mol@sel{#7}\mol@sel{#8}\mol@sel{#9}\MOL@info@aux}%
-%--------------------------------------------------------------------------------
+\def\@fst@param#1:#2;{#1}\def\@sec@param#1:#2;{#2}%
\def\@stru#1[#2]{\font\@strufont=#1\relax\hbox{\@strufont\char#2}}%
-\def\MCFinfo#1#2#3#4#5#6#7#8#9{%
+%-------------------------------------------------------------------------------
+\def\put@char{%
\unitlength=0.01mm\relax \@tempcnta=3200\relax \@tempcntb=3800\relax%
\begin{picture}(\@tempcntb,\@tempcnta)%
\advance\@tempcnta -300\relax%
\put(20,\@tempcnta){\tiny\bf [\the\fontnum] \MOLnameE}%
-%---------------------------------------------------------------------------
-% for METAFONT
- \put( 0,0){\makebox(\@tempcntb,\@tempcnta){\@stru{#1}[#2]}}%
-%%%% for METAPOST
-%%%% \put( 0,0){\makebox(\@tempcntb,\@tempcnta){\includegraphics{#3}}}%
-%---------------------------------------------------------------------------
+ \put( 0,0){\makebox(\@tempcntb,\@tempcnta){\@stru{\MOLfile}[\MOLchar]}}%
\end{picture}%
\advance\fontnum\@ne\relax\advance\tnum\@ne\relax%
\ifnum\tnum=5 \\ \tnum=0\relax \fi%
- }%
+}
+%-------------------------------------------------------------------------------
+\def\INFO#1{%
+ \edef\MOLnameE{}%
+ \@tfor\@temp:=#1\do{\mol@sel{\@temp}}%
+ \put@char%
+}%
+%-------------------------------------------------------------------------------
\makeatother
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\begin{document}
{\hspace{20mm} \LARGE\bf Molecular Coding Format examples \hspace{10mm} }%
-{\footnotesize\bf by Akira Yamaji 2015.8.3} \vspace{5mm}\\
+{\footnotesize\bf by Akira Yamaji 2015.8.14} \vspace{5mm}\\
\fontnum=1%
\noindent%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%%%%%%% Copy & Paste here from log-file %%%%%%%%%%%%%%%
-%%%%%%%%% or \input 'filename'-info.log %%%%%%%%%%%%%%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%% \input 'filename'-info.log
%------------------------------------------------------------------------
\input mcf_exa_soc-info.aux
%------------------------------------------------------------------------