From 95dec31453912288d44f35f5966477d4e2e396e3 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 22 Sep 2015 22:26:55 +0000 Subject: mcf2graph (22sep15) git-svn-id: svn://tug.org/texlive/trunk@38437 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/metapost/mcf2graph/README | 3 +- .../doc/metapost/mcf2graph/mcf_exa_soc.mf | 560 ++++++++------------- .../doc/metapost/mcf2graph/mcf_example.pdf | Bin 259852 -> 259727 bytes .../doc/metapost/mcf2graph/mcf_example.tex | 4 +- .../doc/metapost/mcf2graph/mcf_man_soc.mf | 226 ++++----- .../doc/metapost/mcf2graph/mcf_manual.pdf | Bin 320618 -> 320475 bytes .../doc/metapost/mcf2graph/mcf_manual.tex | 243 +++++---- .../doc/metapost/mcf2graph/mcf_mplib_exa.pdf | Bin 120725 -> 120512 bytes .../doc/metapost/mcf2graph/mcf_mplib_exa.tex | 24 +- Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf | 8 +- 10 files changed, 453 insertions(+), 615 deletions(-) (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/README b/Master/texmf-dist/doc/metapost/mcf2graph/README index d568907530c..43c8eec5d55 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/README +++ b/Master/texmf-dist/doc/metapost/mcf2graph/README @@ -1,7 +1,7 @@ ******************************************************************************** mcf2graph : Convert Molecular Coding Format to graphics with Metafont/Metapost Author : Akira Yamaji - version : 3.71 2015-09-18 + version : 3.72 2015-09-22 E-mail : akira.yamaji5@gmail.com Located at : http://mirror.ctan.org/pkg/graphics/mcf2graph Home page : http://molecoding.cocolog-nifty.com/blog/ @@ -120,3 +120,4 @@ update MCF syntax manual ver. 3.70 / 2015-09-16 add new command | ,change syntax of !,!!,?,?? ver. 3.71 / 2015-09-18 delete command !!,?? + ver. 3.72 / 2015-09-22 change command ^^ to < and delete ^^ diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf index db19da23bfd..33cd18a7067 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format for mcf_example.tex by Akira Yamaji 2015.9.16 +% Molecular Coding Format for mcf_example.tex by Akira Yamaji 2015.9.22 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% input mcf2graph.mf; %------------------------------------------------------------------------- @@ -17,552 +17,396 @@ sw_start_vector:=0; %%%%sw_info_weight:=1; %%%%sw_checklist:=1; %%%%sw_MOLfile:=1; -%********************************************************************** +%**************************************************************************** beginfont("EN:Acetamiprid") - MCf(^^30, - Ph,4\,!,NH,!,!~dr,N,!,CN - ) + MCf(<30,Ph,4\,!,NH,!,!~dr,N,!,CN) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Imidacloprid") - MCf(^^30, - Ph,1:N,6:/Cl,3\,!,|,?5,1:N,3:NH,2\\,!,NO2 - ) + MCf(<30,Ph,1:N,6:/Cl,3\,!,|,?5,1:N,3:NH,2\\,!,NO2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Ethofenprox") - MCf(^^30, - Ph,5\,!,|,Ph,3\,O,!3,/Me^35,/Me^-35,!,|,Ph,4:/OEt - ) + MCf(<30,Ph,5\,!,|,Ph,3\,O,!3,/Me^35,/Me^-35,!,|,Ph,4:/OEt) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Thiamethoxam") - MCf(^^30, - ?6,@(4,6)N,2:O,6:/Me,5\\,!,NO2,4\,!,|,?5,$(1,3)d,3:N,5:S,4:/Cl - ) + MCf(<30,?6,@(4,6)N,2:O,6:/Me,5\\,!,NO2,4\,!,|,?5,$(1,3)d,3:N,5:S,4:/Cl) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Tebufenozide") - MCf(^^30, - Ph,6:/Et,3\,//O,!,NH,!,N,/tBu,!,//O,!,|,Ph,@(3,5)/Me - ) + MCf(<30,Ph,6:/Et,3\,//O,!,NH,!,N,/tBu,!,//O,!,|,Ph,@(3,5)/Me) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Pyridaphenthion") - MCf(^^-30, - !2,O,!,P,//S,/OEt^160>rl,!,O,!,|,?6,$(1,5)dl,@(2,3)N,4://O,3:/Ph - ) + MCf(<-30,!2,O,!,P,//S,/OEt^160>rl,!,O,!,|,?6,$(1,5)dl,@(2,3)N,4://O,3:/Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Fenitrothion") - MCf(^^30, - !,O,!,P,//S,/OMe^160,!,O,!,|,Ph,3:/Me,4:/NO2 - ) + MCf(<30,!,O,!,P,//S,/OMe^160,!,O,!,|,Ph,3:/Me,4:/NO2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Permethrin") - MCf(^^-30, - ?3,2^-35:*/Me,2^35:/*Me,1\,!~dl,/Cl,!,Cl, - 3\,//O,!,O,!2,|,Ph,3\,O,-60,Ph - ) + MCf(<-30,?3,2^-35:*/Me,2^35:/*Me,1\,!~dl,/Cl,!,Cl, + 3\,//O,!,O,!2,|,Ph,3\,O,-60,Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Bensultap") - MCf(^^30, - Ph,4\,SOO,!,S,!2,N,/Me,!2,S,!,SOO,!,Ph - ) + MCf(<30,Ph,4\,SOO,!,S,!2,N,/Me,!2,S,!,SOO,!,Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Azoxystorbin") - MCf(^^30, - Ph,2:/OH,3\,O,!,|,Ph,@(4,6)N,3\,O,!,|,Ph,2\,/OMe,!,//O,!,O,! - ) + MCf(<30,Ph,2:/OH,3\,O,!,|,Ph,@(4,6)N,3\,O,!,|,Ph,2\,/OMe,!,//O,!,O,!) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Isoprothiolane") - MCf(^^30, - !,/Me,!,O,!,//O,|,!2,//O,!,O,!,/Me,!,2\\,|,?5,@(2,5)S - ) + MCf(<30,!,/Me,!,O,!,//O,|,!2,//O,!,O,!,/Me,!,2\\,|,?5,@(2,5)S) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Iprodion") - MCf(^^18, - ?5,@(3,5)N,2://O,5\,!,NHiPr,3\,|,Ph,@(3,5)/Cl - ) + MCf(<18,?5,@(3,5)N,2://O,5\,!,NHiPr,3\,|,Ph,@(3,5)/Cl) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Etridiazole") - MCf(^^18, - ?5,$(1,3)dl,@(2,4)N,5:S,1:/OEt,3:/CCl3 - ) + MCf(<18,?5,$(1,3)dl,@(2,4)N,5:S,1:/OEt,3:/CCl3) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Oxine-Copper") - MCf( - Ph,4:N,5=Ph,-4\,O,-60,^^90,Cu,-90,O,60,|,Ph,5=Ph,4:N, - #4*,&(#12)~vf,#23*,&(#12)~vf - ) + MCf(Ph,4:N,5=Ph,-4\,O,-60,<90,Cu,-90,O,60,|,Ph,5=Ph,4:N, + #4*,&(#12)~vf,#23*,&(#12)~vf) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Captan") - MCf(^^12, - ?6,6=dl,3=?5,2:N,@(7,9)//O,8\,S,!,CCl3 - ) + MCf(<12,?6,6=dl,3=?5,2:N,@(7,9)//O,8\,S,!,CCl3) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Chlorothalonil") - MCf(^^30, - Ph,@(1,2,4,6)/Cl,@(3,5)/CN - ) + MCf(<30,Ph,@(1,2,4,6)/Cl,@(3,5)/CN) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Tetraconazole") - MCf(^^-6, - ?5,$(2,5)d,@(1,2,4)N,4\,!3,O,!,/F^35,/F^-35,!,CF2,#7\,|,Ph,@(4,6)/Cl - ) + MCf(<-6, + ?5,$(2,5)d,@(1,2,4)N,4\,!3,O,!,/F^35,/F^-35,!,CF2,#7\,|,Ph,@(4,6)/Cl) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Endosulfan"); - MCf(^^30, - ?6`1.3,3=?7,2*,210~wf`1.45,&5~wb,6=d, - @(1,2,5,6,12^-210,12^-150)/Cl,@(8,10)O,9:S,9://O - ) + MCf(<30,?6`1.3,3=?7,2*,210~wf`1.45,&5~wb,6=d, + @(1,2,5,6,12^-210,12^-150)/Cl,@(8,10)O,9:S,9://O) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Flutolanil") - MCf(^^30, - Ph,2:/CF3,3\,//O,!,NH,!,|,Ph,6:/OiPr - ) + MCf(<30,Ph,2:/CF3,3\,//O,!,NH,!,|,Ph,6:/OiPr) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Propiconazole") - MCf(^^-6, - ?5,$(2,5)d,@(1,3,4)N,4\,!2,|,Ph,@(4,6)/Cl,#7\,|,?5,@(2,5)O,3:/Bu^24 - ) + MCf(<-6,?5,$(2,5)d,@(1,3,4)N,4\,!2,|,Ph,@(4,6)/Cl,#7\,|,?5,@(2,5)O,3:/Bu^24) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Pencycuron") - MCf(^^30, - Ph,6:/Cl,3\,!,N,/?6,!,//O,!,NH,!,Ph - ) + MCf(<30,Ph,6:/Cl,3\,!,N,/?6,!,//O,!,NH,!,Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Asulam") - MCf(^^30, - Ph,6:/NH2,3\,SOO,!,NH,!,//O,!,O,! - ) + MCf(<30,Ph,6:/NH2,3\,SOO,!,NH,!,//O,!,O,!) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Oxadixyl") - MCf(^^30, - Ph,@(1,3)/Cl,4\,|,?5,2=dl,@(1,2)N,4:O,5://O,-3:/tBu,#6\,O,!2,!~tm - ) + MCf(<30,Ph,@(1,3)/Cl,4\,|,?5,2=dl,@(1,2)N,4:O,5://O,-3:/tBu,#6\,O,!2,!~tm) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Oxaziclomefone") - MCf(^^30, - ?6,4:N,2:O,1:/Me,5://O,6:/Ph,4\,/Me^35,/Me^-35,!,|,Ph,@(3,5)/Cl - ) + MCf(<30,?6,4:N,2:O,1:/Me,5://O,6:/Ph,4\,/Me^35,/Me^-35,!,|,Ph,@(3,5)/Cl) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Cafenstrole") - MCf(^^30, - Ph,@(2,4,6)/Me,3\,SOO,!,|,?5,$(2,5)d,@(2,4,5)N,4\,!,N,/Me,!2 - ) + MCf(<30,Ph,@(2,4,6)/Me,3\,SOO,!,|,?5,$(2,5)d,@(2,4,5)N,4\,!,N,/Me,!2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Cyclosulfamuron") - MCf(^^30, - Ph,5\,//O,!,?3,4\,NH,!,SOO,!,NH,!,//O,!,NH,!,|,Ph,@(2,6)N,@(3,5)/OMe - ) + MCf(<30, + Ph,5\,//O,!,?3,4\,NH,!,SOO,!,NH,!,//O,!,NH,!,|,Ph,@(2,6)N,@(3,5)/OMe) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Napropamide") - MCf(^^-30, - Ph,3=Ph,10\,O,!,/Me^35,/Me^-35,!,//O,!,N,/Et,! - ) + MCf(<-30,Ph,3=Ph,10\,O,!,/Me^35,/Me^-35,!,//O,!,N,/Et,!) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Pyributicarb") - MCf(^^30, - Ph,5:/tBu,3\,//O,!,S,!,N,/Me,!,|,Ph,@(5,6)/Me,3:/OMe - ) + MCf(<30,Ph,5:/tBu,3\,//O,!,S,!,N,/Me,!,|,Ph,@(5,6)/Me,3:/OMe) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Propyzamide") - MCf(^^30, - Ph,@(1,5)/Cl,3\,//O,!,NH,!,/Me^35,/Me^-35,!,!~tm - ) + MCf(<30,Ph,@(1,5)/Cl,3\,//O,!,NH,!,/Me^35,/Me^-35,!,!~tm) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Pendimethalin") - MCf(^^30, - Ph,@(1,2)/Me,6:/Cl,@(3,5)/NO2,4\,NH,!,/Et,!2 - ) + MCf(<30,Ph,@(1,2)/Me,6:/Cl,@(3,5)/NO2,4\,NH,!,/Et,!2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Benfluralin") - MCf(^^30, - Ph,@(1,3)/NO2,5:/CF3,2\,N,/Et,!4 - ) + MCf(<30,Ph,@(1,3)/NO2,5:/CF3,2\,N,/Et,!4) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Trinexapac-ethyl") - MCf(^^30, - ?6,@(2,4)//O,6:/COOEt,3\\,/OH,!,|,?3 - ) + MCf(<30,?6,@(2,4)//O,6:/COOEt,3\\,/OH,!,?3) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Buprofezin") - MCf(^^-30, - ?6,@(1,5)N,3:S,6://O,5:/tBu,4\\,N,!,tBu,1:/Ph - ) + MCf(<-30,?6,@(1,5)N,3:S,6://O,5:/tBu,4\\,N,!,tBu,1:/Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Tricyclazole") - MCf(^^30, - Ph,2:/Me,|,-4=?5,1:N,3:S,|,-3=?5,$(2,4)dl,@(2,3)N - ) + MCf(<30,Ph,2:/Me,|,-4=?5,1:N,3:S,|,-3=?5,$(2,4)dl,@(2,3)N) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Phthalide") - MCf(^^30, - Ph,@(1,2,5,6)/Cl,|,-4=?5,2:O,3://O - ) + MCf(<30,Ph,@(1,2,5,6)/Cl,|,-4=?5,2:O,3://O) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Probenazole") - MCf(^^12, - Ph,|,-4=?5,1:SOO,2:N,3\,O,!2,!~dr - ) + MCf(<12,Ph,|,-4=?5,1:SOO,2:N,3\,O,!2,!~dr) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Esprocarb") - MCf(^^30, - Ph,3\,!,S,!,//O,!,N,/Et,!,/iPr,! - ) + MCf(<30,Ph,3\,!,S,!,//O,!,N,/Et,!,/iPr,!) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Simetryn") - MCf(^^30, - Ph,@(2,4,6)N,5:/SMe,@(1,3)/NHEt - ) + MCf(<30,Ph,@(2,4,6)N,5:/SMe,@(1,3)/NHEt) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Bromobutide") - MCf(^^30, - Ph,3\,!,NH,!,//O,!,/Br,!,/Me^35,/Me^-35,!,tBu - ) + MCf(<30,Ph,3\,!,NH,!,//O,!,/Br,!,/Me^35,/Me^-35,!,tBu) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Mefenacet") - MCf(^^0, - Ph,|,-4=?5,3=d,3:N,1:S,2\,O,!2,//O,!,N,/Me,!,Ph - ) + MCf(<0,Ph,|,-4=?5,3=d,3:N,1:S,2\,O,!2,//O,!,N,/Me,!,Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Rifampicin") - MCf(^^30, + MCf(<30, Ph,6:/Me^30,5:/OH,|,-6=?5,1:O,3://O,2:/*Me^60,|,#3=?6,@(2,4)d,@(1,4)/OH, {,``1,-2\,NH,60,//O,-60,/Me,60~dl,60,60~dl,-60, */Me,60,/*OH,-60,/*Me,60,/*OH,60,*/Me^30,-60, 60,/*Me^30,-53,/*OMe,66,-53~dl,66`1.2,O,},&(#8), - #11\,!~dr,N,!,|,?6,@(1,4)N,4:/Me - ) + #11\,!~dr,N,!,|,?6,@(1,4)N,4:/Me) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Wortmanin") - MCf(^^30, - ?6,$(-4,-2)?6,-4=?5,(2,7)=?5[3], + MCf(<30,?6,$(-4,-2)?6,-4=?5,(2,7)=?5[3], 6:O,1://O,$(7,10)dl,8://O,17://O,-3=d,-1:O, @(4,12)*/Me^60,11:/*H^-60, - #5\*,60,O,!,#14\*^-25,//O,!,O,! - ) + #5\*,60,O,!,#14\*^-25,//O,!,O,!) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Ampicillin") - MCf(^^45, - ?4,-3=?5,2:N,7:S, + MCf(<45,?4,-3=?5,2:N,7:S, @(3^45,4^-45)/*H,1://O^15,5:/*COOH^-18,@(6^35,6^-35)/Me, - ,4\^75,NH,!,//O,!,NH,!,Ph, - ) + ,4\^75,NH,!,//O,!,NH,!,Ph) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Validamycin") - MCf(^^30, - ?6,@(5,6)/OH,3\,-60,OH, - #4\,O,-60,|,?6,2:O,@(3,4,5,6)/OH, - #1\,NH,!,|,?6,2=d,@(4,5,6)/OH,-4\,!,OH - ) + MCf(<30,?6,@(5,6)/OH,3\,-60,OH, + #4\,O,-60,|,?6,2:O,@(3,4,5,6)/OH, + #1\,NH,!,|,?6,2=d,@(4,5,6)/OH,-4\,!,OH) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Oceltamivir") - MCf(^^30, - ?6,3=dl,1:/NH2,3:/COOEt,6:/NHCOMe,5\~zf,O,!,/Et,!2 - ) + MCf(<30,?6,3=dl,1:/NH2,3:/COOEt,6:/NHCOMe,5\~zf,O,!,/Et,!2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Etyprostontromethamine") - MCf(^^0, - ?5,@(2,5)/*OH, - #3*\^6,!~dl,!3,O,0,Ph,#8*,|,?5,@(1,4)O,#4\*^-6,!,30~dl,30,!3,COOH - ) + MCf(?5,@(2,5)/*OH, + #3*\^6,!~dl,!3,O,0,Ph,#8*,|,?5,@(1,4)O,#4\*^-6,!,30~dl,30,!3,COOH) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Chlorophyll a") -MCf(^^54, - {,``1,?5,$(2,5)dl,4:N,3\,54~dl,|,?5,$(2,4)dl,5:N, +MCf(<54,{,``1,?5,$(2,5)dl,4:N,3\,54~dl,|,?5,$(2,4)dl,5:N, -2\,54~dl,|,?5,2=d,5:N,-2\~dl,54,|,?5,5=d,5:N,-2\~dl,&(#5), -1*,24,/*COOMe^15,72,//O,&(#1),}, @(2,9,15,20~zf)/Me,8:/Et,14\,!~dr, #4\`1.45,Mg,&17,-1*,&11~vb,-1*,&23~vb, - #21*,-6~wf,!2,//O,!,O,!2,!~dl,|,!13,@(1,5,9,13)/Me - ) + #21*,-6~wf,!2,//O,!,O,!2,!~dl,|,!13,@(1,5,9,13)/Me) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Gibberellin A3"); - MCf(^^12, - ?6`1.3,3=?5,9=?7,12\^160`1.6,&8, + 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, 5=dl,11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me, - @(3^-60,9^60)*/H - ) + @(3^-60,9^60)*/H) endfont; -%********************************************************************** +%************************************************************************** beginfont("EN:Cholesterol") - MCf(^^30, - ?6,$(-4,-2)?6,-4=?5,7=dl, + MCf(<30,?6,$(-4,-2)?6,-4=?5,7=dl, 1:*/OH,@(4,12)*/Me^60, - 10:/*H^180,@(11,-1)/*H^-60,9:*/H^60, - -1\^17,/*Me,!4,/Me,! - ) + 10:/*H^180,@(11,-1)/*H^-60,9:*/H^60,-1\^17,/*Me,!4,/Me,!) endfont -%*********************************************************************** +%******************************************************************************* beginfont("EN:Lycorine") - MCf(^^30, - Ph,-4=?6,-2=?6,6=?5,(9,12)=?5[3],13=dl,8:N,@(15,17)O, - 9:/*H^180,10:*/H^60,13:*/OH,14:/*OH - ) + MCf(<30,Ph,-4=?6,-2=?6,6=?5,(9,12)=?5[3],13=dl,8:N,@(15,17)O, + 9:/*H^180,10:*/H^60,13:*/OH,14:/*OH) endfont -%*********************************************************************** +%******************************************************************************* beginfont("EN:Tetrodotoxine") - MCf({,``1,^^60,-90,60,-30`1.15,150,60,&(#1),#3*,-135,60,-30`1.15,150,&(#4), + MCf({,``1,<60,-90,60,-30`1.15,150,60,&(#1),#3*,-135,60,-30`1.15,150,&(#4), #10\,O,60`1.33,60,&(#3)~ov,#8*,-15~ov,O,&(#12),},#9*,45,-60,OH,1^120://NH, - @(5~zf^-15,7,9^-75,12,13~zf)/OH,@(2,6^180)NH - ) + @(5~zf^-15,7,9^-75,12,13~zf)/OH,@(2,6^180)NH) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:beta-Carotene") - MCf(^^30, - ?6,3=dl,@(3,5^35,5^-35)/Me, + MCf(<30,?6,3=dl,@(3,5^35,5^-35)/Me, 4\,|,!18,$(1,3,5,7,9,11,13,15,17)dr,@(3,7,12,16)/Me, - |,?6,6=dl,@(6,2^35,2^-35)/Me - ) + |,?6,6=dl,@(6,2^35,2^-35)/Me) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:alfa-Tocopherol") - MCf(^^30, - Ph,3=?6,7:O,@(1,2,5)/Me,8:/*Me^60,6:/OH, - 8\,|,!12,@(4,8)/*Me,12:/Me - ) + MCf(<30,Ph,3=?6,7:O,@(1,2,5)/Me,8:/*Me^60,6:/OH,8\,|,!12,@(4,8)/*Me,12:/Me) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Qercetin") - MCf(^^30, - Ph,3=?6,9\,Ph,9=dl,10:O,7://O,@(2,6,8,13,14)/OH - ) + MCf(<30,Ph,3=?6,9\,Ph,9=dl,10:O,7://O,@(2,6,8,13,14)/OH) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Limonin") - MCf(^^30, + MCf(<30, ?6,$(-3,-4)?6,-5=?3,-2=wf,-1=wb,6=?5,-4=?6,-5=wf, @(13,15,17,20)O,@(3,12,21)//O, @(4~wf^60,8~zf^60,18^35,18^-35)/Me,@(1^60,5^180,16^60)/*H, - 14\*,|,?5,$(1,4)dl,3:O - ) + 14\*,|,?5,$(1,4)dl,3:O) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Cromolyn") - MCf(^^30, - Ph,|,-1=?6,3=dl,1:O,4://O,2:/COOH, - #2\,O,!2,/OH,!2,O,60,Ph,|,-5=?6,3=dl,4:O,1://O,3:/COOH - ) + MCf(<30,Ph,|,-1=?6,3=dl,1:O,4://O,2:/COOH, + #2\,O,!2,/OH,!2,O,60,Ph,|,-5=?6,3=dl,4:O,1://O,3:/COOH) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Emetine") - MCf(^^30, - Ph,$(-4,-4)?6,8:N,@(1,6)/OMe,-2:/*Et,@(7^-60,12^-60)/*H, - -3\,!~zb,^^-60,|,?6,5=d,2:NH,-6^-60:*/H,|,-2=?6,$(2,4)dl - ) + MCf(<30,Ph,$(-4,-4)?6,8:N,@(1,6)/OMe,-2:/*Et,@(7^-60,12^-60)/*H, + -3\,!~zb,<-60,|,?6,5=d,2:NH,-6^-60:*/H,|,-2=?6,$(2,4)dl) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Colchicine") - MCf(^^30, - Ph,@(1,2,6)/OMe,|,-4=?7,|,-5=?7,$(-1,-4,-6)dl,-2://O,-3:/OMe, - #9\,NH,!,//O,! - ) + MCf(<30,Ph,@(1,2,6)/OMe,|,-4=?7,|,-5=?7,$(-1,-4,-6)dl,-2://O,-3:/OMe, + #9\,NH,!,//O,!) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Caffeine") - MCf(^^30, - ?6,3=d,@(2,6)N,@(2,6)/Me,@(1,5)//O,|,-4=?5,2=dl,@(1,3)N,3:/Me - ) + MCf(<30,?6,3=d,@(2,6)N,@(2,6)/Me,@(1,5)//O,|,-4=?5,2=dl,@(1,3)N,3:/Me) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Acronycine") - MCf(^^30, - Ph,|,-4=?6,1:N,4://O,,1:/Me,-3=Ph2,-1:/OMe, - |,-4=?6,2=d,4:O,-2^-35:/Me,-2^35:/Me - ) + MCf(<30,Ph,|,-4=?6,1:N,4://O,,1:/Me,-3=Ph2,-1:/OMe, + |,-4=?6,2=d,4:O,-2^-35:/Me,-2^35:/Me) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Ibotenic acid") - MCf(^^18, - ?5,4=d,3:O,2:NH,1://O,4\^-24,/NH2,!,COOH - ) + MCf(<18,?5,4=d,3:O,2:NH,1://O,4\^-24,/NH2,!,COOH) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Piperine") - MCf(^^30, - Ph,|,-1=?5,@(1,3)O,#4\,!~dr,!,!~dr,!,//O,!,|,?6,1:N - ) + MCf(<30,Ph,|,-1=?5,@(1,3)O,#4\,!~dr,!,!~dr,!,//O,!,|,?6,1:N) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Febrifugine") - MCf(^^30, - Ph,|,-4=?6,2=d,@(1,3)N,4://O,#9\,!,//O,!,!~zf,|,?6,2:NH,-1:*/OH - ) + MCf(<30,Ph,|,-4=?6,2=d,@(1,3)N,4://O,#9\,!,//O,!,!~zf,|,?6,2:NH,-1:*/OH) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Mitomycine C") - MCf(^^30, - ?6,$(3,6)dl,@(2,5)//O,1:/Me,|,-4=?5,1:N, - #6:/NH2,|,-3=?5,|,-2=?3,-1=wb,-2=wf,-1:NH, - #8:/*OMe^35,#9\`1^17.9,!,O,!,//O,!,NH2 - ) + MCf(<30,?6,$(3,6)dl,@(2,5)//O,1:/Me,|,-4=?5,1:N, + #6:/NH2,|,-3=?5,|,-2=?3,-1=wb,-2=wf,-1:NH, + #8:/*OMe^35,#9\`1^17.9,!,O,!,//O,!,NH2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Podophyllotoxin"); -MCf(^^0, - ?5,@(2,5)O,-3=Ph2,-3=?6,-3=?5,-2:O,-1=wb,-3://O, - 10\*,Ph,@(-2,-3,-4)/OMe,#13:/*OH,@(#11~wf^-60,#12~zf^60)/H -) + MCf(<0,?5,@(2,5)O,-3=Ph2,-3=?6,-3=?5,-2:O,-1=wb,-3://O, + 10\*,Ph,@(-2,-3,-4)/OMe,#13:/*OH,@(#11~wf^-60,#12~zf^60)/H) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Warfarin"); -MCf(^^30, - Ph,3=?6,10:O,7:/OH,9://O,8\,/Ph`1,60,!,//O,! -) + MCf(<30,Ph,3=?6,10:O,7:/OH,9://O,8\,/Ph`1,60,!,//O,!) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Genistein"); -MCf(^^30, - Ph,3=?6,10:O,@(2,6)/OH,9://O,8\,Ph,-3:/OH -) + MCf(<30,Ph,3=?6,10:O,@(2,6)/OH,9://O,8\,Ph,-3:/OH) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Baicalein"); -MCf(^^30, - Ph,3=?6,10:O,@(1,2,6)/OH,9://O,8\,Ph -) + MCf(<30,Ph,3=?6,10:O,@(1,2,6)/OH,9://O,8\,Ph) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Baicalein"); -MCf(^^30, - Ph,3=?6,9=d,10:O,@(1,2,6)/OH,7://O,-2\,Ph - ) + MCf(<30,Ph,3=?6,9=d,10:O,@(1,2,6)/OH,7://O,-2\,Ph) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Reserpine"); -MCf(^^30, - Ph,-4=?5,-2=?6,-4=?6,-3=?6,9=dl,11:N,7:NH,10:*/H^-60, - @(15^-60,16^60)/*H, - #20*\,O,!,//O,!,|,Ph,@(-2,-3,-4)/OMe,@(#1,#19~zf>rl)/OMe, - #18*\,//O,!,O,! - ) + MCf(<30,Ph,-4=?5,-2=?6,-4=?6,-3=?6,9=dl,11:N,7:NH,10:*/H^-60, + @(15^-60,16^60)/*H, + #20*\,O,!,//O,!,|,Ph,@(-2,-3,-4)/OMe,@(#1,#19~zf>rl)/OMe, + #18*\,//O,!,O,!) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Rotenone"); -MCf(^^-60, - ?5,$(-3,-2,-3,-4)?6,$(7,9,-2,-4)dl,$(3,17)dr, + MCf(<-60,?5,$(-3,-2,-3,-4)?6,$(7,9,-2,-4)dl,$(3,17)dr, @(2,13,16)O,10://O,@(11^-60,12^60)*/H, - @(-2,-3)/OMe,1*\,/Me,!~dl -) + @(-2,-3)/OMe,1*\,/Me,!~dl) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Pyrethrin I"); -MCf(^^30, - ?3,@(3^35~wf,3^-35~zf)/Me,1*\,!~dl,iPr, + MCf(<30,?3,@(3^35~wf,3^-35~zf)/Me,1*\,!~dl,iPr, 2\*,//O,!,O,-36~zb,|,?5,-2=d,-1:/Me,-3://O, - -2\,!4,$(-1,-3)dl -) + -2\,!4,$(-1,-3)dl) endfont; -%*********************************************************************** +%*************************************************************************** beginfont("EN:Erythromycin"); -MCf(^^30, - {,``1,^^-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,},&1, - 14:O,13:/*Et,@(1,9)//O,@(2,10)*/Me,@(4,6^-35,8,12^35)/*Me, - @(6^35,11,12^-35)*/OH, - #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/OMe, - #5\*^30`1.7,O,!,|,?6`.7,6:O,5:/Me,2:/OH,3:/NMeMe -) +MCf(<30,{,``1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,},&1, + 14:O,13:/*Et,@(1,9)//O,@(2,10)*/Me,@(4,6^-35,8,12^35)/*Me, + @(6^35,11,12^-35)*/OH, + #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/OMe, + #5\*^30`1.7,O,!,|,?6`.7,6:O,5:/Me,2:/OH,3:/NMeMe) endfont; -%********************************************************************** +%************************************************************************** beginfont("EN:Paclitaxel") - MCf(^^0, + MCf(<0, {,?6,5=d,3*,{,``1,36,45,45,45,45,},&(#5),#9=?6,-4=?4,},-1=wb,-3=wf,-1:O, @(4^35,4^-35,6)/Me,@(3^-60,15)*/OH,8:/*H^-60,9:*/Me^60,10://O, #1\,O,!,//O,!,*/OH,!,/Ph,60~wf,NH,-60,//O,60,Ph, #7\*,O,-45,//O,60,Ph, #11*\,O,-60,//O,60, - #12\*^-15,O,60,//O,-60 - ) + #12\*^-15,O,60,//O,-60) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Mevastatin") - MCf(^^30, - ?6,2=d,4:*/H^60,|,-4=?6,2=dl,9:*/Me, + MCf(<30,?6,2=d,4:*/H^60,|,-4=?6,2=dl,9:*/Me, #10*\,!,60~wb,|,?6,6:O,-2://O,-4:/*OH, - #5\*,O,60,//O,!,*/Me,!2 - ) + #5\*,O,60,//O,!,*/Me,!2) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Sesamine") - MCf(^^54, - ?5,1=?5,@(4,7)O,@(1^-54,2^54)*/H, + MCf(<54,?5,1=?5,@(4,7)O,@(1^-54,2^54)*/H, #5*\^-12,Ph,|,-3=?5,@(-1,-3)O, - #8*\^-12,Ph,|,-3=?5,@(-1,-3)O - ) + #8*\^-12,Ph,|,-3=?5,@(-1,-3)O) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Morphine") - MCf(^^30, - Ph,2=?6,-4=?6,(#1,#12)=?5[2],-1:O,-1=zb, + MCf(<30,Ph,2=?6,-4=?6,(#1,#12)=?5[2],-1:O,-1=zb, 7*,60~wf`0.75,70~ov`1.3,45,N,/Me,&9~wb, - 15=d,6:/OH,8^180:*/H,12:/*OH - ) + 15=d,6:/OH,8^180:*/H,12:/*OH) endfont -%********************************************************************** +%************************************************************************** beginfont("EN:Capsaicin") - MCf(^^30, - Ph,1:/OH,6:/OMe,4\,!,NH,!,//O,|,!8,-3=dr,-1:/Me - ) + MCf(<30,Ph,1:/OH,6:/OMe,4\,!,NH,!,//O,|,!8,-3=dr,-1:/Me) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Quinine") - MCf(^^30, - Ph,3=Ph,7:N,6:/OMe, + MCf(<30,Ph,3=Ph,7:N,6:/OMe, 10\,*/OH,/H~zf^-60,!, - |,?6,2:N,1:*/H^60,4*\,!~dr,2*,165~zf,60,&5~zb - ) + |,?6,2:N,1:*/H^60,4*\,!~dr,2*,165~zf,60,&5~zb) endfont -%*********************************************************************** +%*************************************************************************** beginfont("EN:Atoropin") - MCf(^^-30, - O,!,//O,!,!,Ph, + MCf(<-30,O,!,//O,!,!,Ph, #1\~zb^-120,|,?7`1.1,6*\^190`1.25,N,/Me,&3~wb, - #3\~wv,!,OH - ) + #3\~wv,!,OH) endfont -%*********************************************************************** +%*************************************************************************** bye diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf index 1c133333f09..f15f560006a 100644 Binary files a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf and b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf differ diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex index 47fcaef4e81..15330417346 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2015.9.18 +% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2015.9.22 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass[a4paper]{article} \usepackage{graphicx} @@ -57,7 +57,7 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \begin{document} {\hspace{20mm} \LARGE\bf Molecular Coding Format examples \hspace{10mm} }% -{\footnotesize\bf by Akira Yamaji 2015.9.18} \vspace{5mm}\\ +{\footnotesize\bf by Akira Yamaji 2015.9.22} \vspace{5mm}\\ \fontnum=1% \noindent% %------------------------------------------------------------------------ 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 24c657db875..1c11e5806b6 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf @@ -18,7 +18,7 @@ beginfont("EN:Chain") max_bond_width:=0.20; ratio_chain_ring:=1; sw_start_vector:=1; - MCf(^^30,-60,60,-60,60,-60,60) + MCf(<30,-60,60,-60,60,-60,60) endfont %*********************************************************************** beginfont("EN:Chain") @@ -26,7 +26,7 @@ beginfont("EN:Chain") max_bond_width:=0.20; ratio_chain_ring:=1; sw_start_vector:=1; - MCf(^^30,!,!,!,!,!,!) + MCf(<30,!,!,!,!,!,!) endfont %*********************************************************************** beginfont("EN:ring") @@ -37,45 +37,45 @@ endfont %*********************************************************************** beginfont("EN:rotate 1") sw_start_vector:=1; - MCf(^^30,!4,^^30,?6) + MCf(<30,!4,<30,?6) endfont %*********************************************************************** beginfont("EN:change bond 1") ratio_chain_ring:=1; - MCf(^^30,!~dm,!~dl,!~dr,!~wf,!~wb,!~zf,!~zb) + MCf(<30,!~dm,!~dl,!~dr,!~wf,!~wb,!~zf,!~zb) endfont %*********************************************************************** beginfont("EN:change bond 2") ratio_chain_ring:=1; - MCf(^^30,!9,1=vf,2=vb,3=tm,4=dt,5=wv,@(7~bd^-45`2,9~ov^45`2)/Me) + MCf(<30,!9,1=vf,2=vb,3=tm,4=dt,5=wv,@(7~bd^-45`2,9~ov^45`2)/Me) endfont %*********************************************************************** beginfont("EN:change bond length1") sw_start_vector:=1; sw_numberB:=1; - MCf(^^30,!2,!2`1.2,!2) + MCf(<30,!2,!2`1.2,!2) endfont %*********************************************************************** beginfont("EN:change bond length2") sw_start_vector:=1; sw_numberB:=1; - MCf(^^30,!2,``1.2,!4) + MCf(<30,!2,``1.2,!4) endfont %*********************************************************************** beginfont("EN:change bond length3") sw_start_vector:=1; - MCf(^^30,?6,3\,|,?6`1.2,4=?6) + MCf(<30,?6,3\,|,?6`1.2,4=?6) endfont %*********************************************************************** beginfont("EN:change atom 1") sw_start_vector:=1; - MCf(^^30,!2,O,!2) + MCf(<30,!2,O,!2) endfont %*********************************************************************** beginfont("EN:change atom 2") - MCd(1,1)(.5,.8)(^^30,!6,2:O,@(3,5)N) + MCd(1,1)(.5,.8)(<30,!6,2:O,@(3,5)N) sw_numberA:=1; - MCd(1,1)(.5,.2)(^^30,!6,2:O,@(3,5)N) + MCd(1,1)(.5,.2)(<30,!6,2:O,@(3,5)N) endfont %*********************************************************************** beginfont("EN:change atom 3") @@ -107,21 +107,21 @@ beginfont("EN:fused ring 1") sw_start_vector:=1; sw_numberB:=1; numberB_end:=6; - MCf(^^30,?6,3=?5) + MCf(<30,?6,3=?5) endfont %*********************************************************************** beginfont("EN:fused ring 1") sw_start_vector:=1; sw_numberB:=1; - MCf(^^30,?6,$(-3,-4,-4,-2,-2,-4,-4)?6) + MCf(<30,?6,$(-3,-4,-4,-2,-2,-4,-4)?6) endfont %*********************************************************************** beginfont("EN:fused ring 2") sw_numberB:=1; numberB_end:=11; - MCd(1,.7)( 0,0)(^^30,?6,$(3)?6,(11,4)=?6[4]) - MCd(1,.6)(.5,1)(^^30,?6,$(3)?6,(11,4)=?5[3]) - MCd(1,.6)(1, 0)(^^30,?6,$(3)?6,(11,4)=?4[2]) + MCd(1,.7)( 0,0)(<30,?6,3=?6,(11,4)=?6[4]) + MCd(1,.6)(.5,1)(<30,?6,3=?6,(11,4)=?5[3]) + MCd(1,.6)(1, 0)(<30,?6,3=?6,(11,4)=?4[2]) endfont %*********************************************************************** beginfont("EN:fused ring 3") @@ -130,58 +130,58 @@ beginfont("EN:fused ring 3") MCd(1,.55)(0,0)(?6,$(3,10)?6,(16,4)=?6[3]) MCd(1,.55)(.43,1)(?6,$(3,10)?6,(16,4)=?5[2]) numberB_end:=21; - MCd(1,.53)(1,0)(^^30,?6,$(2,10,15)?6,(21,3)=?6[2]) + MCd(1,.53)(1,0)(<30,?6,$(2,10,15)?6,(21,3)=?6[2]) endfont %*********************************************************************** beginfont("EN:Spiro ring ") sw_numberA:=1; numberA_end:=7; ratio_chain_ring:=1; - MCf(^^30,!6,4*,?5) + MCf(<30,!6,4*,?5) endfont %*********************************************************************** beginfont("EN:branch") sw_numberA:=1; max_bond_width:=0.30; ratio_chain_ring:=1; - MCf(^^-30,!8,2\,!,4*\,!,6\*,!,8\\,!) + MCf(<-30,!8,2\,!,4*\,!,6\*,!,8\\,!) endfont %*********************************************************************** beginfont("EN:branch3") sw_numberA:=1; max_bond_width:=0.30; ratio_chain_ring:=1; - MCf(^^-30,!6,2\~dr,!,4\`1.5,!,6\^15,-60) + MCf(<-30,!6,2\~dr,!,4\`1.5,!,6\^15,-60) endfont %*********************************************************************** beginfont("EN:substituent 1") - MCf(^^30,!,/Me,!,/Et,!3,/Pr,!,/iPr,!3,/tBu,!,/Ph^-30,!) + MCf(<30,!,/Me,!,/Et,!3,/Pr,!,/iPr,!3,/tBu,!,/Ph^-30,!) endfont %*********************************************************************** beginfont("EN:substituent 2") sw_start_vector:=1; - MCf(^^30,!,//O,!,/*H,!,*/H,!,/?3,!,**?3,!) + MCf(<30,!,//O,!,/*H,!,*/H,!,/?3,!,**?3,!) endfont %*********************************************************************** beginfont("EN:substituent 3") sw_start_vector:=1; - MCf(^^30,!`1,/Me~zf`2^30,!`1,/Me~zf`2^30,!2`1,*/Pr>lr,!2`1,*/Pr>rl,!`1) + MCf(<30,!`1,/Me~zf`2^30,!`1,/Me~zf`2^30,!2`1,*/Pr>lr,!2`1,*/Pr>rl,!`1) endfont %*********************************************************************** beginfont("EN:substituent 3") sw_numberA:=1; numberA_end:=_skeletonA_end; - MCf(^^30,!11,2:/Me,3:/Et,6:/Pr,7:/iPr,10:/tBu,11:/Ph^-30) + MCf(<30,!11,2:/Me,3:/Et,6:/Pr,7:/iPr,10:/tBu,11:/Ph^-30) endfont %*********************************************************************** beginfont("EN:substituent 4") sw_numberA:=1; numberA_end:=_skeletonA_end; - MCf(^^30,?6,@(3`2^30,3~wf,4~zf,6~wf^-30,6~zf^30)/H) + MCf(<30,?6,@(3`2^30,3~wf,4~zf,6~wf^-30,6~zf^30)/H) endfont %*********************************************************************** beginfont("EN:substituent 5") sw_numberA:=1; numberA_end:=_skeletonA_end; - MCf(^^30,!7`1,@(2,3)/*Me`2^30,5:*/Pr>lr,7:*/Pr>rl) + MCf(<30,!7`1,@(2,3)/*Me`2^30,5:*/Pr>lr,7:*/Pr>rl) endfont %*********************************************************************** beginfont("EN:chain strech direction mode 1") @@ -195,7 +195,7 @@ endfont beginfont("EN:chain strech direction mode 2") ratio_chain_ring:=1; MCf( - ^^30,!6,@(3^-30,3,3^30)/'(!,!,!,"{>lr}")>lr, + <30,!6,@(3^-30,3,3^30)/'(!,!,!,"{>lr}")>lr, @(5^-30,5,5^30)/'(!,!,!,"{>rl}")>rl ) endfont @@ -203,40 +203,40 @@ endfont beginfont("EN:chain strech direction mode 3") ratio_chain_ring:=1; sw_start_vector:=1; - MCf(^^-30,!6,@(6>45)/'(!3,"{>45}"), + MCf(<-30,!6,@(6>45)/'(!3,"{>45}"), @(3>'(90,-90,90))/'(!,!,!,"{>'(90,-90,90)}") ) endfont %*********************************************************************** beginfont("EN:change atom and substituent") sw_start_vector:=1; - MCf(^^30,!3,NH,!,SOO,!3) + MCf(<30,!3,NH,!,SOO,!3) endfont %*********************************************************************** beginfont("EN:Change color") sw_start_vector:=1; - MCf(^^30,Ph,@(2,5)N,2:red,5:blue,3=green) + MCf(<30,Ph,@(2,5)N,2:red,5:blue,3=green) endfont %*********************************************************************** beginfont("EN:Chain start multi characters") % sw_start_vector:=1; - MCd(1,1)(0,.9)(^^30,COOH,!0,!3,COOH) - MCd(.8,1)(.3,.1)(^^30,COOH,!4,COOH) + MCd(1,1)(0,.9)(<30,COOH,!0,!3,COOH) + MCd(.8,1)(.3,.1)(<30,COOH,!4,COOH) endfont %*********************************************************************** beginfont("EN:User definition") sw_start_vector:=1; iBuOH:='(!,/Me,!,OH); - MCf(^^30,?6,@(4,6)/iBuOH) + MCf(<30,?6,@(4,6)/iBuOH) endfont %*********************************************************************** beginfont("EN:Inline definition") sw_start_vector:=1; - MCf(^^30,!3,/'(!,/Me,!,OH),!3) + MCf(<30,!3,/'(!,/Me,!,OH),!3) endfont %*********************************************************************** beginfont("EN:Ampicillin") - MCf(^^45, + MCf(<45, ?4,2:N,2=?5,-1:S, @(3^45,4^-45)/*H,1://O^15,5:/*COOH^-18,@(6^35,6^-35)/Me, 4\^75,NH,!,//O,!,NH,!,Ph @@ -245,7 +245,7 @@ endfont %*********************************************************************** beginfont("EN:Cholesterol") MCf( - ^^30,?6,$(-4,-2)?6,-4=?5,7=dl, + <30,?6,$(-4,-2)?6,-4=?5,7=dl, 1:*/OH,@(4,12)*/Me^60,9:*/H^60, 10:/*H^180,@(11,-1)/*H^-60, -1\^17,/*Me,!4,/Me,!, @@ -253,20 +253,20 @@ beginfont("EN:Cholesterol") endfont %*********************************************************************** beginfont("EN:alfa-Tocopherol") - MCf(^^30, + MCf(<30, Ph,3=?6,7:O,@(1,2,5)/Me,8:/*Me^60,6:/OH, 8\,|,!12,@(4,8)/*Me,12:/Me ) endfont %*********************************************************************** beginfont("EN:Caffeine") - MCf(^^30, + MCf(<30, ?6,-4=?5,$(3,8)dl,@(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O ) endfont %*********************************************************************** beginfont("EN:Lycorine") - MCf(^^30, + MCf(<30, Ph,-4=?6,-2=?6,6=?5,(9,12)=?5[3],13=dl,8:N,@(15,17)O, 9:/*H^180,10:*/H^60,13:*/OH,14:/*OH ) @@ -274,7 +274,7 @@ endfont %*********************************************************************** beginfont("EN:Gibberellin A3"); MCf( - ^^12,?6`1.3,3=?5,9=?7,12\^160`1.6,&8, + <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, 5=dl,11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me, @(3^-60,9^60)*/H @@ -285,7 +285,7 @@ beginfont("EN:Font size") font_wd#:=30mm#;% font_ht#:=20mm#;% sw_font_frame:=1; - MCf(^^30, + MCf(<30, ?6,-4=?5,$(3,8)dl,@(2,6,7,9)N, @(2,6,9)/Me,@(1,5)//O) endfont @@ -293,220 +293,220 @@ endfont beginfont("EN:max_bond_width") sw_mol_frame:=1; max_bond_width:=0.10; - MCd(1,1)(0, .5)(^^30,Ph) + MCd(1,1)(0, .5)(<30,Ph) max_bond_width:=0.15; - MCd(1,1)(.33, .5)(^^30,Ph) + MCd(1,1)(.33, .5)(<30,Ph) max_bond_width:=0.30; - MCd(1,1)(1, .5)(^^30,Ph) + MCd(1,1)(1, .5)(<30,Ph) endfont %*********************************************************************** beginfont("EN:ratio_thickness_bond") ratio_thickness_bond:=0.005; - MCd(1,.6)(0, .5)(^^30,Ph) + MCd(1,.6)(0, .5)(<30,Ph) ratio_thickness_bond:=0.015; - MCd(1,.6)(.5, .5)(^^30,Ph) + MCd(1,.6)(.5, .5)(<30,Ph) ratio_thickness_bond:=0.03; - MCd(1,.6)(1, .5)(^^30,Ph) + MCd(1,.6)(1, .5)(<30,Ph) endfont %*********************************************************************** beginfont("EN:offset_thickness") - offset_thickness#:=0.0pt#; MCd(1,.3)(.1,0.5)(^^30,Ph) endfont -beginfont() offset_thickness#:=0.2pt#; MCd(1,.3)(.5,0.5)(^^30,Ph) endfont -beginfont() offset_thickness#:=0.5pt#; MCd(1,.3)(.9,0.5)(^^30,Ph) endfont + offset_thickness#:=0.0pt#; MCd(1,.3)(.1,0.5)(<30,Ph) endfont +beginfont() offset_thickness#:=0.2pt#; MCd(1,.3)(.5,0.5)(<30,Ph) endfont +beginfont() offset_thickness#:=0.5pt#; MCd(1,.3)(.9,0.5)(<30,Ph) endfont %*********************************************************************** beginfont("EN:ratio_char_bond") ratio_char_bond:=1.0; - MCd(1,.6)(0, .5)(^^30,?6,5:O,2:NH) + MCd(1,.6)(0, .5)(<30,?6,5:O,2:NH) ratio_char_bond:=1.5; - MCd(1,.6)(.5, .5)(^^30,?6,5:O,2:NH) + MCd(1,.6)(.5, .5)(<30,?6,5:O,2:NH) ratio_char_bond:=2.0; - MCd(1,.6)(1, .5)(^^30,?6,5:O,2:NH) + MCd(1,.6)(1, .5)(<30,?6,5:O,2:NH) endfont %*********************************************************************** beginfont("EN:ratio_bondgap_bond") ratio_bondgap_bond:=0.10; - MCd(1,.6)(0, .5)(^^30,Ph) + MCd(1,.6)(0, .5)(<30,Ph) ratio_bondgap_bond:=0.15; - MCd(1,.6)(.5, .5)(^^30,Ph) + MCd(1,.6)(.5, .5)(<30,Ph) ratio_bondgap_bond:=0.20; - MCd(1,.6)(1, .5)(^^30,Ph) + MCd(1,.6)(1, .5)(<30,Ph) endfont %*********************************************************************** beginfont("EN:offset_bond_gap") offset_bond_gap#:=0.0pt#; -MCd(1,.3)(.1, .5)(^^30,Ph) endfont +MCd(1,.3)(.1, .5)(<30,Ph) endfont beginfont() offset_bond_gap#:=0.3pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,Ph) endfont +MCd(1,.3)(.5, .5)(<30,Ph) endfont beginfont() offset_bond_gap#:=1.0pt#; -MCd(1,.3)(.9, .5)(^^30,Ph) endfont +MCd(1,.3)(.9, .5)(<30,Ph) endfont %*********************************************************************** beginfont("EN:ratio_atom_bond") ratio_atom_bond:=0.25; - MCd(1,.6)(0, .5)(^^30,?6,@(2,5)O) + MCd(1,.6)(0, .5)(<30,?6,@(2,5)O) ratio_atom_bond:=0.33; - MCd(1,.6)(.5, .5)(^^30,?6,@(2,5)O) + MCd(1,.6)(.5, .5)(<30,?6,@(2,5)O) ratio_atom_bond:=0.45; - MCd(1,.6)(1, .5)(^^30,?6,@(2,5)O) + MCd(1,.6)(1, .5)(<30,?6,@(2,5)O) endfont %*********************************************************************** beginfont("EN:offset_atom") offset_atom#:=0.0pt#; -MCd(1,.3)(.1, .5)(^^30,?6,@(2,5)O) endfont +MCd(1,.3)(.1, .5)(<30,?6,@(2,5)O) endfont beginfont() offset_atom#:=0.8pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,?6,@(2,5)O) endfont +MCd(1,.3)(.5, .5)(<30,?6,@(2,5)O) endfont beginfont() offset_atom#:=2.0pt#; -MCd(1,.3)(.9, .5)(^^30,?6,@(2,5)O) endfont +MCd(1,.3)(.9, .5)(<30,?6,@(2,5)O) endfont %*********************************************************************** beginfont("EN:ratio_wedge_bond") ratio_wedge_bond:=0.1; - MCd(1,.6)(0, .5)(^^30,?6,5:*/Me) + MCd(1,.6)(0, .5)(<30,?6,5:*/Me) ratio_wedge_bond:=0.12; - MCd(1,.6)(.5, .5)(^^30,?6,5:*/Me) + MCd(1,.6)(.5, .5)(<30,?6,5:*/Me) ratio_wedge_bond:=0.2;; - MCd(1,.6)(1, .5)(^^30,?6,5:*/Me) + MCd(1,.6)(1, .5)(<30,?6,5:*/Me) endfont %*********************************************************************** beginfont("EN:offset_wedge") offset_wedge#:=0.0pt#; -MCd(1,.3)(.1, .5)(^^30,?6,5:*/Me) endfont +MCd(1,.3)(.1, .5)(<30,?6,5:*/Me) endfont beginfont() offset_wedge#:=0.4pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,?6,5:*/Me) endfont +MCd(1,.3)(.5, .5)(<30,?6,5:*/Me) endfont beginfont() offset_wedge#:=1.0pt#; -MCd(1,.3)(.9, .5)(^^30,?6,5:*/Me) endfont +MCd(1,.3)(.9, .5)(<30,?6,5:*/Me) endfont %*********************************************************************** beginfont("EN:ratio_atomgap_atom") sw_atom_frame:=1; ratio_atomgap_atom:=0.00; - MCd(1,.6)(0, .5)(^^30,?6,@(2,5)O) + MCd(1,.6)(0, .5)(<30,?6,@(2,5)O) ratio_atomgap_atom:=0.050; - MCd(1,.6)(.5, .5)(^^30,?6,@(2,5)O) + MCd(1,.6)(.5, .5)(<30,?6,@(2,5)O) ratio_atomgap_atom:=0.12; - MCd(1,.6)(1, .5)(^^30,?6,@(2,5)O) + MCd(1,.6)(1, .5)(<30,?6,@(2,5)O) endfont %*********************************************************************** beginfont("EN:ratio_chain_ring") ratio_chain_ring:= 0.4; - MCd(1,.6)(0, .5)(^^30,?6,5:/Et) + MCd(1,.6)(0, .5)(<30,?6,5:/Et) ratio_chain_ring:= 0.66; - MCd(1,.6)(.5, .5)(^^30,?6,5:/Et) + MCd(1,.6)(.5, .5)(<30,?6,5:/Et) ratio_chain_ring:= 1; - MCd(1,.6)(1, .5)(^^30,?6,5:/Et) + MCd(1,.6)(1, .5)(<30,?6,5:/Et) endfont %*********************************************************************** beginfont("EN:ratio_zebragap_bond") ratio_zebragap_bond:=0.06; - MCd(1,.6)(0, .5)(^^30,Ph,5:/*Me`1) + MCd(1,.6)(0, .5)(<30,Ph,5:/*Me`1) ratio_zebragap_bond:=0.12; - MCd(1,.6)(.5, .5)(^^30,Ph,5:/*Me`1) + MCd(1,.6)(.5, .5)(<30,Ph,5:/*Me`1) ratio_zebragap_bond:=0.20; - MCd(1,.6)(1, .5)(^^30,Ph,5:/*Me`1) + MCd(1,.6)(1, .5)(<30,Ph,5:/*Me`1) endfont %*********************************************************************** beginfont("EN:margin_left_right") sw_font_frame:=sw_mol_frame:=1; margin_left_right:=0mm; - MCd(1,1)(0.5, .9)(^^30,CH3,!0,!17,CH3) + MCd(1,1)(0.5, .9)(<30,CH3,!0,!17,CH3) margin_left_right:=0.4mm; - MCd(1,1)(0.5, .5)(^^30,CH3,!0,!17,CH3) + MCd(1,1)(0.5, .5)(<30,CH3,!0,!17,CH3) margin_left_right:=5mm; - MCd(1,1)(0.5, .1)(^^30,CH3,!0,!17,CH3) + MCd(1,1)(0.5, .1)(<30,CH3,!0,!17,CH3) endfont %*********************************************************************** beginfont("EN:margin_top_bottom") sw_font_frame:=sw_mol_frame:=1; margin_top_bottom:=0mm; - MCd(1,1)(0.1, .5)(^^30,Ph,2:/OH,5:/NH2) + MCd(1,1)(0.1, .5)(<30,Ph,2:/OH,5:/NH2) margin_top_bottom:=0.4mm; - MCd(1,1)(0.5, .5)(^^30,Ph,2:/OH,5:/NH2) + MCd(1,1)(0.5, .5)(<30,Ph,2:/OH,5:/NH2) margin_top_bottom:=5mm; - MCd(1,1)(0.9, .5)(^^30,Ph,2:/OH,5:/NH2) + MCd(1,1)(0.9, .5)(<30,Ph,2:/OH,5:/NH2) endfont %*********************************************************************** beginfont("EN:Switwch start vector") sw_start_vector:=0; - MCd(1,.7)( 0, .5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.7)( 0, .5)(<30,Ph,4:/Cl,3:/F) sw_start_vector:=1; - MCd(1,.7)( 1, .5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.7)( 1, .5)(<30,Ph,4:/Cl,3:/F) endfont %*********************************************************************** beginfont("EN:Switwch numberingA") ratio_chain_ring:=1; numberA_start:=3; numberA_end:=8; - sw_numberA:=1; MCd(1,1)(.5,.9)(^^30,!9) - sw_numberA:=2; MCd(1,1)(.5,.5)(^^30,!9) - sw_numberA:=3; MCd(1,1)(.5,.1)(^^30,!9) + sw_numberA:=1; MCd(1,1)(.5,.9)(<30,!9) + sw_numberA:=2; MCd(1,1)(.5,.5)(<30,!9) + sw_numberA:=3; MCd(1,1)(.5,.1)(<30,!9) endfont %*********************************************************************** beginfont("EN:Switwch numberingB") ratio_chain_ring:=1; numberB_start:=3; numberB_end:=8; - sw_numberB:=1; MCd(1,1)(.5,.9)(^^30,!9) - sw_numberB:=2; MCd(1,1)(.5,.5)(^^30,!9) - sw_numberB:=3; MCd(1,1)(.5,.1)(^^30,!9) + sw_numberB:=1; MCd(1,1)(.5,.9)(<30,!9) + sw_numberB:=2; MCd(1,1)(.5,.5)(<30,!9) + sw_numberB:=3; MCd(1,1)(.5,.1)(<30,!9) endfont %*********************************************************************** beginfont("EN:Switwch font frame") sw_font_frame:=1; - MCf(^^30,Ph,4:/Cl,3:/F) + MCf(<30,Ph,4:/Cl,3:/F) endfont %*********************************************************************** beginfont("EN:Switwch molecular frame") - MCd(1,.7)( 0, .5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.7)( 0, .5)(<30,Ph,4:/Cl,3:/F) sw_mol_frame:=1; - MCd(1,.7)( 1, .5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.7)( 1, .5)(<30,Ph,4:/Cl,3:/F) endfont %*********************************************************************** beginfont("EN:Switwch atom frame") sw_atom_frame:=1; - MCf(^^30,Ph,4:/COOH,3:/OH) + MCf(<30,Ph,4:/COOH,3:/OH) endfont %*********************************************************************** beginfont("EN:Switwch Solid ratio") - MCd(1,.7)( 0, .5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.7)( 0, .5)(<30,Ph,4:/Cl,3:/F) sw_solid:=1; ratio_bond_width:=0.08; - MCd(1,.7)( 1, .5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.7)( 1, .5)(<30,Ph,4:/Cl,3:/F) endfont %*********************************************************************** beginfont("EN:Switwch Expand") - MCd(1,.6)(0, .5)(^^30,Ph,4:/COOH,3:/NH2) + MCd(1,.6)(0, .5)(<30,Ph,4:/COOH,3:/NH2) sw_expand:=1; - MCd(1,.6)(1, .5)(^^30,Ph,4:/COOH,3:/NH2) + MCd(1,.6)(1, .5)(<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) + 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) + 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) + MCf(<30,Ph,2:/OH,5:/NH2) endfont %*********************************************************************** beginfont("EN:Local setting") sw_mol_frame:=1; - MCd(1,.5)(0.0,0.5)(^^30,Ph,@(2)N) endfont -beginfont() MCd(1,.5)(0.5,0.5)(^^30,Ph,@(2,4)N) endfont -beginfont() MCd(1,.5)(1.0,0.5)(^^30,Ph,@(2,4,6)N) endfont + MCd(1,.5)(0.0,0.5)(<30,Ph,@(2)N) endfont +beginfont() MCd(1,.5)(0.5,0.5)(<30,Ph,@(2,4)N) endfont +beginfont() MCd(1,.5)(1.0,0.5)(<30,Ph,@(2,4,6)N) endfont %*********************************************************************** sw_mol_frame:=1; beginfont("EN:Global setting") - MCd(1,.5)(0.0,0.5)(^^30,Ph,@(2)N) endfont -beginfont() MCd(1,.5)(0.5,0.5)(^^30,Ph,@(2,4)N) endfont -beginfont() MCd(1,.5)(1.0,0.5)(^^30,Ph,@(2,4,6)N) endfont + MCd(1,.5)(0.0,0.5)(<30,Ph,@(2)N) endfont +beginfont() MCd(1,.5)(0.5,0.5)(<30,Ph,@(2,4)N) endfont +beginfont() MCd(1,.5)(1.0,0.5)(<30,Ph,@(2,4,6)N) endfont sw_mol_frame:=0; %*********************************************************************** %% Output molecular infomation beginfont() sw_logout:=sw_info_weight:=sw_info_formula:=1; -MCf(^^30,?6,-4=?5,$(3,8)dl,@(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O) +MCf(<30,?6,-4=?5,$(3,8)dl,@(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O) endfont %*********************************************************************** %% Output additional infomation beginfont("EN:Caffeine","CAS:58-08-2") sw_logout:=1; -MCf(^^30,?6,-4=?5,$(3,8)dl,@(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O) +MCf(<30,?6,-4=?5,$(3,8)dl,@(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O) endfont %*********************************************************************** bye diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf index 90c80a5b7a7..d8c64226e4c 100644 Binary files a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf and b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf differ diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex index ba72be66e32..46013f01487 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format manual by Akira Yamaji 2015.9.18 +% Molecular Coding Format manual by Akira Yamaji 2015.9.22 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass[a4paper]{article} \usepackage[dvipdfmx]{graphicx} @@ -34,7 +34,7 @@ \noindent% \begin{picture}(180,0) \put(20,9){{\LARGE\bf Molecular Coding Format manual}\hspace{10mm} - by Akira Yamaji 2015.9.18} + by Akira Yamaji 2015.9.22} \end{picture}\vspace{-4.2mm}\\ %---------------------------------------------------------------------------- \begin{minipage}[t][38mm]{100mm} @@ -43,7 +43,7 @@ plus(+):anticlockwize,minus(-)clockwize bold arrow is default angle and position - ^^30,-60,60,-60,60,-60,60 + <30,-60,60,-60,60,-60,60 \end{verbatim} \end{minipage} \MCFstructure @@ -70,7 +70,7 @@ six membered ring ?6 - ** ?6 : ^^-120,60,60,60,60,60,&1 + ** ?6 : <-120,60,60,60,60,60,&1 &1 : make bond connect to A1 \end{verbatim} @@ -81,9 +81,9 @@ six membered ring \begin{minipage}[t][38mm]{100mm} \MCFtitle{Rotate current angle} \begin{verbatim} -^^angle:rotate current angle + : change type,angle,length,enviroment of substituent -MCf(^^30,!`1,/Me~zf`2^30,!`1,/Me~zf`2^30, - !2`1,*/Pr>lr,!2`1,*/Pr>rl,!`1) +MCf(<30,!`1,/Me~zf`2^30,!`1,/Me~zf`2^30, + !2`1,*/Pr>lr,!2`1,*/Pr>rl,!`1) \end{verbatim} \end{minipage} @@ -360,7 +360,7 @@ MCf(^^30,!`1,/Me~zf`2^30,!`1,/Me~zf`2^30, \MCFtitle{Add substituent(1)} \begin{verbatim} sw_numberA:=1; numberA_end:=_skeletonA_end; -mcf(^^30,!11, +MCf(<30,!11, 2:/Me,3:/Et,6:/Pr,7:/iPr,10:/tBu,11:/Ph^-30) ** _skeletonA_end : @@ -376,8 +376,7 @@ mcf(^^30,!11, ~,^,`,> : change type,angle,length,enviroment of substituent -sw_numberA:=1; numberA_end:=_skeletonA_end; -MCf(^^30,?6, +MCf(<30,?6, @(3`2^30,3~wf,4~zf,6~wf^-30,6~zf^30)/H) \end{verbatim} \end{minipage} @@ -390,8 +389,7 @@ MCf(^^30,?6, ~,^,`,> : change type,angle,length,enviroment of substituent -sw_numberA:=1; numberA_end:=_skeletonA_end; -MCF(^^30,!7`1, +MCF(<30,!7`1, @(2,3)/*Me`2^30,5:*/Pr>lr,7:*/Pr>rl) \end{verbatim} \end{minipage} @@ -419,7 +417,7 @@ MCF(^^30,!7`1, >lr : left-right enviroment >rl : right-left enviroment - ^^30,!6, + <30,!6, @(3^-30,3,3^30)/'(!3,"{>lr}")>lr, @(5^-30,5,5^30)/'(!3,"{>rl}")>rl @@ -431,10 +429,10 @@ MCF(^^30,!7`1, \begin{minipage}[t][38mm]{100mm} \MCFtitle{Chain strech direction environment (3)} \begin{verbatim} ->45 : fixed angle enviroment ->'(-90,90,-90) : multi angle enviroment + >45 : fixed angle enviroment + >'(-90,90,-90) : multi angle enviroment - ^^-30,!6,@(2>45)/'(!3,"{>45}"), + <-30,!6,@(2>45)/'(!3,"{>45}"), @(6>'(-90,90,-90))/'(!2,"{>(-90,90,-90)}") \end{verbatim} \end{minipage} @@ -447,7 +445,7 @@ MCF(^^30,!7`1, NH,SOO : inset hetero atom and substituent simultaneously - ^^30,!3,NH,!,SOO,!3 + <30,!3,NH,!,SOO,!3 \end{verbatim} \end{minipage} @@ -460,7 +458,7 @@ NH,SOO : inset hetero atom and substituent @(5)green : change color of A5 green $(3)red : change color of B3 red - ^^30,Ph,@(2,5)N, + <30,Ph,@(2,5)N, 2:red,5:blue,3=green \end{verbatim} @@ -478,9 +476,9 @@ $(3)red : change color of B3 red if chain start multi charactor string, use !0 instead of ! - MCd( 1,1)(0 ,0.9)(^^30,COOH,!0,!3,COOH) + MCd( 1,1)(0 ,0.9)(<30,COOH,!0,!3,COOH) - MCd(.8,1)(0.3,0.1)(^^30,COOH,!4,COOH) + MCd(.8,1)(0.3,0.1)(<30,COOH,!4,COOH) \end{verbatim} \end{minipage} \MCFstructure @@ -492,7 +490,7 @@ use !0 instead of ! iBuOH : user defined substructure iBuOH:='(!,/Me,!,OH) - MCf(^^30,?6,@(4,6)/iBuOH) + MCf(<30,?6,@(4,6)/iBuOH) \end{verbatim} \end{minipage} @@ -504,7 +502,7 @@ iBuOH : user defined substructure \begin{verbatim} Insert user defined substructure - ^^30,!3,/'(!,/Me,!,OH),!3 + <30,!3,/'(!,/Me,!,OH),!3 \end{verbatim} \end{minipage} @@ -515,8 +513,7 @@ Insert user defined substructure \MCFtitle{Example(1) Ampicillin} \begin{verbatim} - ^^45, - ?4,2:N,2=?5,-1:S, + <45,?4,2:N,2=?5,-1:S, @(3^45,4^-45)/*H,1://O^15, 5:/*COOH^-18,@(6^35,6^-35)/Me, 4\^75,NH,!,//O,!,NH,!,Ph @@ -529,8 +526,7 @@ Insert user defined substructure \MCFtitle{Example(2) Cholesterol} \begin{verbatim} - ^^30, - ?6,$(-4,-2)?6,-4=?5,7=dl, + <30,?6,$(-4,-2)?6,-4=?5,7=dl, 1:*/OH,@(4,12)*/Me^60,9:*/H^60, 10:/*H^180,@(11,-1)/*H^-60, -1\^17,/*Me,!4,/Me,!, @@ -543,8 +539,7 @@ Insert user defined substructure \MCFtitle{Example(3) alfa-Tocopherol} \begin{verbatim} - ^^30, - Ph,3=?6, + <30,Ph,3=?6, 7:O,@(1,2,5)/Me,8:/*Me^60,6:/OH, 8\,|,!12,@(4,8)/*Me,12:/Me \end{verbatim} @@ -556,9 +551,9 @@ Insert user defined substructure \MCFtitle{Example(4) Caffeine} \begin{verbatim} - ^^30, - ?6,-4=?5,$(3,8)dl,@(2,6,7,9)N, - @(2,6,9)/Me,@(1,5)//O + <30,?6,-4=?5,$(3,8)dl, + @(2,6,7,9)N,@(2,6,9)/Me, + @(1,5)//O \end{verbatim} \end{minipage} \MCFstructure @@ -568,8 +563,7 @@ Insert user defined substructure \MCFtitle{Example(5) Lycorine} \begin{verbatim} - ^^30, - Ph,-4=?6,-2=?6,6=?5,(9,12)=?5[3], + <30,Ph,-4=?6,-2=?6,6=?5,(9,12)=?5[3], 13=dl,8:N,@(15,17)O, 9:/*H^180,10:*/H^60,13:*/OH,14:/*OH \end{verbatim} @@ -581,8 +575,7 @@ Insert user defined substructure \MCFtitle{Example(6) Gibberellin} \begin{verbatim} - ^^12, - ?6`1.3,3=?5,9=?7,12\^160`1.6,&8, + <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, 5=dl,11=wf,13=wb,7:/COOH,11://Me,1:*/OH, 12:/*OH,2:*/Me,@(3^-60,9^60)*/H @@ -598,7 +591,7 @@ Insert user defined substructure font_wd#:=30mm#; %<==font width font_ht#:=20mm#; %<==font height sw_font_frame:=1; - MCf(^^30,?6,-4=?5,$(3,8)dl,@(2,6,7,9)N, + MCf(<30,?6,-4=?5,$(3,8)dl,@(2,6,7,9)N, @(2,6,9)/Me,@(1,5)//O) endfont \end{verbatim} @@ -610,11 +603,11 @@ Insert user defined substructure \MCFtitle{Max ratio bond/width length} \begin{verbatim} max_bond_width:=0.10; - MCd(1,1)(0, .5)(^^30,Ph) + MCd(1,1)( 0, .5)(<30,Ph) max_bond_width:=0.15; %<<== default - MCd(1,1)(.33, .5)(^^30,Ph) + MCd(1,1)(.33,.5)(<30,Ph) max_bond_width:=0.30; - MCd(1,1)(1, .5)(^^30,Ph) + MCd(1,1)( 1, .5)(<30,Ph) \end{verbatim} \end{minipage} \MCFstructure @@ -624,11 +617,11 @@ Insert user defined substructure \MCFtitle{Ratio thickness/bond length} \begin{verbatim} ratio_thickness_bond:= 0.005; -MCd(1,.6)(0, .5)(^^30,Ph) +MCd(1,.6)(0, .5)(<30,Ph) ratio_thickness_bond:= 0.015; %<<== default -MCd(1,.6)(.5, .5)(^^30,Ph) +MCd(1,.6)(.5,.5)(<30,Ph) ratio_thickness_bond:= 0.030; -MCd(1,.6)(1, .5)(^^30,Ph) +MCd(1,.6)(1, .5)(<30,Ph) \end{verbatim} \end{minipage} \MCFstructure @@ -638,11 +631,11 @@ MCd(1,.6)(1, .5)(^^30,Ph) \MCFtitle{Offset thickness of bond} \begin{verbatim} beginfont() offset_thickness#:=0pt#; -MCd(1,.3)(0, .5)(^^30,Ph) endfont +MCd(1,.3)(0, .5)(<30,Ph) endfont beginfont() offset_thickness#:=0.2pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,Ph) endfont +MCd(1,.3)(.5,.5)(<30,Ph) endfont beginfont() offset_thickness#:=0.5pt#; -MCd(1,.3)(1, .5)(^^30,Ph) endfont +MCd(1,.3)(1, .5)(<30,Ph) endfont \end{verbatim} \end{minipage} \MCFstru\MCFstru\MCFstructure% @@ -652,11 +645,11 @@ MCd(1,.3)(1, .5)(^^30,Ph) endfont \MCFtitle{Ratio char/bond thickness} \begin{verbatim} ratio_char_bond:=1.0; -MCd(1,.6)(0, .5)(^^30,?6,5:O,2:NH) +MCd(1,.6)(0, .5)(<30,?6,5:O,2:NH) ratio_char_bond:=1.5; %<<== default -MCd(1,.6)(.5, .5)(^^30,?6,5:O,2:NH) +MCd(1,.6)(.5,.5)(<30,?6,5:O,2:NH) ratio_char_bond:=2.0; -MCd(1,.6)(1, .5)(^^30,?6,5:O,2:NH) +MCd(1,.6)(1, .5)(<30,?6,5:O,2:NH) \end{verbatim} \end{minipage} \MCFstructure @@ -666,11 +659,11 @@ MCd(1,.6)(1, .5)(^^30,?6,5:O,2:NH) \MCFtitle{Ratio bondgap/bond length} \begin{verbatim} ratio_bondgap_bond:= 0.10; -MCd(1,.6)(0, .5)(^^30,Ph) +MCd(1,.6)(0, .5)(<30,Ph) ratio_bondgap_bond:= 0.15; %<<== default -MCd(1,.6)(.5, .5)(^^30,Ph) +MCd(1,.6)(.5,.5)(<30,Ph) ratio_bondgap_bond:= 0.20; -MCd(1,.6)(1, .5)(^^30,Ph) +MCd(1,.6)(1, .5)(<30,Ph) \end{verbatim} \end{minipage} \MCFstructure @@ -680,11 +673,11 @@ MCd(1,.6)(1, .5)(^^30,Ph) \MCFtitle{Offset of doublebond gap} \begin{verbatim} beginfont() offset_bond_gap#:=0.0pt#; -MCd(1,.3)(0, .5)(^^30,Ph) endfont +MCd(1,.3)(0, .5)(<30,Ph) endfont beginfont() offset_bond_gap#:=0.3pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,Ph) endfont +MCd(1,.3)(.5,.5)(<30,Ph) endfont beginfont() offset_bond_gap#:=1.0pt#; -MCd(1,.3)(1, .5)(^^30,Ph) endfont +MCd(1,.3)(1, .5)(<30,Ph) endfont \end{verbatim} \end{minipage} \MCFstru\MCFstru\MCFstructure% @@ -694,11 +687,11 @@ MCd(1,.3)(1, .5)(^^30,Ph) endfont \MCFtitle{Ratio atom/bond length} \begin{verbatim} ratio_atom_bond:= 0.25; -MCd(1,.6)(0, .5)(^^30,?6,@(2,5)O) +MCd(1,.6)(0, .5)(<30,?6,@(2,5)O) ratio_atom_bond:= 0.36; %<<== default -MCd(1,.6)(.5, .5)(^^30,?6,@(2,5)O) +MCd(1,.6)(.5,.5)(<30,?6,@(2,5)O) ratio_atom_bond:= 0.45; -MCd(1,.6)(1, .5)(^^30,?6,@(2,5)O) +MCd(1,.6)(1, .5)(<30,?6,@(2,5)O) \end{verbatim} \end{minipage} \MCFstructure @@ -708,11 +701,11 @@ MCd(1,.6)(1, .5)(^^30,?6,@(2,5)O) \MCFtitle{Offset of atom width} \begin{verbatim} beginfont() offset_atom#:=0.0pt#; -MCd(1,.3)(0, .5)(^^30,Ph,@(2,4,6)N) endfont +MCd(1,.3)(0, .5)(<30,Ph,@(2,4,6)N) endfont beginfont() offset_atom#:=0.8pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,Ph,@(2,4,6)N) endfont +MCd(1,.3)(.5,.5)(<30,Ph,@(2,4,6)N) endfont beginfont() offset_atom#:=2.0pt#; -MCd(1,.3)(1, .5)(^^30,Ph,@(2,4,6)N) endfont +MCd(1,.3)(1, .5)(<30,Ph,@(2,4,6)N) endfont \end{verbatim} \end{minipage} \MCFstru\MCFstru\MCFstructure% @@ -722,11 +715,11 @@ MCd(1,.3)(1, .5)(^^30,Ph,@(2,4,6)N) endfont \MCFtitle{Ratio wedge/bond length} \begin{verbatim} ratio_wedge_bond:=0.10; -MCd(1,.6)(0, .5)(^^30,?6,5:*/Me) +MCd(1,.6)(0, .5)(<30,?6,5:*/Me) ratio_wedge_bond:=0.12; %<<== default -MCd(1,.6)(.5, .5)(^^30,?6,5:*/Me) +MCd(1,.6)(.5,.5)(<30,?6,5:*/Me) ratio_wedge_bond:=0.20;; -MCd(1,.6)(1, .5)(^^30,?6,5:*/Me) +MCd(1,.6)(1, .5)(<30,?6,5:*/Me) \end{verbatim} \end{minipage} \MCFstructure @@ -737,11 +730,11 @@ MCd(1,.6)(1, .5)(^^30,?6,5:*/Me) \begin{verbatim} beginfont("EN:Offset_wedge") offset_wedge#:=0.0pt#; -MCd(1,.3)(0, .5)(^^30,?6,5:*/Me) endfont +MCd(1,.3)(0, .5)(<30,?6,5:*/Me) endfont beginfont() offset_wedge#:=0.4pt#; %<<== default -MCd(1,.3)(.5, .5)(^^30,?6,5:*/Me) endfont +MCd(1,.3)(.5,.5)(<30,?6,5:*/Me) endfont beginfont() offset_wedge#:=1.0pt#; -MCd(1,.3)(1, .5)(^^30,?6,5:*/Me) endfont +MCd(1,.3)(1, .5)(<30,?6,5:*/Me) endfont \end{verbatim} \end{minipage} \MCFstru\MCFstru\MCFstructure% @@ -751,11 +744,11 @@ MCd(1,.3)(1, .5)(^^30,?6,5:*/Me) endfont \MCFtitle{Ratio font atom gap/atom length} \begin{verbatim} ratio_atomgap_atom:=0.0; -MCd(1,.6)(0, .5)(^^30,?6,@(2,5)O) +MCd(1,.6)(0, .5)(<30,?6,@(2,5)O) ratio_atomgap_atom:=0.050; %<<== default -MCd(1,.6)(.5, .5)(^^30,?6,@(2,5)O) +MCd(1,.6)(.5,.5)(<30,?6,@(2,5)O) ratio_atomgap_atom:=0.12; -MCd(1,.6)(1, .5)(^^30,?6,@(2,5)O) +MCd(1,.6)(1, .5)(<30,?6,@(2,5)O) \end{verbatim} \end{minipage} \MCFstructure @@ -765,11 +758,11 @@ MCd(1,.6)(1, .5)(^^30,?6,@(2,5)O) \MCFtitle{Ratio chain/ring length} \begin{verbatim} ratio_chain_ring:= 0.4; -MCd(1,.6)(0, .5)(^^30,?6,5:/Et) +MCd(1,.6)(0, .5)(<30,?6,5:/Et) ratio_chain_ring:= 0.66; %<<== default -MCd(1,.6)(.5, .5)(^^30,?6,5:/Et) +MCd(1,.6)(.5,.5)(<30,?6,5:/Et) ratio_chain_ring:= 1.0; -MCd(1,.6)(1, .5)(^^30,?6,5:/Et) +MCd(1,.6)(1, .5)(<30,?6,5:/Et) \end{verbatim} \end{minipage} \MCFstructure @@ -779,11 +772,11 @@ MCd(1,.6)(1, .5)(^^30,?6,5:/Et) \MCFtitle{Ratio zebra gap/bond length} \begin{verbatim} ratio_zebragap_bond:=0.06; -MCd(1,.6)(0, .5)(^^30,Ph,5:/*Me`1) +MCd(1,.6)(0, .5)(<30,Ph,5:/*Me`1) ratio_zebragap_bond:=0.12; %<<== default -MCd(1,.6)(.5, .5)(^^30,Ph,5:/*Me`1) +MCd(1,.6)(.5,.5)(<30,Ph,5:/*Me`1) ratio_zebragap_bond:=0.20; -MCd(1,.6)(1, .5)(^^30,Ph,5:/*Me`1) +MCd(1,.6)(1, .5)(<30,Ph,5:/*Me`1) \end{verbatim} \end{minipage} \MCFstructure @@ -793,11 +786,11 @@ MCd(1,.6)(1, .5)(^^30,Ph,5:/*Me`1) \MCFtitle{Margin left and right} \begin{verbatim} margin_left_right:=0mm; -MCd(1,1)(0.5,0.9)(^^30,CH3,!0,!17,CH3) +MCd(1,1)(0.5,0.9)(<30,CH3,!0,!17,CH3) margin_left_right:=0.4mm; %<<== default -MCd(1,1)(0.5,0.5)(^^30,CH3,!0,!17,CH3) +MCd(1,1)(0.5,0.5)(<30,CH3,!0,!17,CH3) margin_left_right:=5mm; -MCd(1,1)(0.5,0.1)(^^30,CH3,!0,!17,CH3) +MCd(1,1)(0.5,0.1)(<30,CH3,!0,!17,CH3) \end{verbatim} \end{minipage} \MCFstructure @@ -807,11 +800,11 @@ MCd(1,1)(0.5,0.1)(^^30,CH3,!0,!17,CH3) \MCFtitle{Margin top and bottom} \begin{verbatim} margin_top_bottom:=0mm; -MCd(1,1)(0.1,0.5)(^^30,Ph,2:/OH,5:/NH2) +MCd(1,1)(0.1,0.5)(<30,Ph,2:/OH,5:/NH2) margin_top_bottom:=0.4mm; %<<== default -MCd(1,1)(0.5,0.5)(^^30,Ph,2:/OH,5:/NH2) +MCd(1,1)(0.5,0.5)(<30,Ph,2:/OH,5:/NH2) margin_top_bottom:=5mm; -MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) +MCd(1,1)(0.9,0.5)(<30,Ph,2:/OH,5:/NH2) \end{verbatim} \end{minipage} \MCFstructure @@ -821,9 +814,9 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \MCFtitle{Switch Start Vector} \begin{verbatim} - MCd(1,.8)( 0,0.5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.8)( 0,0.5)(<30,Ph,4:/Cl,3:/F) sw_start_vector:=1; - MCd(1,.8)( 1,0.5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.8)( 1,0.5)(<30,Ph,4:/Cl,3:/F) \end{verbatim} \end{minipage} \MCFstructure @@ -834,9 +827,9 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \begin{verbatim} numberA_start:=3; numberA_end:=8; - sw_numberA:=1; MCd(1,1)(.5,.9)(^^30,!9) - sw_numberA:=2; MCd(1,1)(.5,.5)(^^30,!9) - sw_numberA:=3; MCd(1,1)(.5,.1)(^^30,!9) + sw_numberA:=1; MCd(1,1)(.5,.9)(<30,!9) + sw_numberA:=2; MCd(1,1)(.5,.5)(<30,!9) + sw_numberA:=3; MCd(1,1)(.5,.1)(<30,!9) ** default: numberA_start=1 numberA_end=4095 \end{verbatim} @@ -849,9 +842,9 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \begin{verbatim} numberB_start:=3; numberB_end:=8; - sw_numberB:=1; MCd(1,1)(.5,.9)(^^30,!9) - sw_numberB:=2; MCd(1,1)(.5,.5)(^^30,!9) - sw_numberB:=3; MCd(1,1)(.5,.1)(^^30,!9) + sw_numberB:=1; MCd(1,1)(.5,.9)(<30,!9) + sw_numberB:=2; MCd(1,1)(.5,.5)(<30,!9) + sw_numberB:=3; MCd(1,1)(.5,.1)(<30,!9) ** default: numberB_start=1 numberB_end=4095 \end{verbatim} @@ -864,7 +857,7 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \begin{verbatim} sw_font_frame:=1; - MCf(^^30,Ph,4:/Cl,3:/F) + MCf(<30,Ph,4:/Cl,3:/F) \end{verbatim} \end{minipage} \MCFstructure @@ -874,9 +867,9 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \MCFtitle{Switch molecular frame} \begin{verbatim} - MCd(1,.8)(0,0.5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.8)(0,0.5)(<30,Ph,4:/Cl,3:/F) sw_mol_frame:=1; - MCd(1,.8)(1,0.5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.8)(1,0.5)(<30,Ph,4:/Cl,3:/F) \end{verbatim} \end{minipage} \MCFstructure @@ -888,7 +881,7 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) sw_atom_frame:=1; - MCf(^^30,Ph,4:/COOH,3:/OH) + MCf(<30,Ph,4:/COOH,3:/OH) \end{verbatim} \end{minipage} \MCFstructure @@ -898,9 +891,9 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \MCFtitle{Switch solid mode} \begin{verbatim} - MCd(1,.8)( 0,0.5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.8)( 0,0.5)(<30,Ph,4:/Cl,3:/F) sw_solid:=1; ratio_bond_width:=0.08; - MCd(1,.8)( 1,0.5)(^^30,Ph,4:/Cl,3:/F) + MCd(1,.8)( 1,0.5)(<30,Ph,4:/Cl,3:/F) \end{verbatim} \end{minipage} \MCFstructure @@ -910,9 +903,9 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \MCFtitle{Switch Expand} \begin{verbatim} - MCd(1,.6)(0,0.5)(^^30,Ph,4:/COOH,3:/NH2) + MCd(1,.6)(0,0.5)(<30,Ph,4:/COOH,3:/NH2) sw_expand:=1; - MCd(1,.6)(1,0.5)(^^30,Ph,4:/COOH,3:/NH2) + MCd(1,.6)(1,0.5)(<30,Ph,4:/COOH,3:/NH2) \end{verbatim} \end{minipage} \MCFstructure @@ -926,8 +919,8 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) b: ratio molecular hight/font hight c: x axis position d:y axis position - MCd(1,0.8)(0.2,0.9)(^^30,Ph,2:/OH,5:/NH2) - MCd(1,0.8)(0.8,0.1)(^^30,Ph,2:/OH,5:/NH2) + MCd(1,0.8)(0.2,0.9)(<30,Ph,2:/OH,5:/NH2) + MCd(1,0.8)(0.8,0.1)(<30,Ph,2:/OH,5:/NH2) \end{verbatim} \end{minipage} \MCFstructure @@ -940,7 +933,7 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) sw_font_frame:=1; sw_mol_frame:=1; - MCf(^^30,Ph,2:/OH,5:/NH2) + MCf(<30,Ph,2:/OH,5:/NH2) \end{verbatim} \end{minipage} \MCFstructure @@ -951,11 +944,11 @@ MCd(1,1)(0.9,0.5)(^^30,Ph,2:/OH,5:/NH2) \begin{verbatim} beginfont("NO:1") sw_mol_frame:=1; % <<== Local setting - MCd(1,.5)(0.0,0.5)(^^30,Ph,@(2)N) endfont + MCd(1,.5)(0.0,0.5)(<30,Ph,@(2)N) endfont beginfont("NO:2") - MCd(1,.5)(0.5,0.5)(^^30,Ph,@(2,4)N) endfont + MCd(1,.5)(0.5,0.5)(<30,Ph,@(2,4)N) endfont beginfont("NO:3") - MCd(1,.5)(1.0,0.5)(^^30,Ph,@(2,4,6)N) endfont + MCd(1,.5)(1.0,0.5)(<30,Ph,@(2,4,6)N) endfont \end{verbatim} \end{minipage} \MCFstru\MCFstru\MCFstructure% @@ -966,11 +959,11 @@ beginfont("NO:3") \begin{verbatim} sw_mol_frame:=1; % <<== Global setting beginfont("NO:1") - MCd(1,.5)(0.0,0.5)(^^30,Ph,@(2)N) endfont + MCd(1,.5)(0.0,0.5)(<30,Ph,@(2)N) endfont beginfont("NO:2") - MCd(1,.5)(0.5,0.5)(^^30,Ph,@(2,4)N) endfont + MCd(1,.5)(0.5,0.5)(<30,Ph,@(2,4)N) endfont beginfont("NO:3") - MCd(1,.5)(1.0,0.5)(^^30,Ph,@(2,4,6)N) endfont + MCd(1,.5)(1.0,0.5)(<30,Ph,@(2,4,6)N) endfont \end{verbatim} \end{minipage} \MCFstru\MCFstru\MCFstructure% diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf index c40c0a252ed..e82c70f5b23 100644 Binary files a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf and b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf differ diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex index 32164f47499..2aa66fd5d35 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2015.9.18 +% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2015.9.22 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass{article} %------------------------------------------------------------------------------- @@ -61,7 +61,7 @@ %------------------------------------------------------------------------------------ \begin{document} {\Large\bf MCF example for luamplib(LuaLaTeX) }% - \hspace{10mm} by Akira Yamaji 2015.9.18\vspace{6mm}\\ + \hspace{10mm} by Akira Yamaji 2015.9.22\vspace{6mm}\\ %------------------------------------------------------------------------------------ {{\small {\tt FM(C) :} molecular formula calculated by mcf2graph}\\ {{\small {\tt MW(C) :} molecular weight calculated by mcf2graph}\\ @@ -69,7 +69,7 @@ \begin{mplibcode} font_wd:=100mm; font_ht:=50mm; beginfont("NO:1","EN:Chlorophyll a","MW:893.49") - MCf(^^54, + MCf(<54, {,``1,?5,$(2,5)d,4:N,3\,54~dl,|,?5,$(2,4)d,5:N, -2\,54~dl,|,?5,2=d,5:N,-2\~dl,54,|,?5,5=d,5:N,-2\~dl,&(#5), -1*,24,/*COOMe^15,72,//O,&(#1),}, @@ -85,7 +85,7 @@ \begin{mplibcode} font_wd:=60mm; font_ht:=35mm; beginfont("NO:2","EN:Limonin","MW:470.51") - MCf(^^30, + MCf(<30, ?6,$(-3,-4)?6,-5=?3,-2=wf,-1=wb,6=?5,-4=?6,-5=wf, @(13,15,17,20)O,@(3,12,21)//O, @(4~wf^60,8~zf^60,18^35,18^-35)/Me,@(1^60,5^180,16^60)/*H, @@ -99,7 +99,7 @@ \begin{mplibcode} font_wd:=90mm; font_ht:=30mm; beginfont("NO:3","EN:beta-carotene","MW:536.87") - MCf(^^30, + MCf(<30, ?6,3=dl,@(3,5^35,5^-35)/Me, 4\,|,!18,$(1,3,5,7,9,11,13,15,17)dr,@(3,7,12,16)/Me, |,?6,6=dl,@(6,2^35,2^-35)/Me @@ -112,7 +112,7 @@ \begin{mplibcode} font_wd:=50mm; font_ht:=40mm; beginfont("NO:4","EN:Gibberellin A3","MW:346.37"); - MCf(^^12, + 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, 5=dl,11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me, @@ -126,8 +126,8 @@ endfont; \begin{mplibcode} font_wd:=60mm; font_ht:=70mm; beginfont("NO:5","EN:Erythromycin","MW:733.93"); - MCf(^^30, - {,``1,^^-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,},&1, + MCf(<30, + {,``1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,},&1, 14:O,13:/*Et,@(1,9)//O,@(2,10)*/Me,@(4,6^-35,8,12^35)/*Me, @(6^35,11,12^-35)*/OH, #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/OMe, @@ -141,7 +141,7 @@ beginfont("NO:5","EN:Erythromycin","MW:733.93"); \begin{mplibcode} font_wd:=90mm; font_ht:=55mm; beginfont("NO:6","EN:Vancomycin","MW:1449.25"); - MCf(^^30, + MCf(<30, {,``1,!12,$(1,3,12)zf,7=wf,/H^-60,60,*/OH,60, Ph,-4:/Cl,-3\,O,!,Ph,-4\,O,!,Ph,-1^15:/Cl,-3\,/*OH,*/H^-60,&(#1), #7*,&(#26),#1\^120,//O,60,NH,60,/*H,*/COOH^180,-60, @@ -161,10 +161,10 @@ endfont; \begin{mplibcode} font_wd:=150mm; font_ht:=80mm; beginfont("NO:7","EN:Maitotoxin","MW:3425.86") - MCf(^^55.8, + MCf(<55.8, ?6,-4=?7 ,$(-4,-3,-3,-3)?6,-3\,!3,?6,$(-4,-3,-3,-3)?6, - -3\,?6,-3=?6,-3\,!3,60,^^-30,?6,-3=?6, - -3\^30,^^30,?6,$(-3,-3)?6,-3=?7,$(-4,-3,-3)?6, + -3\,?6,-3=?6,-3\,!3,60,<-30,?6,-3=?6, + -3\^30,<30,?6,$(-3,-3)?6,-3=?7,$(-4,-3,-3)?6, -2\,?6,-3=?6,-3=?7,$(-3,-3)?6,-3=?8,-3=dl,$(-5,-3,-3,-3)?6, @(5,7,15,16,23,24,32,40,41,48,49,58,59,72,73,82,83,90,91,99, 100,107,113,114,122,123,130,131,140,141,148,149)O, diff --git a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf index d3e7e1b3b02..3c147f29048 100644 --- a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf +++ b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% mcf2graph ver 3.71 Copyright (c) 2013-2015 Akira Yamaji +% mcf2graph ver 3.72 Copyright (c) 2013-2015 Akira Yamaji % % Permission is hereby granted, free of charge, to any person obtaining a copy of this software % and associated documentation files (the "Software"), to deal in the Software without restriction, @@ -190,7 +190,7 @@ def set_def_MC= def { == (_push,1) enddef; def } == (_pop,1) enddef; def {{ == (_push,0) enddef; def }} == (_pop,0) enddef; def | == {,} enddef; def >>primary n == (_chg_env,n) enddef; def ``primary n == (_chg_len,n) enddef; - def ^^primary n == (_rot_ang,n) enddef; def ~~primary n == (_chg_line,n) enddef; + def