summaryrefslogtreecommitdiff
path: root/fonts/go
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/go
Initial commit
Diffstat (limited to 'fonts/go')
-rw-r--r--fonts/go/go.sty281
-rw-r--r--fonts/go/gomaps.ltx429
-rw-r--r--fonts/go/mf/go.bat10
-rw-r--r--fonts/go/mf/go.mf333
-rw-r--r--fonts/go/mf/go1.bat10
-rw-r--r--fonts/go/mf/go10.mf13
-rw-r--r--fonts/go/mf/go15.mf13
-rw-r--r--fonts/go/mf/go1bla10.mf13
-rw-r--r--fonts/go/mf/go1bla15.mf13
-rw-r--r--fonts/go/mf/go1bla20.mf13
-rw-r--r--fonts/go/mf/go1black.mf1341
-rw-r--r--fonts/go/mf/go1whi10.mf14
-rw-r--r--fonts/go/mf/go1whi15.mf14
-rw-r--r--fonts/go/mf/go1whi20.mf13
-rw-r--r--fonts/go/mf/go1white.mf1341
-rw-r--r--fonts/go/mf/go20.mf13
-rw-r--r--fonts/go/mf/go2bla10.mf13
-rw-r--r--fonts/go/mf/go2bla15.mf13
-rw-r--r--fonts/go/mf/go2bla20.mf13
-rw-r--r--fonts/go/mf/go2black.mf1446
-rw-r--r--fonts/go/mf/go2whi10.mf14
-rw-r--r--fonts/go/mf/go2whi15.mf14
-rw-r--r--fonts/go/mf/go2whi20.mf13
-rw-r--r--fonts/go/mf/go2white.mf1446
-rw-r--r--fonts/go/mf/gosign50.mf171
25 files changed, 7007 insertions, 0 deletions
diff --git a/fonts/go/go.sty b/fonts/go/go.sty
new file mode 100644
index 0000000000..9973e165ac
--- /dev/null
+++ b/fonts/go/go.sty
@@ -0,0 +1,281 @@
+%%%%%%%%%%%%%%%%%%%%%%%% go.sty %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% written by Hanna Kolodziejska (version 0.05 : November 1991)
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\catcode`@=11
+
+\newbox\@gobox \newdimen\@godimen
+
+\def\gofontsize#1{
+ \font\gofont=go#1 at #1truept
+ \font\blackfontOne=go1bla#1 at #1truept
+ \font\blackfontTwo=go2bla#1 at #1truept
+ \font\whitefontOne=go1whi#1 at #1truept
+ \font\whitefontTwo=go2whi#1 at #1truept
+ \ifnum #1=10 \font\letterfont=cmr10 at 10truept\else %%% <--- ???
+ \ifnum #1=15 \font\letterfont=cmr10 at 14.4truept\else %%% <--- ???
+ \ifnum #1=20 \font\letterfont=cmr10 at 17.28truept\fi\fi\fi
+ \setbox\@gobox=\hbox{\gofont\char0}
+ \@godimen=\wd\@gobox
+ }
+
+\gofontsize{10} % initialization <---
+
+\def\newgoline{\hfill\break}
+\def\hoshi{\gofont\char0}
+\def\empty{\gofont\char1}
+\def\lftborder{\gofont\char2}
+\def\rtborder{\gofont\char3}
+\def\topborder{\gofont\char4}
+\def\botborder{\gofont\char5}
+\def\lfttopcorner{\gofont\char6}
+\def\rttopcorner{\gofont\char7}
+\def\lftbotcorner{\gofont\char8}
+\def\rtbotcorner{\gofont\char9}
+\def\triangle{\whitefontTwo\char127} %%%
+\def\square{\whitefontTwo\char126} %%%
+
+
+\newcount\n
+\newcount\@beglet \newcount\@endlet
+\newcount\@lettercount
+
+\def\@letternumber#1{\relax
+ \ifx #1a\@lettercount=1\else
+ \ifx #1b\@lettercount=2\else
+ \ifx #1c\@lettercount=3\else
+ \ifx #1d\@lettercount=4\else
+ \ifx #1e\@lettercount=5\else
+ \ifx #1f\@lettercount=6\else
+ \ifx #1g\@lettercount=7\else
+ \ifx #1h\@lettercount=8\else
+ \ifx #1i\@lettercount=9\else
+ \ifx #1k\@lettercount=10\else
+ \ifx #1l\@lettercount=11\else
+ \ifx #1m\@lettercount=12\else
+ \ifx #1n\@lettercount=13\else
+ \ifx #1o\@lettercount=14\else
+ \ifx #1p\@lettercount=15\else
+ \ifx #1q\@lettercount=16\else
+ \ifx #1r\@lettercount=17\else
+ \ifx #1s\@lettercount=18\else
+ \ifx #1t\@lettercount=19\else
+ \errmessage{Row label must be letter!}
+ \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+ \fi\fi\fi\fi\fi\fi\fi\fi\fi
+ }
+
+
+\def\inidiagram#1-#2:#3-#4 {\relax
+ \ifnum #3>#4 \errmessage{Invalid column numbers!} \fi
+ \@letternumber{#1} \@beglet=\@lettercount
+ \@letternumber{#2} \@endlet=\@lettercount
+ \def\@inirow##1##2{{\n=#3
+ \loop
+ \expandafter\let\csname @##1\romannumeral\n \endcsname=0\relax
+ \edef\@@inirow{\global
+ \def\csname @##1\romannumeral\n \endcsname{##2}}\@@inirow
+ \ifnum \n<#4 \advance \n by 1
+ \repeat
+ }}\relax
+ \loop
+ \ifcase\@beglet\relax\or
+ \@inirow{a}{\topborder}\relax
+ \ifnum #3=1 \global\def\@ai{\lfttopcorner}\fi
+ \ifnum #4=19 \global\def\@axix{\rttopcorner}\fi \or
+ \@inirow{b}{\empty}\relax
+ \ifnum #3=1 \global\def\@bi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@bxix{\rtborder}\fi \or
+ \@inirow{c}{\empty}\relax
+ \ifnum #3=1 \global\def\@ci{\lftborder}\fi
+ \ifnum #4=19 \global\def\@cxix{\rtborder}\fi \or
+ \@inirow{d}{\empty}\relax
+ \ifnum #3=1 \global\def\@di{\lftborder}\fi
+ \ifnum #3<5 \ifnum #4>3 \global\def\@div{\hoshi}\fi\fi
+ \ifnum #3<11 \ifnum #4>9 \global\def\@dx{\hoshi}\fi\fi
+ \ifnum #3<17 \ifnum #4>15 \global\def\@dxvi{\hoshi}\fi\fi
+ \ifnum #4=19 \global\def\@dxix{\rtborder}\fi \or
+ \@inirow{e}{\empty}
+ \ifnum #3=1 \global\def\@ei{\lftborder}\fi
+ \ifnum #4=19 \global\def\@exix{\rtborder}\fi \or
+ \@inirow{f}{\empty}
+ \ifnum #3=1 \global\def\@fi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@fxix{\rtborder}\fi \or
+ \@inirow{g}{\empty}
+ \ifnum #3=1 \global\def\@gi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@gxix{\rtborder}\fi \or
+ \@inirow{h}{\empty}
+ \ifnum #3=1 \global\def\@hi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@hxix{\rtborder}\fi \or
+ \@inirow{i}{\empty}
+ \ifnum #3=1 \global\def\@ii{\lftborder}\fi
+ \ifnum #4=19 \global\def\@ixix{\rtborder}\fi \or
+ \@inirow{k}{\empty}
+ \ifnum #3=1 \global\def\@ki{\lftborder}\fi
+ \ifnum #3<5 \ifnum #4>3 \global\def\@kiv{\hoshi}\fi\fi
+ \ifnum #3<11 \ifnum #4>9 \global\def\@kx{\hoshi}\fi\fi
+ \ifnum #3<17 \ifnum #4>15 \global\def\@kxvi{\hoshi}\fi\fi
+ \ifnum #4=19 \global\def\@kxix{\rtborder}\fi \or
+ \@inirow{l}{\empty}
+ \ifnum #3=1 \global\def\@li{\lftborder}\fi
+ \ifnum #4=19 \global\def\@lxix{\rtborder}\fi \or
+ \@inirow{m}{\empty}
+ \ifnum #3=1 \global\def\@mi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@mxix{\rtborder}\fi \or
+ \@inirow{n}{\empty}
+ \ifnum #3=1 \global\def\@ni{\lftborder}\fi
+ \ifnum #4=19 \global\def\@nxix{\rtborder}\fi \or
+ \@inirow{o}{\empty}
+ \ifnum #3=1 \global\def\@oi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@oxix{\rtborder}\fi \or
+ \@inirow{p}{\empty}
+ \ifnum #3=1 \global\def\@pi{\lftborder}\fi
+ \ifnum #4=19 \global\def\@pxix{\rtborder}\fi \or
+ \@inirow{q}{\empty}
+ \ifnum #3=1 \global\def\@qi{\lftborder}\fi
+ \ifnum #3<5 \ifnum #4>3 \global\def\@qiv{\hoshi}\fi\fi
+ \ifnum #3<11 \ifnum #4>9 \global\def\@qx{\hoshi}\fi\fi
+ \ifnum #3<17 \ifnum #4>15 \global\def\@qxvi{\hoshi}\fi\fi
+ \ifnum #4=19 \global\def\@qxix{\rtborder}\fi \or
+ \@inirow{r}{\empty}
+ \ifnum #3=1 \global\def\@ri{\lftborder}\fi
+ \ifnum #4=19 \global\def\@rxix{\rtborder}\fi \or
+ \@inirow{s}{\empty}
+ \ifnum #3=1 \global\def\@si{\lftborder}\fi
+ \ifnum #4=19 \global\def\@sxix{\rtborder}\fi \or
+ \@inirow{t}{\botborder}
+ \ifnum #3=1 \global\def\@ti{\lftbotcorner}\fi
+ \ifnum #4=19 \global\def\@txix{\rtbotcorner}\fi
+ \fi
+ \ifnum \@beglet<\@endlet \advance \@beglet by 1
+ \repeat
+ }
+
+\def\inifulldiagram{\inidiagram a-t:1-19 }
+
+\inifulldiagram % initialization
+
+
+\def\showdiagram#1-#2:#3-#4 {\vbox{\offinterlineskip\noindent
+ \ifnum #3>#4 \errmessage{Invalid column numbers!} \fi
+ \hsize=\@godimen
+ \n=#4\advance\n by-#3\advance\n by1
+ \multiply\hsize by\n
+ \@letternumber{#1} \@beglet=\@lettercount
+ \@letternumber{#2} \@endlet=\@lettercount
+ \def\@showrow##1{{\n=#3
+ \loop
+ \edef\@@showrow{\csname @##1\romannumeral\n \endcsname}\@@showrow
+ \ifnum \n<#4 \advance \n by 1
+ \repeat
+ }}\relax
+ \loop
+ \ifcase\@beglet\relax\or
+ \@showrow{a}\or
+ \@showrow{b}\or
+ \@showrow{c}\or
+ \@showrow{d}\or
+ \@showrow{e}\or
+ \@showrow{f}\or
+ \@showrow{g}\or
+ \@showrow{h}\or
+ \@showrow{i}\or
+ \@showrow{k}\or
+ \@showrow{l}\or
+ \@showrow{m}\or
+ \@showrow{n}\or
+ \@showrow{o}\or
+ \@showrow{p}\or
+ \@showrow{q}\or
+ \@showrow{r}\or
+ \@showrow{s}\or
+ \@showrow{t}
+ \fi
+ \ifnum \@beglet<\@endlet
+ \newgoline \advance \@beglet by 1
+ \repeat
+ }}
+
+\def\showfulldiagram{\showdiagram a-t:1-19 }
+
+\def\pos#1#2=#3#4{\relax
+ \ifcat #1a\relax \else \errmessage{Row label must be a letter!}\fi
+ \ifnum #2<1 \errmessage{Column number less than 1?}\fi
+ \ifnum #2>19 \errmessage{Column number greater than 19?}\fi
+ \edef\@fourth{#4}\relax
+ \ifx .#4\ifx #3\empty\edef\@fourth{}\else \edef\@fourth{0}\fi\fi
+ \edef\@borders{\relax
+ \ifx #1a \ifnum #2=1 \gofont\char15 \else
+ \ifnum #2=19 \gofont\char16 \else
+ \gofont\char13 \fi\fi
+ \else
+ \ifx #1t \ifnum #2=1 \gofont\char17 \else
+ \ifnum #2=19 \gofont\char18 \else
+ \gofont\char14 \fi\fi
+ \else
+ \ifnum #2=1 \gofont\char11
+ \else
+ \ifnum #2=19 \gofont\char12
+ \else
+ \gofont\char10
+ \fi\fi\fi\fi}\relax
+ \expandafter\let\csname @#1\romannumeral#2\endcsname=0\relax
+ \edef\@pos{\def\csname @#1\romannumeral#2\endcsname{#3{\@fourth}}}\@pos
+ \ignorespaces
+ }
+
+
+\newcount\nr
+
+\def\black#1{\relax
+ \ifx \triangle#1{\let\whitefontTwo=\blackfontTwo
+ \rlap{\triangle}\@borders}\else
+ \ifx \square#1{\let\whitefontTwo=\blackfontTwo
+ \rlap{\square}\@borders}\else
+ \ifnum #1<0 \errmessage{Negative Black's move?}\else
+ \ifnum #1>253 \errmessage{Black's move too big!}\else
+ \ifnum #1<128 {\blackfontOne\rlap{\char#1}\@borders}\else
+ \nr=#1
+ \advance \nr by -128
+ {\blackfontTwo\rlap{\char\nr}\@borders}\ignorespaces
+ \fi\fi\fi\fi\fi}
+
+\def\white#1{\relax
+ \ifx \triangle#1{\rlap{\triangle}\@borders}\else
+ \ifx \square#1{\rlap{\square}\@borders}\else
+ \ifnum #1<0 \errmessage{Negative White's move?}\else
+ \ifnum #1>253 \errmessage{White's move too big!}\else
+ \ifnum #1<128 {\whitefontOne\rlap{\char#1}\@borders}\else
+ \nr=#1
+ \advance \nr by -128
+ {\whitefontTwo\rlap{\char\nr}\@borders}\ignorespaces
+ \fi\fi\fi\fi\fi}
+
+\def\textblack#1{\def\@borders{\hskip\wd\@gobox}\relax
+ \ifx .#1\lower.2\wd\@gobox\hbox{\black{0}}\else
+ \lower.2\wd\@gobox\hbox{\black{#1}}\fi}
+
+\def\textwhite#1{\def\@borders{\hskip\wd\@gobox}\relax
+ \ifx .#1\lower.2\wd\@gobox\hbox{\white{0}}\else
+ \lower.2\wd\@gobox\hbox{\white{#1}}\fi}
+
+
+\newbox\@letterbox \newdimen\@letterdim
+
+\def\symbol#1{\relax
+ \ifcat a#1\relax\else
+ \ifcat 0#1\relax\else
+ \errmessage{Strange parameter of symbol macro! (#1)}
+ \fi\fi
+ \setbox\@letterbox=\hbox to\wd\@gobox{\hfil\letterfont #1\hfil}\relax
+ \@letterdim=\wd\@gobox
+ \divide \@letterdim by 24
+ \multiply \@letterdim by 22
+ \advance \@letterdim by -\ht\@letterbox
+ {\raise.5\@letterdim\box\@letterbox}\relax
+ }
+
+\let\letter=\symbol
+
+\catcode`@=12
diff --git a/fonts/go/gomaps.ltx b/fonts/go/gomaps.ltx
new file mode 100644
index 0000000000..4ed3affd1a
--- /dev/null
+++ b/fonts/go/gomaps.ltx
@@ -0,0 +1,429 @@
+\documentstyle[11pt,go]{article}
+
+\textwidth=6.5truein
+\textheight=8.9truein
+\oddsidemargin=0pt
+\topmargin=-24pt
+\font\gosign=gosign50 at 50truept
+
+\title{Go diagrams with \TeX \\[6pt] \gosign\char0}
+\author{Hanna Ko{\l}odziejska\thanks{I wrote this paper in April 1990,
+ during my work in the Institute of Informatics at the
+ Warsaw University.} \\
+ {\sf MacroSoft}, Ltd. \\
+ ul.~Chro\'scickiego 49 \\
+ 02-414 Warsaw, Poland}
+
+\begin{document}
+\maketitle
+
+\noindent
+Encoureged by Zalman Rubinstein, who described his chess
+diagrams in TUGboat vol.~10 no.~2 [1], I have prepared some
+special fonts and \TeX\ macros to be used in typesetting go
+diagrams. For all the people who have never yet played go I found
+the following introduction to the game~[2]:
+
+\begin{quotation}
+\em
+Go is one of the most ancient, interesting, and rewarding of all
+board games. [\ldots] It is played on a wooden board marked with
+nineteen vertical and nineteen horizontal lines. The pieces used
+are disks of slate and white shell slightly more than two
+centimeters in diameter. These, even made of plastic or glass,
+as in mass-produced sets, are called stones. They are played on
+the intersections formed by the lines on the board, not within
+the squares. The board is empty at the beginning of the game,
+and the two players take turns placing stones on it one at a
+time, one player playing black the other playing white. Once
+played, a stone remains in its place, not moving about from
+point to point.\par
+\end{quotation}
+
+\noindent
+Go diagrams are easy to read. \textblack{1} is the first stone
+played, \textwhite{2} the second, and so on.
+
+In order to facilitate inserting go diagrams in a text both in
+Plain \TeX\ and \LaTeX, I decided to generate with Metafont all
+the symbols needed, even lines and circles, and to put them in
+three kinds of fonts:
+\begin{enumerate}
+\item fonts with black stones, eg.\ go1bla10, go2bla10 (go black stones at 10pt);
+\item fonts with white stones, eg.\ go1whi10, go2whi10 (go white stones at 10pt);
+\item fonts with additional symbols, like intersections of
+ lines, border lines, etc., eg.\ go10 (go symbols at 10pt).
+\end{enumerate}
+Probably two more fonts will be needed with black and white
+stones numbered over~255, because games which last over
+300~moves are not seldom!
+
+The macros for coding go diagrams are gathered in the `go.sty'
+file. In the macros each line intersection is identified by the
+row label (one of the letters: a, b, c, d, e, f, g, h, i, k, l,
+m, n, o, p, q, r, s,~t) and the column number (from 1 to~19).
+After issuing the command:
+\begin{center}
+ \verb+\input go.sty+
+\end{center}
+the current go diagram is initialized (with no stones on it).
+Later in your text you can clear the whole diagram or only a
+part of it by introducing one of the commands:
+\begin{center}
+ \verb+\inifulldiagram+
+\end{center}
+or
+\begin{center}
+ \verb+\inidiagram+ \it with parameters.
+\end{center}
+For example, {\tt \verb+\inifulldiagram+} is equivalent to:
+\begin{center}
+ \verb*+\inidiagram a-t:1-19 +
+\end{center}
+(with a space limiting the fourth parameter).
+
+The same rule stands also for showing diagrams:
+\begin{center}
+ \verb+\showfulldiagram+
+\end{center}
+is equivalent to:
+\begin{center}
+ \verb*+\showdiagram a-t:1-19 +
+\end{center}
+Partial diagrams are often used to show go problems, their
+solutions and different variations of moves.
+
+Putting a stone on the board is coded by the command:
+\begin{center}
+ \verb+\pos+ \it with parameters.
+\end{center}
+
+Lets consider an example: a problem to solve (Dia.~1) and its
+solution (Dia.~2).
+
+\gofontsize{20}
+\pos{a}{5}=\white.
+\pos{a}{6}=\black.
+\pos{b}{3}=\white.
+\pos{b}{4}=\white.
+\pos{b}{5}=\white.
+\pos{b}{6}=\black.
+\pos{c}{3}=\white.
+\pos{c}{4}=\black.
+\pos{c}{5}=\black.
+\pos{d}{3}=\white.
+\pos{e}{2}=\black.
+\pos{e}{3}=\black.
+\pos{e}{4}=\black.
+\pos{e}{6}=\black{\triangle}
+\begin{figure}[htb]
+$$
+\showdiagram a-g:1-9
+$$
+\begin{center} Dia. 1 \end{center}
+\end{figure}
+
+\vspace*{-12truept}
+\begin{verbatim}
+\input go.sty % inputs macros
+\gofontsize{20} % chooses the size of stones and other
+ % symbols (default=10pt)
+\pos{a}{5}=\white. % puts a white stone (without any number)
+\pos{a}{6}=\black. % puts a black stone (without any number)
+ % on the a6 intersection
+\pos{b}{3}=\white.
+\pos{b}{4}=\white.
+\pos{b}{5}=\white.
+\pos{b}{6}=\black.
+\pos{c}{3}=\white.
+\pos{c}{4}=\black.
+\pos{c}{5}=\black.
+\pos{d}{3}=\white.
+\pos{e}{2}=\black.
+\pos{e}{3}=\black.
+\pos{e}{4}=\black.
+\pos{e}{6}=\black{\triangle} % puts a black stone with
+ % a triangle
+$$ % centering
+\showdiagram a-g:1-9 % the result is shown in Dia. 1
+$$
+\pos{b}{1}=\black{1} % puts a black stone with 1
+\pos{c}{2}=\letter{b} % puts a letter `b' on
+ % the c2 intersection
+\pos{d}{2}=\letter{a}
+\gofontsize{10} % changes the size of stones and
+ % other symbols
+$$
+\showfulldiagram % as in Dia. 2.
+$$
+\inifulldiagram % clears a board
+\end{verbatim}
+\smallskip
+
+\pos{b}{1}=\black{1}
+\pos{c}{2}=\letter{b}
+\pos{d}{2}=\letter{a}
+\gofontsize{10}
+\begin{figure}[htb]
+$$
+\showfulldiagram
+$$
+\begin{center} Dia. 2 \end{center}
+\end{figure}
+\inifulldiagram
+
+\noindent
+An example of a real game is shown in Dia.~3 [3].
+
+% DIAGRAM 3
+%
+\pos{a}{1}=\white{194}
+\pos{a}{3}=\black{191}
+\pos{a}{5}=\black{187}
+\pos{a}{6}=\white{186}
+\pos{a}{8}=\black{181}
+\pos{a}{9}=\white{190}
+\pos{a}{12}=\black{175}
+%
+\pos{b}{1}=\black{135}
+\pos{b}{2}=\white{184}
+\pos{b}{3}=\white{182}
+\pos{b}{4}=\black{183}
+\pos{b}{5}=\black{193}
+\pos{b}{6}=\white{178}
+\pos{b}{8}=\black{179}
+\pos{b}{9}=\white{172}
+\pos{b}{10}=\white{174}
+\pos{b}{12}=\black{93}
+\pos{b}{13}=\white{92}
+\pos{b}{14}=\white{142}
+%
+\pos{c}{1}=\white{132}
+\pos{c}{2}=\black{133}
+\pos{c}{3}=\white{196}
+\pos{c}{4}=\black{3}
+\pos{c}{5}=\black{189}
+\pos{c}{6}=\white{176}
+\pos{c}{7}=\black{17}
+\pos{c}{8}=\black{173}
+\pos{c}{9}=\black{171}
+\pos{c}{10}=\white{168}
+\pos{c}{11}=\black{195}
+\pos{c}{12}=\black{57}
+\pos{c}{13}=\black{141}
+\pos{c}{14}=\white{10}
+\pos{c}{15}=\white{52}
+%
+\pos{d}{1}=\white{134}
+\pos{d}{2}=\black{137}
+\pos{d}{3}=\black{13}
+\pos{d}{4}=\white{188}
+\pos{d}{5}=\black{15}
+\pos{d}{6}=\black{177}
+\pos{d}{7}=\white{180}
+\pos{d}{8}=\black{21}
+\pos{d}{9}=\white{170}
+\pos{d}{10}=\black{169}
+\pos{d}{11}=\black{9}
+\pos{d}{13}=\white{154}
+\pos{d}{14}=\black{143}
+\pos{d}{15}=\black{51}
+\pos{d}{16}=\white{2}
+\pos{d}{17}=\white{54}
+\pos{d}{18}=\white{24}
+%
+\pos{e}{1}=\white{140}
+\pos{e}{2}=\white{136}
+\pos{e}{4}=\white{12}
+\pos{e}{7}=\white{14}
+\pos{e}{8}=\white{192}
+\pos{e}{9}=\white{20}
+\pos{e}{13}=\white{160}
+\pos{e}{16}=\black{53}
+%
+\pos{f}{2}=\white{62}
+\pos{f}{3}=\white{64}
+\pos{f}{4}=\white{58}
+\pos{f}{6}=\white{16}
+\pos{f}{7}=\white{70}
+\pos{f}{8}=\white{166}
+\pos{f}{10}=\white{158}
+\pos{f}{11}=\white{50}
+\pos{f}{13}=\white{144}
+\pos{f}{17}=\black{23}
+%
+\pos{g}{1}=\white{84}
+\pos{g}{2}=\black{63}
+\pos{g}{3}=\white{60}
+\pos{g}{4}=\black{19}
+\pos{g}{5}=\black{59}
+\pos{g}{6}=\black{65}
+\pos{g}{7}=\white{66}
+\pos{g}{8}=\black{69}
+\pos{g}{9}=\white{148}
+\pos{g}{10}=\black{157}
+\pos{g}{11}=\white{76}
+\pos{g}{14}=\black{81}
+\pos{g}{15}=\black{87}
+\pos{g}{18}=\black{139}
+%
+\pos{h}{2}=\white{82}
+\pos{h}{3}=\black{61}
+\pos{h}{7}=\black{67}
+\pos{h}{8}=\white{68}
+\pos{h}{9}=\white{22}
+\pos{h}{10}=\black{147}
+\pos{h}{11}=\black{75}
+\pos{h}{12}=\black{77}
+\pos{h}{14}=\black{79}
+\pos{h}{15}=\white{80}
+\pos{h}{17}=\black{123}
+\pos{h}{18}=\white{138}
+%
+\pos{i}{1}=\white{94}
+\pos{i}{2}=\black{83}
+\pos{i}{4}=\black{5}
+\pos{i}{6}=\white{18}
+\pos{i}{7}=\black{71}
+\pos{i}{15}=\white{74}
+\pos{i}{17}=\black{55}
+\pos{i}{18}=\white{120}
+%
+\pos{k}{2}=\black{95}
+\pos{k}{7}=\black{73}
+\pos{k}{8}=\white{86}
+\pos{k}{9}=\white{72}
+\pos{k}{10}=\black{165}
+\pos{k}{11}=\black{11}
+\pos{k}{17}=\black{119}
+\pos{k}{18}=\white{118}
+%
+\pos{l}{4}=\black{49}
+\pos{l}{6}=\black{89}
+\pos{l}{7}=\white{88}
+\pos{l}{8}=\black{127}
+\pos{l}{9}=\white{128}
+\pos{l}{10}=\black{115}
+\pos{l}{13}=\white{116}
+\pos{l}{15}=\white{78}
+\pos{l}{16}=\black{121}
+\pos{l}{17}=\white{56}
+\pos{l}{18}=\black{117}
+%
+\pos{m}{6}=\black{91}
+\pos{m}{7}=\white{90}
+\pos{m}{8}=\black{129}
+\pos{m}{9}=\white{114}
+\pos{m}{10}=\black{125}
+\pos{m}{12}=\black{145}
+\pos{m}{16}=\white{124}
+\pos{m}{17}=\white{122}
+%
+\pos{n}{7}=\black{113}
+\pos{n}{9}=\black{159}
+\pos{n}{10}=\black{167}
+\pos{n}{11}=\white{164}
+%
+\pos{o}{2}=\black{131}
+\pos{o}{4}=\black{7}
+\pos{o}{9}=\black{153}
+\pos{o}{12}=\white{156}
+\pos{o}{16}=\white{28}
+%
+\pos{p}{1}=\white{130}
+\pos{p}{2}=\black{111}
+\pos{p}{6}=\black{85}
+\pos{p}{8}=\white{152}
+\pos{p}{9}=\black{151}
+\pos{p}{11}=\white{162}
+\pos{p}{12}=\black{155}
+\pos{p}{13}=\white{104}
+\pos{p}{14}=\white{108}
+\pos{p}{15}=\white{26}
+\pos{p}{16}=\black{25}
+\pos{p}{17}=\white{106}
+\pos{p}{18}=\white{34}
+%
+\pos{q}{2}=\white{110}
+\pos{q}{3}=\black{45}
+\pos{q}{4}=\black{1}
+\pos{q}{7}=\black{103}
+\pos{q}{8}=\white{150}
+\pos{q}{9}=\black{149}
+\pos{q}{10}=\white{8}
+\pos{q}{11}=\black{161}
+\pos{q}{12}=\white{100}
+\pos{q}{13}=\black{101}
+\pos{q}{14}=\black{107}
+\pos{q}{15}=\white{30}
+\pos{q}{16}=\black{29}
+\pos{q}{17}=\white{36}
+%
+\pos{r}{1}=\white{112}
+\pos{r}{2}=\black{47}
+\pos{r}{3}=\white{42}
+\pos{r}{4}=\black{43}
+\pos{r}{6}=\white{6}
+\pos{r}{7}=\black{99}
+\pos{r}{8}=\white{146}
+\pos{r}{9}=\black{97}
+\pos{r}{11}=\white{40}
+\pos{r}{12}=\black{39}
+\pos{r}{15}=\black{31}
+\pos{r}{16}=\white{4}
+\pos{r}{17}=\black{27}
+\pos{r}{18}=\white{96}
+%
+\pos{s}{2}=\white{46}
+\pos{s}{3}=\white{48}
+\pos{s}{4}=\white{44}
+\pos{s}{7}=\white{102}
+\pos{s}{8}=\white{126}
+\pos{s}{9}=\black{185}
+\pos{s}{11}=\white{98}
+\pos{s}{12}=\black{41}
+\pos{s}{13}=\black{109}
+\pos{s}{15}=\black{35}
+\pos{s}{16}=\white{32}
+\pos{s}{17}=\black{33}
+%
+\pos{t}{16}=\black{37}
+
+\begin{figure}[htb]
+\gofontsize{15}
+$$
+\showfulldiagram
+$$
+\begin{center} Dia. 3 \end{center}
+\end{figure}
+
+\noindent
+Diagrams are put in a text like ordinary vboxes.
+
+The stones can be also put directly in a paragraph. To do this
+you should use the \verb+\textwhite+ and \verb+\textblack+
+commands instead of \verb+\white+ and \verb+\black+. For
+example, the sentence from the beginning of this article:
+``\textblack{1} is the first stone played, \textwhite{2} the
+second, and so on'' was written as: ``\verb+\textblack{1}+ is the
+first stone played, \verb+\textwhite{2}+ the second, and so on.''
+
+There are no other secrets in coding go diagrams. Macros for
+making $9\times 9$ or $13 \times 13$ diagrams can easily be
+added to `go.sty' by a simple modification of the existing
+macros for $19 \times 19$ diagrams.
+
+
+
+\subsection*{References}
+
+\begin{itemize}
+\item[{[1]}] Zalman Rubinstein: ``Chess printing via Metafont
+ and \TeX'', TUGboat Vol.~10, No.~2.
+\item[{[2]}] Iwamoto Kaoru, 9 dan: ``Go for beginners'', Ishi
+ Press, Inc., Tokyo, Japan.
+\item[{[3]}] Janusz Kraszek: ``\'Swiat Go'', COK, Warsaw 1989
+ (in Polish).
+\end{itemize}
+
+\end{document}
diff --git a/fonts/go/mf/go.bat b/fonts/go/mf/go.bat
new file mode 100644
index 0000000000..50acc8b426
--- /dev/null
+++ b/fonts/go/mf/go.bat
@@ -0,0 +1,10 @@
+mf286 &plain \mode=hplaser; input go1bla15
+gftopk go1bla15.300
+mf286 &plain \mode=hplaser; input go2bla15
+gftopk go2bla15.300
+mf286 &plain \mode=hplaser; input go1whi15
+gftopk go1whi15.300
+mf286 &plain \mode=hplaser; input go2whi15
+gftopk go2whi15.300
+mf286 &plain \mode=hplaser; input go15
+gftopk go15.300
diff --git a/fonts/go/mf/go.mf b/fonts/go/mf/go.mf
new file mode 100644
index 0000000000..6972493e35
--- /dev/null
+++ b/fonts/go/mf/go.mf
@@ -0,0 +1,333 @@
+mode_setup;
+
+define_pixels(size);
+define_pixels(line_thickness,border_line_thickness);
+
+picture black_circle;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+def set_black_circle =
+ currentpicture := nullpicture;
+ pickup pencircle scaled line_thickness;
+ lft x1=1/22size; y1=1/2size;
+ rt x2=23/22size; y2=1/2size;
+ filldraw z1..z2..cycle;
+ black_circle := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+set_black_circle;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(0,24/22size#,23/22size#,1/22size#); "punkt hoshi";
+ pickup pencircle scaled line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+ z5=(.5w-.1size,11/24w);
+ z6=(.5w+.1size,11/24w);
+ filldraw z5..z6..cycle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(1,24/22size#,23/22size#,1/22size#); "pelny krzyz";
+ pickup pencircle scaled line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(2,24/22size#,23/22size#,1/22size#); "lewy brzeg";
+ pickup pencircle scaled line_thickness;
+ lft x1=.5w; y1=11/24w;
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ pickup pencircle scaled border_line_thickness;
+ draw z2..z4;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(3,24/22size#,23/22size#,1/22size#); "prawy brzeg";
+ pickup pencircle scaled line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ rt x3=.5w; y3=11/24w;
+ z4=(.5w,-d);
+ draw z1..z3;
+ pickup pencircle scaled border_line_thickness;
+ draw z2..z4;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(4,24/22size#,23/22size#,1/22size#); "gorny brzeg";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ x2=.5w; top y2=11/24w;
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ pickup pencircle scaled line_thickness;
+ draw z2..z4;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(5,24/22size#,23/22size#,1/22size#); "dolny brzeg";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ x4=.5w; bot y4=11/24w;
+ draw z1..z3;
+ pickup pencircle scaled line_thickness;
+ draw z2..z4;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(6,24/22size#,23/22size#,1/22size#); "lewy gorny rog";
+ pickup pencircle scaled border_line_thickness;
+ lft x1=.5w; y1=11/24w;
+ x2=.5w; top y2=11/24w;
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(7,24/22size#,23/22size#,1/22size#); "prawy gorny rog";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ x2=.5w; top y2=11/24w;
+ rt x3=.5w; y3=11/24w;
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(8,24/22size#,23/22size#,1/22size#); "lewy dolny rog";
+ pickup pencircle scaled border_line_thickness;
+ lft x1=.5w; y1=11/24w;
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ x4=.5w; bot y4=11/24w;
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(9,24/22size#,23/22size#,1/22size#); "prawy dolny rog";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ rt x3=.5w; y3=11/24w;
+ x4=.5w; bot y4=11/24w;
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(10,24/22size#,23/22size#,1/22size#); "pelny krzyz - pion";
+ pickup pencircle scaled line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(11,24/22size#,23/22size#,1/22size#); "lewy brzeg - pion";
+ pickup pencircle scaled line_thickness;
+ lft x1=.5w; y1=11/24w;
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ pickup pencircle scaled border_line_thickness;
+ draw z2..z4;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(12,24/22size#,23/22size#,1/22size#); "prawy brzeg - pion";
+ pickup pencircle scaled line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ rt x3=.5w; y3=11/24w;
+ z4=(.5w,-d);
+ draw z1..z3;
+ pickup pencircle scaled border_line_thickness;
+ draw z2..z4;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(13,24/22size#,23/22size#,1/22size#); "gorny brzeg - pion";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ x2=.5w; top y2=11/24w;
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ pickup pencircle scaled line_thickness;
+ draw z2..z4;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(14,24/22size#,23/22size#,1/22size#); "dolny brzeg - pion";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ x4=.5w; bot y4=11/24w;
+ draw z1..z3;
+ pickup pencircle scaled line_thickness;
+ draw z2..z4;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(15,24/22size#,23/22size#,1/22size#); "lewy gorny rog - pion";
+ pickup pencircle scaled border_line_thickness;
+ lft x1=.5w; y1=11/24w;
+ x2=.5w; top y2=11/24w;
+ z3=(w,11/24w);
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(16,24/22size#,23/22size#,1/22size#); "prawy gorny rog - pion";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ x2=.5w; top y2=11/24w;
+ rt x3=.5w; y3=11/24w;
+ z4=(.5w,-d);
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(17,24/22size#,23/22size#,1/22size#); "lewy dolny rog - pion";
+ pickup pencircle scaled border_line_thickness;
+ lft x1=.5w; y1=11/24w;
+ z2=(.5w,h);
+ z3=(w,11/24w);
+ x4=.5w; bot y4=11/24w;
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(18,24/22size#,23/22size#,1/22size#); "prawy dolny rog - pion";
+ pickup pencircle scaled border_line_thickness;
+ z1=(0,11/24w);
+ z2=(.5w,h);
+ rt x3=.5w; y3=11/24w;
+ x4=.5w; bot y4=11/24w;
+ draw z1..z3;
+ draw z2..z4;
+ pickup penrazor scaled border_line_thickness;
+ z5=(.5w,11/24w+.5border_line_thickness);
+ z6=(.5w,11/24w-.5border_line_thickness);
+ draw z5..z6;
+ cullit;
+ addto currentpicture also -black_circle;
+showit;
+endchar;
+
+% stop"";
+
+end;
+
diff --git a/fonts/go/mf/go1.bat b/fonts/go/mf/go1.bat
new file mode 100644
index 0000000000..50acc8b426
--- /dev/null
+++ b/fonts/go/mf/go1.bat
@@ -0,0 +1,10 @@
+mf286 &plain \mode=hplaser; input go1bla15
+gftopk go1bla15.300
+mf286 &plain \mode=hplaser; input go2bla15
+gftopk go2bla15.300
+mf286 &plain \mode=hplaser; input go1whi15
+gftopk go1whi15.300
+mf286 &plain \mode=hplaser; input go2whi15
+gftopk go2whi15.300
+mf286 &plain \mode=hplaser; input go15
+gftopk go15.300
diff --git a/fonts/go/mf/go10.mf b/fonts/go/mf/go10.mf
new file mode 100644
index 0000000000..e5bae4ddf6
--- /dev/null
+++ b/fonts/go/mf/go10.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO"; font_size 10pt#;
+
+size#:=10pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=7/10size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go
diff --git a/fonts/go/mf/go15.mf b/fonts/go/mf/go15.mf
new file mode 100644
index 0000000000..7a86a9e7d7
--- /dev/null
+++ b/fonts/go/mf/go15.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO"; font_size 15pt#;
+
+size#:=15pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=7/10size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go
diff --git a/fonts/go/mf/go1bla10.mf b/fonts/go/mf/go1bla10.mf
new file mode 100644
index 0000000000..ebb13bf04d
--- /dev/null
+++ b/fonts/go/mf/go1bla10.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO1BLACK"; font_size 10pt#;
+
+size#:=10pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go1black
diff --git a/fonts/go/mf/go1bla15.mf b/fonts/go/mf/go1bla15.mf
new file mode 100644
index 0000000000..9f2299268b
--- /dev/null
+++ b/fonts/go/mf/go1bla15.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO1BLACK"; font_size 15pt#;
+
+size#:=15pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go1black
diff --git a/fonts/go/mf/go1bla20.mf b/fonts/go/mf/go1bla20.mf
new file mode 100644
index 0000000000..a4a21afe77
--- /dev/null
+++ b/fonts/go/mf/go1bla20.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO1BLACK"; font_size 20pt#;
+
+size#:=20pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go1black
diff --git a/fonts/go/mf/go1black.mf b/fonts/go/mf/go1black.mf
new file mode 100644
index 0000000000..c6924a546e
--- /dev/null
+++ b/fonts/go/mf/go1black.mf
@@ -0,0 +1,1341 @@
+mode_setup;
+
+define_pixels(size);
+define_pixels(line_thickness,border_line_thickness);
+define_pixels(dig_h,dig_w,dig_pen);
+
+picture digit[];
+picture black_circle;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+def digit_zero =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.5dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=dig_w; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ draw z1...z2...z3...z4...cycle;
+ digit[0] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_one =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.5dig_w; bot y1=0;
+ x2=.5dig_w; top y2=dig_h;
+ draw z1--z2;
+ digit[1] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_two =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.8dig_w; y3=.9dig_h;
+ lft x4=0; bot y4=0;
+ draw z1{up}...z2...z3..{(-.8dig_w,-dig_h)}z4;
+ z5=z4;
+ rt x6=dig_w; bot y6=0;
+ draw z5--z6;
+ digit[2] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_three =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.8dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.52dig_h);
+ rt x5=dig_w; y5=.2dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1{up}..z2..z3..{left}z4{right}..z5..z6...{up}z7;
+ digit[3] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_four =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.75dig_w; bot y1=0;
+ x2=x1; top y2=dig_h;
+ lft x3=0; y3=.3dig_h;
+ rt x4=dig_w; y4=y3;
+ draw z1--z2--z3--z4;
+ digit[4] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_five =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=.95dig_w; top y1=dig_h;
+ lft x2=.05dig_w; y2=y1;
+ lft x3=0; y3=.45dig_h;
+ z4=(.5dig_w,.6dig_h);
+ rt x5=dig_w; y5=.3dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=.15dig_h;
+ draw z1--z2--z3{up}..z4..z5..z6...{up}z7;
+ digit[5] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_six =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=dig_w; y1=.8dig_h;
+ x2=.45dig_w; top y2=dig_h;
+ lft x3=0; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ rt x5=dig_w; y5=.3dig_h;
+ z6=(.53dig_w,.55dig_h);
+ z7=(.03dig_w+.6dig_pen,.25dig_h);
+ draw z1{up}...z2...z3...z4...z5...{left}z6{left}...{(1,-10)}z7;
+ digit[6] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_seven =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; top y1=dig_h;
+ rt x2=dig_w; y2=y1;
+ lft x3=.2dig_w; bot y3=0;
+ draw z1--z2--z3;
+ digit[7] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_eight =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.55dig_h);
+ rt x5=dig_w; y5=.25dig_h;
+ x6=.5dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1...z2...z3...z4...cycle;
+ draw z4...z5...z6...z7...cycle;
+ digit[8] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_nine =
+ currentpicture := nullpicture;
+ currentpicture := digit[6] rotated 180;
+ digit[9] := currentpicture shifted (dig_w,dig_h);
+ clearxy; clearit; clearpen;
+enddef;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(0,24/22size#,23/22size#,1/22size#); "pion czarny";
+ pickup pencircle scaled line_thickness;
+ lft x1=1/24w; y1=11/24w;
+ rt x2=23/24w; y2=11/24w;
+ filldraw z1..z2..cycle;
+ black_circle := currentpicture;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(1,24/22size#,23/22size#,1/22size#); "pion czarny z 1";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(2,24/22size#,23/22size#,1/22size#); "pion czarny z 2";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(3,24/22size#,23/22size#,1/22size#); "pion czarny z 3";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(4,24/22size#,23/22size#,1/22size#); "pion czarny z 4";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(5,24/22size#,23/22size#,1/22size#); "pion czarny z 5";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(6,24/22size#,23/22size#,1/22size#); "pion czarny z 6";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(7,24/22size#,23/22size#,1/22size#); "pion czarny z 7";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(8,24/22size#,23/22size#,1/22size#); "pion czarny z 8";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(9,24/22size#,23/22size#,1/22size#); "pion czarny z 9";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+dig_w := .7dig_w;
+%%%dig_pen := .7dig_pen;
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(10,24/22size#,23/22size#,1/22size#); "pion czarny z 10";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(11,24/22size#,23/22size#,1/22size#); "pion czarny z 11";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(12,24/22size#,23/22size#,1/22size#); "pion czarny z 12";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(13,24/22size#,23/22size#,1/22size#); "pion czarny z 13";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(14,24/22size#,23/22size#,1/22size#); "pion czarny z 14";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(15,24/22size#,23/22size#,1/22size#); "pion czarny z 15";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(16,24/22size#,23/22size#,1/22size#); "pion czarny z 16";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(17,24/22size#,23/22size#,1/22size#); "pion czarny z 17";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(18,24/22size#,23/22size#,1/22size#); "pion czarny z 18";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(19,24/22size#,23/22size#,1/22size#); "pion czarny z 19";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(20,24/22size#,23/22size#,1/22size#); "pion czarny z 20";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(21,24/22size#,23/22size#,1/22size#); "pion czarny z 21";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(22,24/22size#,23/22size#,1/22size#); "pion czarny z 22";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(23,24/22size#,23/22size#,1/22size#); "pion czarny z 23";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(24,24/22size#,23/22size#,1/22size#); "pion czarny z 24";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(25,24/22size#,23/22size#,1/22size#); "pion czarny z 25";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(26,24/22size#,23/22size#,1/22size#); "pion czarny z 26";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(27,24/22size#,23/22size#,1/22size#); "pion czarny z 27";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(28,24/22size#,23/22size#,1/22size#); "pion czarny z 28";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(29,24/22size#,23/22size#,1/22size#); "pion czarny z 29";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(30,24/22size#,23/22size#,1/22size#); "pion czarny z 30";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(31,24/22size#,23/22size#,1/22size#); "pion czarny z 31";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(32,24/22size#,23/22size#,1/22size#); "pion czarny z 32";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(33,24/22size#,23/22size#,1/22size#); "pion czarny z 33";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(34,24/22size#,23/22size#,1/22size#); "pion czarny z 34";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(35,24/22size#,23/22size#,1/22size#); "pion czarny z 35";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(36,24/22size#,23/22size#,1/22size#); "pion czarny z 36";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(37,24/22size#,23/22size#,1/22size#); "pion czarny z 37";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(38,24/22size#,23/22size#,1/22size#); "pion czarny z 38";
+ currentpicture := black_circle
+ - digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(39,24/22size#,23/22size#,1/22size#); "pion czarny z 39";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(40,24/22size#,23/22size#,1/22size#); "pion czarny z 40";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(41,24/22size#,23/22size#,1/22size#); "pion czarny z 41";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(42,24/22size#,23/22size#,1/22size#); "pion czarny z 42";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(43,24/22size#,23/22size#,1/22size#); "pion czarny z 43";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(44,24/22size#,23/22size#,1/22size#); "pion czarny z 44";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(45,24/22size#,23/22size#,1/22size#); "pion czarny z 45";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(46,24/22size#,23/22size#,1/22size#); "pion czarny z 46";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(47,24/22size#,23/22size#,1/22size#); "pion czarny z 47";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(48,24/22size#,23/22size#,1/22size#); "pion czarny z 48";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(49,24/22size#,23/22size#,1/22size#); "pion czarny z 49";
+ currentpicture := black_circle
+ - digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(50,24/22size#,23/22size#,1/22size#); "pion czarny z 50";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(51,24/22size#,23/22size#,1/22size#); "pion czarny z 51";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(52,24/22size#,23/22size#,1/22size#); "pion czarny z 52";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(53,24/22size#,23/22size#,1/22size#); "pion czarny z 53";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(54,24/22size#,23/22size#,1/22size#); "pion czarny z 54";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(55,24/22size#,23/22size#,1/22size#); "pion czarny z 55";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(56,24/22size#,23/22size#,1/22size#); "pion czarny z 56";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(57,24/22size#,23/22size#,1/22size#); "pion czarny z 57";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(58,24/22size#,23/22size#,1/22size#); "pion czarny z 58";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(59,24/22size#,23/22size#,1/22size#); "pion czarny z 59";
+ currentpicture := black_circle
+ - digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(60,24/22size#,23/22size#,1/22size#); "pion czarny z 60";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(61,24/22size#,23/22size#,1/22size#); "pion czarny z 61";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(62,24/22size#,23/22size#,1/22size#); "pion czarny z 62";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(63,24/22size#,23/22size#,1/22size#); "pion czarny z 63";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(64,24/22size#,23/22size#,1/22size#); "pion czarny z 64";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(65,24/22size#,23/22size#,1/22size#); "pion czarny z 65";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(66,24/22size#,23/22size#,1/22size#); "pion czarny z 66";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(67,24/22size#,23/22size#,1/22size#); "pion czarny z 67";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(68,24/22size#,23/22size#,1/22size#); "pion czarny z 68";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(69,24/22size#,23/22size#,1/22size#); "pion czarny z 69";
+ currentpicture := black_circle
+ - digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(70,24/22size#,23/22size#,1/22size#); "pion czarny z 70";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(71,24/22size#,23/22size#,1/22size#); "pion czarny z 71";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(72,24/22size#,23/22size#,1/22size#); "pion czarny z 72";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(73,24/22size#,23/22size#,1/22size#); "pion czarny z 73";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(74,24/22size#,23/22size#,1/22size#); "pion czarny z 74";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(75,24/22size#,23/22size#,1/22size#); "pion czarny z 75";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(76,24/22size#,23/22size#,1/22size#); "pion czarny z 76";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(77,24/22size#,23/22size#,1/22size#); "pion czarny z 77";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(78,24/22size#,23/22size#,1/22size#); "pion czarny z 78";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(79,24/22size#,23/22size#,1/22size#); "pion czarny z 79";
+ currentpicture := black_circle
+ - digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(80,24/22size#,23/22size#,1/22size#); "pion czarny z 80";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(81,24/22size#,23/22size#,1/22size#); "pion czarny z 81";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(82,24/22size#,23/22size#,1/22size#); "pion czarny z 82";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(83,24/22size#,23/22size#,1/22size#); "pion czarny z 83";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(84,24/22size#,23/22size#,1/22size#); "pion czarny z 84";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(85,24/22size#,23/22size#,1/22size#); "pion czarny z 85";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(86,24/22size#,23/22size#,1/22size#); "pion czarny z 86";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(87,24/22size#,23/22size#,1/22size#); "pion czarny z 87";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(88,24/22size#,23/22size#,1/22size#); "pion czarny z 88";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(89,24/22size#,23/22size#,1/22size#); "pion czarny z 89";
+ currentpicture := black_circle
+ - digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(90,24/22size#,23/22size#,1/22size#); "pion czarny z 90";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(91,24/22size#,23/22size#,1/22size#); "pion czarny z 91";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(92,24/22size#,23/22size#,1/22size#); "pion czarny z 92";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(93,24/22size#,23/22size#,1/22size#); "pion czarny z 93";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(94,24/22size#,23/22size#,1/22size#); "pion czarny z 94";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(95,24/22size#,23/22size#,1/22size#); "pion czarny z 95";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(96,24/22size#,23/22size#,1/22size#); "pion czarny z 96";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(97,24/22size#,23/22size#,1/22size#); "pion czarny z 97";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(98,24/22size#,23/22size#,1/22size#); "pion czarny z 98";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(99,24/22size#,23/22size#,1/22size#); "pion czarny z 99";
+ currentpicture := black_circle
+ - digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+dig_w := .6dig_w;
+dig_pen := .7dig_pen;
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(100,24/22size#,23/22size#,1/22size#); "pion czarny z 100";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(101,24/22size#,23/22size#,1/22size#); "pion czarny z 101";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(102,24/22size#,23/22size#,1/22size#); "pion czarny z 102";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(103,24/22size#,23/22size#,1/22size#); "pion czarny z 103";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(104,24/22size#,23/22size#,1/22size#); "pion czarny z 104";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(105,24/22size#,23/22size#,1/22size#); "pion czarny z 105";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(106,24/22size#,23/22size#,1/22size#); "pion czarny z 106";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(107,24/22size#,23/22size#,1/22size#); "pion czarny z 107";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(108,24/22size#,23/22size#,1/22size#); "pion czarny z 108";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(109,24/22size#,23/22size#,1/22size#); "pion czarny z 109";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(110,24/22size#,23/22size#,1/22size#); "pion czarny z 110";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(111,24/22size#,23/22size#,1/22size#); "pion czarny z 111";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(112,24/22size#,23/22size#,1/22size#); "pion czarny z 112";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(113,24/22size#,23/22size#,1/22size#); "pion czarny z 113";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(114,24/22size#,23/22size#,1/22size#); "pion czarny z 114";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.15dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(115,24/22size#,23/22size#,1/22size#); "pion czarny z 115";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(116,24/22size#,23/22size#,1/22size#); "pion czarny z 116";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(117,24/22size#,23/22size#,1/22size#); "pion czarny z 117";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(118,24/22size#,23/22size#,1/22size#); "pion czarny z 118";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(119,24/22size#,23/22size#,1/22size#); "pion czarny z 119";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(120,24/22size#,23/22size#,1/22size#); "pion czarny z 120";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(121,24/22size#,23/22size#,1/22size#); "pion czarny z 121";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(122,24/22size#,23/22size#,1/22size#); "pion czarny z 122";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(123,24/22size#,23/22size#,1/22size#); "pion czarny z 123";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(124,24/22size#,23/22size#,1/22size#); "pion czarny z 124";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(125,24/22size#,23/22size#,1/22size#); "pion czarny z 125";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(126,24/22size#,23/22size#,1/22size#); "pion czarny z 126";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(127,24/22size#,23/22size#,1/22size#); "pion czarny z 127";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+end;
+
diff --git a/fonts/go/mf/go1whi10.mf b/fonts/go/mf/go1whi10.mf
new file mode 100644
index 0000000000..e39b02d0c1
--- /dev/null
+++ b/fonts/go/mf/go1whi10.mf
@@ -0,0 +1,14 @@
+font_identifier:="GO1WHITE"; font_size 10pt#;
+
+size#:=10pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go1white
+
diff --git a/fonts/go/mf/go1whi15.mf b/fonts/go/mf/go1whi15.mf
new file mode 100644
index 0000000000..6e5343e2ed
--- /dev/null
+++ b/fonts/go/mf/go1whi15.mf
@@ -0,0 +1,14 @@
+font_identifier:="GO1WHITE"; font_size 15pt#;
+
+size#:=15pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go1white
+
diff --git a/fonts/go/mf/go1whi20.mf b/fonts/go/mf/go1whi20.mf
new file mode 100644
index 0000000000..20ffd1e544
--- /dev/null
+++ b/fonts/go/mf/go1whi20.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO1WHITE"; font_size 20pt#;
+
+size#:=20pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go1white
diff --git a/fonts/go/mf/go1white.mf b/fonts/go/mf/go1white.mf
new file mode 100644
index 0000000000..7528fd1d6d
--- /dev/null
+++ b/fonts/go/mf/go1white.mf
@@ -0,0 +1,1341 @@
+mode_setup;
+
+define_pixels(size);
+define_pixels(line_thickness,border_line_thickness);
+define_pixels(dig_h,dig_w,dig_pen);
+
+picture digit[];
+picture white_circle;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+def digit_zero =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.5dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=dig_w; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ draw z1...z2...z3...z4...cycle;
+ digit[0] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_one =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.5dig_w; bot y1=0;
+ x2=.5dig_w; top y2=dig_h;
+ draw z1--z2;
+ digit[1] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_two =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.8dig_w; y3=.9dig_h;
+ lft x4=0; bot y4=0;
+ draw z1{up}...z2...z3..{(-.8dig_w,-dig_h)}z4;
+ z5=z4;
+ rt x6=dig_w; bot y6=0;
+ draw z5--z6;
+ digit[2] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_three =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.8dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.52dig_h);
+ rt x5=dig_w; y5=.2dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1{up}..z2..z3..{left}z4{right}..z5..z6...{up}z7;
+ digit[3] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_four =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.75dig_w; bot y1=0;
+ x2=x1; top y2=dig_h;
+ lft x3=0; y3=.3dig_h;
+ rt x4=dig_w; y4=y3;
+ draw z1--z2--z3--z4;
+ digit[4] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_five =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=.95dig_w; top y1=dig_h;
+ lft x2=.05dig_w; y2=y1;
+ lft x3=0; y3=.45dig_h;
+ z4=(.5dig_w,.6dig_h);
+ rt x5=dig_w; y5=.3dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=.15dig_h;
+ draw z1--z2--z3{up}..z4..z5..z6...{up}z7;
+ digit[5] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_six =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=dig_w; y1=.8dig_h;
+ x2=.45dig_w; top y2=dig_h;
+ lft x3=0; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ rt x5=dig_w; y5=.3dig_h;
+ z6=(.53dig_w,.55dig_h);
+ z7=(.03dig_w+.6dig_pen,.25dig_h);
+ draw z1{up}...z2...z3...z4...z5...{left}z6{left}...{(1,-10)}z7;
+ digit[6] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_seven =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; top y1=dig_h;
+ rt x2=dig_w; y2=y1;
+ lft x3=.2dig_w; bot y3=0;
+ draw z1--z2--z3;
+ digit[7] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_eight =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.55dig_h);
+ rt x5=dig_w; y5=.25dig_h;
+ x6=.5dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1...z2...z3...z4...cycle;
+ draw z4...z5...z6...z7...cycle;
+ digit[8] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_nine =
+ currentpicture := nullpicture;
+ currentpicture := digit[6] rotated 180;
+ digit[9] := currentpicture shifted (dig_w,dig_h);
+ clearxy; clearit; clearpen;
+enddef;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(0,24/22size#,23/22size#,1/22size#); "pion bialy";
+ pickup pencircle scaled line_thickness;
+ lft x1=1/24w; y1=11/24w;
+ rt x2=23/24w; y2=11/24w;
+ draw z1..z2..cycle;
+ white_circle := currentpicture;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(1,24/22size#,23/22size#,1/22size#); "pion bialy z 1";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(2,24/22size#,23/22size#,1/22size#); "pion bialy z 2";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(3,24/22size#,23/22size#,1/22size#); "pion bialy z 3";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(4,24/22size#,23/22size#,1/22size#); "pion bialy z 4";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(5,24/22size#,23/22size#,1/22size#); "pion bialy z 5";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(6,24/22size#,23/22size#,1/22size#); "pion bialy z 6";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(7,24/22size#,23/22size#,1/22size#); "pion bialy z 7";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(8,24/22size#,23/22size#,1/22size#); "pion bialy z 8";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(9,24/22size#,23/22size#,1/22size#); "pion bialy z 9";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+dig_w := .7dig_w;
+dig_pen := .7dig_pen;
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(10,24/22size#,23/22size#,1/22size#); "pion bialy z 10";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(11,24/22size#,23/22size#,1/22size#); "pion bialy z 11";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(12,24/22size#,23/22size#,1/22size#); "pion bialy z 12";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(13,24/22size#,23/22size#,1/22size#); "pion czarny z 13";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(14,24/22size#,23/22size#,1/22size#); "pion bialy z 14";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(15,24/22size#,23/22size#,1/22size#); "pion czarny z 15";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(16,24/22size#,23/22size#,1/22size#); "pion bialy z 16";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(17,24/22size#,23/22size#,1/22size#); "pion czarny z 17";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(18,24/22size#,23/22size#,1/22size#); "pion bialy z 18";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(19,24/22size#,23/22size#,1/22size#); "pion czarny z 19";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(20,24/22size#,23/22size#,1/22size#); "pion bialy z 20";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(21,24/22size#,23/22size#,1/22size#); "pion czarny z 21";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(22,24/22size#,23/22size#,1/22size#); "pion bialy z 22";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(23,24/22size#,23/22size#,1/22size#); "pion czarny z 23";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(24,24/22size#,23/22size#,1/22size#); "pion bialy z 24";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(25,24/22size#,23/22size#,1/22size#); "pion czarny z 25";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(26,24/22size#,23/22size#,1/22size#); "pion bialy z 26";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(27,24/22size#,23/22size#,1/22size#); "pion czarny z 27";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(28,24/22size#,23/22size#,1/22size#); "pion bialy z 28";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(29,24/22size#,23/22size#,1/22size#); "pion czarny z 29";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(30,24/22size#,23/22size#,1/22size#); "pion bialy z 30";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(31,24/22size#,23/22size#,1/22size#); "pion czarny z 31";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(32,24/22size#,23/22size#,1/22size#); "pion bialy z 32";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(33,24/22size#,23/22size#,1/22size#); "pion czarny z 33";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(34,24/22size#,23/22size#,1/22size#); "pion bialy z 34";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(35,24/22size#,23/22size#,1/22size#); "pion czarny z 35";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(36,24/22size#,23/22size#,1/22size#); "pion bialy z 36";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(37,24/22size#,23/22size#,1/22size#); "pion czarny z 37";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(38,24/22size#,23/22size#,1/22size#); "pion bialy z 38";
+ currentpicture := white_circle
+ + digit[3] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(39,24/22size#,23/22size#,1/22size#); "pion czarny z 39";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(40,24/22size#,23/22size#,1/22size#); "pion bialy z 40";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(41,24/22size#,23/22size#,1/22size#); "pion czarny z 41";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(42,24/22size#,23/22size#,1/22size#); "pion bialy z 42";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(43,24/22size#,23/22size#,1/22size#); "pion czarny z 43";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(44,24/22size#,23/22size#,1/22size#); "pion bialy z 44";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(45,24/22size#,23/22size#,1/22size#); "pion czarny z 45";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(46,24/22size#,23/22size#,1/22size#); "pion bialy z 46";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(47,24/22size#,23/22size#,1/22size#); "pion czarny z 47";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(48,24/22size#,23/22size#,1/22size#); "pion bialy z 48";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(49,24/22size#,23/22size#,1/22size#); "pion czarny z 49";
+ currentpicture := white_circle
+ + digit[4] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(50,24/22size#,23/22size#,1/22size#); "pion bialy z 50";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(51,24/22size#,23/22size#,1/22size#); "pion czarny z 51";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(52,24/22size#,23/22size#,1/22size#); "pion bialy z 52";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(53,24/22size#,23/22size#,1/22size#); "pion czarny z 53";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(54,24/22size#,23/22size#,1/22size#); "pion bialy z 54";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(55,24/22size#,23/22size#,1/22size#); "pion czarny z 55";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(56,24/22size#,23/22size#,1/22size#); "pion bialy z 56";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(57,24/22size#,23/22size#,1/22size#); "pion czarny z 57";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(58,24/22size#,23/22size#,1/22size#); "pion bialy z 58";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(59,24/22size#,23/22size#,1/22size#); "pion czarny z 59";
+ currentpicture := white_circle
+ + digit[5] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(60,24/22size#,23/22size#,1/22size#); "pion bialy z 60";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(61,24/22size#,23/22size#,1/22size#); "pion czarny z 61";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(62,24/22size#,23/22size#,1/22size#); "pion bialy z 62";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(63,24/22size#,23/22size#,1/22size#); "pion czarny z 63";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(64,24/22size#,23/22size#,1/22size#); "pion bialy z 64";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(65,24/22size#,23/22size#,1/22size#); "pion czarny z 65";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(66,24/22size#,23/22size#,1/22size#); "pion bialy z 66";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(67,24/22size#,23/22size#,1/22size#); "pion czarny z 67";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(68,24/22size#,23/22size#,1/22size#); "pion bialy z 68";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(69,24/22size#,23/22size#,1/22size#); "pion czarny z 69";
+ currentpicture := white_circle
+ + digit[6] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(70,24/22size#,23/22size#,1/22size#); "pion bialy z 70";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(71,24/22size#,23/22size#,1/22size#); "pion czarny z 71";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(72,24/22size#,23/22size#,1/22size#); "pion bialy z 72";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(73,24/22size#,23/22size#,1/22size#); "pion czarny z 73";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(74,24/22size#,23/22size#,1/22size#); "pion bialy z 74";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(75,24/22size#,23/22size#,1/22size#); "pion czarny z 75";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(76,24/22size#,23/22size#,1/22size#); "pion bialy z 76";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(77,24/22size#,23/22size#,1/22size#); "pion czarny z 77";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(78,24/22size#,23/22size#,1/22size#); "pion bialy z 78";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(79,24/22size#,23/22size#,1/22size#); "pion czarny z 79";
+ currentpicture := white_circle
+ + digit[7] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(80,24/22size#,23/22size#,1/22size#); "pion bialy z 80";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(81,24/22size#,23/22size#,1/22size#); "pion czarny z 81";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(82,24/22size#,23/22size#,1/22size#); "pion bialy z 82";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(83,24/22size#,23/22size#,1/22size#); "pion czarny z 83";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(84,24/22size#,23/22size#,1/22size#); "pion bialy z 84";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(85,24/22size#,23/22size#,1/22size#); "pion czarny z 85";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(86,24/22size#,23/22size#,1/22size#); "pion bialy z 86";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(87,24/22size#,23/22size#,1/22size#); "pion czarny z 87";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(88,24/22size#,23/22size#,1/22size#); "pion bialy z 88";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(89,24/22size#,23/22size#,1/22size#); "pion czarny z 89";
+ currentpicture := white_circle
+ + digit[8] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(90,24/22size#,23/22size#,1/22size#); "pion bialy z 90";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(91,24/22size#,23/22size#,1/22size#); "pion czarny z 91";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-.9dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(92,24/22size#,23/22size#,1/22size#); "pion bialy z 92";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(93,24/22size#,23/22size#,1/22size#); "pion czarny z 93";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(94,24/22size#,23/22size#,1/22size#); "pion bialy z 94";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(95,24/22size#,23/22size#,1/22size#); "pion czarny z 95";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(96,24/22size#,23/22size#,1/22size#); "pion bialy z 96";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(97,24/22size#,23/22size#,1/22size#); "pion czarny z 97";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(98,24/22size#,23/22size#,1/22size#); "pion bialy z 98";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(99,24/22size#,23/22size#,1/22size#); "pion czarny z 99";
+ currentpicture := white_circle
+ + digit[9] shifted (.5w-1.1dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.1dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+dig_w := .6dig_w;
+dig_pen := .7dig_pen;
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(100,24/22size#,23/22size#,1/22size#); "pion bialy z 100";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(101,24/22size#,23/22size#,1/22size#); "pion czarny z 101";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(102,24/22size#,23/22size#,1/22size#); "pion bialy z 102";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(103,24/22size#,23/22size#,1/22size#); "pion czarny z 103";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(104,24/22size#,23/22size#,1/22size#); "pion bialy z 104";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(105,24/22size#,23/22size#,1/22size#); "pion czarny z 105";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(106,24/22size#,23/22size#,1/22size#); "pion bialy z 106";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(107,24/22size#,23/22size#,1/22size#); "pion czarny z 107";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(108,24/22size#,23/22size#,1/22size#); "pion bialy z 108";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(109,24/22size#,23/22size#,1/22size#); "pion czarny z 109";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(110,24/22size#,23/22size#,1/22size#); "pion bialy z 110";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(111,24/22size#,23/22size#,1/22size#); "pion czarny z 111";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.2dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(112,24/22size#,23/22size#,1/22size#); "pion bialy z 112";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(113,24/22size#,23/22size#,1/22size#); "pion czarny z 113";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(114,24/22size#,23/22size#,1/22size#); "pion bialy z 114";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.15dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(115,24/22size#,23/22size#,1/22size#); "pion czarny z 115";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(116,24/22size#,23/22size#,1/22size#); "pion bialy z 116";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(117,24/22size#,23/22size#,1/22size#); "pion czarny z 117";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(118,24/22size#,23/22size#,1/22size#); "pion bialy z 118";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(119,24/22size#,23/22size#,1/22size#); "pion czarny z 119";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.2dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(120,24/22size#,23/22size#,1/22size#); "pion bialy z 120";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(121,24/22size#,23/22size#,1/22size#); "pion czarny z 121";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(122,24/22size#,23/22size#,1/22size#); "pion bialy z 122";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(123,24/22size#,23/22size#,1/22size#); "pion czarny z 123";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(124,24/22size#,23/22size#,1/22size#); "pion bialy z 124";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(125,24/22size#,23/22size#,1/22size#); "pion czarny z 125";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(126,24/22size#,23/22size#,1/22size#); "pion bialy z 126";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(127,24/22size#,23/22size#,1/22size#); "pion czarny z 127";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+end;
+
diff --git a/fonts/go/mf/go20.mf b/fonts/go/mf/go20.mf
new file mode 100644
index 0000000000..48fa2d4319
--- /dev/null
+++ b/fonts/go/mf/go20.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO"; font_size 20pt#;
+
+size#:=20pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=7/10size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go
diff --git a/fonts/go/mf/go2bla10.mf b/fonts/go/mf/go2bla10.mf
new file mode 100644
index 0000000000..f851989fdd
--- /dev/null
+++ b/fonts/go/mf/go2bla10.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO2BLACK"; font_size 10pt#;
+
+size#:=10pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go2black
diff --git a/fonts/go/mf/go2bla15.mf b/fonts/go/mf/go2bla15.mf
new file mode 100644
index 0000000000..2d0ec3c8c7
--- /dev/null
+++ b/fonts/go/mf/go2bla15.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO2BLACK"; font_size 15pt#;
+
+size#:=15pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go2black
diff --git a/fonts/go/mf/go2bla20.mf b/fonts/go/mf/go2bla20.mf
new file mode 100644
index 0000000000..e08a3e3496
--- /dev/null
+++ b/fonts/go/mf/go2bla20.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO2BLACK"; font_size 20pt#;
+
+size#:=20pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go2black
diff --git a/fonts/go/mf/go2black.mf b/fonts/go/mf/go2black.mf
new file mode 100644
index 0000000000..8d88b7c31a
--- /dev/null
+++ b/fonts/go/mf/go2black.mf
@@ -0,0 +1,1446 @@
+mode_setup;
+
+define_pixels(size);
+define_pixels(line_thickness,border_line_thickness);
+define_pixels(dig_h,dig_w,dig_pen);
+
+picture digit[];
+picture black_circle;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+def digit_zero =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.5dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=dig_w; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ draw z1...z2...z3...z4...cycle;
+ digit[0] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_one =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.5dig_w; bot y1=0;
+ x2=.5dig_w; top y2=dig_h;
+ draw z1--z2;
+ digit[1] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_two =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.8dig_w; y3=.9dig_h;
+ lft x4=0; bot y4=0;
+ draw z1{up}...z2...z3..{(-.8dig_w,-dig_h)}z4;
+ z5=z4;
+ rt x6=dig_w; bot y6=0;
+ draw z5--z6;
+ digit[2] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_three =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.8dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.52dig_h);
+ rt x5=dig_w; y5=.2dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1{up}..z2..z3..{left}z4{right}..z5..z6...{up}z7;
+ digit[3] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_four =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.75dig_w; bot y1=0;
+ x2=x1; top y2=dig_h;
+ lft x3=0; y3=.3dig_h;
+ rt x4=dig_w; y4=y3;
+ draw z1--z2--z3--z4;
+ digit[4] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_five =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=.95dig_w; top y1=dig_h;
+ lft x2=.05dig_w; y2=y1;
+ lft x3=0; y3=.45dig_h;
+ z4=(.5dig_w,.6dig_h);
+ rt x5=dig_w; y5=.3dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=.15dig_h;
+ draw z1--z2--z3{up}..z4..z5..z6...{up}z7;
+ digit[5] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_six =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=dig_w; y1=.8dig_h;
+ x2=.45dig_w; top y2=dig_h;
+ lft x3=0; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ rt x5=dig_w; y5=.3dig_h;
+ z6=(.53dig_w,.55dig_h);
+ z7=(.03dig_w+.6dig_pen,.25dig_h);
+ draw z1{up}...z2...z3...z4...z5...{left}z6{left}...{(1,-10)}z7;
+ digit[6] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_seven =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; top y1=dig_h;
+ rt x2=dig_w; y2=y1;
+ lft x3=.2dig_w; bot y3=0;
+ draw z1--z2--z3;
+ digit[7] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_eight =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.55dig_h);
+ rt x5=dig_w; y5=.25dig_h;
+ x6=.5dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1...z2...z3...z4...cycle;
+ draw z4...z5...z6...z7...cycle;
+ digit[8] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_nine =
+ currentpicture := nullpicture;
+ currentpicture := digit[6] rotated 180;
+ digit[9] := currentpicture shifted (dig_w,dig_h);
+ clearxy; clearit; clearpen;
+enddef;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+dig_w := .7dig_w;
+%%%dig_pen := .7dig_pen;
+
+dig_w := .6dig_w;
+dig_pen := .7dig_pen;
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(0,24/22size#,23/22size#,1/22size#); "pion czarny z 128";
+ pickup pencircle scaled line_thickness;
+ lft x1=1/24w; y1=11/24w;
+ rt x2=23/24w; y2=11/24w;
+ filldraw z1..z2..cycle;
+ black_circle := currentpicture;
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(1,24/22size#,23/22size#,1/22size#); "pion czarny z 129";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(2,24/22size#,23/22size#,1/22size#); "pion czarny z 130";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(3,24/22size#,23/22size#,1/22size#); "pion czarny z 131";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(4,24/22size#,23/22size#,1/22size#); "pion czarny z 132";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(5,24/22size#,23/22size#,1/22size#); "pion czarny z 133";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(6,24/22size#,23/22size#,1/22size#); "pion czarny z 134";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(7,24/22size#,23/22size#,1/22size#); "pion czarny z 135";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(8,24/22size#,23/22size#,1/22size#); "pion czarny z 136";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(9,24/22size#,23/22size#,1/22size#); "pion czarny z 137";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(10,24/22size#,23/22size#,1/22size#); "pion czarny z 138";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(11,24/22size#,23/22size#,1/22size#); "pion czarny z 139";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(12,24/22size#,23/22size#,1/22size#); "pion czarny z 140";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(13,24/22size#,23/22size#,1/22size#); "pion czarny z 141";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.6dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(14,24/22size#,23/22size#,1/22size#); "pion czarny z 142";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(15,24/22size#,23/22size#,1/22size#); "pion czarny z 143";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(16,24/22size#,23/22size#,1/22size#); "pion czarny z 144";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.65dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(17,24/22size#,23/22size#,1/22size#); "pion czarny z 145";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(18,24/22size#,23/22size#,1/22size#); "pion czarny z 146";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(19,24/22size#,23/22size#,1/22size#); "pion czarny z 147";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(20,24/22size#,23/22size#,1/22size#); "pion czarny z 148";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(21,24/22size#,23/22size#,1/22size#); "pion czarny z 149";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(22,24/22size#,23/22size#,1/22size#); "pion czarny z 150";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(23,24/22size#,23/22size#,1/22size#); "pion czarny z 151";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(24,24/22size#,23/22size#,1/22size#); "pion czarny z 152";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(25,24/22size#,23/22size#,1/22size#); "pion czarny z 153";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(26,24/22size#,23/22size#,1/22size#); "pion czarny z 154";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(27,24/22size#,23/22size#,1/22size#); "pion czarny z 155";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(28,24/22size#,23/22size#,1/22size#); "pion czarny z 156";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(29,24/22size#,23/22size#,1/22size#); "pion czarny z 157";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(30,24/22size#,23/22size#,1/22size#); "pion czarny z 158";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(31,24/22size#,23/22size#,1/22size#); "pion czarny z 159";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(32,24/22size#,23/22size#,1/22size#); "pion czarny z 160";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(33,24/22size#,23/22size#,1/22size#); "pion czarny z 161";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(34,24/22size#,23/22size#,1/22size#); "pion czarny z 162";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(35,24/22size#,23/22size#,1/22size#); "pion czarny z 163";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(36,24/22size#,23/22size#,1/22size#); "pion czarny z 164";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(37,24/22size#,23/22size#,1/22size#); "pion czarny z 165";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(38,24/22size#,23/22size#,1/22size#); "pion czarny z 166";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(39,24/22size#,23/22size#,1/22size#); "pion czarny z 167";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(40,24/22size#,23/22size#,1/22size#); "pion czarny z 168";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(41,24/22size#,23/22size#,1/22size#); "pion czarny z 169";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(42,24/22size#,23/22size#,1/22size#); "pion czarny z 170";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(43,24/22size#,23/22size#,1/22size#); "pion czarny z 171";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(44,24/22size#,23/22size#,1/22size#); "pion czarny z 172";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(45,24/22size#,23/22size#,1/22size#); "pion czarny z 173";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(46,24/22size#,23/22size#,1/22size#); "pion czarny z 174";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(47,24/22size#,23/22size#,1/22size#); "pion czarny z 175";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(48,24/22size#,23/22size#,1/22size#); "pion czarny z 176";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(49,24/22size#,23/22size#,1/22size#); "pion czarny z 177";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(50,24/22size#,23/22size#,1/22size#); "pion czarny z 178";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(51,24/22size#,23/22size#,1/22size#); "pion czarny z 179";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(52,24/22size#,23/22size#,1/22size#); "pion czarny z 180";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(53,24/22size#,23/22size#,1/22size#); "pion czarny z 181";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(54,24/22size#,23/22size#,1/22size#); "pion czarny z 182";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(55,24/22size#,23/22size#,1/22size#); "pion czarny z 183";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(56,24/22size#,23/22size#,1/22size#); "pion czarny z 184";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(57,24/22size#,23/22size#,1/22size#); "pion czarny z 185";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(58,24/22size#,23/22size#,1/22size#); "pion czarny z 186";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(59,24/22size#,23/22size#,1/22size#); "pion czarny z 187";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(60,24/22size#,23/22size#,1/22size#); "pion czarny z 188";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(61,24/22size#,23/22size#,1/22size#); "pion czarny z 189";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(62,24/22size#,23/22size#,1/22size#); "pion czarny z 190";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(63,24/22size#,23/22size#,1/22size#); "pion czarny z 191";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(64,24/22size#,23/22size#,1/22size#); "pion czarny z 192";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(65,24/22size#,23/22size#,1/22size#); "pion czarny z 193";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(66,24/22size#,23/22size#,1/22size#); "pion czarny z 194";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(67,24/22size#,23/22size#,1/22size#); "pion czarny z 195";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(68,24/22size#,23/22size#,1/22size#); "pion czarny z 196";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(69,24/22size#,23/22size#,1/22size#); "pion czarny z 197";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(70,24/22size#,23/22size#,1/22size#); "pion czarny z 198";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(71,24/22size#,23/22size#,1/22size#); "pion czarny z 199";
+ currentpicture := black_circle
+ - digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(72,24/22size#,23/22size#,1/22size#); "pion czarny z 200";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(73,24/22size#,23/22size#,1/22size#); "pion czarny z 201";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(74,24/22size#,23/22size#,1/22size#); "pion czarny z 202";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(75,24/22size#,23/22size#,1/22size#); "pion czarny z 203";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.45dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(76,24/22size#,23/22size#,1/22size#); "pion czarny z 204";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(77,24/22size#,23/22size#,1/22size#); "pion czarny z 205";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(78,24/22size#,23/22size#,1/22size#); "pion czarny z 206";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(79,24/22size#,23/22size#,1/22size#); "pion czarny z 207";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.45dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(80,24/22size#,23/22size#,1/22size#); "pion czarny z 208";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(81,24/22size#,23/22size#,1/22size#); "pion czarny z 209";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w-.45dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(82,24/22size#,23/22size#,1/22size#); "pion czarny z 210";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(83,24/22size#,23/22size#,1/22size#); "pion czarny z 211";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(84,24/22size#,23/22size#,1/22size#); "pion czarny z 212";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(85,24/22size#,23/22size#,1/22size#); "pion czarny z 213";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(86,24/22size#,23/22size#,1/22size#); "pion czarny z 214";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.4dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(87,24/22size#,23/22size#,1/22size#); "pion czarny z 215";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(88,24/22size#,23/22size#,1/22size#); "pion czarny z 216";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(89,24/22size#,23/22size#,1/22size#); "pion czarny z 217";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(90,24/22size#,23/22size#,1/22size#); "pion czarny z 218";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(91,24/22size#,23/22size#,1/22size#); "pion czarny z 219";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(92,24/22size#,23/22size#,1/22size#); "pion czarny z 220";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(93,24/22size#,23/22size#,1/22size#); "pion czarny z 221";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(94,24/22size#,23/22size#,1/22size#); "pion czarny z 222";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(95,24/22size#,23/22size#,1/22size#); "pion czarny z 223";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(96,24/22size#,23/22size#,1/22size#); "pion czarny z 224";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.55dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(97,24/22size#,23/22size#,1/22size#); "pion czarny z 225";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(98,24/22size#,23/22size#,1/22size#); "pion czarny z 226";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(99,24/22size#,23/22size#,1/22size#); "pion czarny z 227";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(100,24/22size#,23/22size#,1/22size#); "pion czarny z 228";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(101,24/22size#,23/22size#,1/22size#); "pion czarny z 229";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(102,24/22size#,23/22size#,1/22size#); "pion czarny z 230";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(103,24/22size#,23/22size#,1/22size#); "pion czarny z 231";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(104,24/22size#,23/22size#,1/22size#); "pion czarny z 232";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(105,24/22size#,23/22size#,1/22size#); "pion czarny z 233";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(106,24/22size#,23/22size#,1/22size#); "pion czarny z 234";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(107,24/22size#,23/22size#,1/22size#); "pion czarny z 235";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(108,24/22size#,23/22size#,1/22size#); "pion czarny z 236";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(109,24/22size#,23/22size#,1/22size#); "pion czarny z 237";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(110,24/22size#,23/22size#,1/22size#); "pion czarny z 238";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(111,24/22size#,23/22size#,1/22size#); "pion czarny z 239";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(112,24/22size#,23/22size#,1/22size#); "pion czarny z 240";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(113,24/22size#,23/22size#,1/22size#); "pion czarny z 241";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(114,24/22size#,23/22size#,1/22size#); "pion czarny z 242";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(115,24/22size#,23/22size#,1/22size#); "pion czarny z 243";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(116,24/22size#,23/22size#,1/22size#); "pion czarny z 244";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(117,24/22size#,23/22size#,1/22size#); "pion czarny z 245";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(118,24/22size#,23/22size#,1/22size#); "pion czarny z 246";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[6] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(119,24/22size#,23/22size#,1/22size#); "pion czarny z 247";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[7] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(120,24/22size#,23/22size#,1/22size#); "pion czarny z 248";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[8] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(121,24/22size#,23/22size#,1/22size#); "pion czarny z 249";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[9] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(122,24/22size#,23/22size#,1/22size#); "pion czarny z 250";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[0] shifted (.5w+.8dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(123,24/22size#,23/22size#,1/22size#); "pion czarny z 251";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ - digit[1] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(124,24/22size#,23/22size#,1/22size#); "pion czarny z 252";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[2] shifted (.5w+.8dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(125,24/22size#,23/22size#,1/22size#); "pion czarny z 253";
+ currentpicture := black_circle
+ - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ - digit[3] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+%%%%%%%%%%%%%%%%%%%%%% other symbols %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(126,24/22size#,23/22size#,1/22size#); "pion czarny z kwadratem";
+ pickup pencircle scaled 1.25line_thickness;
+ z1=(.5w+.32size,11/24w+.32size);
+ z2=(.5w+.32size,11/24w-.32size);
+ z3=(.5w-.32size,11/24w-.32size);
+ z4=(.5w-.32size,11/24w+.32size);
+ currentpicture := black_circle;
+ erase draw z1--z2--z3--z4--cycle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(127,24/22size#,23/22size#,1/22size#); "pion czarny z trojkatem";
+ pickup pencircle scaled 1.25line_thickness;
+ lft x1=.08size+1/24w; bot y1=.24size;
+ x2=.5w; top y2=.98size;
+ rt x3=.92size+1/24w; bot y3=.24size;
+ currentpicture := black_circle;
+ erase draw z1--z2--z3--cycle;
+showit;
+endchar;
+
+% stop"";
+
+end;
+
diff --git a/fonts/go/mf/go2whi10.mf b/fonts/go/mf/go2whi10.mf
new file mode 100644
index 0000000000..e6ecf3554a
--- /dev/null
+++ b/fonts/go/mf/go2whi10.mf
@@ -0,0 +1,14 @@
+font_identifier:="GO2WHITE"; font_size 10pt#;
+
+size#:=10pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go2white
+
diff --git a/fonts/go/mf/go2whi15.mf b/fonts/go/mf/go2whi15.mf
new file mode 100644
index 0000000000..cd995b42e5
--- /dev/null
+++ b/fonts/go/mf/go2whi15.mf
@@ -0,0 +1,14 @@
+font_identifier:="GO2WHITE"; font_size 15pt#;
+
+size#:=15pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go2white
+
diff --git a/fonts/go/mf/go2whi20.mf b/fonts/go/mf/go2whi20.mf
new file mode 100644
index 0000000000..605b0d7a18
--- /dev/null
+++ b/fonts/go/mf/go2whi20.mf
@@ -0,0 +1,13 @@
+font_identifier:="GO2WHITE"; font_size 20pt#;
+
+size#:=20pt#;
+line_thickness#:=.04size#;
+border_line_thickness#:=.1size#;
+
+%%%
+
+dig_h#:=63/100size#;
+dig_w#:=4/10size#;
+dig_pen#:=1/10size#;
+
+input go2white
diff --git a/fonts/go/mf/go2white.mf b/fonts/go/mf/go2white.mf
new file mode 100644
index 0000000000..39640e5e69
--- /dev/null
+++ b/fonts/go/mf/go2white.mf
@@ -0,0 +1,1446 @@
+mode_setup;
+
+define_pixels(size);
+define_pixels(line_thickness,border_line_thickness);
+define_pixels(dig_h,dig_w,dig_pen);
+
+picture digit[];
+picture white_circle;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+def digit_zero =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.5dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=dig_w; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ draw z1...z2...z3...z4...cycle;
+ digit[0] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_one =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.5dig_w; bot y1=0;
+ x2=.5dig_w; top y2=dig_h;
+ draw z1--z2;
+ digit[1] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_two =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.8dig_w; y3=.9dig_h;
+ lft x4=0; bot y4=0;
+ draw z1{up}...z2...z3..{(-.8dig_w,-dig_h)}z4;
+ z5=z4;
+ rt x6=dig_w; bot y6=0;
+ draw z5--z6;
+ digit[2] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_three =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.8dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.52dig_h);
+ rt x5=dig_w; y5=.2dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1{up}..z2..z3..{left}z4{right}..z5..z6...{up}z7;
+ digit[3] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_four =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ x1=.75dig_w; bot y1=0;
+ x2=x1; top y2=dig_h;
+ lft x3=0; y3=.3dig_h;
+ rt x4=dig_w; y4=y3;
+ draw z1--z2--z3--z4;
+ digit[4] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_five =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=.95dig_w; top y1=dig_h;
+ lft x2=.05dig_w; y2=y1;
+ lft x3=0; y3=.45dig_h;
+ z4=(.5dig_w,.6dig_h);
+ rt x5=dig_w; y5=.3dig_h;
+ x6=.65dig_w; bot y6=0;
+ lft x7=0; y7=.15dig_h;
+ draw z1--z2--z3{up}..z4..z5..z6...{up}z7;
+ digit[5] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_six =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ rt x1=dig_w; y1=.8dig_h;
+ x2=.45dig_w; top y2=dig_h;
+ lft x3=0; y3=.5dig_h;
+ x4=.5dig_w; bot y4=0;
+ rt x5=dig_w; y5=.3dig_h;
+ z6=(.53dig_w,.55dig_h);
+ z7=(.03dig_w+.6dig_pen,.25dig_h);
+ draw z1{up}...z2...z3...z4...z5...{left}z6{left}...{(1,-10)}z7;
+ digit[6] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_seven =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=0; top y1=dig_h;
+ rt x2=dig_w; y2=y1;
+ lft x3=.2dig_w; bot y3=0;
+ draw z1--z2--z3;
+ digit[7] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_eight =
+ currentpicture := nullpicture;
+ pickup pencircle scaled dig_pen;
+ lft x1=.08dig_w; y1=.75dig_h;
+ x2=.5dig_w; top y2=dig_h;
+ rt x3=.92dig_w; y3=y1;
+ z4=(.5dig_w,.55dig_h);
+ rt x5=dig_w; y5=.25dig_h;
+ x6=.5dig_w; bot y6=0;
+ lft x7=0; y7=y5;
+ draw z1...z2...z3...z4...cycle;
+ draw z4...z5...z6...z7...cycle;
+ digit[8] := currentpicture;
+ clearxy; clearit; clearpen;
+enddef;
+
+def digit_nine =
+ currentpicture := nullpicture;
+ currentpicture := digit[6] rotated 180;
+ digit[9] := currentpicture shifted (dig_w,dig_h);
+ clearxy; clearit; clearpen;
+enddef;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+dig_w := .7dig_w;
+dig_pen := .7dig_pen;
+
+dig_w := .6dig_w;
+dig_pen := .7dig_pen;
+
+digit_zero; digit_one; digit_two; digit_three; digit_four;
+digit_five; digit_six; digit_seven; digit_eight; digit_nine;
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(0,24/22size#,23/22size#,1/22size#); "pion bialy z 128";
+ pickup pencircle scaled line_thickness;
+ lft x1=1/24w; y1=11/24w;
+ rt x2=23/24w; y2=11/24w;
+ draw z1..z2..cycle;
+ white_circle := currentpicture;
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(1,24/22size#,23/22size#,1/22size#); "pion bialy z 129";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(2,24/22size#,23/22size#,1/22size#); "pion bialy z 130";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(3,24/22size#,23/22size#,1/22size#); "pion bialy z 131";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(4,24/22size#,23/22size#,1/22size#); "pion bialy z 132";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(5,24/22size#,23/22size#,1/22size#); "pion bialy z 133";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(6,24/22size#,23/22size#,1/22size#); "pion bialy z 134";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(7,24/22size#,23/22size#,1/22size#); "pion bialy z 135";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(8,24/22size#,23/22size#,1/22size#); "pion bialy z 136";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(9,24/22size#,23/22size#,1/22size#); "pion bialy z 137";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(10,24/22size#,23/22size#,1/22size#); "pion bialy z 138";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(11,24/22size#,23/22size#,1/22size#); "pion bialy z 139";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(12,24/22size#,23/22size#,1/22size#); "pion bialy z 140";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(13,24/22size#,23/22size#,1/22size#); "pion bialy z 141";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.6dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(14,24/22size#,23/22size#,1/22size#); "pion bialy z 142";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(15,24/22size#,23/22size#,1/22size#); "pion bialy z 143";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(16,24/22size#,23/22size#,1/22size#); "pion bialy z 144";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.65dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(17,24/22size#,23/22size#,1/22size#); "pion bialy z 145";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(18,24/22size#,23/22size#,1/22size#); "pion bialy z 146";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(19,24/22size#,23/22size#,1/22size#); "pion bialy z 147";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(20,24/22size#,23/22size#,1/22size#); "pion bialy z 148";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(21,24/22size#,23/22size#,1/22size#); "pion bialy z 149";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(22,24/22size#,23/22size#,1/22size#); "pion bialy z 150";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(23,24/22size#,23/22size#,1/22size#); "pion bialy z 151";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(24,24/22size#,23/22size#,1/22size#); "pion bialy z 152";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(25,24/22size#,23/22size#,1/22size#); "pion bialy z 153";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(26,24/22size#,23/22size#,1/22size#); "pion bialy z 154";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(27,24/22size#,23/22size#,1/22size#); "pion bialy z 155";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(28,24/22size#,23/22size#,1/22size#); "pion bialy z 156";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(29,24/22size#,23/22size#,1/22size#); "pion bialy z 157";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(30,24/22size#,23/22size#,1/22size#); "pion bialy z 158";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(31,24/22size#,23/22size#,1/22size#); "pion bialy z 159";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(32,24/22size#,23/22size#,1/22size#); "pion bialy z 160";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(33,24/22size#,23/22size#,1/22size#); "pion bialy z 161";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(34,24/22size#,23/22size#,1/22size#); "pion bialy z 162";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(35,24/22size#,23/22size#,1/22size#); "pion bialy z 163";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(36,24/22size#,23/22size#,1/22size#); "pion bialy z 164";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(37,24/22size#,23/22size#,1/22size#); "pion bialy z 165";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(38,24/22size#,23/22size#,1/22size#); "pion bialy z 166";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(39,24/22size#,23/22size#,1/22size#); "pion bialy z 167";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(40,24/22size#,23/22size#,1/22size#); "pion bialy z 168";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(41,24/22size#,23/22size#,1/22size#); "pion bialy z 169";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(42,24/22size#,23/22size#,1/22size#); "pion bialy z 170";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(43,24/22size#,23/22size#,1/22size#); "pion bialy z 171";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(44,24/22size#,23/22size#,1/22size#); "pion bialy z 172";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(45,24/22size#,23/22size#,1/22size#); "pion bialy z 173";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(46,24/22size#,23/22size#,1/22size#); "pion bialy z 174";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(47,24/22size#,23/22size#,1/22size#); "pion bialy z 175";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(48,24/22size#,23/22size#,1/22size#); "pion bialy z 176";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(49,24/22size#,23/22size#,1/22size#); "pion bialy z 177";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(50,24/22size#,23/22size#,1/22size#); "pion bialy z 178";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(51,24/22size#,23/22size#,1/22size#); "pion bialy z 179";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(52,24/22size#,23/22size#,1/22size#); "pion bialy z 180";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(53,24/22size#,23/22size#,1/22size#); "pion bialy z 181";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(54,24/22size#,23/22size#,1/22size#); "pion bialy z 182";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(55,24/22size#,23/22size#,1/22size#); "pion bialy z 183";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(56,24/22size#,23/22size#,1/22size#); "pion bialy z 184";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(57,24/22size#,23/22size#,1/22size#); "pion bialy z 185";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(58,24/22size#,23/22size#,1/22size#); "pion bialy z 186";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(59,24/22size#,23/22size#,1/22size#); "pion bialy z 187";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(60,24/22size#,23/22size#,1/22size#); "pion bialy z 188";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(61,24/22size#,23/22size#,1/22size#); "pion bialy z 189";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(62,24/22size#,23/22size#,1/22size#); "pion bialy z 190";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(63,24/22size#,23/22size#,1/22size#); "pion bialy z 191";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.55dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(64,24/22size#,23/22size#,1/22size#); "pion bialy z 192";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(65,24/22size#,23/22size#,1/22size#); "pion bialy z 193";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(66,24/22size#,23/22size#,1/22size#); "pion bialy z 194";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.75dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.75dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(67,24/22size#,23/22size#,1/22size#); "pion bialy z 195";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(68,24/22size#,23/22size#,1/22size#); "pion bialy z 196";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(69,24/22size#,23/22size#,1/22size#); "pion bialy z 197";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.7dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.7dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(70,24/22size#,23/22size#,1/22size#); "pion bialy z 198";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(71,24/22size#,23/22size#,1/22size#); "pion bialy z 199";
+ currentpicture := white_circle
+ + digit[1] shifted (.5w-1.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w-.8dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.5dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(72,24/22size#,23/22size#,1/22size#); "pion bialy z 200";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(73,24/22size#,23/22size#,1/22size#); "pion bialy z 201";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(74,24/22size#,23/22size#,1/22size#); "pion bialy z 202";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(75,24/22size#,23/22size#,1/22size#); "pion bialy z 203";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.45dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(76,24/22size#,23/22size#,1/22size#); "pion bialy z 204";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(77,24/22size#,23/22size#,1/22size#); "pion bialy z 205";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(78,24/22size#,23/22size#,1/22size#); "pion bialy z 206";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(79,24/22size#,23/22size#,1/22size#); "pion bialy z 207";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.45dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(80,24/22size#,23/22size#,1/22size#); "pion bialy z 208";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(81,24/22size#,23/22size#,1/22size#); "pion bialy z 209";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w-.45dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(82,24/22size#,23/22size#,1/22size#); "pion bialy z 210";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(83,24/22size#,23/22size#,1/22size#); "pion bialy z 211";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(84,24/22size#,23/22size#,1/22size#); "pion bialy z 212";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(85,24/22size#,23/22size#,1/22size#); "pion bialy z 213";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(86,24/22size#,23/22size#,1/22size#); "pion bialy z 214";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.4dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(87,24/22size#,23/22size#,1/22size#); "pion bialy z 215";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(88,24/22size#,23/22size#,1/22size#); "pion bialy z 216";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(89,24/22size#,23/22size#,1/22size#); "pion bialy z 217";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(90,24/22size#,23/22size#,1/22size#); "pion bialy z 218";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(91,24/22size#,23/22size#,1/22size#); "pion bialy z 219";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.45dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(92,24/22size#,23/22size#,1/22size#); "pion bialy z 220";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(93,24/22size#,23/22size#,1/22size#); "pion bialy z 221";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(94,24/22size#,23/22size#,1/22size#); "pion bialy z 222";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(95,24/22size#,23/22size#,1/22size#); "pion bialy z 223";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(96,24/22size#,23/22size#,1/22size#); "pion bialy z 224";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.55dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(97,24/22size#,23/22size#,1/22size#); "pion bialy z 225";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(98,24/22size#,23/22size#,1/22size#); "pion bialy z 226";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(99,24/22size#,23/22size#,1/22size#); "pion bialy z 227";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(100,24/22size#,23/22size#,1/22size#); "pion bialy z 228";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(101,24/22size#,23/22size#,1/22size#); "pion bialy z 229";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(102,24/22size#,23/22size#,1/22size#); "pion bialy z 230";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(103,24/22size#,23/22size#,1/22size#); "pion bialy z 231";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(104,24/22size#,23/22size#,1/22size#); "pion bialy z 232";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(105,24/22size#,23/22size#,1/22size#); "pion bialy z 233";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(106,24/22size#,23/22size#,1/22size#); "pion bialy z 234";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(107,24/22size#,23/22size#,1/22size#); "pion bialy z 235";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(108,24/22size#,23/22size#,1/22size#); "pion bialy z 236";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(109,24/22size#,23/22size#,1/22size#); "pion bialy z 237";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(110,24/22size#,23/22size#,1/22size#); "pion bialy z 238";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(111,24/22size#,23/22size#,1/22size#); "pion bialy z 239";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(112,24/22size#,23/22size#,1/22size#); "pion bialy z 240";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(113,24/22size#,23/22size#,1/22size#); "pion bialy z 241";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.6dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(114,24/22size#,23/22size#,1/22size#); "pion bialy z 242";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(115,24/22size#,23/22size#,1/22size#); "pion bialy z 243";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(116,24/22size#,23/22size#,1/22size#); "pion bialy z 244";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(117,24/22size#,23/22size#,1/22size#); "pion bialy z 245";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(118,24/22size#,23/22size#,1/22size#); "pion bialy z 246";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[6] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(119,24/22size#,23/22size#,1/22size#); "pion bialy z 247";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[7] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(120,24/22size#,23/22size#,1/22size#); "pion bialy z 248";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[8] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(121,24/22size#,23/22size#,1/22size#); "pion bialy z 249";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
+ + digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[9] shifted (.5w+.75dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(122,24/22size#,23/22size#,1/22size#); "pion bialy z 250";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[0] shifted (.5w+.8dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(123,24/22size#,23/22size#,1/22size#); "pion bialy z 251";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.5dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.4dig_w,11/24w-.5dig_h)
+ + digit[1] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(124,24/22size#,23/22size#,1/22size#); "pion bialy z 252";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[2] shifted (.5w+.8dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(125,24/22size#,23/22size#,1/22size#); "pion bialy z 253";
+ currentpicture := white_circle
+ + digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
+ + digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
+ + digit[3] shifted (.5w+.7dig_w,11/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+%%%%%%%%%%%%%%%%%%%%%% other symbols %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+beginchar(126,24/22size#,23/22size#,1/22size#); "pion bialy z kwadratem";
+ pickup pencircle scaled line_thickness;
+ z1=(.5w+.32size,11/24w+.32size);
+ z2=(.5w+.32size,11/24w-.32size);
+ z3=(.5w-.32size,11/24w-.32size);
+ z4=(.5w-.32size,11/24w+.32size);
+ draw z1--z2--z3--z4--cycle;
+ addto currentpicture also white_circle;
+showit;
+endchar;
+
+% stop"";
+
+beginchar(127,24/22size#,23/22size#,1/22size#); "pion bialy z trojkatem";
+ pickup pencircle scaled line_thickness;
+ lft x1=.08size+1/24w; bot y1=.24size;
+ x2=.5w; top y2=.98size;
+ rt x3=.92size+1/24w; bot y3=.24size;
+ draw z1--z2--z3--cycle;
+ addto currentpicture also white_circle;
+showit;
+endchar;
+
+% stop"";
+
+end;
+
diff --git a/fonts/go/mf/gosign50.mf b/fonts/go/mf/gosign50.mf
new file mode 100644
index 0000000000..62098c211d
--- /dev/null
+++ b/fonts/go/mf/gosign50.mf
@@ -0,0 +1,171 @@
+font_identifier:="GOSIGN"; font_size 50pt#;
+
+size#:=50pt#;
+u#:=size#/18; % 50/18pt# for gosign50.pxl/tfm
+% u#:=10/18pt#; % 10/18pt# for gosign10.pxl/tfm
+
+mode_setup;
+beginchar(0,18u#,18u#,0);
+pickup pencircle scaled .1pt;
+x1=.5/18w; y1=14/18h;
+x2=2/18w; y2=16/18h;
+x3=17/18w; y3=15/18h;
+x4=x3; y4=y1;
+fill z1--z2--z3--z4--cycle;
+
+x5=2/18w; y5=7/18h;
+x6=3/18w; y6=8.2/18h;
+x7=16/18w; y7=8/18h;
+x8=x7; y8=7/18h;
+fill z5--z6--z7--z8--cycle;
+
+x9=4/18w; y9=16/18h;
+x10=6/18w; y10=17/18h;
+x11=7/18w; y11=8/18h;
+x12=6/18w; y12=y11;
+fill z9--z10{(1,-2)}..z11--z12..{(-2,3)}cycle;
+
+x13=13.5/18w; y13=17/18h;
+x14=15/18w; y14=16/18h;
+x15=11.7/18w; y15=8/18h;
+x16=11/18w; y16=y15;
+fill z13--z14{(-1,-2)}..z15--z16..{(2,3)}cycle;
+
+x17=6/18w; y17=11.5/18h;
+x18=x17; y18=13/18h;
+x19=12/18w; y19=y18;
+x20=x19; y20=y17;
+fill z17--z18--z19--z20--cycle;
+
+x21=x17; y21=9/18h;
+x22=x17; y22=10.5/18h;
+x23=x19; y23=y22;
+x24=x19; y24=y21;
+fill z21--z22--z23--z24--cycle;
+
+x25=6/18w; y25=7/18h;
+x26=7.5/18w; y26=y25;
+x27=1.5/18w; y27=1.5/18h;
+x28=0/18w; y28=2.5/18h;
+fill z25--z26{(-1,-2)}..{(-3,-1)}z27--z28{right}..{(1,2)}cycle;
+
+x29=10.5/18w; y29=7/18h;
+x30=11.7/18w; y30=y29;
+x31=18/18w; y31=2/18h;
+x32=16.5/18w; y32=1/18h;
+fill z29--z30{(2,-2)}..{right}z31--z32{(-3,2)}..{(-2,3)}cycle;
+
+x33=6.5/18w; y33=5/18h;
+x34=x33; y34=6/18h;
+x35=11.5/18w; y35=y34;
+x36=x35; y36=y33;
+fill z33--z34--z35--z36--cycle;
+
+x37=7/18w; y37=5/18h;
+x38=8/18w; y38=y37;
+x39=5/18w; y39=0.5/18h;
+x40=4/18w; y40=1/18h;
+fill z37--z38{(-1,-2)}..{left}z39--z40{right}..{(1,2)}cycle;
+
+x41=13/18w; y41=4/18h;
+x42=12/18w; y42=3/18h;
+% fill z37--z38{(1,-1)}...{right}z41--z42{left}...z47...z48...{(-1,2)}cycle;
+
+x43=11.5/18w; y43=2/18h;
+x44=x42; y44=1/18h;
+fill z41--z42--z43--z44--cycle;
+
+x45=8.5/18w; y45=0.7/18h;
+x46=9.2/18w; y46=y43;
+fill z43--z44--z45--z46--cycle;
+
+x47=9/18w; y47=3.3/18h;
+x48=8/18w; y48=y47;
+fill z45--z46--z47--z48--cycle;
+fill z37--z38{(1,-1)}...{right}z41--z42{left}...z47...z48...{(-1,2)}cycle;
+
+
+pickup pencircle scaled .01pt;
+
+x100=0/18w;
+x101=1/18w;
+x102=2/18w;
+x103=3/18w;
+x104=4/18w;
+x105=5/18w;
+x106=6/18w;
+x107=7/18w;
+x108=8/18w;
+x109=9/18w;
+x110=10/18w;
+x111=11/18w;
+x112=12/18w;
+x113=13/18w;
+x114=14/18w;
+x115=15/18w;
+x116=16/18w;
+x117=17/18w;
+x118=18/18w;
+
+y100=0/18h;
+y101=1/18h;
+y102=2/18h;
+y103=3/18h;
+y104=4/18h;
+y105=5/18h;
+y106=6/18h;
+y107=7/18h;
+y108=8/18h;
+y109=9/18h;
+y110=10/18h;
+y111=11/18h;
+y112=12/18h;
+y113=13/18h;
+y114=14/18h;
+y115=15/18h;
+y116=16/18h;
+y117=17/18h;
+y118=18/18h;
+
+% draw (x100,y100)--(x118,y100);
+% draw (x100,y101)--(x118,y101);
+% draw (x100,y102)--(x118,y102);
+% draw (x100,y103)--(x118,y103);
+% draw (x100,y104)--(x118,y104);
+% draw (x100,y105)--(x118,y105);
+% draw (x100,y106)--(x118,y106);
+% draw (x100,y107)--(x118,y107);
+% draw (x100,y108)--(x118,y108);
+% draw (x100,y109)--(x118,y109);
+% draw (x100,y110)--(x118,y110);
+% draw (x100,y111)--(x118,y111);
+% draw (x100,y112)--(x118,y112);
+% draw (x100,y113)--(x118,y113);
+% draw (x100,y114)--(x118,y114);
+% draw (x100,y115)--(x118,y115);
+% draw (x100,y116)--(x118,y116);
+% draw (x100,y117)--(x118,y117);
+% draw (x100,y118)--(x118,y118);
+%
+% draw (x100,y100)--(x100,y118);
+% draw (x101,y100)--(x101,y118);
+% draw (x102,y100)--(x102,y118);
+% draw (x103,y100)--(x103,y118);
+% draw (x104,y100)--(x104,y118);
+% draw (x105,y100)--(x105,y118);
+% draw (x106,y100)--(x106,y118);
+% draw (x107,y100)--(x107,y118);
+% draw (x108,y100)--(x108,y118);
+% draw (x109,y100)--(x109,y118);
+% draw (x110,y100)--(x110,y118);
+% draw (x111,y100)--(x111,y118);
+% draw (x112,y100)--(x112,y118);
+% draw (x113,y100)--(x113,y118);
+% draw (x114,y100)--(x114,y118);
+% draw (x115,y100)--(x115,y118);
+% draw (x116,y100)--(x116,y118);
+% draw (x117,y100)--(x117,y118);
+% draw (x118,y100)--(x118,y118);
+endchar;
+
+end; # added Dec. 16, 2012 by karl@tug.org