]> git.donarmstrong.com Git - lilypond.git/blob - lily/crescendo.cc
release: 1.3.10
[lilypond.git] / lily / crescendo.cc
1 /*
2   crescendo.cc -- implement Crescendo
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "molecule.hh"
10 #include "crescendo.hh"
11 #include "lookup.hh"
12 #include "dimensions.hh"
13 #include "paper-def.hh"
14 #include "debug.hh"
15 #include "score-column.hh"
16
17 Crescendo::Crescendo ()
18 {
19   grow_dir_ =0;
20   dyn_b_drul_[LEFT] = dyn_b_drul_[RIGHT] =false;
21 }
22
23 Molecule
24 Crescendo::get_symbol () const
25 {
26   Real w_dim = spanner_length()- get_broken_left_end_align ();
27   Real absdyn_dim = paper_l ()-> get_var ("crescendo_shorten");
28   if (dyn_b_drul_[LEFT])
29     {
30       w_dim -= absdyn_dim;
31     }
32   if (dyn_b_drul_[RIGHT])
33     {
34       w_dim -= absdyn_dim;
35     }
36
37   if (w_dim < 0)
38     {
39       warning (_ ("crescendo") + " " + _ ("too small"));
40       w_dim = 0;
41     }
42
43   Drul_array<bool> broken;
44   Direction d = LEFT;
45   do {
46     Score_column* s = dynamic_cast<Score_column*>(spanned_drul_[d]); // UGH
47     broken[d] = (!s->musical_b ());
48   } while (flip (&d) != LEFT);
49   
50
51   bool continued = broken[Direction (-grow_dir_)];
52   Real height = paper_l()->get_var ("crescendo_height");
53   Real thick = paper_l ()->get_var ("crescendo_thickness");
54
55   return Molecule (lookup_l ()->hairpin (w_dim, height, thick, grow_dir_ < 0, continued));
56 }
57
58 Molecule*
59 Crescendo::do_brew_molecule_p () const
60 {
61   Molecule* m_p =0;
62   Real absdyn_dim = paper_l ()-> get_var ("crescendo_shorten");
63   Real x_off_dim =  get_broken_left_end_align ();
64
65   if (dyn_b_drul_[LEFT])
66     x_off_dim += absdyn_dim;
67
68   m_p = new Molecule;
69   Molecule s (get_symbol ());
70   m_p->add_molecule (s);
71   m_p->translate_axis (x_off_dim, X_AXIS);
72   return m_p;
73 }
74
75