]> git.donarmstrong.com Git - lilypond.git/blob - lily/abbreviation-beam-engraver.cc
f2a69f5504cafd124308ea2c3d6c845ad2a4cc6f
[lilypond.git] / lily / abbreviation-beam-engraver.cc
1 /*
2   abbreviation-beam-engraver.cc -- implement Abbreviation_beam_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@stack.nl>
7            Jan Nieuwenhuizen <jan@digicash.com>
8 */
9
10 #include "duration-convert.hh"
11 #include "time-description.hh"
12 #include "abbreviation-beam-engraver.hh"
13 #include "stem.hh"
14 #include "abbreviation-beam.hh"
15 #include "musical-request.hh"
16 #include "misc.hh"
17
18 IMPLEMENT_IS_TYPE_B1(Abbreviation_beam_engraver, Engraver);
19 ADD_THIS_TRANSLATOR(Abbreviation_beam_engraver);
20
21 Abbreviation_beam_engraver::Abbreviation_beam_engraver ()
22 {
23   span_reqs_drul_[LEFT] = span_reqs_drul_[RIGHT] = 0;
24   abeam_p_ = 0;
25 }
26
27 bool
28 Abbreviation_beam_engraver::do_try_request (Request*r)
29 {
30   Musical_req* mus_l = r->musical ();
31   if (!mus_l)
32     return false;
33
34   Abbreviation_beam_req * b = mus_l->abbrev_beam ();
35
36   if (!b)
37     return false;
38
39   if (bool (abeam_p_) == bool (b->spantype == Span_req::START))
40     return false;
41
42   Direction d = (!abeam_p_) ? LEFT : RIGHT;
43   if (span_reqs_drul_[d] && !span_reqs_drul_[d]->equal_b (mus_l))
44     return false;
45
46   span_reqs_drul_[d] = b;
47   return true;
48 }
49
50 void
51 Abbreviation_beam_engraver::do_process_requests ()
52 {
53   if (!abeam_p_ && span_reqs_drul_[LEFT]) {
54     abeam_p_ = new Abbreviation_beam;
55     announce_element (Score_elem_info (abeam_p_, span_reqs_drul_[LEFT]));
56   }
57 }
58
59 void
60 Abbreviation_beam_engraver::do_pre_move_processing ()
61 {
62   if (abeam_p_ && span_reqs_drul_[RIGHT]) {
63     typeset_element (abeam_p_);
64     abeam_p_ = 0;
65
66     span_reqs_drul_[RIGHT] =
67       span_reqs_drul_[LEFT] = 0;
68   }
69 }
70
71 void
72 Abbreviation_beam_engraver::do_removal_processing ()
73 {
74   if (abeam_p_)
75     {
76       span_reqs_drul_[LEFT]->warning (_("unterminated beam"));
77       typeset_element (abeam_p_);
78       abeam_p_ = 0;
79     }
80 }
81
82 void
83 Abbreviation_beam_engraver::acknowledge_element (Score_elem_info i)
84 {
85   if (!abeam_p_ || !i.elem_l_->is_type_b (Stem::static_name ()))
86     return;
87
88   Stem* s = (Stem*)i.elem_l_->item ();
89
90   int type_i = span_reqs_drul_[LEFT]->type_i_;
91   s->flag_i_ = intlog2 (type_i) - 2;
92   if (span_reqs_drul_[RIGHT])
93     s->beams_left_i_ = s->flag_i_;
94   else
95     s->beams_right_i_ = s->flag_i_;
96
97   abeam_p_->multiple_i_ = s->flag_i_;
98   if (s->type_i () != 1) // no abbrev gaps on half note
99     s->beam_gap_i_ = s->flag_i_ - ((s->type_i () >? 2) - 2);
100
101   abeam_p_->add (s);
102 }