]> git.donarmstrong.com Git - lilypond.git/blob - lily/lyric-engraver.cc
release: 1.3.109
[lilypond.git] / lily / lyric-engraver.cc
1 /*
2   lyric-engraver.cc -- implement Lyric_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   Jan Nieuwenhuizen <janneke@gnu.org>
8 */
9
10 #include "lyric-engraver.hh"
11 #include "musical-request.hh"
12 #include "item.hh"
13 #include "paper-def.hh"
14 #include "font-metric.hh"
15 #include "side-position-interface.hh"
16
17 ADD_THIS_TRANSLATOR (Lyric_engraver);
18
19
20 Lyric_engraver::Lyric_engraver()
21 {
22   text_p_ =0;
23   req_l_ =0;
24 }
25
26 bool
27 Lyric_engraver::try_music (Music*r)
28 {
29   if (Lyric_req* l = dynamic_cast <Lyric_req *> (r))
30     {
31       if (req_l_)
32         return false;
33       req_l_ =l;
34       return true;
35     }
36   return false;
37 }
38
39 void
40 Lyric_engraver::deprecated_process_music()
41 {
42   if (req_l_)
43     {
44       text_p_=  new Item (get_property ("LyricText"));
45       
46       text_p_->set_grob_property ("text", req_l_->get_mus_property ("text"));
47
48       /*
49         We can't reach the notehead where we're centered from here. So
50         we kludge.
51
52         (UGH UGH, pulled amount of space out of thin air)
53       */
54       
55       text_p_->translate_axis (0.66, X_AXIS);
56       
57       announce_grob (text_p_, req_l_);
58       req_l_ = 0;
59     }
60 }
61
62 void
63 Lyric_engraver::stop_translation_timestep()
64 {
65   if (text_p_)
66     {
67       typeset_grob (text_p_);
68       text_p_ =0;
69     }
70 }
71
72 void
73 Lyric_engraver::start_translation_timestep ()
74 {
75   req_l_ =0;
76 }
77
78