mf/parmesan-dots.mf

   1 fet_begingroup ("dots");
   2
   3 save dot_diam;
   4
   5 3 dot_diam# = staff_space# - stafflinethickness#;
   6 define_whole_blacker_pixels (dot_diam);
   7
   8 fet_beginchar ("duration dot", "dotvaticana");
   9         pickup pencircle scaled dot_diam;
  10
  11         lft x0 = 0;
  12         top y0 = vround (.5 dot_diam);
  13
  14         drawdot z0;
  15
  16         set_char_box (0, dot_diam#, .5 dot_diam#, .5 dot_diam#);
  17 fet_endchar;
  18
  19 fet_endgroup ("dots");