summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2015-08-23 21:43:38 +0000
committerKarl Berry <karl@freefriends.org>2015-08-23 21:43:38 +0000
commit4593763b43ad40700fc52e8126a547508ba41391 (patch)
treeb863b0569311bb264756266c6ecc0001d7153409 /Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
parent17ba5fa1411e6a3c86264b28b6f5d00a2d177d15 (diff)
mcf2graph (23aug15)
git-svn-id: svn://tug.org/texlive/trunk@38188 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf')
-rw-r--r--Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf192
1 files changed, 150 insertions, 42 deletions
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
index 73c56ca6c5f..a54ac1373d1 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
@@ -1,5 +1,5 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2015.8.7
+% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2015.8.22
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
input mcf2graph.mf;
%-----------------------------------------------------------------------
@@ -8,7 +8,7 @@ font_ht#:=30mm#;% font height
max_bond_width:=0.18;
%-----------------------------------------------------------------------
sw_logout:=0;
-sw_frame:=0;
+sw_mol_frame:=0;
sw_expand:=0;
sw_start_vector:=0;
%%%%%sw_checklist:=1;
@@ -217,43 +217,6 @@ beginfont("EN:Inline definition")
MCf(^^30,!3,/'(!,/Me,!,OH),!3)
endfont
%***********************************************************************
-beginfont("EN:Switwch start vector")
- sw_start_vector:=0;
- MCd(.7,.7)( 0, 0)(^^30,Ph,4:/Cl,3:/F)
- sw_start_vector:=1;
- MCd(.7,.7)( 1, 1)(^^30,Ph,4:/Cl,3:/F)
-endfont
-%***********************************************************************
-beginfont("EN:Switwch numberingA")
- sw_numberA:=1;
- sw_start_vector:=1;
- MCf(^^30,?6,-4=?6,-3\,!,?6,#10:/Et)
-endfont
-%***********************************************************************
-beginfont("EN:Switwch numberingB")
- sw_numberB:=1;
- sw_start_vector:=1;
- MCf(^^30,?6,-4=?6,-3\,!,?6,#10:/Et)
-endfont
-%***********************************************************************
-beginfont("EN:Switwch Frame")
- MCd(.7,.7)( 0, 0)(^^30,Ph,4:/Cl,3:/F)
- sw_frame:=1;
- MCd(.7,.7)( 1, 1)(^^30,Ph,4:/Cl,3:/F)
-endfont
-%***********************************************************************
-beginfont("EN:Switwch Solid ratio")
- MCd(.7,.7)( 0, 0)(^^30,Ph,4:/Cl,3:/F)
- sw_solid:=1; ratio_bond_width:=0.08;
- MCd(.7,.7)( 1, 1)(^^30,Ph,4:/Cl,3:/F)
-endfont
-%***********************************************************************
-beginfont("EN:Switwch Expand")
- MCd(.6,.6)(0, 0)(^^30,Ph,4:/COOH,3:/NH2)
- sw_expand:=1;
- MCd(.6,.6)(1, 1)(^^30,Ph,4:/COOH,3:/NH2)
-endfont
-%***********************************************************************
beginfont("EN:Ampicillin")
MCf(^^45,
?4,2:N,2=??5,-1:S,
@@ -291,13 +254,158 @@ beginfont("EN:Lycorine")
)
endfont
%***********************************************************************
-beginfont("EN:Gibberellin");
+beginfont("EN:Gibberellin A3");
MCf(
^^12,?6`1.3,3=??5,9=??7,12\^160`1.6,&8,
4\^155~zf`-1.2,O,55,//O^180`1,&2~zb,
- 11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me,
+ 5=dl,11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me,
@(3^-60,9^60)*/H
)
-endfont;
+endfont
+%***********************************************************************
+font_wd#:=30mm#;%
+font_ht#:=20mm#;%
+beginfont("EN:Font size")
+ sw_font_frame:=1;
+ MCf(^^30,
+ ?6,-4=??5,$(3,8)dl,@(2,6,7,9)N,
+ @(2,6,9)/Me,@(1,5)//O)
+endfont
+font_wd#:=60mm#;
+font_ht#:=30mm#;
+%***********************************************************************
+beginfont("EN:max_bond_width")
+ sw_mol_frame:=1;
+ max_bond_width:=0.10;
+ MCd(1,1)(0, .5)(^^30,Ph)
+ max_bond_width:=0.15;
+ MCd(1,1)(.33, .5)(^^30,Ph)
+ max_bond_width:=0.30;
+ MCd(1,1)(1, .5)(^^30,Ph)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_thickness_bond")
+ ratio_thickness_bond:=0.005;
+ MCd(.6,.6)(0, .5)(^^30,Ph)
+ ratio_thickness_bond:=0.015;
+ MCd(.6,.6)(.5, .5)(^^30,Ph)
+ ratio_thickness_bond:=0.03;
+ MCd(.6,.6)(1, .5)(^^30,Ph)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_char_bond")
+ ratio_char_bond:=1.0;
+ MCd(.6,.6)(0, .5)(^^30,?6,5:O,2:NH)
+ ratio_char_bond:=1.5;
+ MCd(.6,.6)(.5, .5)(^^30,?6,5:O,2:NH)
+ ratio_char_bond:=2.0;
+ MCd(.6,.6)(1, .5)(^^30,?6,5:O,2:NH)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_bondgap_bond")
+ ratio_bondgap_bond:=0.10;
+ MCd(.6,.6)(0, .5)(^^30,Ph)
+ ratio_bondgap_bond:=0.15;
+ MCd(.6,.6)(.5, .5)(^^30,Ph)
+ ratio_bondgap_bond:=0.20;
+ MCd(.6,.6)(1, .5)(^^30,Ph)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_atom_bond")
+ ratio_atom_bond:=0.25;
+ MCd(.6,.6)(0, .5)(^^30,?6,@(2,5)O)
+ ratio_atom_bond:=0.33;
+ MCd(.6,.6)(.5, .5)(^^30,?6,@(2,5)O)
+ ratio_atom_bond:=0.45;
+ MCd(.6,.6)(1, .5)(^^30,?6,@(2,5)O)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_chain_ring")
+ ratio_chain_ring:= 0.4;
+ MCd(.6,.6)(0, .5)(^^30,?6,5:/Et)
+ ratio_chain_ring:= 0.66;
+ MCd(.6,.6)(.5, .5)(^^30,?6,5:/Et)
+ ratio_chain_ring:= 1;
+ MCd(.6,.6)(1, .5)(^^30,?6,5:/Et)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_wedge_bond")
+ ratio_wedge_bond:=0.1;
+ MCd(.6,.6)(0, .5)(^^30,?6,5:*/Me)
+ ratio_wedge_bond:=0.15;
+ MCd(.6,.6)(.5, .5)(^^30,?6,5:*/Me)
+ ratio_wedge_bond:=0.2;;
+ MCd(.6,.6)(1, .5)(^^30,?6,5:*/Me)
+endfont
+%***********************************************************************
+beginfont("EN:ratio_zebra_gap")
+ ratio_zebra_gap:=0.06;
+ MCd(.6,.6)(0, .5)(^^30,Ph,5:/*Me`1)
+ ratio_zebra_gap:=0.12;
+ MCd(.6,.6)(.5, .5)(^^30,Ph,5:/*Me`1)
+ ratio_zebra_gap:=0.20;
+ MCd(.6,.6)(1, .5)(^^30,Ph,5:/*Me`1)
+endfont
+%***********************************************************************
+beginfont("EN:Switwch start vector")
+ sw_start_vector:=0;
+ MCd(.7,.7)( 0, 0)(^^30,Ph,4:/Cl,3:/F)
+ sw_start_vector:=1;
+ MCd(.7,.7)( 1, 1)(^^30,Ph,4:/Cl,3:/F)
+endfont
+%***********************************************************************
+beginfont("EN:Switwch numberingA")
+ sw_numberA:=1;
+ sw_start_vector:=1;
+ MCf(^^30,?6,-4=?6,-3\,!,?6,#10:/Et)
+endfont
+%***********************************************************************
+beginfont("EN:Switwch numberingB")
+ sw_numberB:=1;
+ sw_start_vector:=1;
+ MCf(^^30,?6,-4=?6,-3\,!,?6,#10:/Et)
+endfont
+%***********************************************************************
+beginfont("EN:Switwch font frame")
+ sw_font_frame:=1;
+ MCf(^^30,Ph,4:/Cl,3:/F)
+endfont
+%***********************************************************************
+beginfont("EN:Switwch molecular frame")
+ MCd(.7,.7)( 0, 0)(^^30,Ph,4:/Cl,3:/F)
+ sw_mol_frame:=1;
+ MCd(.7,.7)( 1, 1)(^^30,Ph,4:/Cl,3:/F)
+endfont
+%***********************************************************************
+%%beginfont("EN:Switwch atom frame")
+%% sw_atom_frame:=1;
+%% MCf(^^30,Ph,4:/COOH,3:/OH)
+%%endfont
+%***********************************************************************
+beginfont("EN:Switwch Solid ratio")
+ MCd(.7,.7)( 0, 0)(^^30,Ph,4:/Cl,3:/F)
+ sw_solid:=1; ratio_bond_width:=0.08;
+ MCd(.7,.7)( 1, 1)(^^30,Ph,4:/Cl,3:/F)
+endfont
+%***********************************************************************
+beginfont("EN:Switwch Expand")
+ MCd(.6,.6)(0, 0)(^^30,Ph,4:/COOH,3:/NH2)
+ sw_expand:=1;
+ MCd(.6,.6)(1, 1)(^^30,Ph,4:/COOH,3:/NH2)
+endfont
+%***********************************************************************
+beginfont("EN:MCd()")
+ sw_font_frame:=1;
+ sw_mol_frame:=1;
+ MCd(1,.8)(0.2,0.9)(^^30,Ph,2:/OH,5:/NH2)
+ sw_mol_frame:=1;
+ MCd(1,.8)(0.8,0.1)(^^30,Ph,2:/OH,5:/NH2)
+endfont
+%***********************************************************************
+beginfont("EN:MCf()")
+ sw_font_frame:=1;
+ sw_mol_frame:=1;
+ MCf(^^30,Ph,2:/OH,5:/NH2)
+endfont
%***********************************************************************
bye