]> git.donarmstrong.com Git - lilypond.git/blob - lily/local-key-item.cc
release: 1.3.13
[lilypond.git] / lily / local-key-item.cc
1 /*
2   local-key-item.cc -- implement Local_key_item, Musical_pitch
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8 #include "local-key-item.hh"
9 #include "molecule.hh"
10 #include "staff-symbol-referencer.hh"
11
12 #include "lookup.hh"
13 #include "paper-def.hh"
14 #include "musical-request.hh"
15 #include "note-head.hh"
16 #include "misc.hh"
17
18 Local_key_item::Local_key_item ()
19 {
20   c0_position_i_ = 0;
21 }
22
23 void
24 Local_key_item::add_pitch (Musical_pitch p, bool cautionary, bool natural)
25 {
26   for (int i=0; i< accidental_arr_.size(); i++)
27     if (!Musical_pitch::compare (p, accidental_arr_[i].pitch_))
28       return;
29           /* maybe natural (and cautionary) should be modif. nonetheless? */
30
31   Local_key_cautionary_tuple t;
32   t.pitch_ = p;
33   t.cautionary_b_ = cautionary;
34   t.natural_b_ = natural;
35   accidental_arr_.push (t);
36 }
37
38
39
40 void
41 Local_key_item::do_pre_processing()
42 {
43   accidental_arr_.sort (Local_key_cautionary_tuple::compare);
44   Note_head_side::do_pre_processing ();
45 }
46
47 Molecule
48 Local_key_item::accidental (int j, bool cautionary, bool natural) const
49 {
50   Molecule m (lookup_l ()->afm_find (String ("accidentals-") + to_str (j)));
51   if (natural)
52     {
53           Molecule prefix = lookup_l ()->afm_find (String ("accidentals-0"));
54           m.add_at_edge(X_AXIS, LEFT, Molecule(prefix), 0);
55         }
56   if (cautionary) 
57     {
58       Molecule open = lookup_l ()->afm_find (String ("accidentals-("));
59       Molecule close = lookup_l ()->afm_find (String ("accidentals-)"));
60       m.add_at_edge(X_AXIS, LEFT, Molecule(open), 0);
61       m.add_at_edge(X_AXIS, RIGHT, Molecule(close), 0);
62     }
63   
64   return m;
65 }
66
67 Molecule*
68 Local_key_item::do_brew_molecule_p() const
69 {
70   Molecule*output = new Molecule;
71   Staff_symbol_referencer_interface si (this);
72   Real note_distance = si.staff_line_leading_f ()/2;
73   Molecule *octave_mol_p = 0;
74   int lastoct = -100;
75   
76   for  (int i = 0; i <  accidental_arr_.size(); i++) 
77     {
78       Musical_pitch p (accidental_arr_[i].pitch_);
79       // do one octave
80       if (p.octave_i_ != lastoct) 
81         {
82           if (octave_mol_p)
83             {
84               Real dy =lastoct*7* note_distance;
85               octave_mol_p->translate_axis (dy, Y_AXIS);
86               output->add_molecule (*octave_mol_p);
87               delete octave_mol_p;
88             }
89           octave_mol_p= new Molecule;
90         }
91       
92       lastoct = p.octave_i_;
93       Real dy =
94         (c0_position_i_ + p.notename_i_)
95         * note_distance;
96       
97       Molecule m (accidental (p.accidental_i_,
98                               accidental_arr_[i].cautionary_b_,
99                               accidental_arr_[i].natural_b_));
100
101       m.translate_axis (dy, Y_AXIS);
102       octave_mol_p->add_at_edge (X_AXIS, RIGHT, m, 0);
103     }
104
105   if (octave_mol_p)
106     {
107       Real dy =lastoct*7*note_distance;
108       octave_mol_p->translate_axis (dy, Y_AXIS);
109       output->add_molecule (*octave_mol_p);
110       delete octave_mol_p;
111     }
112   
113  if (accidental_arr_.size()) 
114     {
115       Drul_array<SCM> pads;
116
117       /*
118         Use a cons?
119        */
120       pads[RIGHT] = get_elt_property ("right-padding");
121       pads[LEFT] = get_elt_property ("left-padding");
122
123       Direction d = LEFT;
124       do {
125         if (!gh_number_p (pads[d]))
126           continue;
127
128         Box b(Interval (0, gh_scm2double (pads[d]) * note_distance),
129               Interval (0,0));
130         Molecule m (lookup_l ()->fill (b));
131         output->add_at_edge (X_AXIS, d, m, 0);
132       } while ( flip (&d)!= LEFT);
133     }
134
135   return output;
136 }
137