summaryrefslogtreecommitdiff
path: root/graphics/mcf2graph/mcf_man_soc.mf
diff options
context:
space:
mode:
Diffstat (limited to 'graphics/mcf2graph/mcf_man_soc.mf')
-rw-r--r--graphics/mcf2graph/mcf_man_soc.mf194
1 files changed, 94 insertions, 100 deletions
diff --git a/graphics/mcf2graph/mcf_man_soc.mf b/graphics/mcf2graph/mcf_man_soc.mf
index afefa48dcf..16100feb75 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.05.23
+% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.06.06
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-input mcf2graph.mf; %% it must be version 4.65
+input mcf2graph.mf; %% it must be version 4.66
% ** use data base file 'mcf_data_base.mcf'
-message "mcf_man_soc 2021.05.23"; message "";
+message "mcf_man_soc 2021.06.06"; message "";
%------------------------------------------------------------------------
sw_mframe:=0;
sw_expand:=0;
@@ -135,13 +135,13 @@ blength:=0mm;
max_blength:=10mm;
ratio_thickness_bond:=0.015;
ratio_atom_bond:=0.36;
-sw_fframe:=1;
+sw_frame:=Outside;
fmargin:=(2mm,1mm);
%***********************************************************************
beginfont("EN:Chain 1")
fsize:=(60mm,17mm);
- sw_numberB:=1;
- numberB_end:=6;
+ sw_numbering:=Bond;
+ numbering_end:=6;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MC(<15,-30,45,-45,60,$300,$0,
@@ -159,8 +159,8 @@ endfont
%***********************************************************************
beginfont("EN:Chain 2")
fsize:=(60mm,17mm);
- sw_numberB:=1;
- numberB_end:=6;
+ sw_numbering:=Bond;
+ numbering_end:=6;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MC(<-30,!6,
@@ -182,7 +182,7 @@ beginfont("EN:Jump and Branch")
fsize:=(60mm,16mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
- sw_numberA:=1;
+ sw_numbering:=Atom;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MC(<-30,!6,@3,0,!,@5,-30)
@@ -191,7 +191,7 @@ endfont
beginfont("EN:Jump and Branch")
fsize:=(60mm,16mm);
fmargin:=(2mm,2mm);
- sw_numberA:=1;
+ sw_numbering:=Atom;
sw_trimming:=1;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
@@ -201,9 +201,9 @@ endfont
beginfont("EN:branch1")
fsize:=(60mm,16mm);
fmargin:=(2mm,2mm);
- sw_numberA:=1;
+ sw_numbering:=Atom;
sw_trimming:=1;
- numberA_end:=10;
+ numbering_end:=10;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MC(<30,!10,@2,\,!,@4,*\,!,@6,\*,!,@8,\\,!,@10,*\*,!)
@@ -213,8 +213,8 @@ beginfont("EN:branch2")
fsize:=(60mm,20mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
- sw_numberA:=1;
- numberA_end:=7;
+ sw_numbering:=Atom;
+ numbering_end:=7;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MC(<30,!6,@2,\~dr,!,@4,\`1.5,-90,@6,15,-60)
@@ -224,7 +224,7 @@ beginfont("EN:Connect atom")
fsize:=(60mm,20mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
- sw_numberA:=1;
+ sw_numbering:=Atom;
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MC(<-30,!6,@3,\,!3,&6~bd,@9,&4~bz)
@@ -234,7 +234,7 @@ beginfont("EN:ring")
fsize:=(60mm,20mm);
sw_trimming:=1;
fmargin:=(2mm,3mm);
- sw_numberB:=1;
+ sw_numbering:=Bond;
%----------------------------------------------------------------------
MC(?6)
endfont
@@ -243,12 +243,12 @@ beginfont("EN:rotate 1")
fsize:=(60mm,20mm);
fmargin:=(2mm,3mm);
sw_trimming:=1;
- sw_numberB:=1;
+ sw_numbering:=Bond;
ratio_chain_ring:=1;
- numberB_end:=7;
+ numbering_end:=7;
defaultscale:=0.5;
labeloffset:=2bp;
- MC(#1,0,0,<90,0,<-90,0,<$315,0,<$90,0,<$0,0,{1,2,3,4,5,6,7}=vf,
+ MC(#1,0,0,<90,0,<-90,0,<$315,0,<$90,0,<$0,0,{1--7}=vf,
{3,4^180}:/_~dt)
add(
drawarrow B8/*.7{B8left}..{B3left}B3/*.7; label.urt("90",B8/*.7);
@@ -335,13 +335,13 @@ endfont
%***********************************************************************
beginfont("EN:change bond length1")
fsize:=(75mm,10mm);
- sw_numberB:=1;
+ sw_numbering:=Bond;
MC(<-30,!2,!4`1.2,!2)
endfont
%***********************************************************************
beginfont("EN:change bond length2")
fsize:=(75mm,10mm);
- sw_numberB:=1;
+ sw_numbering:=Bond;
MC(<-30,!2,#1.2,!4,##,!2)
endfont
%***********************************************************************
@@ -349,7 +349,7 @@ beginfont("EN:change ring length")
fsize:=(60mm,20mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
- sw_numberB:=1;
+ sw_numbering:=Bond;
MC(?6,@4,\,?6`1.2)
endfont
%***********************************************************************
@@ -361,16 +361,17 @@ endfont
%***********************************************************************
beginfont("EN:change atom")
fsize:=(70mm,10mm);
- 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)
+ msize:=(0.48,1);
+ MCat(0,0.5)(<30,!5,2:O,{3--5}:N)
+ sw_numbering:=Atom;
+ MCat(1,0.5)(<30,!5,2:O,{3--5}:N)
endfont
%***********************************************************************
beginfont("EN:change atom brock address 1")
fsize:=(70mm,15mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,|,?6,2:O)
- sw_numberA:=1;
+ sw_numbering:=Atom;
msize:=(1,.88);
MCat(1,.5)(?6,@4,\,?6)
endfont
@@ -379,7 +380,7 @@ beginfont("EN:change atom brock address 2")
fsize:=(70mm,15mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,|,?6,||,2:N)
- sw_numberA:=1;
+ sw_numbering:=Atom;
msize:=(1,.88);
MCat(1,.5)(?6,@4,\,?6)
endfont
@@ -388,7 +389,7 @@ beginfont("EN:change atom absolute address")
fsize:=(70mm,15mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,?6,$2:N)
- sw_numberA:=1;
+ sw_numbering:=Atom;
msize:=(1,.88);
MCat(1,.5)(?6,@4,\,?6)
endfont
@@ -397,7 +398,7 @@ beginfont("EN:change atom relative adress")
fsize:=(70mm,15mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,?6,-2:N)
- sw_numberA:=3;
+ sw_numbering:=Atom+Inverse;
msize:=(1,.88);
MCat(1,.5)(?6,@4,\,?6)
endfont
@@ -412,32 +413,32 @@ beginfont("EN:fused ring")
fsize:=(60mm,18mm);
fmargin:=(2mm,1.5mm);
sw_trimming:=1;
- sw_numberB:=1;
- MC(<30,?6,3=?6,3=dt,{7,8,9,10,11}=bd)
+ sw_numbering:=Bond;
+ MC(<30,?6,3=?6,3=dt,{7--11}=bd)
endfont
%-----------------------------------------------------------------------
beginfont("EN:change ring length")
fsize:=(60mm,25mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
- sw_numberB:=1;
+ sw_numbering:=Bond;
MC(?6,@4,\,?6`1.2,5=?6,11=?6,
- {14,15,16,17,18,19,20,21,22,23}=bd,{5,11}=dt)
+ {14--23}=bd,{5,11}=dt)
endfont
%-----------------------------------------------------------------------
beginfont("EN:fused large 6 ring")
fsize:=(60mm,18mm);
fmargin:=(2mm,1.5mm);
margin_top_bottom:=1.5mm;
- sw_numberB:=1;
+ sw_numbering:=Bond;
sw_trimming:=1;
- MC(<30,?6,3=?6[13],3=dt,{7,8,9,10,11}=bd)
+ MC(<30,?6,3=?6[13],3=dt,{7--11}=bd)
endfont
%-----------------------------------------------------------------------
beginfont("EN:fuse multi ring")
fsize:=(70mm,20mm);
fmargin:=(2mm,2mm);
- sw_numberB:=1;
+ sw_numbering:=Bond;
sw_trimming:=1;
MC(<30,?6,{-3,-4,-4,-2,-2,-4,-4}=?6,{4,8,13,20,25,28,33}=dt)
endfont
@@ -445,12 +446,12 @@ endfont
beginfont("EN:fused ring 2")
fsize:=(75mm,20mm);
fmargin:=(2mm,2mm);
- sw_numberB:=1;
+ sw_numbering:=Bond;
msize:=(1,.9);
- MCat( 0,.5)(<30,?6,3=?6,(11,4)=?6[4],{11,4}=dt,{12,13,14,15}=bd)
+ MCat( 0,.5)(<30,?6,3=?6,(11,4)=?6[4],{11,4}=dt,{12--15}=bd)
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,13,14}=bd)
+ MCat(.5,.5)(<30,?6,3=?6,(11,4)=?5[3],{11,4}=dt,{12--14}=bd)
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)
@@ -460,8 +461,8 @@ endfont
beginfont("EN:fused ring 3")
fsize:=(60mm,20mm);
fmargin:=(2mm,2mm);
- sw_numberB:=1;
- MCat(0,1)(?6,{3,10}=?6,(16,4)=?6[3],{16,4}=dt,{17,18,19}=bd)
+ sw_numbering:=Bond;
+ MCat(0,1)(?6,{3,10}=?6,(16,4)=?6[3],{16,4}=dt,{17--19}=bd)
add(defaultscale:=0.4; label("(1)",p0);)
MCat(1,0)(?6,{3,10}=?6,(16,4)=?5[2],{16,4}=dt,{17,18}=bd)
add(defaultscale:=0.4; label("(2)",p0);)
@@ -471,7 +472,7 @@ beginfont("EN:fused ring 4")
fsize:=(60mm,22mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
- sw_numberB:=1;
+ sw_numbering:=Bond;
MC(<-30,?6,{3,10,15}=?6,(21,4)=?6[2],{21,4}=dt,{22,23}=bd)
endfont
%***********************************************************************
@@ -479,8 +480,8 @@ beginfont("EN:Spiro ring ")
sw_trimming:=1;
fsize:=(60mm,18mm);
fmargin:=(2mm,3mm);
- sw_numberA:=1;
- numberA_end:=7;
+ sw_numbering:=Atom;
+ numbering_end:=7;
ratio_chain_ring:=1;
MC(<30,!6,@4,?5)
endfont
@@ -513,9 +514,9 @@ endfont
beginfont("EN:group 3")
fsize:=(80mm,18mm);
fmargin:=(2mm,2mm);
- sw_numberA:=1;
+ sw_numbering:=Atom;
sw_trimming:=1;
- numberA_end:=17;
+ numbering_end:=17;
MC(<30,!16,2:/_,4:/!,6:/!2,10:/iPr,14:/tBu,16:/Ph^-60)
endfont
%***********************************************************************
@@ -523,14 +524,14 @@ beginfont("EN:group 4")
fsize:=(60mm,18mm);
sw_trimming:=1;
fmargin:=(2mm,2mm);
- sw_numberA:=1; numberA_end:=9;
+ sw_numbering:=Atom; numbering_end:=9;
MC(<30,!8`1,{2~wf,4~zf,6^-30,8^$120}:/_)
endfont
%***********************************************************************
beginfont("EN:group 5")
fsize:=(60mm,18mm);
sw_trimming:=1;
- sw_numberA:=1; numberA_end:=8;
+ sw_numbering:=Atom; numbering_end:=8;
MC(<-30,!7`1,3:/_`2^30,5:/!2>lr,7:/!2>rl)
endfont
%***********************************************************************
@@ -607,6 +608,13 @@ beginfont("EN:Move position")
)
endfont
%***********************************************************************
+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)
+endfont
+%***********************************************************************
beginfont("EN:Change color")
fsize:=(50mm,20mm);
max_blength:=8mm;
@@ -635,7 +643,7 @@ beginfont("EN:mangle")
endfont
%***********************************************************************
beginfont("EN:blength=0")
- sw_fframe:=3;
+ sw_frame:=Bothside;
fsize:=(40mm,15mm);
MC(<30,Ph)
ext(pickup pencircle scaled 0.2pt;
@@ -647,7 +655,7 @@ beginfont("EN:blength=0")
endfont
%-----------------------------------------------------------------------
beginfont("EN:0<blength=<1")
- sw_fframe:=3;
+ sw_frame:=Bothside;
fsize:=(40mm,15mm);
blength:=0.1;
MC(<30,Ph)
@@ -660,7 +668,7 @@ beginfont("EN:0<blength=<1")
endfont
%-----------------------------------------------------------------------
beginfont("EN:blength>1")
- sw_fframe:=3;
+ sw_frame:=Bothside;
fsize:=(40mm,15mm);
blength:=8mm;
MC(<30,Ph)
@@ -673,8 +681,7 @@ beginfont("EN:blength>1")
endfont
%***********************************************************************
beginfont("EN:msize=(1)")
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
fsize:=(40mm,15mm);
msize:=(1,1);
MC(<30,Ph)
@@ -687,8 +694,7 @@ beginfont("EN:msize=(1)")
endfont
%------------------------------------------------------
beginfont("EN:msize=(0.25,1)")
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
fsize:=(40mm,15mm);
msize:=(0.25,1);
MC(<30,Ph)
@@ -701,8 +707,7 @@ beginfont("EN:msize=(0.25,1)")
endfont
%------------------------------------------------------
beginfont("EN:msize=(11mm,11mm)")
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
fsize:=(40mm,15mm);
msize:=(11mm,11mm);
MC(<30,Ph)
@@ -715,8 +720,7 @@ beginfont("EN:msize=(11mm,11mm)")
endfont
%***********************************************************************
beginfont("EN:mposition")
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
fsize:=(40mm,15mm);
msize:=(1,0.8);
mposition:=(0.5,0.5);
@@ -724,8 +728,7 @@ beginfont("EN:mposition")
endfont
%-----------------------------------------------------
beginfont("EN:mposition")
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
fsize:=(40mm,15mm);
msize:=(1,0.8);
mposition:=(1,0);
@@ -733,7 +736,7 @@ beginfont("EN:mposition")
endfont
%-----------------------------------------------------
beginfont("EN:mposition")
- sw_mframe:=1;
+ sw_frame:=sw_frame+Mol;
fsize:=(40mm,15mm);
msize:=(1,0.8);
mposition:=(10mm,4mm);
@@ -749,7 +752,7 @@ endfont
%***********************************************************************
beginfont("EN:Font size")
fsize:=(40mm,12mm);
- sw_fframe:=1;
+ sw_frame:=Outside;
MC(<30,Ph)
ext(pickup pencircle scaled 0.2pt;
for i=0 upto w/mm: draw (i*mm,0)--(i*mm,-.5mm); endfor
@@ -761,8 +764,7 @@ endfont
%***********************************************************************
beginfont("EN:fmargin")
fsize:=(40mm,12mm);
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
fmargin:=(10mm,1mm);
MC(<30,Ph)
ext(pickup pencircle scaled 0.2pt;
@@ -833,7 +835,7 @@ endfont
%***********************************************************************
beginfont("EN:max_blength")
fsize:=(60mm,25mm);
- sw_mframe:=1;
+ sw_frame:=sw_frame+Mol;
max_blength:=6mm;
MCat(0, .5)(<30,Ph)
max_blength:=8mm;
@@ -924,7 +926,7 @@ endfont
%***********************************************************************
beginfont("EN:ratio_atomgap_atom")
fsize:=(70mm,12mm);
- sw_aframe:=1;
+ sw_frame:=sw_frame+Atom;
ratio_atomgap_atom:=0.00;
MCat(0, .5)(<30,!2`0.5,2:O)
ratio_atomgap_atom:=0.050; %<<== default
@@ -968,36 +970,34 @@ beginfont("EN:ratio_hashgap_bond")
)
endfont
%***********************************************************************
-beginfont("EN:Switwch numberingA")
+beginfont("EN:Switwch numbering atom")
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)
+ numbering_start:=3; numbering_end:=8;
+ sw_numbering:=Atom; MCat(.5,.9)(<-30,!9)
+ sw_numbering:=Atom+Brock; MCat(.5,.5)(<-30,!9)
+ sw_numbering:=Atom+Inverse; MCat(.5,.1)(<-30,!9)
endfont
%***********************************************************************
-beginfont("EN:Switwch numberingB")
+beginfont("EN:Switwch numbering bond")
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)
+ numbering_start:=3; numbering_end:=8;
+ sw_numbering:=Bond; MCat(.5,.9)(<-30,!9)
+ sw_numbering:=Bond+Brock; MCat(.5,.5)(<-30,!9)
+ sw_numbering:=Bond+Inverse; MCat(.5,.1)(<-30,!9)
endfont
%***********************************************************************
beginfont("EN:Switwch trimming")
fsize:=(60mm,20mm);
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
msize:=(1,.7); MCat(.2,.3)(Ph)
MCat(.8,.7)(Ph)
endfont
%-----------------------------------------------------------------------
beginfont("EN:Switwch trimming")
fsize:=(60mm,20mm);
- sw_fframe:=3;
- sw_mframe:=1;
+ sw_frame:=Bothside+Mol;
sw_trimming:=1;
msize:=(1,.7);
MCat(.2,.3)(Ph)
@@ -1011,50 +1011,50 @@ beginfont("EN:Switwch Expand")
MCat(1, .5)(<30,Ph,4:/COOH,3:/NH2)
endfont
%***********************************************************************
-beginfont("EN:Switwch group off")
+beginfont("EN:Switwch abbreviate group")
fsize:=(60mm,12mm);
MCat(.15, .5)(<30,Ph,4:/Cl,3:/F)
- sw_group_off:=1;
+ sw_abbreviate:=Group;
MCat(.85, .5)(<30,Ph,4:/Cl,3:/F)
endfont
%***********************************************************************
-beginfont("EN:Switwch bondtype off")
+beginfont("EN:Switwch abbreviate bondtype")
fsize:=(60mm,12mm);
MCat(.15, .5)(<30,Ph,4:/Cl,3:/F)
- sw_single:=1;
+ sw_abbreviate:=Bond;
MCat(.85, .5)(<30,Ph,4:/Cl,3:/F)
endfont
%***********************************************************************
beginfont("EN:Switwch font frame 1")
fsize:=(30mm,10mm);
fmargin:=(5mm,1.5mm);
- sw_fframe:=1;
+ sw_frame:=Outside;
MC(<30,Ph)
endfont
beginfont("EN:Switwch font frame 2")
fsize:=(30mm,10mm);
fmargin:=(5mm,1.5mm);
- sw_fframe:=2;
+ sw_frame:=Inside;
MC(<30,Ph)
endfont
beginfont("EN:Switwch font frame 3")
fsize:=(30mm,10mm);
fmargin:=(5mm,1.5mm);
- sw_fframe:=3;
+ sw_frame:=Bothside;
MC(<30,Ph)
endfont
%***********************************************************************
beginfont("EN:Switwch molecular frame")
- sw_fframe:=1;
+ sw_frame:=Outside;
fsize:=(40mm,11mm);
msize:=(1,1);
- sw_mframe:=1;
+ sw_frame:=sw_frame+Mol;
MC(<30,Ph)
endfont
%***********************************************************************
beginfont("EN:Switwch atom frame")
fsize:=(60mm,10mm);
- sw_aframe:=1;
+ sw_frame:=sw_frame+Atom;
MC(<30,COOH,!,COOH)
endfont
%***********************************************************************
@@ -1091,8 +1091,7 @@ ratio_thickness_bond:=save_ratio;
beginfont("EN:MC() ")
fmargin:=(0.5mm,0.5mm);
fsize:=(40mm,15mm);
- sw_fframe:=1;
- sw_mframe:=1;
+ sw_frame:=Outside+Mol;
MC(<30,Ph,4:/Cl,3:/F)
endfont
%-----------------------------------------------------------------------
@@ -1101,7 +1100,7 @@ beginfont("EN:MCat()")
fsize:=(60mm,40mm);
fmargin:=(3mm,3mm);
blength:=0.07;
- sw_fframe:=1;
+ sw_frame:=Outside;
mangle:=0;
for i=1 step -0.5 until 0:
for j=0 step 0.33 until 1:
@@ -1129,7 +1128,7 @@ endfont
%***********************************************************************
beginfont("EN:add() 1")
fsize:=(70mm,40mm);
- sw_aframe:=sw_mframe:=1;
+ sw_frame:=sw_frame+Atom+Mol;
max_blength:=10mm;
msize:=(.91,.9);
MCat(.5,.85)(<30,?6,{2,5}:O)
@@ -1309,7 +1308,6 @@ beginfont("EN:Quinine","MW:324.42",
if check(mc)=0: MC(scantokens(mc)) fi
endfont
%***************************************************************************
-sw_calc:=1;
ext(defaultfont:="uhvr8r"; defaultscale:=.75;
label.urt("NO = "&decimal(char_num),(0.01w,0.55h));
label.urt("EN = "&inf_EN ,(0.01w,0.52h));
@@ -1327,8 +1325,6 @@ ext(defaultfont:="uhvr8r"; defaultscale:=.75;
(0.01w,0.25h));
label.urt("ratio_chain_ring = "&decimal(ratio_chain_ring),
(0.01w,0.22h));
- label.urt("sw_fframe = "&decimal(sw_fframe),(0.01w,0.19h));
- label.urt("sw_aframe = "&decimal(sw_aframe),(0.01w,0.16h));
label.urt("sw_trimming = "&decimal(sw_trimming),(0.01w,0.13h));
label.urt("mc1= "&mc1,(0.01w,0.09h));
label.urt("mc2= "&mc2,(0.01w,0.06h));
@@ -1340,7 +1336,6 @@ beginfont("EN:Ampicillin","MW:349.405",
": 3^45:/*H,1://O^15,5:/*COOH^-18,6:??,",
": @4,*\^15,NH,!,//O,!,/*NH2,!,Ph"
)
- sw_output:=None;
fsize:=(72mm,85mm);
blength:=6mm;
if check(mc)=0: MCat(0.5,0.95)(scantokens(mc)) fi
@@ -1350,7 +1345,6 @@ beginfont("EN:Cholesterol","MW:386.65",
": <30,?6,{-4,-2}=?6,-4=?5,7=dl, ",
": 10:/*H^180,11:/*H^-60,17:/*H^-54, ",
": 1:*/OH,{4,12}:*/_^60,@-1,18,/*_,-60,!3,?!")
- sw_output:=None;
fsize:=(72mm,85mm);
blength:=5.5mm;
if check(mc)=0: MCat(0.5,0.95)(scantokens(mc)) fi