summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2016-10-15 22:51:08 +0000
committerKarl Berry <karl@freefriends.org>2016-10-15 22:51:08 +0000
commitbdca005b9c5b680e145fec55ef1186f1092a4639 (patch)
tree3f725fd0198f6c035b5916b15a6cac94726357d7 /Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
parent177eef25dd40b669810a53bb5c853ae7473ddbe1 (diff)
mcf2graph (15oct16)
git-svn-id: svn://tug.org/texlive/trunk@42264 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.mf95
1 files changed, 64 insertions, 31 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 be0c4751b1b..c87fb0ac718 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 2016.10.10
+% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2016.10.13
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
input mcf2graph.mf; %% it must be version 3.98 or later
%------------------------------------------------------------------------
@@ -11,10 +11,8 @@ sw_start_vector:=0;
%***********************************************************************
font_wd#:=35mm#;
font_ht#:=25mm#;
-margin_left_right:=2mm;
-\max_bond_length#:=10mm#;
-ratio_thickness_bond:=0.04;
-ratio_atom_bond:=0.5;
+bond_len#:=6mm#;
+sw_solid:=1;
%***********************************************************************
beginfont("EN:Glycine")
MCf(<30,NH2,!0,!,COOH)
@@ -98,8 +96,11 @@ endfont
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
font_wd#:=60mm#;
font_ht#:=35mm#;
+bond_len#:=8mm#;
+max_bond_length#:=10mm#;
ratio_thickness_bond:=0.015;
ratio_atom_bond:=0.36;
+sw_solid:=0;
sw_font_frame:=1;
margin_left_right:=2mm;
margin_top_bottom:=1mm;
@@ -158,14 +159,14 @@ beginfont("EN:branch1")
endfont
%***********************************************************************
beginfont("EN:branch2")
- font_ht#:=23mm#;
+ font_ht#:=20mm#;
margin_top_bottom:=2mm;
sw_clip:=1;
sw_numberA:=1;
numberA_end:=7;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
- MCf(<-30,!6,2\~dr,!,4\`1.5,!,6\^15,-60)
+ MCf(<-30,!6,2\~dr,!,4\`1.5,-90,6\^15,-60)
endfont
%***********************************************************************
beginfont("EN:Connect atom")
@@ -197,8 +198,8 @@ beginfont("EN:rotate 1")
endfont
%***********************************************************************
beginfont("EN:change bond 1")
- font_wd#:=70mm#;
- font_ht#:=15mm#;
+ font_ht#:=12mm#;
+ bond_len#:=8mm#;
sw_clip:=1;
ratio_chain_ring:=1;
margin_top_bottom:=3mm;
@@ -206,8 +207,8 @@ beginfont("EN:change bond 1")
endfont
%***********************************************************************
beginfont("EN:change bond 2")
- font_wd#:=70mm#;
- font_ht#:=15mm#;
+ font_ht#:=12mm#;
+ bond_len#:=8mm#;
margin_top_bottom:=3mm;
sw_clip:=1;
ratio_chain_ring:=1;
@@ -216,6 +217,7 @@ endfont
%***********************************************************************
beginfont("EN:change bond 3")
font_ht#:=12mm#;
+ bond_len#:=8mm#;
margin_top_bottom:=3mm;
sw_clip:=1;
ratio_chain_ring:=1;
@@ -223,14 +225,26 @@ beginfont("EN:change bond 3")
endfont
%***********************************************************************
beginfont("EN:change bond 3")
- font_wd#:=70mm#;
+ font_ht#:=12mm#;
+ bond_len#:=8mm#;
sw_clip:=1;
ratio_chain_ring:=1;
margin_top_bottom:=3mm;
- MCf(<30,!7,1=dt,3=wv,5=bd,7=bz)
+ MCf(<30,!3,1=dt,3=wv)
endfont
%***********************************************************************
beginfont("EN:change bond 4")
+ font_ht#:=12mm#;
+ bond_len#:=8mm#;
+ sw_clip:=1;
+ ratio_chain_ring:=1;
+ margin_top_bottom:=3mm;
+ MCf(<30,!3,1=bd,3=bz)
+endfont
+%***********************************************************************
+beginfont("EN:change bond 5")
+ font_ht#:=12mm#;
+ bond_len#:=8mm#;
margin_top_bottom:=3mm;
sw_clip:=1;
ratio_chain_ring:=1;
@@ -245,21 +259,23 @@ beginfont("EN:over line")
endfont
%***********************************************************************
beginfont("EN:change bond length1")
- font_ht#:=15mm#;
+ font_ht#:=12mm#;
sw_numberB:=1;
MCf(<30,!2,!2`1.2,!2)
endfont
%***********************************************************************
beginfont("EN:change bond length2")
- font_ht#:=15mm#;
+ font_ht#:=12mm#;
sw_numberB:=1;
MCf(<30,!2,``1.2,!4)
endfont
%***********************************************************************
beginfont("EN:change ring length")
- font_ht#:=25mm#;
+ margin_top_bottom:=2mm;
+ font_ht#:=15mm#;
sw_clip:=1;
- MCf(?6,4\,?6`1.2,5=?6,11=?6)
+ sw_numberB:=1;
+ MCf(?6,4\,?6`1.2)
endfont
%***********************************************************************
beginfont("EN:Insert atom")
@@ -315,6 +331,14 @@ beginfont("EN:fused ring")
MCf(<30,?6,3=?6,$(3)dt,$(7,8,9,10,11)bd)
endfont
%-----------------------------------------------------------------------
+beginfont("EN:change ring length")
+ margin_top_bottom:=2mm;
+ font_ht#:=25mm#;
+ sw_clip:=1;
+ sw_numberB:=1;
+ MCf(?6,4\,?6`1.2,5=?6,11=?6,$(14,15,16,17,18,19,20,21,22,23)bd,$(5,11)dt)
+endfont
+%-----------------------------------------------------------------------
beginfont("EN:fused large 6 ring")
font_ht#:=18mm#;
margin_top_bottom:=1.5mm;
@@ -373,9 +397,9 @@ beginfont("EN:substituent 1")
endfont
%***********************************************************************
beginfont("EN:substituent 2")
- font_ht#:=20mm#;
+ font_ht#:=15mm#;
sw_clip:=1;
- MCf(<30,!,//O,!,/*H,!,*/H,!,**?3,!)
+ MCf(<-30,!,//O,!2,/*H,!2,*/H,!2,**?3,!)
endfont
%***********************************************************************
beginfont("EN:substituent 3")
@@ -386,12 +410,12 @@ endfont
%***********************************************************************
beginfont("EN:substituent 3")
font_wd#:=70mm#;
- font_ht#:=22mm#;
+ font_ht#:=18mm#;
margin_top_bottom:=2mm;
sw_numberA:=1;
sw_clip:=1;
- numberA_end:=18;
- MCf(<-30,!17,2:/Me,4:/Et,6:/Pr,10:/iPr,14:/tBu,16:/Ph^-30)
+ numberA_end:=17;
+ MCf(<-30,!16,2:/Me,4:/Et,6:/Pr,10:/iPr,14:/tBu,16:/Ph^-60)
endfont
%***********************************************************************
beginfont("EN:substituent 4")
@@ -453,27 +477,36 @@ beginfont("EN:Change color")
endfont
%***********************************************************************
beginfont("EN:Make brock")
- font_ht#:=20mm#;
+ font_ht#:=8mm#;
sw_clip:=1;
sw_numberB:=1;
MCf(<30,!2,{,``1.2,!2,},!2)
endfont
%***********************************************************************
beginfont("EN:Chain start multi characters")
- font_ht#:=20mm#;
- MCd(1,1)( 0,1)(<30,COOH,!0,!5,COOH)
- MCd(.8,1)(.3,0)(<30,COOH,!6,COOH)
+ font_ht#:=9mm#;
+ sw_clip:=1;
+ sw_solid:=1;
+ MCf(<30,COOH,!0,!5,COOH)
+endfont;
+beginfont("EN:not good")
+ font_ht#:=9mm#;
+ margin_left_right:=5mm;
+ sw_solid:=1;
+ sw_clip:=1;
+ MCf(<30,COOH,!6,COOH)
endfont;
%***********************************************************************
beginfont("EN:User definition")
- font_ht#:=18mm#;
+ font_ht#:=15mm#;
+ sw_clip:=1;
iBuOH:='(!,/Me,!,OH);
MCf(<30,?6,@(4,6)/iBuOH)
endfont
%***********************************************************************
beginfont("EN:Inline definition")
- font_ht#:=18mm#;
- margin_left_right:=5mm;
+ font_ht#:=15mm#;
+ margin_left_right:=2mm;
sw_clip:=1;
MCf(<30,!3,/'(!,/Me,!,OH),!3)
endfont
@@ -711,7 +744,7 @@ endfont
beginfont("EN:Switwch atom frame")
font_ht#:=15mm#;
sw_atom_frame:=1;
- MCf(<30,Ph,4:/COOH,3:/OH)
+ MCf(<30,Ph,1:/Cl,4:/COOH,3:/OH)
endfont
%***********************************************************************
beginfont("EN:Switwch clipping")
@@ -761,7 +794,7 @@ endfont
%***********************************************************************
sw_clip:=1;
%% Output molecular infomation
-beginfont()
+beginfont("EN:Caffeine","FM:C8H10N4O2","MW:194.19")
font_ht#:=15mm#;
sw_logout:=sw_info_weight:=sw_info_formula:=1;
MCf(<30,?6,-4=?5,$(3,8)dl,