2 note-performer.cc -- implement Note_performer
4 source file of the GNU LilyPond music typesetter
6 (c) 1996, 1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
9 #include "note-performer.hh"
10 #include "musical-request.hh"
11 #include "audio-item.hh"
12 #include "audio-column.hh"
13 #include "global-translator.hh"
16 ADD_THIS_TRANSLATOR (Note_performer);
18 Note_performer::Note_performer ()
23 Note_performer::do_print () const
26 if (note_req_l_arr_.size()>0)
27 for(int i=0;i<note_req_l_arr_.size();i++)
28 note_req_l_arr_[i]->print ();
33 Note_performer::do_process_requests ()
35 if (note_req_l_arr_.size ())
37 int transposing_i = 0;
39 SCM prop = get_property ("transposing", 0);
40 if (gh_number_p(prop))
41 transposing_i = gh_scm2int (prop);
43 while (note_req_l_arr_.size ())
45 Note_req* n = note_req_l_arr_.pop ();
46 Audio_note* p = new Audio_note (n->pitch_, n->length_mom (), transposing_i);
47 Audio_element_info info (p, n);
48 announce_element (info);
55 Note_performer::process_acknowledged ()
60 Note_performer::global_translator_l ()
63 Global_translator *global_l =0;
66 t = t->daddy_trans_l_ ;
67 global_l = dynamic_cast<Global_translator*> (t);
76 Note_performer::do_pre_move_processing ()
79 // why don't grace notes show up here?
80 // --> grace notes effectively do not get delayed
81 Global_translator* global_l = global_translator_l ();
82 for (int i=0; i < note_p_arr_.size (); i++)
84 Audio_note* n = note_p_arr_[i];
85 if (Moment m= n->delayed_until_mom_)
87 global_l->add_moment_to_process (m);
88 delayed_p_arr_.push (n);
95 Moment now = now_mom ();
96 for (int i=0; i < note_p_arr_.size (); i++)
98 play_element (note_p_arr_[i]);
100 note_p_arr_.clear ();
101 note_req_l_arr_.clear ();
102 for (int i=0; i < delayed_p_arr_.size (); i++)
104 Audio_note* n = delayed_p_arr_[i];
105 if (n->delayed_until_mom_ <= now)
108 delayed_p_arr_[i] = 0;
109 delayed_p_arr_.del (i);
116 Note_performer::do_try_music (Music* req_l)
118 if (Note_req *nr = dynamic_cast <Note_req *> (req_l))
120 note_req_l_arr_.push (nr);