diff options
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.mf | 95 |
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, |