2 grid-line-engraver.cc -- implement Grid_point_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
10 #include "engraver.hh"
14 class Grid_point_engraver : public Engraver
17 TRANSLATOR_DECLARATIONS (Grid_point_engraver);
19 PRECOMPUTED_VIRTUAL void process_music ();
23 Grid_point_engraver::process_music ()
25 SCM grid_interval = get_property ("gridInterval");
26 if (Moment *mom = unsmob_moment (grid_interval))
28 Moment now = now_mom ();
30 if (!now.main_part_.mod_rat (mom->main_part_))
32 make_item ("GridPoint", SCM_EOL);
37 Grid_point_engraver::Grid_point_engraver ()
41 #include "translator.icc"
43 ADD_TRANSLATOR (Grid_point_engraver,
44 /* descr */ "generate grid points.",
45 /* creats*/ "GridPoint",
48 /* reads */ "gridInterval",