]> git.donarmstrong.com Git - lilypond.git/blob - lily/include/music.hh
release: 1.5.29
[lilypond.git] / lily / include / music.hh
1 /*
2   music.hh -- declare Music
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9
10
11 #ifndef MUSIC_HH
12 #define MUSIC_HH
13
14 #include "virtual-methods.hh"
15 #include "minterval.hh"
16 #include "lily-proto.hh"
17 #include "string.hh"
18 #include "smobs.hh"
19 #include "music-constructor.hh"
20
21
22 #define get_mus_property(x) internal_get_mus_property(ly_symbol2scm(x))
23 #define set_mus_property(x,y) internal_set_mus_property(ly_symbol2scm (x), y)
24
25 /** Music is anything that has duration and supports both time compression and
26   transposition.
27   
28   In Lily, everything that can be thought to have a length and a pitch
29  (which has a duration which can be transposed) is considered "music",
30
31   Music is hierarchical: 
32
33   @see Music_sequence
34
35
36   TODO: make a equalp function for general music. 
37   */
38 class Music {
39 public:
40   Input *origin () const; 
41   void set_spot (Input);  
42
43   SCM internal_get_mus_property (SCM) const;
44   void internal_set_mus_property (SCM , SCM val);
45
46   virtual Pitch to_relative_octave (Pitch);
47
48   /// The duration of this piece of music
49   virtual Moment length_mom () const;
50   virtual Moment start_mom () const;
51   void print () const;
52   /// Transpose, with the interval central C to #p#
53   virtual void transpose (Pitch p);
54
55   /// Scale the music in time by #factor#.
56   virtual void compress (Moment factor);
57   VIRTUAL_COPY_CONS (Music);
58   Music ();
59   Music (Music const &m);
60   Music (SCM);
61 protected:
62   DECLARE_SMOBS (Music,);
63   SCM immutable_property_alist_;
64   SCM mutable_property_alist_;
65 };
66
67
68 DECLARE_UNSMOB(Music,music);
69 #endif // MUSIC_HH
70
71
72