lily/crescendo.cc

   1 /*
   2   crescendo.cc -- implement Crescendo
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "molecule.hh"
  10 #include "dimen.hh"
  11 #include "crescendo.hh"
  12 #include "lookup.hh"
  13 #include "paper-def.hh"
  14 #include "debug.hh"
  15
  16 Crescendo::Crescendo()
  17 {
  18     grow_dir_i_ =0;
  19     dir_i_ = -1 ;
  20     left_dyn_b_ = right_dyn_b_ =false;
  21 }
  22
  23 Molecule*
  24 Crescendo::brew_molecule_p() const
  25 {
  26     Molecule* m_p =0;
  27     Real x_off_dim=0.0;
  28     Real absdyn_dim = 10 PT;    // ugh
  29
  30     m_p = new Molecule;
  31     Real w_dim = width().length();
  32     if ( left_dyn_b_ ) {
  33         w_dim -= absdyn_dim;
  34         x_off_dim += absdyn_dim;
  35     }
  36     if ( right_dyn_b_ ) {
  37         w_dim -= absdyn_dim;
  38     }
  39
  40     if (w_dim < 0) {
  41         warning("Crescendo too small");
  42         w_dim = 0;
  43     }
  44     Real lookup_wid = w_dim * 0.9; // make it slightly smaller.
  45
  46     Symbol s( paper()->lookup_l()->hairpin( lookup_wid, grow_dir_i_ < 0) );
  47     m_p->add(Atom(s));
  48     int pos = get_position_i(s.dim.y);
  49     m_p->translate(Offset(x_off_dim + 0.05 * w_dim,
  50                           pos * paper()->internote_f()));
  51     return m_p;
  52 }
  53
  54 IMPLEMENT_STATIC_NAME(Crescendo);
  55 IMPLEMENT_IS_TYPE_B1(Crescendo,Spanner);