2 commandrequest.cc -- implement Nonmusical reqs
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--1998 Han-Wen Nienhuys <hanwen@stack.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->command()->timing ()->cadenza ();
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->command()->bar ();
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->command()->timing ()->partial ();
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
103 /* *************** */
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)
120 /* *************** */
123 IMPLEMENT_IS_TYPE_B1(Partial_measure_req,Timing_req);
126 Partial_measure_req::do_print() const
132 IMPLEMENT_IS_TYPE_B1(Meter_change_req,Timing_req);
135 Meter_change_req::do_print() const
138 DOUT << beats_i_ << "/" << one_beat_i_;
143 Meter_change_req::do_equal_b (Request * r) const
145 Meter_change_req * m = r->command()->timing ()->meterchange ();
147 return m->beats_i_ == beats_i_
148 && one_beat_i_ == m->one_beat_i_;
151 Meter_change_req::Meter_change_req()
158 Meter_change_req::set (int b,int o)
165 Tempo_req::Tempo_req()
172 Tempo_req::do_print() const
174 DOUT << dur_.str() << " = " <<metronome_i_ ;
176 IMPLEMENT_IS_TYPE_B1(Tempo_req, Timing_req);
179 Tempo_req::do_equal_b (Request *r) const
181 Tempo_req *t = r->command()->timing ()->tempo ();
183 return t->dur_.length()== dur_.length () && metronome_i_ == t->metronome_i_;
186 /* *************** */
189 IMPLEMENT_IS_TYPE_B1(Measure_grouping_req,Timing_req);
192 Measure_grouping_req::do_print() const
194 for (int i=0; i < elt_length_arr_.size(); i++)
196 DOUT << beat_i_arr_[i] <<"*" << elt_length_arr_[i]<<" ";
202 Measure_grouping_req::do_equal_b (Request*) const
204 return false; // todo
207 /* *************** */
210 Key_change_req::transpose (Musical_pitch d) const
212 WARN << _("don't know how to transpose a key. \n"); // TODO!
216 IMPLEMENT_IS_TYPE_B1(Key_change_req,Command_req);
218 Key_change_req::squash_octaves()
220 for (int i=0; i < pitch_arr_.size(); i++)
222 pitch_arr_[i].octave_i_ = 0;
227 Key_change_req::do_print() const
230 for (int i=0; i < pitch_arr_.size(); i++)
232 pitch_arr_[i].print();
237 Key_change_req::Key_change_req()
240 multi_octave_b_= false;
243 IMPLEMENT_IS_TYPE_B1(Break_req, Command_req);
245 Break_req::Break_req ()
251 Break_req::do_print () const
256 Key_change_req::flats_i()
259 for (int i = 0; i < pitch_arr_.size(); i++)
261 if (pitch_arr_[i].accidental_i_ < 0)
262 flats_i -= pitch_arr_[i].accidental_i_;
268 Key_change_req::minor_b()
274 Key_change_req::sharps_i()
277 for (int i = 0; i < pitch_arr_.size(); i++)
279 if (pitch_arr_[i].accidental_i_ < 0)
280 sharps_i += pitch_arr_[i].accidental_i_;