diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf')
-rw-r--r-- | Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf | 45 |
1 files changed, 32 insertions, 13 deletions
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf index 3a2da782e28..7a4e76408e5 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.02.21 +% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.02.28 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% input mcf2graph.mf; %% it must be version 4.578 message "mcf_man_soc 2021.02.21"; message ""; @@ -552,6 +552,21 @@ beginfont("EN:Inline definition") MC(<30,!8,{2,6}:/'(!,/_,!,OH)) endfont %*********************************************************************** +beginfont("EN:Move position") + fsize:=(60mm,12mm); + fmargin:=(2mm,1mm); + sw_trimming:=1; + MC(<30,?6,@3,\,!3,//O,!,O,n_^60,@(6,1),H,p_^15) + add(drawdot A1 withpen pencircle scaled 2bp; + pickup pencircle scaled 0.1bp; + for i=0 upto 6: + draw (A1+(l*i,l-2bp))--(l*i,l+2bp); + endfor + draw A1--(A1+(0,1l))--A1+(6l,1l); + draw (A1+(0,1l))--(A1+(-2bp,1l)); + ) +endfont +%*********************************************************************** beginfont("EN:mangle") fsize:=(50mm,15mm); blength:=6mm; @@ -986,19 +1001,21 @@ beginfont("EN:MCat()") endfont %*********************************************************************** beginfont("EN:Pyridine",":<30,Ph,2:N") + sw_trimming:=0; fsize:=(12mm,12mm); if check_mc(mc)=0: MC(scantokens(mc)) fi endfont %----------------------------------------------------------------------- beginfont("EN:Pyridine",":<30,Ph,2):N") + sw_trimming:=0; fsize:=(12mm,12mm); if check_mc(mc)=0: MC(scantokens(mc)) fi endfont %*********************************************************************** beginfont("EN:add() 1") - fsize:=(70mm,43mm); + fsize:=(70mm,40mm); sw_aframe:=sw_mframe:=1; - max_blength:=12mm; + max_blength:=10mm; msize:=(.91,.9); MCat(.5,.85)(<30,?6,{2,5}:O) add( @@ -1014,13 +1031,15 @@ beginfont("EN:add() 1") dotlabel.ulft("A6",A6); drawarrow A1{A1down}..A6; dotlabel.urt( "B3e",B3e); - label.rt("An="&decimal(An)&" / "& - "Bn="&decimal(Bn),p0+(-w,-1.5em)); - label.rt("aw="&decimal(aw),p0+(w,-1.5em)); - label.rt("em="&decimal(em),p0+(0,-1.5em)); - label.rt("w="&decimal(w),p0+(-w,-3em)); - label.rt("h="&decimal(h),p0+(0,-3em)); - label.rt("l="&decimal(l),p0+(w,-3em)); + label.rt( "An="&decimal(An)& + " Bn="&decimal(Bn)& + " aw="&decimal(aw)& + " em="&decimal(em), + p0+(-9em,-1.5em)); + label.rt( "w="&decimal(w)& + " h="&decimal(h)& + " l="&decimal(l), + p0+(-9em,-3em)); ) endfont %*********************************************************************** @@ -1200,9 +1219,9 @@ ext(defaultfont:="uhvr8r"; defaultscale:=.75; label.urt("sw_fframe = "&decimal(sw_fframe),(0.01w,0.24h)); label.urt("sw_aframe = "&decimal(sw_aframe),(0.01w,0.21h)); label.urt("sw_trimming = "&decimal(sw_trimming),(0.01w,0.18h)); - label.urt("mc1 ="&mc1,(0.01w,0.12h)); - label.urt("mc2 ="&mc2,(0.01w,0.09h)); - label.urt("mc3 ="&mc3,(0.01w,0.06h)); + label.urt("mc1= "&mc1,(0.01w,0.12h)); + label.urt("mc2= "&mc2,(0.01w,0.09h)); + label.urt("mc3= "&mc3,(0.01w,0.06h)); ) %*************************************************************************** beginfont("EN:Ampicillin","MW:349.405", |