summaryrefslogtreecommitdiff
path: root/graphics/mcf2graph/mcf_exa_soc.mf
diff options
context:
space:
mode:
Diffstat (limited to 'graphics/mcf2graph/mcf_exa_soc.mf')
-rw-r--r--graphics/mcf2graph/mcf_exa_soc.mf27
1 files changed, 14 insertions, 13 deletions
diff --git a/graphics/mcf2graph/mcf_exa_soc.mf b/graphics/mcf2graph/mcf_exa_soc.mf
index 5f0d263bbb..b5513ffbf0 100644
--- a/graphics/mcf2graph/mcf_exa_soc.mf
+++ b/graphics/mcf2graph/mcf_exa_soc.mf
@@ -1,8 +1,8 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Molecular Coding Format for mcf_example.tex by Akira Yamaji 2021.09.05
+% Molecular Coding Format for mcf_example.tex by Akira Yamaji 2021.09.20
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-input mcf2graph.mf; %%% it must be version 4.71
-message "* mcf_exa_soc 2021.09.05";
+input mcf2graph.mf; %%% it must be version 4.72
+message "* mcf_exa_soc 2021.09.20";
message "";
%------------------------------------------------------------------------------
fsize:=(35mm,24mm);
@@ -21,18 +21,19 @@ tag1:="J"; tag2:="C"; tag3:="fm"; tag4:="mw"; tag5:="EN"; tag6:="MW";
if f_MP=0: input mcf_exa_soc-mf.aux; % (metafont) make aux file before typeset
else: % mpost -s ahlength=7 mcf_exa_soc.mf
%------------------------------------------------------------------------------
-%%%%%query("Cat=biological","MW<150","s:MW");
-%%%%%query("Cat=biological","MW<150.0","s:EN");
-%%%%%query("MW>=150","MW<=300","s:MW");
-%%%%%query("i:mcf_data_base","o:temp","s:MW","s:EN");
+%%%%query("Cat=biological","MW<200","s:MW");
+%%%%query("Cat=biological","MW<150.0","s:EN");
+%%%%query("MW>=150","MW<=200","s:MW");
%******************************************************************************
+%%%% beginfont("t:EN","v:Caffeine") % select EN=Caffeine
forever:
-%%%%%%% beginfont("f+:temp","v:*") % use query output
-%%%%%%% beginfont("f+:mcf_data_base","v:*") % select all
- beginfont("f+:mcf_data_base","t:EXA","v:1") % 'f+'=keep file open
- if f_EOF=0: if check(mc)=0: MC(scantokens(mc)) fi fi % 'v:1' select EXA=1
- endfont %
- exitif (f_EOF=1)or(f_close=1); % exit if file end
+%%%% beginfont("f:mcf_data_base","v+:*") % 'mcf_data_base.mcf'(default)
+%%%% beginfont("f:temp","v+:*") % use query output
+%%%% beginfont("v+:*") % select all
+ beginfont("t:EXA","v+:1") % 'v+:1': select EXA=1
+ if f_EOF=0: if check(mc)=0: MC(scantokens(mc)) fi fi
+ endfont
+ exitif f_EOF=1; % exit if file end
endfor
%******************************************************************************
fi