summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf64
1 files changed, 33 insertions, 31 deletions
diff --git a/Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf b/Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf
index 44a34381186..126d1f28176 100644
--- a/Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf
+++ b/Master/texmf-dist/fonts/source/public/knitting/knit_nogrid_cables.mf
@@ -1,7 +1,9 @@
-beginchar(",",wd#,ht#,dp#); "No stitch";
+% Date: 2010/08/10
+
+beginchar(",",incrwidth(0,0),ht#,dp#); "No stitch";
purlbox;
endchar;
-beginchar(".",wd#,ht#,dp#); "No stitch";
+beginchar(".",incrwidth(0,0),ht#,dp#); "No stitch";
endchar;
path purlbar;
@@ -49,7 +51,7 @@ cablerightbackslash := 12;
leftslash := 13;
rightslash := 14;
-beginchar("+",wd#,ht#,dp#); "Left end of a horizontal cable";
+beginchar("+",wd#,ht#,dp#); "Horizontal cable";
pickup symbol_pen;
HCtop = (h-d)/2 + 0.2standardheight;
HCbot = (h-d)/2 - 0.2standardheight;
@@ -65,19 +67,19 @@ beginchar("+",wd#,ht#,dp#); "Left end of a horizontal cable";
symbolpic0 := currentpicture;
charbox; endchar;
-beginchar(midhoriz,wd#,ht#,dp#); "Middle of a horizontal cable";
- currentpicture := symbolpic0;
- charbox; endchar;
-beginchar(righthoriz,wd#,ht#,dp#); "Right end of a horizontal cable";
- currentpicture := symbolpic0;
- charbox; endchar;
-
-ligtable "+": specialhoriz:
- "+" |=: righthoriz;
-ligtable righthoriz:
- "+" |=: righthoriz,
- specialhoriz =:| midhoriz,
- righthoriz =:| midhoriz;
+%beginchar(midhoriz,wd#,ht#,dp#); "Middle of a horizontal cable";
+% currentpicture := symbolpic0;
+% charbox; endchar;
+%beginchar(righthoriz,wd#,ht#,dp#); "Right end of a horizontal cable";
+% currentpicture := symbolpic0;
+% charbox; endchar;
+%
+%ligtable "+": specialhoriz:
+% "+" |=: righthoriz;
+%ligtable righthoriz:
+% "+" |=: righthoriz,
+% specialhoriz =:| midhoriz,
+% righthoriz =:| midhoriz;
beginchar(specialhoriz,wd#,ht#,dp#); "Special horizontal cable";
pickup symbol_pen;
@@ -122,58 +124,58 @@ beginchar(pright,wd#,ht#,dp#); "Purl cable background";
purlbox;
endchar;
-beginchar("n",wd#,ht#,dp#); "Back make one";
+beginchar("n",incrwidth(0,1),ht#,dp#); "Back make one";
pickup symbol_pen;
- drawM(h-topgap, botcableheight+cablevertgap, 0.5w,symbolwidth);
+ drawM(h-topgap, botcableheight+cablevertgap, 0.5wd,symbolwidth);
charbox;
symbolpic0:=currentpicture;
endchar;
-beginchar(nright,wd#,ht#,dp#); "Back make one";
+beginchar(nright,incrwidth(0,1),ht#,dp#); "Back make one";
currentpicture := symbolpic0; endchar;
-beginchar("e",wd#,ht#,dp#); "Back purlwise make one";
+beginchar("e",incrwidth(0,1),ht#,dp#); "Back purlwise make one";
pickup purl_symbol_pen;
- drawM(h-topgap, botcableheight+cablevertgap, 0.5w,purl_symbolwidth);
+ drawM(h-topgap, botcableheight+cablevertgap, 0.5wd,purl_symbolwidth);
symbolpic0:=currentpicture; purlbox;
endchar;
-beginchar(eright,wd#,ht#,dp#); "Back purlwise make one";
+beginchar(eright,incrwidth(0,1),ht#,dp#); "Back purlwise make one";
currentpicture := symbolpic0;
purlbox;
endchar;
-beginchar("N",wd#,ht#,dp#); "Front make one";
+beginchar("N",incrwidth(0,1),ht#,dp#); "Front make one";
pickup symbol_pen;
- drawM(topcableheight-cablevertgap, -d+bottomgap, 0.5w,symbolwidth);
+ drawM(topcableheight-cablevertgap, -d+bottomgap, 0.5wd,symbolwidth);
symbolpic0 := currentpicture;
charbox; endchar;
-beginchar(Nright,wd#,ht#,dp#); "Front make one";
+beginchar(Nright,incrwidth(0,1),ht#,dp#); "Front make one";
currentpicture := symbolpic0;
charbox; endchar;
-beginchar("d",wd#,ht#,dp#); "Back decrease";
+beginchar("d",decrwidth(2,1),ht#,dp#); "Back decrease";
pickup symbol_pen;
drawSSK(h-topgap, botcableheight+cablevertgap);
charbox; symbolpic0:=currentpicture;
endchar;
-beginchar(dright,wd#,ht#,dp#); "Back decrease";
+beginchar(dright,decrwidth(2,1),ht#,dp#); "Back decrease";
fliphoriz(symbolpic0)(currentpicture); endchar;
-beginchar("o",wd#,ht#,dp#); "Back purl decrease";
+beginchar("o",decrwidth(2,1),ht#,dp#); "Back purl decrease";
pickup purl_symbol_pen;
drawSSK(h-topgap, botcableheight+cablevertgap);
symbolpic0:=currentpicture; purlbox;
endchar;
-beginchar(oright,wd#,ht#,dp#); "Back purl decrease";
+beginchar(oright,decrwidth(2,1),ht#,dp#); "Back purl decrease";
fliphoriz(symbolpic0)(currentpicture);
purlbox;
endchar;
-beginchar("D",wd#,ht#,dp#); "Front decrease";
+beginchar("D",decrwidth(2,1),ht#,dp#); "Front decrease";
pickup symbol_pen;
drawSSK(topcableheight-cablevertgap,-d+bottomgap);
charbox; symbolpic0:=currentpicture;
endchar;
-beginchar(Dright,wd#,ht#,dp#); "Front decrease";
+beginchar(Dright,decrwidth(2,1),ht#,dp#); "Front decrease";
fliphoriz(symbolpic0)(currentpicture); endchar;