2 commandrequest.cc -- implement Nonmusical reqs
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "command-request.hh"
11 #include "musical-request.hh"
14 Command_script_req::do_print() const
16 Command_script_req::Command_script_req(){}
17 Command_script_req::~Command_script_req(){}
19 IMPLEMENT_IS_TYPE_B1(Command_script_req,Command_req);
22 IMPLEMENT_IS_TYPE_B1(Cadenza_req, Timing_req);
25 Cadenza_req::do_print() const
33 Cadenza_req::do_equal_b (Request*r) const
35 Cadenza_req*cad = r->access_Command_req ()->access_Timing_req ()->access_Cadenza_req ();
37 return cad->on_b_ == on_b_;
40 Cadenza_req::Cadenza_req (bool b)
48 Bar_req::do_equal_b (Request*r) const
50 Bar_req * b = r->access_Command_req ()->access_Bar_req ();
51 return type_str_ == b->type_str_;
55 IMPLEMENT_IS_TYPE_B1(Bar_req,Command_req);
58 Bar_req::do_print() const
63 Bar_req::Bar_req (String s)
68 Partial_measure_req::Partial_measure_req (Moment m)
74 Partial_measure_req::do_equal_b (Request* r) const
76 Partial_measure_req *p = r->access_Command_req ()->access_Timing_req ()->access_Partial_measure_req ();
78 return p->duration_ == duration_;
82 IMPLEMENT_IS_TYPE_B1(Timing_req,Command_req);
85 Timing_req::do_print() const{}
88 IMPLEMENT_IS_TYPE_B1(Command_req,Request);
91 Command_req::do_print() const{}
93 IMPLEMENT_IS_TYPE_B1(Barcheck_req,Timing_req);
96 Barcheck_req::do_print() const{}
99 Barcheck_req::do_equal_b (Request*) const
105 IMPLEMENT_IS_TYPE_B1(Clef_change_req,Command_req);
108 Clef_change_req::do_print() const
115 Clef_change_req::Clef_change_req (String s)
123 IMPLEMENT_IS_TYPE_B1(Partial_measure_req,Timing_req);
126 Partial_measure_req::do_print() const
132 IMPLEMENT_IS_TYPE_B1(Time_signature_change_req,Timing_req);
135 Time_signature_change_req::do_print() const
138 DOUT << beats_i_ << "/" << one_beat_i_;
143 Time_signature_change_req::do_equal_b (Request * r) const
145 Time_signature_change_req * m = r->access_Command_req ()->access_Timing_req ()->access_Time_signature_change_req ();
147 return m->beats_i_ == beats_i_
148 && one_beat_i_ == m->one_beat_i_;
151 Time_signature_change_req::Time_signature_change_req()
158 Tempo_req::Tempo_req()
165 Tempo_req::do_print() const
167 DOUT << dur_.str() << " = " << metronome_i_;
169 IMPLEMENT_IS_TYPE_B1(Tempo_req, Timing_req);
172 Tempo_req::do_equal_b (Request *r) const
174 Tempo_req *t = r->access_Command_req ()->access_Timing_req ()->access_Tempo_req ();
176 return t->dur_.length()== dur_.length () && metronome_i_ == t->metronome_i_;
182 IMPLEMENT_IS_TYPE_B1(Measure_grouping_req,Timing_req);
185 Measure_grouping_req::do_print() const
187 for (int i=0; i < elt_length_arr_.size(); i++)
189 DOUT << beat_i_arr_[i] << "*" << elt_length_arr_[i].str () << " ";
195 Measure_grouping_req::do_equal_b (Request*) const
197 return false; // todo
201 Key_change_req::transpose (Musical_pitch d)
203 if (ordinary_key_b_ )
205 if (pitch_arr_.size () > 0)
206 pitch_arr_[0].transpose(d);
209 warning(_ ("don't know how handle empty keys")); // TODO
214 Array<Musical_pitch> old_pitch_arr_;
215 for (int i = 0; i < pitch_arr_.size(); i++)
217 old_pitch_arr_.push(pitch_arr_[i]);
219 // set accidentals for \key d (as in Key_engraver::read_req)
220 // (later called "new accidentals")
221 int p = d.semitone_pitch ();
222 /* Solve the equation 7*no_of_acc mod 12 = p, -6 <= no_of_acc <= 5 */
223 int no_of_acc = (7*p) % 12;
224 no_of_acc = (no_of_acc + 18) % 12 -6;
226 /* Correct from flats to sharps or vice versa */
227 if (no_of_acc * d.accidental_i_ < 0)
228 no_of_acc += 12 * sign (d.accidental_i_);
233 int accidental = 6 ; // First accidental: bes
234 for ( ; no_of_acc < 0 ; no_of_acc++ )
237 m.accidental_i_ = -1;
238 m.notename_i_ = accidental;
241 accidental = (accidental + 3) % 7 ;
246 int accidental = 3 ; // First accidental: fis
247 for ( ; no_of_acc > 0 ; no_of_acc-- )
251 m.notename_i_ = accidental;
254 accidental = (accidental + 4) % 7 ;
257 // Check if transposed old accidentals and the new ones coincide
258 no_of_acc = pitch_arr_.size();
261 for (int i=0; i < old_pitch_arr_.size(); i++)
264 mm = old_pitch_arr_[i];
266 for (int j=0; ((j < no_of_acc) && (acc_found == 0)); j++)
268 if (pitch_arr_[j].notename_i_ == mm.notename_i_)
270 if (mm.accidental_i_ == 0)
272 // remove new accidental
279 // change new accidental
280 pitch_arr_[j].accidental_i_ = mm.accidental_i_;
287 // add transposed old accidental
294 IMPLEMENT_IS_TYPE_B1(Key_change_req,Command_req);
296 Key_change_req::squash_octaves()
298 for (int i=0; i < pitch_arr_.size(); i++)
300 pitch_arr_[i].octave_i_ = 0;
305 Key_change_req::do_print() const
308 for (int i=0; i < pitch_arr_.size(); i++)
310 pitch_arr_[i].print();
315 Key_change_req::Key_change_req()
318 ordinary_key_b_= false;
321 IMPLEMENT_IS_TYPE_B1(Break_req, Command_req);
323 Break_req::Break_req ()
329 Break_req::do_print () const
333 IMPLEMENT_IS_TYPE_B1 (Mark_req, Command_req);
335 Mark_req::Mark_req (String s)
341 Mark_req::do_print () const
347 Key_change_req::flats_i()
350 for (int i = 0; i < pitch_arr_.size(); i++)
352 if (pitch_arr_[i].accidental_i_ < 0)
353 flats_i -= pitch_arr_[i].accidental_i_;
359 Key_change_req::minor_b() const
365 Key_change_req::sharps_i()
368 for (int i = 0; i < pitch_arr_.size(); i++)
370 if (pitch_arr_[i].accidental_i_ > 0)
371 sharps_i += pitch_arr_[i].accidental_i_;