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_h := .9dig_h;
dig_pen := .8dig_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 256";
  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[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(1,24/22size#,23/22size#,1/22size#); "pion czarny z 257";
  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[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(2,24/22size#,23/22size#,1/22size#); "pion czarny z 258";
  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[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(3,24/22size#,23/22size#,1/22size#); "pion czarny z 259";
  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[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(4,24/22size#,23/22size#,1/22size#); "pion czarny z 260";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(5,24/22size#,23/22size#,1/22size#); "pion czarny z 261";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(6,24/22size#,23/22size#,1/22size#); "pion czarny z 262";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h) 
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)  
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(7,24/22size#,23/22size#,1/22size#); "pion czarny z 263";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(8,24/22size#,23/22size#,1/22size#); "pion czarny z 264";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(9,24/22size#,23/22size#,1/22size#); "pion czarny z 265";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(10,24/22size#,23/22size#,1/22size#); "pion czarny z 266";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(11,24/22size#,23/22size#,1/22size#); "pion czarny z 267";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(12,24/22size#,23/22size#,1/22size#); "pion czarny z 268";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)  
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(13,24/22size#,23/22size#,1/22size#); "pion czarny z 269";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(14,24/22size#,23/22size#,1/22size#); "pion czarny z 270";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)  
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(15,24/22size#,23/22size#,1/22size#); "pion czarny z 271";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(16,24/22size#,23/22size#,1/22size#); "pion czarny z 272";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h) 
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)  
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(17,24/22size#,23/22size#,1/22size#); "pion czarny z 273";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(18,24/22size#,23/22size#,1/22size#); "pion czarny z 274";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(19,24/22size#,23/22size#,1/22size#); "pion czarny z 275";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(20,24/22size#,23/22size#,1/22size#); "pion czarny z 276";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(21,24/22size#,23/22size#,1/22size#); "pion czarny z 277";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(22,24/22size#,23/22size#,1/22size#); "pion czarny z 278";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(23,24/22size#,23/22size#,1/22size#); "pion czarny z 279";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(24,24/22size#,23/22size#,1/22size#); "pion czarny z 280";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(25,24/22size#,23/22size#,1/22size#); "pion czarny z 281";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(26,24/22size#,23/22size#,1/22size#); "pion czarny z 282";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h) 
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)  
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(27,24/22size#,23/22size#,1/22size#); "pion czarny z 283";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(28,24/22size#,23/22size#,1/22size#); "pion czarny z 284";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(29,24/22size#,23/22size#,1/22size#); "pion czarny z 285";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(30,24/22size#,23/22size#,1/22size#); "pion czarny z 286";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(31,24/22size#,23/22size#,1/22size#); "pion czarny z 287";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(32,24/22size#,23/22size#,1/22size#); "pion czarny z 288";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(33,24/22size#,23/22size#,1/22size#); "pion czarny z 289";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(34,24/22size#,23/22size#,1/22size#); "pion czarny z 290";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(35,24/22size#,23/22size#,1/22size#); "pion czarny z 291";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(36,24/22size#,23/22size#,1/22size#); "pion czarny z 292";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h) 
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)  
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(37,24/22size#,23/22size#,1/22size#); "pion czarny z 293";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(38,24/22size#,23/22size#,1/22size#); "pion czarny z 294";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(39,24/22size#,23/22size#,1/22size#); "pion czarny z 295";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(40,24/22size#,23/22size#,1/22size#); "pion czarny z 296";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(41,24/22size#,23/22size#,1/22size#); "pion czarny z 297";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(42,24/22size#,23/22size#,1/22size#); "pion czarny z 298";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(43,24/22size#,23/22size#,1/22size#); "pion czarny z 299";
  currentpicture := black_circle 
       - digit[2] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(44,24/22size#,23/22size#,1/22size#); "pion czarny z 300";
  currentpicture := black_circle 
       - digit[3] 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(45,24/22size#,23/22size#,1/22size#); "pion czarny z 301";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(46,24/22size#,23/22size#,1/22size#); "pion czarny z 302";
  currentpicture := black_circle 
       - digit[3] 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(47,24/22size#,23/22size#,1/22size#); "pion czarny z 303";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(48,24/22size#,23/22size#,1/22size#); "pion czarny z 304";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(49,24/22size#,23/22size#,1/22size#); "pion czarny z 305";
  currentpicture := black_circle 
       - digit[3] 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(50,24/22size#,23/22size#,1/22size#); "pion czarny z 306";
  currentpicture := black_circle 
       - digit[3] 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(51,24/22size#,23/22size#,1/22size#); "pion czarny z 307";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(52,24/22size#,23/22size#,1/22size#); "pion czarny z 308";
  currentpicture := black_circle 
       - digit[3] 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(53,24/22size#,23/22size#,1/22size#); "pion czarny z 309";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(54,24/22size#,23/22size#,1/22size#); "pion czarny z 310";
  currentpicture := black_circle 
       - digit[3] 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(55,24/22size#,23/22size#,1/22size#); "pion czarny z 311";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w+.45dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(56,24/22size#,23/22size#,1/22size#); "pion czarny z 312";
  currentpicture := black_circle 
       - digit[3] 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(57,24/22size#,23/22size#,1/22size#); "pion czarny z 313";
  currentpicture := black_circle 
       - digit[3] 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(58,24/22size#,23/22size#,1/22size#); "pion czarny z 314";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.4dig_w,11/24w-.5dig_h)
       - digit[1] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.45dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(59,24/22size#,23/22size#,1/22size#); "pion czarny z 315";
  currentpicture := black_circle 
       - digit[3] 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(60,24/22size#,23/22size#,1/22size#); "pion czarny z 316";
  currentpicture := black_circle 
       - digit[3] 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(61,24/22size#,23/22size#,1/22size#); "pion czarny z 317";
  currentpicture := black_circle 
       - digit[3] 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(62,24/22size#,23/22size#,1/22size#); "pion czarny z 318";
  currentpicture := black_circle 
       - digit[3] 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(63,24/22size#,23/22size#,1/22size#); "pion czarny z 319";
  currentpicture := black_circle 
       - digit[3] 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(64,24/22size#,23/22size#,1/22size#); "pion czarny z 320";
  currentpicture := black_circle 
       - digit[3] 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(65,24/22size#,23/22size#,1/22size#); "pion czarny z 321";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)   
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(66,24/22size#,23/22size#,1/22size#); "pion czarny z 322";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h) 
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)    
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(67,24/22size#,23/22size#,1/22size#); "pion czarny z 323";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)   
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(68,24/22size#,23/22size#,1/22size#); "pion czarny z 324";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)  
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(69,24/22size#,23/22size#,1/22size#); "pion czarny z 325";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)   
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(70,24/22size#,23/22size#,1/22size#); "pion czarny z 326";
  currentpicture := black_circle 
       - digit[3] 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(71,24/22size#,23/22size#,1/22size#); "pion czarny z 327";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)  
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(72,24/22size#,23/22size#,1/22size#); "pion czarny z 328";
  currentpicture := black_circle 
       - digit[3] 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(73,24/22size#,23/22size#,1/22size#); "pion czarny z 329";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(74,24/22size#,23/22size#,1/22size#); "pion czarny z 330";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(75,24/22size#,23/22size#,1/22size#); "pion czarny z 331";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h) 
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(76,24/22size#,23/22size#,1/22size#); "pion czarny z 332";
  currentpicture := black_circle 
       - digit[3] 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(77,24/22size#,23/22size#,1/22size#); "pion czarny z 333";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(78,24/22size#,23/22size#,1/22size#); "pion czarny z 334";
  currentpicture := black_circle 
       - digit[3] 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(79,24/22size#,23/22size#,1/22size#); "pion czarny z 335";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(80,24/22size#,23/22size#,1/22size#); "pion czarny z 336";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(81,24/22size#,23/22size#,1/22size#); "pion czarny z 337";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(82,24/22size#,23/22size#,1/22size#); "pion czarny z 338";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h) 
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(83,24/22size#,23/22size#,1/22size#); "pion czarny z 339";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(84,24/22size#,23/22size#,1/22size#); "pion czarny z 340";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(85,24/22size#,23/22size#,1/22size#); "pion czarny z 341";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h) 
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(86,24/22size#,23/22size#,1/22size#); "pion czarny z 342";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);  
showit;
endchar;

% stop"";

beginchar(87,24/22size#,23/22size#,1/22size#); "pion czarny z 343";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(88,24/22size#,23/22size#,1/22size#); "pion czarny z 344";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(89,24/22size#,23/22size#,1/22size#); "pion czarny z 345";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(90,24/22size#,23/22size#,1/22size#); "pion czarny z 346";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(91,24/22size#,23/22size#,1/22size#); "pion czarny z 347";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(92,24/22size#,23/22size#,1/22size#); "pion czarny z 348";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(93,24/22size#,23/22size#,1/22size#); "pion czarny z 349";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.55dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(94,24/22size#,23/22size#,1/22size#); "pion czarny z 350";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(95,24/22size#,23/22size#,1/22size#); "pion czarny z 351";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h) 
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(96,24/22size#,23/22size#,1/22size#); "pion czarny z 352";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);  
showit;
endchar;

% stop"";

beginchar(97,24/22size#,23/22size#,1/22size#); "pion czarny z 353";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(98,24/22size#,23/22size#,1/22size#); "pion czarny z 354";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(99,24/22size#,23/22size#,1/22size#); "pion czarny z 355";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(100,24/22size#,23/22size#,1/22size#); "pion czarny z 356";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(101,24/22size#,23/22size#,1/22size#); "pion czarny z 357";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(102,24/22size#,23/22size#,1/22size#); "pion czarny z 358";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(103,24/22size#,23/22size#,1/22size#); "pion czarny z 359";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(104,24/22size#,23/22size#,1/22size#); "pion czarny z 360";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(105,24/22size#,23/22size#,1/22size#); "pion czarny z 361";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h) 
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(106,24/22size#,23/22size#,1/22size#); "pion czarny z 362";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);  
showit;
endchar;

% stop"";

beginchar(107,24/22size#,23/22size#,1/22size#); "pion czarny z 363";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(108,24/22size#,23/22size#,1/22size#); "pion czarny z 364";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(109,24/22size#,23/22size#,1/22size#); "pion czarny z 365";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(110,24/22size#,23/22size#,1/22size#); "pion czarny z 366";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(111,24/22size#,23/22size#,1/22size#); "pion czarny z 367";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h); 
showit;
endchar;

% stop"";

beginchar(112,24/22size#,23/22size#,1/22size#); "pion czarny z 368";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(113,24/22size#,23/22size#,1/22size#); "pion czarny z 369";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[6] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(114,24/22size#,23/22size#,1/22size#); "pion czarny z 370";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[0] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(115,24/22size#,23/22size#,1/22size#); "pion czarny z 371";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[1] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(116,24/22size#,23/22size#,1/22size#); "pion czarny z 372";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[2] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(117,24/22size#,23/22size#,1/22size#); "pion czarny z 373";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[3] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(118,24/22size#,23/22size#,1/22size#); "pion czarny z 374";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[4] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(119,24/22size#,23/22size#,1/22size#); "pion czarny z 375";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[5] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(120,24/22size#,23/22size#,1/22size#); "pion czarny z 376";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[6] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(121,24/22size#,23/22size#,1/22size#); "pion czarny z 377";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[7] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(122,24/22size#,23/22size#,1/22size#); "pion czarny z 378";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[8] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

beginchar(123,24/22size#,23/22size#,1/22size#); "pion czarny z 379";
  currentpicture := black_circle 
       - digit[3] shifted (.5w-1.6dig_w,11/24w-.5dig_h)
       - digit[7] shifted (.5w-.5dig_w,11/24w-.5dig_h)      
       - digit[9] shifted (.5w+.65dig_w,11/24w-.5dig_h);
showit;
endchar;

% stop"";

%%%%%%%%%%%%%%%%%%%%%% other symbols %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

beginchar(124,24/22size#,23/22size#,1/22size#); "Stone with cross";
  pickup pencircle scaled 2.0line_thickness;
  z1=(.5w+.30size,11/24w+.30size);
  z2=(.5w+.30size,11/24w-.30size);
  z3=(.5w-.30size,11/24w-.30size);
  z4=(.5w-.30size,11/24w+.30size);
  currentpicture := black_circle;  
  erase draw z1--z3;
  erase draw z2--z4;
showit;
endchar;

% stop"";

beginchar(125,24/22size#,23/22size#,1/22size#); "Stone with circle";
  pickup pencircle scaled 2.0line_thickness;
  z1=(.5w,11/24w+.28size);
  z2=(.5w+.28size,11/24w);
  z3=(.5w,11/24w-.28size);
  z4=(.5w-.28size,11/24w);
  currentpicture := black_circle;  
  erase draw z1...z2...z3...z4...cycle;
showit;
endchar;

% stop"";

beginchar(126,24/22size#,23/22size#,1/22size#); "Stone with square";
  pickup pencircle scaled 2.0line_thickness;
  z1=(.5w+.28size,11/24w+.28size);
  z2=(.5w+.28size,11/24w-.28size);
  z3=(.5w-.28size,11/24w-.28size);
  z4=(.5w-.28size,11/24w+.28size);
  currentpicture := black_circle;  
  erase draw z1--z2--z3--z4--cycle;  
showit;
endchar;

% stop"";

beginchar(127,24/22size#,23/22size#,1/22size#); "Stone with triangle";
  pickup pencircle scaled 2.0line_thickness;
  lft x1=.08size+1/24w+.02size;
  bot y1=.24size+.02size;
  x2=.5w;
  top y2=.98size-.02size;
  rt x3=.92size+1/24w-.02size;
  bot y3=.24size+.02size; 
  currentpicture := black_circle;  
  erase draw z1--z2--z3--cycle;
showit;
endchar;

% stop"";

end;