2 dots.cc -- implement Dots
4 source file of the GNU LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
10 #include "molecule.hh"
11 #include "paper-def.hh"
21 Dots::do_post_processing ()
23 if (!(position_i_
% 2))
27 transparent_b_
= true;
33 Dots::brew_molecule_p () const
35 Molecule
*out
= new Molecule
;
36 Atom fill
= paper ()->lookup_l ()->fill (Box (Interval (0,0),
40 Atom d
= paper ()->lookup_l ()->dots ();
42 Real dw
= d
.dim_
[X_AXIS
].length ();
43 d
.translate_axis (-dw
, X_AXIS
);
44 for (int i
=no_dots_i_
; i
--; )
46 d
.translate_axis (2*dw
,X_AXIS
);
49 Real inter_f
= paper ()->internote_f ();
50 out
->translate_axis (inter_f
* position_i_
, Y_AXIS
);
54 IMPLEMENT_IS_TYPE_B1(Dots
, Item
);