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"
20 Dots::do_post_processing ()
24 set_elt_property ("transparent", SCM_BOOL_T);
25 set_empty (true, X_AXIS, Y_AXIS);
29 if (!get_direction ())
32 int p = int (position_f ());
34 set_position (p + get_direction ());
38 Dots::do_brew_molecule_p () const
40 Molecule *out = new Molecule;
41 Molecule fill = lookup_l ()->fill (Box (Interval (0,0),
43 out->add_molecule (fill);
45 Molecule d = lookup_l ()->afm_find (String ("dots-dot"));
47 Real dw = d.dim_[X_AXIS].length ();
48 d.translate_axis (-dw, X_AXIS);
49 for (int i=dots_i_; i--; )
51 d.translate_axis (2*dw,X_AXIS);
52 out->add_molecule (d);