summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/othello/ot1white.mf
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/othello/ot1white.mf')
-rw-r--r--macros/latex/contrib/othello/ot1white.mf735
1 files changed, 735 insertions, 0 deletions
diff --git a/macros/latex/contrib/othello/ot1white.mf b/macros/latex/contrib/othello/ot1white.mf
new file mode 100644
index 0000000000..a1d0947b9a
--- /dev/null
+++ b/macros/latex/contrib/othello/ot1white.mf
@@ -0,0 +1,735 @@
+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=13/24w; y1=-1/24w;
+ rt x2=35/24w; y2=-1/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 (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(2,24/22size#,23/22size#,1/22size#); "pion bialy z 2";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(3,24/22size#,23/22size#,1/22size#); "pion bialy z 3";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(4,24/22size#,23/22size#,1/22size#); "pion bialy z 4";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-.6dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(5,24/22size#,23/22size#,1/22size#); "pion bialy z 5";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(6,24/22size#,23/22size#,1/22size#); "pion bialy z 6";
+ currentpicture := white_circle
+ + digit[6] shifted (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(7,24/22size#,23/22size#,1/22size#); "pion bialy z 7";
+ currentpicture := white_circle
+ + digit[7] shifted (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(8,24/22size#,23/22size#,1/22size#); "pion bialy z 8";
+ currentpicture := white_circle
+ + digit[8] shifted (1w-.5dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(9,24/22size#,23/22size#,1/22size#); "pion bialy z 9";
+ currentpicture := white_circle
+ + digit[9] shifted (1w-.5dig_w,-1/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 (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[0] shifted (1w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(11,24/22size#,23/22size#,1/22size#); "pion bialy z 11";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-dig_w,-1/24w-.5dig_h)
+ + digit[1] shifted (1w+.2dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(12,24/22size#,23/22size#,1/22size#); "pion bialy z 12";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[2] shifted (1w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(13,24/22size#,23/22size#,1/22size#); "pion czarny z 13";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[3] shifted (1w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(14,24/22size#,23/22size#,1/22size#); "pion bialy z 14";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[4] shifted (1w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(15,24/22size#,23/22size#,1/22size#); "pion czarny z 15";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[5] shifted (1w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(16,24/22size#,23/22size#,1/22size#); "pion bialy z 16";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[6] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(17,24/22size#,23/22size#,1/22size#); "pion czarny z 17";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[7] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(18,24/22size#,23/22size#,1/22size#); "pion bialy z 18";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[8] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(19,24/22size#,23/22size#,1/22size#); "pion czarny z 19";
+ currentpicture := white_circle
+ + digit[1] shifted (1w-1.2dig_w,-1/24w-.5dig_h)
+ + digit[9] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(20,24/22size#,23/22size#,1/22size#); "pion bialy z 20";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[0] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(21,24/22size#,23/22size#,1/22size#); "pion czarny z 21";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-.9dig_w,-1/24w-.5dig_h)
+ + digit[1] shifted (1w+.2dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(22,24/22size#,23/22size#,1/22size#); "pion bialy z 22";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[2] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(23,24/22size#,23/22size#,1/22size#); "pion czarny z 23";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[3] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(24,24/22size#,23/22size#,1/22size#); "pion bialy z 24";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[4] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(25,24/22size#,23/22size#,1/22size#); "pion czarny z 25";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[5] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(26,24/22size#,23/22size#,1/22size#); "pion bialy z 26";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[6] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(27,24/22size#,23/22size#,1/22size#); "pion czarny z 27";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[7] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(28,24/22size#,23/22size#,1/22size#); "pion bialy z 28";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[8] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(29,24/22size#,23/22size#,1/22size#); "pion czarny z 29";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[9] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(30,24/22size#,23/22size#,1/22size#); "pion bialy z 30";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[0] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(31,24/22size#,23/22size#,1/22size#); "pion czarny z 31";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-.9dig_w,-1/24w-.5dig_h)
+ + digit[1] shifted (1w+.2dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(32,24/22size#,23/22size#,1/22size#); "pion bialy z 32";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[2] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(33,24/22size#,23/22size#,1/22size#); "pion czarny z 33";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[3] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(34,24/22size#,23/22size#,1/22size#); "pion bialy z 34";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[4] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(35,24/22size#,23/22size#,1/22size#); "pion czarny z 35";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[5] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(36,24/22size#,23/22size#,1/22size#); "pion bialy z 36";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[6] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(37,24/22size#,23/22size#,1/22size#); "pion czarny z 37";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[7] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(38,24/22size#,23/22size#,1/22size#); "pion bialy z 38";
+ currentpicture := white_circle
+ + digit[3] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[8] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(39,24/22size#,23/22size#,1/22size#); "pion czarny z 39";
+ currentpicture := white_circle
+ + digit[2] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[9] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(40,24/22size#,23/22size#,1/22size#); "pion bialy z 40";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[0] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(41,24/22size#,23/22size#,1/22size#); "pion czarny z 41";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[1] shifted (.5w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(42,24/22size#,23/22size#,1/22size#); "pion bialy z 42";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[2] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(43,24/22size#,23/22size#,1/22size#); "pion czarny z 43";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[3] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(44,24/22size#,23/22size#,1/22size#); "pion bialy z 44";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[4] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(45,24/22size#,23/22size#,1/22size#); "pion czarny z 45";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[5] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(46,24/22size#,23/22size#,1/22size#); "pion bialy z 46";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[6] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(47,24/22size#,23/22size#,1/22size#); "pion czarny z 47";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[7] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(48,24/22size#,23/22size#,1/22size#); "pion bialy z 48";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[8] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(49,24/22size#,23/22size#,1/22size#); "pion czarny z 49";
+ currentpicture := white_circle
+ + digit[4] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[9] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(50,24/22size#,23/22size#,1/22size#); "pion bialy z 50";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[0] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(51,24/22size#,23/22size#,1/22size#); "pion czarny z 51";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-.9dig_w,-1/24w-.5dig_h)
+ + digit[1] shifted (1w+.2dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(52,24/22size#,23/22size#,1/22size#); "pion bialy z 52";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[2] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(53,24/22size#,23/22size#,1/22size#); "pion czarny z 53";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[3] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(54,24/22size#,23/22size#,1/22size#); "pion bialy z 54";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[4] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(55,24/22size#,23/22size#,1/22size#); "pion czarny z 55";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[5] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(56,24/22size#,23/22size#,1/22size#); "pion bialy z 56";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[6] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(57,24/22size#,23/22size#,1/22size#); "pion czarny z 57";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[7] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(58,24/22size#,23/22size#,1/22size#); "pion bialy z 58";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[8] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(59,24/22size#,23/22size#,1/22size#); "pion czarny z 59";
+ currentpicture := white_circle
+ + digit[5] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[9] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(60,24/22size#,23/22size#,1/22size#); "pion bialy z 60";
+ currentpicture := white_circle
+ + digit[6] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[0] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(61,24/22size#,23/22size#,1/22size#); "pion czarny z 61";
+ currentpicture := white_circle
+ + digit[6] shifted (1w-.9dig_w,-1/24w-.5dig_h)
+ + digit[1] shifted (1w+.2dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(62,24/22size#,23/22size#,1/22size#); "pion bialy z 62";
+ currentpicture := white_circle
+ + digit[6] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[2] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(63,24/22size#,23/22size#,1/22size#); "pion czarny z 63";
+ currentpicture := white_circle
+ + digit[6] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[3] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+beginchar(64,24/22size#,23/22size#,1/22size#); "pion bialy z 64";
+ currentpicture := white_circle
+ + digit[6] shifted (1w-1.1dig_w,-1/24w-.5dig_h)
+ + digit[4] shifted (1w+.1dig_w,-1/24w-.5dig_h);
+showit;
+endchar;
+
+% stop"";
+
+end;