summaryrefslogtreecommitdiff
path: root/graphics/mcf2graph/mcf_man_soc.mf
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-03-01 03:01:22 +0000
committerNorbert Preining <norbert@preining.info>2021-03-01 03:01:22 +0000
commit3a1a102e980610859d9f1b197733d6ce6a541c62 (patch)
treef79acc362cf6dde2deff64ffa7bb7bfe1bea2e2c /graphics/mcf2graph/mcf_man_soc.mf
parent189140b53960215eec1626503040fb38360ab4ed (diff)
CTAN sync 202103010301
Diffstat (limited to 'graphics/mcf2graph/mcf_man_soc.mf')
-rw-r--r--graphics/mcf2graph/mcf_man_soc.mf45
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",