]> git.donarmstrong.com Git - lilypond.git/blob - lily/key-item.cc
release: 0.1.22
[lilypond.git] / lily / key-item.cc
1 /*
2   key-item.cc -- implement Key_item
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1996,1997 Han-Wen Nienhuys <hanwen@stack.nl>
7
8   keyplacement by Mats Bengtsson
9 */
10
11 #include "key-item.hh"
12 #include "key.hh"
13 #include "debug.hh"
14 #include "molecule.hh"
15 #include "paper-def.hh"
16 #include "lookup.hh"
17
18 #include "key-grav.hh"
19
20 const int FLAT_TOP_PITCH=2; /* fes,ges,as and bes typeset in lower octave */
21 const int SHARP_TOP_PITCH=4; /*  ais and bis typeset in lower octave */
22
23 Key_item::Key_item (int c)
24 {
25   breakable_b_ =true;
26   default_b_ = false;
27   set_c_position (c);
28 }
29
30 void
31 Key_item::read (Key_engraver const & key_grav_r)
32 {
33   assert (!key_grav_r.key_.multi_octave_b_);
34   const Array<int> &idx_arr =key_grav_r.accidental_idx_arr_; 
35   for (int i = 0 ; i< idx_arr.size(); i++) 
36     {
37       int note = idx_arr[i];
38       int acc = ((Key &) key_grav_r.key_).oct (0).acc (note);
39
40       add (note, acc);
41     }
42 }
43
44 void 
45 Key_item::set_c_position (int c0)
46 {
47   int from_bottom_pos = c0 + 4; // ugh
48   int octaves =(abs (from_bottom_pos) / 7) +1 ;
49   from_bottom_pos =(from_bottom_pos + 7*octaves)%7;
50   c_position  = from_bottom_pos - 4;
51 }
52
53
54 void
55 Key_item::add (int p, int a)
56 {
57   if ((a<0 && p>FLAT_TOP_PITCH) ||
58       (a>0 && p>SHARP_TOP_PITCH)) 
59     {
60       p -= 7; /* Typeset below c_position */
61     }
62   pitch.push (p);
63   acc.push (a);
64 }
65
66
67 Molecule*
68 Key_item::brew_molecule_p() const
69 {
70   Molecule*output = new Molecule;
71   Real inter = paper()->internote_f ();
72   
73   for (int i =0; i < pitch.size(); i++) 
74     {
75       Atom a =paper()->lookup_l ()->accidental (acc[i]);
76       a.translate_axis ((c_position + pitch[i]) * inter, Y_AXIS);
77       Molecule m (a);
78       output->add_at_edge (X_AXIS, RIGHT, m);   
79     }
80   if (pitch.size()) 
81     {
82       Molecule m (paper()->lookup_l ()->fill (Box (
83                                                    Interval (0, paper()->note_width ()),
84                                                    Interval (0,0))));
85
86       output->add_at_edge (X_AXIS, RIGHT, m);
87     }
88   return output;
89 }
90
91 IMPLEMENT_IS_TYPE_B1(Key_item,Item);
92
93 void 
94 Key_item::do_pre_processing()
95 {
96   if (default_b_) 
97     {
98       transparent_b_ = (break_status_i() != 1);
99       set_empty (transparent_b_);
100     }
101 }