2 dots.cc -- implement Dots
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "molecule.hh"
11 #include "paper-def.hh"
21 Dots::do_post_processing ()
26 if (!(position_i_ % 2))
27 position_i_ += resolve_dir_;
31 set_elt_property ("transparent", SCM_BOOL_T);
32 set_empty (true, X_AXIS, Y_AXIS);
37 Dots::do_brew_molecule_p () const
39 Molecule *out = new Molecule;
40 Molecule fill = lookup_l ()->fill (Box (Interval (0,0),
42 out->add_molecule (fill);
44 Molecule d = lookup_l ()->dots ();
46 Real dw = d.dim_[X_AXIS].length ();
47 d.translate_axis (-dw, X_AXIS);
48 for (int i=dots_i_; i--; )
50 d.translate_axis (2*dw,X_AXIS);
51 out->add_molecule (d);
53 out->translate_axis (staff_line_leading_f () * position_i_ /2., Y_AXIS);