diff options
Diffstat (limited to 'graphics/mcf2graph/mcf_man_soc.mf')
-rw-r--r-- | graphics/mcf2graph/mcf_man_soc.mf | 229 |
1 files changed, 112 insertions, 117 deletions
diff --git a/graphics/mcf2graph/mcf_man_soc.mf b/graphics/mcf2graph/mcf_man_soc.mf index a28d1df0af..b13b6cc12b 100644 --- a/graphics/mcf2graph/mcf_man_soc.mf +++ b/graphics/mcf2graph/mcf_man_soc.mf @@ -1,7 +1,7 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2020.01.26 +% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2020.07.09 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -input mcf2graph.mf; %% it must be version 4.48 or later +input mcf2graph.mf; %% it must be version 4.49 or later %------------------------------------------------------------------------ sw_mframe:=0; sw_expand:=0; @@ -14,51 +14,51 @@ blength:=6mm; %ext(defaultscale:=.5; label.bot(decimal(char_num)&":"&inf_EN,(.5w,0));) %*********************************************************************** beginfont("EN:Glycine") - MC(<30,NH2,!0,!,COOH) + MC(<30,NH2,!2,COOH) endfont %*********************************************************************** beginfont("EN:Alanine") - MC(<30,NH2,!0,/_,!,COOH) + MC(<30,NH2,!,/_,!,COOH) endfont %*********************************************************************** beginfont("EN:Valine") - MC(<30,NH2,!0,/iPr,!,COOH) + MC(<30,NH2,!,/iPr,!,COOH) endfont %*********************************************************************** beginfont("EN:Leucine") - MC(<30,NH2,!0,!,COOH,2:\,!,/_,!) + MC(<30,NH2,!2,COOH,2:\,!,/_,!) endfont %*********************************************************************** beginfont("EN:Isoleucine") - MC(<30,NH2,!0,!,COOH,2:\,/_,!2) + MC(<30,NH2,!2,COOH,2:\,/_,!2) endfont %*********************************************************************** beginfont("EN:Serine") - MC(<30,NH2,!0,!,COOH,2:/!OH) + MC(<30,NH2,!2,COOH,2:/!OH) endfont %*********************************************************************** beginfont("EN:Threonine") - MC(<30,NH2,!0,!,COOH,2:\,/_,!,OH) + MC(<30,NH2,!2,COOH,2:\,/_,!,OH) endfont %*********************************************************************** beginfont("EN:Cysteine") - MC(<30,NH2,!0,!,COOH,2:/!SH) + MC(<30,NH2,!2,COOH,2:/!SH) endfont %*********************************************************************** beginfont("EN:Methionine") - MC(<30,NH2,!0,!,COOH,2:\,!2,SMe) + MC(<30,NH2,!2,COOH,2:\,!2,SMe) endfont %*********************************************************************** beginfont("EN:Phenylalanine") - MC(<30,NH2,!0,!,COOH,2:/!Ph) + MC(<30,NH2,!2,COOH,2:/!Ph) endfont %*********************************************************************** beginfont("EN:Tyrosine") - MC(<30,NH2,!0,!,COOH,2:\,!,Ph,-3:/OH) + MC(<30,NH2,!2,COOH,2:\,!,Ph,-3:/OH) endfont %*********************************************************************** beginfont("EN:Triptophan") - MC(<30,NH2,!0,!,COOH,2:\,!,<24,|,?5,-4=Ph,2=dr,5=dl,4:NH) + MC(<30,NH2,!2,COOH,2:\,!,<24,|,?5,-4=Ph,2=dr,5=dl,4:NH) endfont %*********************************************************************** beginfont("EN:Prorine") @@ -66,31 +66,31 @@ beginfont("EN:Prorine") endfont %*********************************************************************** beginfont("EN:Glutamine") - MC(<30,NH2,!0,!,COOH,2:\`1,-45,-45,//O,!,NH2) + MC(<30,NH2,!2,COOH,2:\`1,-45,-45,//O,!,NH2) endfont %*********************************************************************** beginfont("EN:Asparagine") - MC(<30,NH2,!0,!,COOH,2:\,!,//O,!,NH2) + MC(<30,NH2,!2,COOH,2:\,!,//O,!,NH2) endfont %*********************************************************************** beginfont("EN:Aspartic acid") - MC(<30,NH2,!0,/!COOH,!,COOH) + MC(<30,NH2,!,/!COOH,!,COOH) endfont %*********************************************************************** beginfont("EN:Glutamic acid") - MC(<30,NH2,!0,!,COOH,2:\,!2,COOH) + MC(<30,NH2,!2,COOH,2:\,!2,COOH) endfont %*********************************************************************** beginfont("EN:Lysine") - MC(<30,NH2,!0,!,COOH,2:\,!4,NH2) + MC(<30,NH2,!2,COOH,2:\,!4,NH2) endfont %*********************************************************************** beginfont("EN:Arginine") - MC(<30,NH2,!0,!,COOH,2:\,-45,-45,60,NH,!,//NH,!,NH2) + MC(<30,NH2,!2,COOH,2:\,-45,-45,60,NH,!,//NH,!,NH2) endfont %*********************************************************************** beginfont("EN:Hystidine") - MC(<30,NH2,!0,!,COOH,2:\,!,|,?5,{1,3}=dl,3:N,5:NH) + MC(<30,NH2,!2,COOH,2:\,!,|,?5,{1,3}=dl,3:N,5:NH) endfont %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% fsize:=(60mm,35mm); @@ -128,8 +128,8 @@ beginfont("EN:Chain 2") numberB_end:=6; ratio_chain_ring:=1; %---------------------------------------------------------------------- - MC(<30,!6, - {1^-60,2^60,3^-60,4^60,5^-60,6^60}:/_~dt + MC(<-30,!6, + {1^-120,2^60,3^-60,4^60,5^-60,6^60}:/_~dt ) add( defaultscale:=0.5; @@ -150,7 +150,7 @@ beginfont("EN:Jump and Branch") sw_numberA:=1; ratio_chain_ring:=1; %---------------------------------------------------------------------- - MC(<30,!6,3:@,0,!,5:@,-30) + MC(<-30,!6,3:@,0,!,5:@,-30) endfont %*********************************************************************** beginfont("EN:Jump and Branch") @@ -160,7 +160,7 @@ beginfont("EN:Jump and Branch") sw_trimming:=1; ratio_chain_ring:=1; %---------------------------------------------------------------------- - MC(<30,!6,3:\,!) + MC(<-30,!6,3:\,!) endfont %*********************************************************************** beginfont("EN:branch1") @@ -171,7 +171,7 @@ beginfont("EN:branch1") numberA_end:=10; ratio_chain_ring:=1; %---------------------------------------------------------------------- - MC(<-30,!10,2:\,!,4:*\,!,6:\*,!,8:\\,!,10:*\*,!) + MC(<30,!10,2:\,!,4:*\,!,6:\*,!,8:\\,!,10:*\*,!) endfont %*********************************************************************** beginfont("EN:branch2") @@ -182,7 +182,7 @@ beginfont("EN:branch2") numberA_end:=7; ratio_chain_ring:=1; %---------------------------------------------------------------------- - MC(<-30,!6,2:\~dr,!,4:\`1.5,-90,6:@,15,-60) + MC(<30,!6,2:\~dr,!,4:\`1.5,-90,6:@,15,-60) endfont %*********************************************************************** beginfont("EN:Connect atom") @@ -192,7 +192,7 @@ beginfont("EN:Connect atom") sw_numberA:=1; ratio_chain_ring:=1; %---------------------------------------------------------------------- - MC(<30,!6,3:\,!3,6:#~bd,9@#4~bz) + MC(<-30,!6,3:\,!3,6:#~bd,9@#4~bz) endfont %*********************************************************************** beginfont("EN:ring") @@ -227,7 +227,7 @@ beginfont("EN:change bond 1") blength:=8mm; sw_trimming:=1; ratio_chain_ring:=1; - MC(<30,!~dm,!,!~dl,!,!~dr,!~db,!~db,!,!~tm) + MC(<-30,!~dm,!,!~dl,!,!~dr,!~db,!~db,!,!~tm) endfont %*********************************************************************** beginfont("EN:change bond 2") @@ -236,7 +236,7 @@ beginfont("EN:change bond 2") blength:=9.5mm; sw_trimming:=1; ratio_chain_ring:=1; - MC(<30,!~wf,!,!~wb,!,!~zf,!,!~zb) + MC(<-30,!~wf,!,!~wb,!,!~zf,!,!~zb) endfont %*********************************************************************** beginfont("EN:change bond 3") @@ -245,7 +245,7 @@ beginfont("EN:change bond 3") blength:=10mm; sw_trimming:=1; ratio_chain_ring:=1; - MC(<30,!~vf,!,!~vb) + MC(<-30,!~vf,!,!~vb) endfont %*********************************************************************** beginfont("EN:change bond 3") @@ -254,7 +254,7 @@ beginfont("EN:change bond 3") blength:=9mm; sw_trimming:=1; ratio_chain_ring:=1; - MC(<30,!7,1=dt,3=wv,5=bd,7=bz) + MC(<-30,!7,1=dt,3=wv,5=bd,7=bz) endfont %*********************************************************************** beginfont("EN:change bond 4") @@ -270,19 +270,19 @@ beginfont("EN:over line") sw_trimming:=1; fsize:=(60mm,20mm); ratio_chain_ring:=1; - MC(<-30,!8,!,60,90`8,{2~si_,4~wf_,6~wb_,8~bd_}:/_`2) + MC(<30,!8,!,60,90`8,{2~si_,4~wf_,6~wb_,8~bd_}:/_`2) endfont %*********************************************************************** beginfont("EN:change bond length1") fsize:=(60mm,12mm); sw_numberB:=1; - MC(<30,!2,!2`1.2,!2) + MC(<-30,!2,!2`1.2,!2) endfont %*********************************************************************** beginfont("EN:change bond length2") fsize:=(60mm,12mm); sw_numberB:=1; - MC(<30,!2,``1.2,!4) + MC(<-30,!2,``1.2,!4) endfont %*********************************************************************** beginfont("EN:change ring length") @@ -296,14 +296,14 @@ endfont beginfont("EN:Insert atom") sw_trimming:=1; fsize:=(70mm,12mm); - MC(<30,!2,O,!2,N,!2) + MC(<-30,!2,O,!2,N,!2) endfont %*********************************************************************** beginfont("EN:change atom") fsize:=(70mm,10mm); - MCat(0,0.5)(<-30,!4,2:O,{3,4}:N) + MCat(0,0.5)(<30,!4,2:O,{3,4}:N) sw_numberA:=1; - MCat(1,0.5)(<-30,!4,2:O,{3,4}:N) + MCat(1,0.5)(<30,!4,2:O,{3,4}:N) endfont %*********************************************************************** beginfont("EN:change atom brock address 1") @@ -414,19 +414,19 @@ endfont beginfont("EN:group 1") fsize:=(60mm,25mm); sw_trimming:=1; - MC(<30,!,/_,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!) + MC(<-30,!,/_,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!) endfont %*********************************************************************** beginfont("EN:group 2") fsize:=(70mm,15mm); sw_trimming:=1; - MC(<-30,!`1,//O,!2`1,/*H,!2`1,*/H,!2`1,*/*H,!2`1,**?3,!`1) + MC(<30,!`1,//O,!2`1,/*H,!2`1,*/H,!2`1,*/*H,!2`1,**?3,!`1) endfont %*********************************************************************** beginfont("EN:group 3") fsize:=(60mm,18mm); sw_trimming:=1; - MC(<30,``1,!2,/_`2^30,!2,/!2>lr,!2,/!2>rl,!) + MC(<-30,``1,!2,/_`2^30,!2,/!2>lr,!2,/!2>rl,!) endfont %*********************************************************************** beginfont("EN:group 3") @@ -435,7 +435,7 @@ beginfont("EN:group 3") sw_numberA:=1; sw_trimming:=1; numberA_end:=17; - MC(<-30,!16,2:/_,4:/!,6:/!2,10:/iPr,14:/tBu,16:/Ph^-60) + MC(<30,!16,2:/_,4:/!,6:/!2,10:/iPr,14:/tBu,16:/Ph^-60) endfont %*********************************************************************** beginfont("EN:group 4") @@ -443,14 +443,14 @@ beginfont("EN:group 4") sw_trimming:=1; fmargin:=(2mm,2mm); sw_numberA:=1; numberA_end:=7; - MC(<-30,!6`1,{2~wf,4~zf,6^-30}:/_) + MC(<30,!6`1,{2~wf,4~zf,6^-30}:/_) endfont %*********************************************************************** beginfont("EN:group 5") fsize:=(60mm,18mm); sw_trimming:=1; sw_numberA:=1; numberA_end:=8; - MC(<30,!7`1,3:/_`2^30,5:/!2>lr,7:/!2>rl) + MC(<-30,!7`1,3:/_`2^30,5:/!2>lr,7:/!2>rl) endfont %*********************************************************************** beginfont("EN:chain strech direction mode 1") @@ -468,7 +468,7 @@ beginfont("EN:chain strech direction mode 2") sw_trimming:=1; ratio_chain_ring:=1; MC( - <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 @@ -477,7 +477,7 @@ beginfont("EN:chain strech direction mode 3") fsize:=(60mm,25mm); sw_trimming:=1; ratio_chain_ring:=1; - MC(<-30,!6,{6>45}:/'(!3,"{45}"), + MC(<30,!6,{6>45}:/'(!3,"{45}"), {3>'(90,-90,90)}:/'(!3,"{'(90,-90,90)}") ) endfont @@ -485,7 +485,7 @@ endfont beginfont("EN:change atom and group") fsize:=(60mm,15mm); sw_trimming:=1; - MC(<30,!2,NH,!2,SO,!2,SOO,!) + MC(<-30,!2,NH,!2,SO,!2,SOO,!) endfont %*********************************************************************** beginfont("EN:Change color,font") @@ -505,30 +505,18 @@ beginfont("EN:Make brock") fsize:=(60mm,8mm); sw_trimming:=1; sw_numberB:=1; - MC(<30,!2,|=1.2,!2,=|,!2) + MC(<-30,!2,|=1.2,!2,=|,!2) endfont %*********************************************************************** -beginfont("EN:Chain start multi characters") - fsize:=(60mm,9mm); - sw_trimming:=1; - MC(<30,COOH,!0,!5,COOH) -endfont; -beginfont("EN:not good") - fsize:=(60mm,9mm); - fmargin:=(5mm,2mm); - sw_trimming:=1; - MC(<30,COOH,!6,COOH) -endfont; -%*********************************************************************** beginfont("EN:User definition") - fsize:=(60mm,12mm); + fsize:=(60mm,20mm); sw_trimming:=1; iBuOH:='(!,/_,!,OH); MC(<30,?6,{4,6}:/iBuOH) endfont %*********************************************************************** beginfont("EN:Inline definition") - fsize:=(60mm,12mm); + fsize:=(60mm,20mm); fmargin:=(2mm,1mm); sw_trimming:=1; MC(<30,!3,/'(!,/_,!,OH),!3) @@ -786,11 +774,11 @@ beginfont("EN:ratio_atomgap_atom") fsize:=(60mm,8mm); sw_aframe:=1; ratio_atomgap_atom:=0.00; - MCat(0, .5)(<-30,!2,2:O) + MCat(0, .5)(<30,!2,2:O) ratio_atomgap_atom:=0.050; %<<== default - MCat(.5, .5)(<-30,!2,2:O) + MCat(.5,.5)(<30,!2,2:O) ratio_atomgap_atom:=0.12; - MCat(1, .5)(<-30,!2,2:O) + MCat(1, .5)(<30,!2,2:O) endfont %*********************************************************************** beginfont("EN:ratio_chain_ring") @@ -806,29 +794,29 @@ endfont beginfont("EN:ratio_zebragap_bond") fsize:=(60mm,15mm); ratio_zebragap_bond:=0.06; - MCat(0.08, .5)(<-30,!2,2:/*_`1) + MCat(0.08, .5)(<30,!2,2:/*_`1) ratio_zebragap_bond:=0.12; %<<== default - MCat( .5, .5)(<-30,!2,2:/*_`1) + MCat( .5, .5)(<30,!2,2:/*_`1) ratio_zebragap_bond:=0.20; - MCat(0.92, .5)(<-30,!2,2:/*_`1) + MCat(0.92, .5)(<30,!2,2:/*_`1) endfont %*********************************************************************** beginfont("EN:Switwch numberingA") fsize:=(60mm,20mm); ratio_chain_ring:=1; numberA_start:=3; numberA_end:=8; - sw_numberA:=1; MCat(.5,.9)(<30,!9) - sw_numberA:=2; MCat(.5,.5)(<30,!9) - sw_numberA:=3; MCat(.5,.1)(<30,!9) + sw_numberA:=1; MCat(.5,.9)(<-30,!9) + sw_numberA:=2; MCat(.5,.5)(<-30,!9) + sw_numberA:=3; MCat(.5,.1)(<-30,!9) endfont %*********************************************************************** beginfont("EN:Switwch numberingB") fsize:=(60mm,20mm); ratio_chain_ring:=1; numberB_start:=3; numberB_end:=8; - sw_numberB:=1; MCat(.5,.9)(<30,!9) - sw_numberB:=2; MCat(.5,.5)(<30,!9) - sw_numberB:=3; MCat(.5,.1)(<30,!9) + sw_numberB:=1; MCat(.5,.9)(<-30,!9) + sw_numberB:=2; MCat(.5,.5)(<-30,!9) + sw_numberB:=3; MCat(.5,.1)(<-30,!9) endfont %*********************************************************************** beginfont("EN:Switwch trimming") @@ -900,7 +888,7 @@ endfont beginfont("EN:Switwch atom frame") fsize:=(60mm,15mm); sw_aframe:=1; - MC(<30,COOH,!0,COOH) + MC(<30,COOH,!,COOH) endfont %*********************************************************************** beginfont("EN:Local setting 1") @@ -918,16 +906,16 @@ beginfont("EN:Local setting 3") endfont %*********************************************************************** save_ratio:=ratio_thickness_bond; -beginfont("EN:Local setting 1") +beginfont("EN:Global setting 1") fsize:=(15mm,12mm); MC(Ph) endfont ratio_thickness_bond:=0.05; -beginfont("EN:Local setting 2") +beginfont("EN:Global setting 2") fsize:=(15mm,12mm); MC(Ph) endfont -beginfont("EN:Local setting 3") +beginfont("EN:Global setting 3") fsize:=(15mm,12mm); MC(Ph) endfont @@ -1001,32 +989,53 @@ beginfont("EN:ext()") label.bot("Diels-Alder Reaction",(0.5w,h)); ) endfont -sw_trimming:=1; -%*************************************************************************** -beginfont("EN:Acetamiprid","MW:222.676") - fsize:=(60mm,18mm); - MC( - <30,Ph,2:N,1:/Cl, - 4:\,!,N,/_,!,/_,!!,N,!,CN - ) +%*********************************************************************** +% Global ext() setting 1 +save_defaultsize:=defaultsize; +defaultsize:=5bp; +beginfont("EN:?3") + fsize:=(12mm,15mm); + MCat(0.5,1)(<30,?3) endfont -%*************************************************************************** -beginfont("EN:Fenitrothion","MW:277.231") - fsize:=(60mm,18mm); - MC(<30,!,O,!,P,//S,/O!^160,!,O,!,|,Ph,3:/_,4:/NO2) +beginfont("EN:?4") + fsize:=(12mm,15mm); + MCat(0.5,1)(?4) + %------------------------------- + ext(label.top(inf_EN,(0.5w,0));) + %------------------------------- endfont -%*************************************************************************** -beginfont("EN:Permethrin","MW:391.288") - fsize:=(60mm,25mm); - MC(<-30,?3,2^-35:*/_,2^35:/*_,1:\,!!,/Cl,!,Cl, - 3:\,//O,!,O,!2,Ph,-4:\,O,-60,Ph) +beginfont("EN:?5") + fsize:=(12mm,15mm); + MCat(0.5,1)(?5) endfont -%*************************************************************************** -beginfont("EN:Endosulfan","MW:406.904"); - fsize:=(60mm,25mm); - MC(<26,?7,7=?6[13],11:@,208~wf`1.45,8~wb:#,10=d,{3,5}:O,4:S,4://O, - {8,9,10,11,12^-210,12^-150}:/Cl) -endfont; +beginfont("EN:?5") + fsize:=(12mm,15mm); + MCat(0.5,1)(?6) +endfont +%----------------------------------------------------------------------- +beginfont("EN:?3") + fsize:=(12mm,15mm); + MCat(0.5,1)(<30,?3) +endfont +%------------------------------- +ext(label.top(inf_EN,(0.5w,0));) +%------------------------------- +beginfont("EN:?4") + fsize:=(12mm,15mm); + MCat(0.5,1)(?4) +endfont +beginfont("EN:?5") + fsize:=(12mm,15mm); + MCat(0.5,1)(?5) +endfont +%--------- +ext_clear; +%--------- +beginfont("EN:?6") + fsize:=(12mm,15mm); + MCat(0.5,1)(?6) +endfont +defaultsize:=save_defaultsize; %*************************************************************************** beginfont("EN:Luciferin","MW:280.33") fsize:=(60mm,20mm); @@ -1034,11 +1043,6 @@ beginfont("EN:Luciferin","MW:280.33") {9,14}:N,{7,11}:S,1:/OH,-2:*/COOH) endfont %*************************************************************************** -beginfont("EN:Warfarin","CAS:81-81-2","FM:C19H16O4","MW:308.33") - fsize:=(60mm,25mm); - MC(<30,Ph,3=?6,8=dl,10:O,7:/OH,9://O,8:\,/Ph`1,60,!,//O,!) -endfont -%*************************************************************************** beginfont("EN:Limonin") fsize:=(60mm,30mm); MC(<30,?6,{-3,-4}=?6,-5=?3,-2=wf,-1=wb,6=?5,-4=?6,-5=wf, @@ -1083,8 +1087,8 @@ endfont %*************************************************************************** beginfont("EN:Atoropin","CAS:51-55-8","FM:C17H23NO3","MW:289.37") fsize:=(60mm,22mm); - MC(<-30,O,!,//O,!,!,Ph, - $1:@,-120~zb,|,?7,6:*\^190`1.12,N,/_,3~wb:#,$3:*\*,!,OH) + MC(<30,O,!,//O,!,!,Ph, + $1:@,-60~zb,|,?7,6:*\^190`1.12,N,/_,3~wb:#,$3:*\*,!,OH) endfont %*************************************************************************** beginfont("EN:Rotenone"); @@ -1098,15 +1102,6 @@ beginfont("EN:Pyrethrin I"); 2:\*,//O,!,O,-36~zb,|,?5,-2=dl,-1:/_,-3://O,-2:\,!4,{-1,-3}=dl) endfont; %*************************************************************************** -beginfont("EN:Validamycin") - fsize:=(60mm,20mm); - MC( - <30,?6,{5,6}:/OH,3:/!OH>rl, - $4:\,O,-60,|,?6,2:O,{3,4,5}:/OH,6:/!OH, - $1:\,NH,!,|,?6,2=dl,{4,5,6}:/OH,3:/!OH - ) -endfont -%*************************************************************************** beginfont("EN:Paclitaxel","CAS:33069-62-4","FM:C47H51NO14","MW:853.91") MC( ?6,5=dl,3:@,|=1,36,45,45,45,45,=|, |