diff options
author | Norbert Preining <norbert@preining.info> | 2021-03-01 03:01:22 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2021-03-01 03:01:22 +0000 |
commit | 3a1a102e980610859d9f1b197733d6ce6a541c62 (patch) | |
tree | f79acc362cf6dde2deff64ffa7bb7bfe1bea2e2c /graphics/mcf2graph/mcf_man_soc.mf | |
parent | 189140b53960215eec1626503040fb38360ab4ed (diff) |
CTAN sync 202103010301
Diffstat (limited to 'graphics/mcf2graph/mcf_man_soc.mf')
-rw-r--r-- | graphics/mcf2graph/mcf_man_soc.mf | 45 |
1 files changed, 32 insertions, 13 deletions
diff --git a/graphics/mcf2graph/mcf_man_soc.mf b/graphics/mcf2graph/mcf_man_soc.mf index 3a2da782e2..7a4e76408e 100644 --- a/graphics/mcf2graph/mcf_man_soc.mf +++ b/graphics/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", |