diff options
author | Norbert Preining <norbert@preining.info> | 2021-07-19 03:01:01 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2021-07-19 03:01:01 +0000 |
commit | 38358cf733cc4815df695ae9c5539f8d7deba8e8 (patch) | |
tree | a86407ed7930e2c2e120facd12870f78a5922507 /graphics/mcf2graph/mcf_man_soc.mf | |
parent | ba3d555da29f2da7ca04bf225218e22c8d12d7f8 (diff) |
CTAN sync 202107190301
Diffstat (limited to 'graphics/mcf2graph/mcf_man_soc.mf')
-rw-r--r-- | graphics/mcf2graph/mcf_man_soc.mf | 158 |
1 files changed, 76 insertions, 82 deletions
diff --git a/graphics/mcf2graph/mcf_man_soc.mf b/graphics/mcf2graph/mcf_man_soc.mf index 75591a8fe3..1561ec3b64 100644 --- a/graphics/mcf2graph/mcf_man_soc.mf +++ b/graphics/mcf2graph/mcf_man_soc.mf @@ -1,9 +1,9 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.06.28 +% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.07.18 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -input mcf2graph.mf; %% it must be version 4.68 +input mcf2graph.mf; %% it must be version 4.69 % ** use data base file 'mcf_data_base.mcf' -message "mcf_man_soc 2021.06.28"; message ""; +message "mcf_man_soc 2021.07.18"; message ""; %------------------------------------------------------------------------ sw_mframe:=0; sw_expand:=0; @@ -257,96 +257,95 @@ beginfont("EN:rotate 1") endfont %*********************************************************************** beginfont("EN:change bond 1") - fsize:=(70mm,12mm); - fmargin:=(2mm,3mm); + fsize:=(70mm,10mm); + fmargin:=(2mm,2mm); sw_trimming:=0; ratio_chain_ring:=1; MC(<-30,!~dm,!,!~dl,!,!~dr,!~db,!~db,!,!~tm) add(defaultscale:=0.6; labeloffset:=0; - label.rt("(dm)",A1+(0,-0.8l)); - label.rt("(dl)",A3+(0,-0.8l)); - label.rt("(dr)",A5+(0,-0.8l)); - label.rt("(db)",A6+(0,-0.3l)); - label.rt("(db)",A7+(0,-0.8l)); - label.rt("(tm)",A9+(0,-0.8l)); + label.rt("(dm)",A1+(0,-0.7l)); + label.rt("(dl)",A3+(0,-0.7l)); + label.rt("(dr)",A5+(0,-0.7l)); + label.rt("(db)",A6+(0,-0.7l)); + label.rt("(db)",A7+(0,-0.7l)); + label.rt("(tm)",A9+(0,-0.7l)); ) endfont %*********************************************************************** beginfont("EN:change bond 2") - fsize:=(60mm,12mm); - fmargin:=(2mm,3mm); - blength:=9.5mm; - sw_trimming:=1; + fsize:=(70mm,10mm); + fmargin:=(2mm,2mm); + sw_trimming:=0; ratio_chain_ring:=1; - MC(<-30,!~wf,!,!~wb,!,!~zf,!,!~zb) + MC(<-30,!~wf,!,!~wb,!,!~zf,!,!~zb,!,!~vf,!,!~vb) add(defaultscale:=0.6; labeloffset:=0; label.rt("(wf)",A1+(0,-0.7l)); label.rt("(wb)",A3+(0,-0.7l)); label.rt("(zf)",A5+(0,-0.7l)); label.rt("(zb)",A7+(0,-0.7l)); + label.rt("(vf)",A9+(0,-0.7l)); + label.rt("(vb)",A11+(0,-0.7l)); ) endfont %*********************************************************************** beginfont("EN:change bond 3") - fsize:=(70mm,12mm); - fmargin:=(2mm,3mm); - blength:=10mm; - sw_trimming:=1; - ratio_chain_ring:=1; - MC(<-30,!~vf,!,!~vb) - add(defaultscale:=0.6; labeloffset:=0; - label.rt("(vf)",A1+(0,-0.7l)); - label.rt("(vb)",A3+(0,-0.7l)); - ) -endfont -%*********************************************************************** -beginfont("EN:change bond 3") - fsize:=(70mm,12mm); - fmargin:=(2mm,3mm); + fsize:=(70mm,10mm); + fmargin:=(2mm,2mm); blength:=9mm; sw_trimming:=1; ratio_chain_ring:=1; MC(<-30,!7,1=dt,3=wv,5=bd,7=bz) add(defaultscale:=0.6; labeloffset:=0; - label.rt("(dt)",A1+(0,-0.7l)); - label.rt("(wv)",A3+(0,-0.7l)); - label.rt("(bd)",A5+(0,-0.7l)); - label.rt("(bz)",A7+(0,-0.7l)); + label.rt("(dt)",A1+(0,-0.6l)); + label.rt("(wv)",A3+(0,-0.6l)); + label.rt("(bd)",A5+(0,-0.6l)); + label.rt("(bz)",A7+(0,-0.6l)); ) endfont %*********************************************************************** -beginfont("EN:change bond 4") - fsize:=(60mm,12mm); - fmargin:=(2mm,3mm); - blength:=9mm; - sw_trimming:=1; - ratio_chain_ring:=1; - MC(<30,!7,{2,4,6}=dr) -endfont -%*********************************************************************** beginfont("EN:over line") sw_trimming:=1; - fsize:=(80mm,20mm); + fsize:=(75mm,20mm); ratio_chain_ring:=1; - MC(<30,!18,!,60,90`17, + MC(<30,!18,$90`1.5,90`15.5, {2~si_,4~wf_,6~wb_,8~zf_,10~zb_, 12~bd_,14~dl_,16~dr_,18~dm_}:/_`2) endfont %*********************************************************************** +beginfont("EN:Steric ring") + fsize:=(75mm,16mm); + MCat(0.05,0.5)(#1.25,-30~wf_r,30~bd_r`1,30~wb_r,120,O,30,&1,##, + {1^$-90,2^$90,3^$-90,4^$90}:/OH`-.5,6^$90:/!OH`-.5) + defaultscale:=0.6; + MCat(0.5,0.7)(0~wf_r) add(label.lft("wf_r:",A1);) + MCat(0.5,0.2)(0~wf) add(label.lft("wf:",A1);) + MCat(0.75,0.7)(0~bd_r) add(label.lft("bd_r:",A1);) + MCat(0.75,0.2)(0~bd) add(label.lft("bd:",A1);) + MCat(1,0.7)(0~wb_r) add(label.lft("wb_r:",A1);) + MCat(1,0.2)(0~wb) add(label.lft("wb:",A1);) +endfont +%*********************************************************************** +beginfont("EN:change multi bond") + fsize:=(40mm,8mm); + fmargin:=(2mm,3mm); + ratio_chain_ring:=1; + MC(<30,!7,{2,4,6}=dr) +endfont +%*********************************************************************** beginfont("EN:change bond length1") - fsize:=(75mm,10mm); + fsize:=(55mm,8mm); sw_numbering:=Bond; MC(<-30,!2,!4`1.2,!2) endfont %*********************************************************************** beginfont("EN:change bond length2") - fsize:=(75mm,10mm); + fsize:=(55mm,8mm); sw_numbering:=Bond; MC(<-30,!2,#1.2,!4,##,!2) endfont %*********************************************************************** beginfont("EN:change ring length") - fsize:=(60mm,20mm); + fsize:=(60mm,16mm); fmargin:=(2mm,2mm); sw_trimming:=1; sw_numbering:=Bond; @@ -355,7 +354,7 @@ endfont %*********************************************************************** beginfont("EN:Insert atom") sw_trimming:=1; - fsize:=(70mm,12mm); + fsize:=(50mm,7mm); MC(<-30,!2,O,!2,N,!2) endfont %*********************************************************************** @@ -368,7 +367,7 @@ beginfont("EN:change atom") endfont %*********************************************************************** beginfont("EN:change atom brock address 1") - fsize:=(70mm,15mm); + fsize:=(70mm,14mm); fmargin:=(3mm,1.5mm); MCat(0,.5)(?6,@4,\,|,?6,2:O) sw_numbering:=Atom; @@ -377,7 +376,7 @@ beginfont("EN:change atom brock address 1") endfont %*********************************************************************** beginfont("EN:change atom brock address 2") - fsize:=(70mm,15mm); + fsize:=(70mm,14mm); fmargin:=(3mm,1.5mm); MCat(0,.5)(?6,@4,\,|,?6,||,2:N) sw_numbering:=Atom; @@ -386,7 +385,7 @@ beginfont("EN:change atom brock address 2") endfont %*********************************************************************** beginfont("EN:change atom absolute address") - fsize:=(70mm,15mm); + fsize:=(70mm,14mm); fmargin:=(3mm,1.5mm); MCat(0,.5)(?6,@4,\,?6,$2:N) sw_numbering:=Atom; @@ -395,7 +394,7 @@ beginfont("EN:change atom absolute address") endfont %*********************************************************************** beginfont("EN:change atom relative adress") - fsize:=(70mm,15mm); + fsize:=(70mm,14mm); fmargin:=(3mm,1.5mm); MCat(0,.5)(?6,@4,\,?6,-2:N) sw_numbering:=Atom+Inverse; @@ -414,7 +413,7 @@ beginfont("EN:fused ring") fmargin:=(2mm,1.5mm); sw_trimming:=1; sw_numbering:=Bond; - MC(<30,?6,3=?6,3=dt,{7--11}=bd) + MC(<30,?6,3=?6,3=dt,{7--11}=bd_r) endfont %----------------------------------------------------------------------- beginfont("EN:change ring length") @@ -423,7 +422,7 @@ beginfont("EN:change ring length") sw_trimming:=1; sw_numbering:=Bond; MC(?6,@4,\,?6`1.2,5=?6,11=?6, - {14--23}=bd,{5,11}=dt) + {14--23}=bd_r,{5,11}=dt) endfont %----------------------------------------------------------------------- beginfont("EN:fused large 6 ring") @@ -432,7 +431,7 @@ beginfont("EN:fused large 6 ring") margin_top_bottom:=1.5mm; sw_numbering:=Bond; sw_trimming:=1; - MC(<30,?6,3=?6[13],3=dt,{7--11}=bd) + MC(<30,?6,3=?6[13],3=dt,{7--11}=bd_r) endfont %----------------------------------------------------------------------- beginfont("EN:fuse multi ring") @@ -448,13 +447,13 @@ beginfont("EN:fused ring 2") fmargin:=(2mm,2mm); sw_numbering:=Bond; msize:=(1,.9); - MCat( 0,.5)(<30,?6,3=?6,(11,4)=?6[4],{11,4}=dt,{12--15}=bd) + MCat( 0,.5)(<30,?6,3=?6,(11,4)=?6[4],{11,4}=dt,{12--15}=bd_r) add(defaultscale:=0.4; label("(1)",p0);) msize:=(1,.9); - MCat(.5,.5)(<30,?6,3=?6,(11,4)=?5[3],{11,4}=dt,{12--14}=bd) + MCat(.5,.5)(<30,?6,3=?6,(11,4)=?5[3],{11,4}=dt,{12--14}=bd_r) add(defaultscale:=0.4; label("(2)",p0);) msize:=(1,.9); - MCat( 1,.5)(<30,?6,3=?6,(11,4)=?4[2],{11,4}=dt,{12,13}=bd) + MCat( 1,.5)(<30,?6,3=?6,(11,4)=?4[2],{11,4}=dt,{12,13}=bd_r) add(defaultscale:=0.4; label("(3)",p0);) endfont %*********************************************************************** @@ -462,24 +461,22 @@ beginfont("EN:fused ring 3") fsize:=(60mm,20mm); fmargin:=(2mm,2mm); sw_numbering:=Bond; - MCat(0,1)(?6,{3,10}=?6,(16,4)=?6[3],{16,4}=dt,{17--19}=bd) + MCat(0,1)(?6,{3,10}=?6,(16,4)=?6[3],{16,4}=dt,{17--19}=bd_r) add(defaultscale:=0.4; label("(1)",p0);) - MCat(1,0)(?6,{3,10}=?6,(16,4)=?5[2],{16,4}=dt,{17,18}=bd) + MCat(1,0)(?6,{3,10}=?6,(16,4)=?5[2],{16,4}=dt,{17,18}=bd_r) add(defaultscale:=0.4; label("(2)",p0);) endfont %*********************************************************************** beginfont("EN:fused ring 4") - fsize:=(60mm,22mm); + fsize:=(60mm,20mm); fmargin:=(2mm,2mm); sw_trimming:=1; sw_numbering:=Bond; - MC(<-30,?6,{3,10,15}=?6,(21,4)=?6[2],{21,4}=dt,{22,23}=bd) + MC(<-30,?6,{3,10,15}=?6,(21,4)=?6[2],{21,4}=dt,{22,23}=bd_r) endfont %*********************************************************************** beginfont("EN:Spiro ring ") - sw_trimming:=1; - fsize:=(60mm,18mm); - fmargin:=(2mm,3mm); + fsize:=(40mm,15mm); sw_numbering:=Atom; numbering_end:=7; ratio_chain_ring:=1; @@ -487,14 +484,12 @@ beginfont("EN:Spiro ring ") endfont %*********************************************************************** beginfont("EN:group 1") - fsize:=(60mm,25mm); - sw_trimming:=1; - MC(<-30,!,/_,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!) + fsize:=(75mm,18mm); + MC(<30,!,/_,!2,/!,!2,/!2,!4,/?!,!4,/??!,!2,/'(Ph`0.8)^-60,!) endfont %*********************************************************************** beginfont("EN:group 2") - fsize:=(80mm,15mm); - sw_trimming:=1; + fsize:=(70mm,14mm); MC(<30,!`1,//O,!2`1,*/H,!2`1,/*H,!2`1,*/*H,!2`1,**?3,!`1) add(defaultscale:=0.75; label("//",A2-(0,0.45l)); @@ -506,18 +501,17 @@ beginfont("EN:group 2") endfont %*********************************************************************** beginfont("EN:group 3") - fsize:=(60mm,18mm); + fsize:=(60mm,16mm); sw_trimming:=1; MC(<-30,#1,!2,/_`2^30,!2,/!2>lr,!2,/!2>rl,!) endfont %*********************************************************************** beginfont("EN:group 3") - fsize:=(80mm,18mm); + fsize:=(75mm,18mm); fmargin:=(2mm,2mm); sw_numbering:=Atom; - sw_trimming:=1; numbering_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`0.8)^-60) endfont %*********************************************************************** beginfont("EN:group 4") @@ -529,14 +523,14 @@ beginfont("EN:group 4") endfont %*********************************************************************** beginfont("EN:group 5") - fsize:=(60mm,18mm); + fsize:=(60mm,16mm); sw_trimming:=1; sw_numbering:=Atom; numbering_end:=8; MC(<-30,!7`1,3:/_`2^30,5:/!2>lr,7:/!2>rl) endfont %*********************************************************************** beginfont("EN:chain strech direction mode 1") - fsize:=(50mm,35mm); + fsize:=(50mm,25mm); sw_trimming:=1; ratio_chain_ring:=1; MC( @@ -546,7 +540,7 @@ beginfont("EN:chain strech direction mode 1") endfont %*********************************************************************** beginfont("EN:chain strech direction mode 2") - fsize:=(60mm,23mm); + fsize:=(60mm,20mm); sw_trimming:=1; ratio_chain_ring:=1; MC( @@ -562,7 +556,7 @@ beginfont("EN:chain strech direction mode 3") endfont %*********************************************************************** beginfont("EN:chain strech direction mode 4") - fsize:=(60mm,22mm); + fsize:=(60mm,20mm); sw_trimming:=1; MC(<30,!6,6>'(90,-90,90,-90,90):/!5) endfont @@ -574,7 +568,7 @@ beginfont("EN:change atom and group") endfont %*********************************************************************** beginfont("EN:methyl*2,isopropyl,tert-butyl") - fsize:=(60mm,15mm); + fsize:=(60mm,12mm); sw_trimming:=1; MC(<30,!9`1,?!,!,??,!,2:??,4:/?!,6:/??!,8:/N?!) endfont @@ -612,7 +606,7 @@ beginfont("EN:Serial number") fsize:=(75mm,14mm); max_blength:=8mm; sw_numbering:=Atom; numbering_end:=15; - MC(<30,!14,{2,6--10,14}:/_~bd`0.5) + MC(<30,!14,{2,6--10,14}:/_~bd_r`0.5) endfont %*********************************************************************** beginfont("EN:Change color") |