]> git.donarmstrong.com Git - lilypond.git/blob - lily/audio-item.cc
release: 1.2.12
[lilypond.git] / lily / audio-item.cc
1 /*
2   audio-item.cc -- implement Audio items.
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
7 */
8 #include "debug.hh"
9 #include "audio-item.hh"
10 #include "midi-item.hh"
11 #include "audio-column.hh"
12
13 Audio_instrument::Audio_instrument (String instrument_str)
14 {
15   str_ = instrument_str;
16 }
17
18 Audio_item::Audio_item ()
19 {
20   audio_column_l_ = 0;
21 }
22
23 Audio_note::Audio_note (Musical_pitch p, Moment m, int transposing_i)
24 {
25   pitch_ = p;
26   length_mom_ = m;
27   tied_ = 0;
28   transposing_i_ = transposing_i;
29 }
30
31 void
32 Audio_note::tie_to (Audio_note* t)
33 {
34   tied_ = t;
35   Audio_note* first = t;
36   while (first->tied_)
37     first = first->tied_;
38   first->length_mom_ += length_mom_;
39   length_mom_ = 0;
40 }
41
42                     
43 Audio_key::Audio_key (Key_def const& k)
44 {
45   key_ = k;
46 }
47
48 Audio_tempo::Audio_tempo (int per_minute_4_i)
49 {
50   per_minute_4_i_ = per_minute_4_i;
51 }
52
53 Audio_time_signature::Audio_time_signature (int beats, int one_beat)
54 {
55   beats_i_ = beats;
56   one_beat_i_ = one_beat;
57 }
58
59 Audio_text::Audio_text (Audio_text::Type type, String text_str)
60 {
61   text_str_ = text_str;
62   type_ = type;
63 }
64
65 Audio_tie::Audio_tie ()
66 {
67   note_l_drul_[RIGHT] = 0;
68   note_l_drul_[LEFT] = 0;
69 }
70
71 void
72 Audio_tie::set_note (Direction d, Audio_note* note_l)
73 {
74   assert (!note_l_drul_[d]);
75   note_l_drul_[d] = note_l;
76   //set_bounds (d, head_l);
77
78   //  add_dependency (head_l);
79 }
80
81 void
82 Audio_item::do_print () const
83 {
84 #ifndef NPRINT
85   if (audio_column_l_)
86     {
87       DEBUG_OUT << "at: "<< audio_column_l_->at_mom ();
88     }
89 #endif
90 }
91