blob: 28bf937f4573e8fcbd3f04fa75aa7758f8e1908e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Molecular Coding Format file for mcf_examples.tex by A.Yamaji 2015.8.3
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\documentclass[a4paper]{article}
\usepackage{graphicx}
\pagestyle{empty}
\topmargin=-20mm
\oddsidemargin=-14mm
\textwidth=210mm
\textheight=290mm
\parindent=0mm
\setlength\columnsep{8mm}
%-------------------------------------------------------------------------------
\makeatletter%
\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%
}%
%-------------------------------------------------------------------------------
\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\@stru#1[#2]{\font\@strufont=#1\relax\hbox{\@strufont\char#2}}%
\def\MCFinfo#1#2#3#4#5#6#7#8#9{%
\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}}}%
%---------------------------------------------------------------------------
\end{picture}%
\advance\fontnum\@ne\relax\advance\tnum\@ne\relax%
\ifnum\tnum=5 \\ \tnum=0\relax \fi%
}%
\makeatother
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\begin{document}
{\hspace{20mm} \LARGE\bf Molecular Coding Format examples \hspace{10mm} }%
{\footnotesize\bf by Akira Yamaji 2015.8.3} \vspace{5mm}\\
\fontnum=1%
\noindent%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%% Copy & Paste here from log-file %%%%%%%%%%%%%%%
%%%%%%%%% or \input 'filename'-info.log %%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%------------------------------------------------------------------------
\input mcf_exa_soc-info.aux
%------------------------------------------------------------------------
\end{document}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|