diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/chess/chessfig10.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/chess/chessfig10.mf | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/chess/chessfig10.mf b/Master/texmf-dist/fonts/source/public/chess/chessfig10.mf new file mode 100644 index 00000000000..f9e09a1fc28 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/chess/chessfig10.mf @@ -0,0 +1,35 @@ +% This is `chessfig10.mf' version 1.0 as of 8/90 +% METAfounded by Piet Tutelaers (uucp: rcpt@urc.tue.nl) +% (If the filename is too long for your computer rename the file `chessf10.mf' +% and adapt chess.sty accordingly.) + +% generates a font consisting of chess figurines + +mode_setup; +input chessbase; + +def figurine(expr code) = + beginchar(code, d#, .8d#, .2d#); + pickup pencircle scaled thin; + thin_pen:=savepen ; % for drawing pieces + pickup pencircle scaled thick; + thick_pen:=savepen; % for drawing inside pieces + define_whole_pixels(d); + scantokens code(d, 0, -.2); + endchar; +enddef; + +M=1; % number of squares +d#:=10pt#/M; % size per square +thin#:=1/3pt#; thick#:=5/6pt#; define_blacker_pixels(thin, thick); +light=0; dark=1; white=0; black=1; +background:=light; color:=white; + +figurine("K"); +figurine("Q"); +figurine("R"); +figurine("B"); +figurine("N"); +figurine("p"); + +end; |