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
  24
  25 Molecule*
  26 Crescendo::brew_molecule_p() const
  27 {
  28     Molecule* m_p =0;
  29     Real x_off_dim=0.0;
  30     Real absdyn_dim = 10 PT;    // ugh
  31
  32     m_p = new Molecule;
  33     Real w_dim = width().length();
  34     if ( left_dyn_b_ ) {
  35         w_dim -= absdyn_dim;
  36         x_off_dim += absdyn_dim;
  37     }
  38     if ( right_dyn_b_ ) {
  39         w_dim -= absdyn_dim;
  40     }
  41
  42     if (w_dim < 0) {
  43         warning("Crescendo too small");
  44         w_dim = 0;
  45     }
  46     Real lookup_wid = w_dim * 0.9; // make it slightly smaller.
  47
  48     Symbol s( paper()->lookup_l()->hairpin( lookup_wid, grow_dir_i_ < 0) );
  49     m_p->add(Atom(s));
  50     int pos = get_position_i(s.dim.y);
  51     m_p->translate(Offset(x_off_dim + 0.05 * w_dim,
  52                           pos * paper()->internote_f()));
  53     return m_p;
  54 }
  55
  56 IMPLEMENT_STATIC_NAME(Crescendo);