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"
13 #include "staff-symbol-referencer.hh"
21 Dots::do_post_processing ()
25 set_elt_property ("transparent", SCM_BOOL_T);
31 if (!get_direction ())
34 Staff_symbol_referencer_interface si (this);
35 int p = int (si.position_f ());
37 si.set_position (p + get_direction ());
41 Dots::do_brew_molecule_p () const
43 Molecule *out = new Molecule;
44 Molecule fill = lookup_l ()->fill (Box (Interval (0,0),
46 out->add_molecule (fill);
48 Molecule d = lookup_l ()->afm_find (String ("dots-dot"));
50 Real dw = d.dim_[X_AXIS].length ();
51 d.translate_axis (-dw, X_AXIS);
52 for (int i=dots_i_; i--; )
54 d.translate_axis (2*dw,X_AXIS);
55 out->add_molecule (d);