2 chord-name-engraver.cc -- implement Chord_name_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1998 Jan Nieuwenhuizen <janneke@gnu.org>
9 #include "chord-name-engraver.hh"
10 #include "musical-request.hh"
11 #include "text-item.hh"
12 #include "paper-def.hh"
14 #include "paper-def.hh"
16 #include "dimensions.hh"
18 ADD_THIS_TRANSLATOR (Chord_name_engraver);
20 Chord_name_engraver::Chord_name_engraver ()
25 Chord_name_engraver::acknowledge_element (Score_element_info i)
27 if (Note_req* n = dynamic_cast<Note_req*> (i.req_l_))
28 pitch_arr_.push (n->pitch_);
32 Chord_name_engraver::do_try_music (Music* m)
34 if (Note_req* n = dynamic_cast<Note_req*> (m))
36 pitch_arr_.push (n->pitch_);
43 Chord_name_engraver::do_process_requests ()
45 if (text_p_arr_.size ())
47 if (!pitch_arr_.size ())
51 Banter style chord names (almost).
53 - move this stuff to new Item class Chord_name
54 - switch on property, add american (?) chordNameStyle
57 Scalar chordNameStyle = get_property ("chordNameStyle");
58 if (chordNameStyle == "Banter")
59 chord = pitches_to_banter (pitch_arr_));
63 Scalar style = get_property ("textstyle");
64 Scalar alignment = get_property ("textalignment");
65 Text_def* text_p = new Text_def;
66 text_p->align_dir_ = LEFT;
67 if (style.length_i ())
68 text_p->style_str_ = style;
69 if (alignment.isnum_b())
70 text_p->align_dir_= (Direction)(int)alignment;
72 Musical_pitch tonic = pitch_arr_[0];
74 Array<Musical_pitch> scale;
75 scale.push (Musical_pitch (0)); // c
76 scale.push (Musical_pitch (1)); // d
77 scale.push (Musical_pitch (2)); // e
78 scale.push (Musical_pitch (3)); // f
79 scale.push (Musical_pitch (4)); // g
80 scale.push (Musical_pitch (5)); // a
81 // 7 always means 7-...
82 scale.push (Musical_pitch (6, -1)); // b
84 for (int i = 0; i < scale.size (); i++)
85 scale[i].transpose (tonic);
87 //urg, should do translation in scheme.
88 char const *acc[] = {"\\textflat\\textflat ", "\\textflat ", "", "\\textsharp " , "\\textsharp\\textsharp "};
89 String tonic_str = tonic.str ();
90 tonic_str = tonic_str.left_str (1).upper_str ()
91 + acc[tonic.accidental_i_ + 2];
95 for (int i=1; i < pitch_arr_.size (); i++)
97 Musical_pitch p = pitch_arr_[i];
98 int trap = p.notename_i_ - tonic.notename_i_
99 + (p.octave_i_ - tonic.octave_i_) * 7 + 1;
100 int accidental = p.accidental_i_ - scale[(trap - 1) % 7].accidental_i_;
101 if ((trap == 3) && (accidental == -1))
102 tonic_str += "m"; // hmm
103 else if (accidental || (!(trap % 2) || ((i + 1 == pitch_arr_.size ()) && (trap > 5))))
106 if ((trap == 7) && (accidental == 1))
110 add_str += to_str (trap);
112 add_str += accidental < 0 ? "-" : "+";
118 text_p->text_str_ = tonic_str + "$^{" + add_str + "}$";
119 Text_item* item_p = new Text_item (text_p);
121 item_p->fat_b_ = true;
122 text_p_arr_.push (item_p);
123 announce_element (Score_element_info (item_p, 0));
127 Chord_name_engraver::do_pre_move_processing ()
129 for (int i=0; i < text_p_arr_.size (); i++)
131 typeset_element (text_p_arr_[i]);
133 text_p_arr_.clear ();