source file of the GNU LilyPond music typesetter
- (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+ (c) 1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
-#include "staff-sym.hh"
+#include "staff-symbol.hh"
#include "lookup.hh"
+#include "dimensions.hh"
#include "paper-def.hh"
#include "molecule.hh"
#include "debug.hh"
+#include "item.hh"
-
-Staff_symbol::Staff_symbol (int l)
+Staff_symbol::Staff_symbol ()
{
- no_lines_i_ = l;
+ no_lines_i_ = 5;
+ staff_line_leading_f_ = 5.0 PT;
}
-
-IMPLEMENT_IS_TYPE_B1(Staff_symbol,Spanner);
-
void
Staff_symbol::do_print() const
{
#endif
}
-Molecule*
-Staff_symbol::brew_molecule_p() const
+Interval
+Staff_symbol::do_height() const
{
- Atom a = paper()->lookup_l ()->linestaff (no_lines_i_, paper ()->interline_f(), width ().length ());
- return new Molecule (a);
+ Interval i =Interval (0, staff_line_leading_f_ * (no_lines_i_-1));
+ i += - i.center ();
+ return i;
}
-Real
-Staff_symbol::inter_note_f() const
+Molecule*
+Staff_symbol::do_brew_molecule_p() const
{
- return paper()->internote_f ();
+ Real w = extent (X_AXIS).length ();
+ Paper_def * p = paper_l ();
+ Real t = p->get_var ("rulethickness");
+ Molecule rule = lookup_l ()->filledbox (Box (Interval (0,w),
+ Interval (-t/2, t/2)));
+
+ Real height = (no_lines_i_-1) * staff_line_leading_f_ /2;
+ Molecule * m = new Molecule;
+ for (int i=0; i < no_lines_i_; i++)
+ {
+ Molecule a (rule);
+ a.translate_axis (height - i * staff_line_leading_f_, Y_AXIS);
+ m->add_molecule (a);
+ }
+
+ return m;
}
+
int
Staff_symbol::steps_i() const
{