lilypond-0.1.37
[lilypond.git] / lily / lyric-grav.cc
blob182658cd5f5fefd77d81001b954e69003928366a
1 /*
2 lyric-engraver.cc -- implement Lyric_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
9 #include "lyric-engraver.hh"
10 #include "musical-request.hh"
11 #include "text-item.hh"
12 #include "paper-def.hh"
13 #include "lookup.hh"
14 #include "paper-def.hh"
16 Lyric_engraver::Lyric_engraver()
18 lreq_l_ =0;
19 lyric_item_p_ =0;
22 bool
23 Lyric_engraver::do_try_request (Request*r)
25 Musical_req * m =r->musical();
26 if (!m || ! m->lreq_l())
27 return false;
28 lreq_l_ = m->lreq_l();
30 return true;
33 void
34 Lyric_engraver::do_process_requests()
36 if (lreq_l_)
38 lyric_item_p_ = new Text_item (lreq_l_->tdef_p_);
40 lyric_item_p_->translate_axis (paper()->note_width ()/2 , X_AXIS);
41 lyric_item_p_->dir_ = DOWN;
42 lyric_item_p_->fat_b_ = true;
43 announce_element (Score_elem_info (lyric_item_p_, lreq_l_));
47 void
48 Lyric_engraver::do_post_move_processing()
50 lreq_l_ =0;
53 void
54 Lyric_engraver::do_pre_move_processing()
56 if (lyric_item_p_)
58 typeset_element (lyric_item_p_);
59 lyric_item_p_ =0;
64 IMPLEMENT_IS_TYPE_B1(Lyric_engraver,Engraver);
65 ADD_THIS_TRANSLATOR(Lyric_engraver);