lily/musical-pitch.cc

   1 /*
   2   musical-pitch.cc --  implement Musical_pitch
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1998--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9 #include "musical-pitch.hh"
  10 #include "debug.hh"
  11 #include "main.hh"
  12
  13 Musical_pitch::Musical_pitch (int n, int a, int o)
  14 {
  15   notename_i_ = n;
  16   accidental_i_ = a;
  17   octave_i_ = o;
  18 }
  19
  20 void
  21 Musical_pitch::print () const
  22 {
  23 #ifndef NPRINT
  24   DEBUG_OUT << str ();
  25 #endif
  26 }
  27
  28 int
  29 Musical_pitch::compare (Musical_pitch const &m1, Musical_pitch const &m2)
  30 {
  31     int o=  m1.octave_i_ - m2.octave_i_;
  32   int n = m1.notename_i_ - m2.notename_i_;
  33   int a = m1.accidental_i_ - m2.accidental_i_;
  34
  35   if (o)
  36         return o;
  37   if (n)
  38         return n;
  39   if (a)
  40         return a;
  41   return 0;
  42 }
  43
  44 int
  45 Musical_pitch::steps () const
  46 {
  47   return  notename_i_ + octave_i_*7;
  48 }
  49
  50 /*
  51   should be settable from input to allow "viola"-mode
  52  */
  53 static Byte pitch_byte_a[  ] = { 0, 2, 4, 5, 7, 9, 11 };
  54
  55 int
  56 Musical_pitch::semitone_pitch () const
  57 {
  58   return  pitch_byte_a[ notename_i_ % 7 ] + accidental_i_ + octave_i_ * 12;
  59 }
  60
  61 void
  62 Musical_pitch::transpose (Musical_pitch delta)
  63 {
  64   int old_pitch = semitone_pitch ();
  65   int delta_pitch = delta.semitone_pitch ();
  66   octave_i_ += delta.octave_i_;
  67   notename_i_ += delta.notename_i_;
  68
  69
  70   while  (notename_i_ >= 7)
  71     {
  72       notename_i_ -= 7;
  73       octave_i_ ++;
  74     }
  75
  76   int new_pitch = semitone_pitch ();
  77   int delta_acc = new_pitch - old_pitch - delta_pitch;
  78   accidental_i_ -= delta_acc;
  79 }
  80
  81
  82 #if 0
  83 // nice test for internationalisation strings
  84 char const *accname[] = {"double flat", "flat", "natural",
  85                          "sharp" , "double sharp"};
  86 #else
  87 char const *accname[] = {"eses", "es", "", "is" , "isis"};
  88 #endif
  89
  90 String
  91 Musical_pitch::str () const
  92 {
  93   int n = (notename_i_ + 2) % 7;
  94   String s = to_str (char(n + 'a'));
  95   if (accidental_i_)
  96     s += String (accname[accidental_i_ + 2]);
  97
  98   if (octave_i_ > 0)
  99     {
 100       int o = octave_i_ + 1;
 101       while (o--)
 102         s += "'";
 103     }
 104   else if (octave_i_ <0)
 105     {
 106       int o = (-octave_i_) - 1;
 107       while (o--)
 108         s += to_str (',');
 109     }
 110
 111
 112   return s;
 113 }
 114
 115 /*
 116   change me to relative, counting from last pitch p
 117   return copy of resulting pitch
 118  */
 119 Musical_pitch
 120 Musical_pitch::to_relative_octave (Musical_pitch p)
 121 {
 122   int oct_mod = octave_i_  + 1; // account for c' = octave 1 iso. 0 4
 123   Musical_pitch up_pitch (p);
 124   Musical_pitch down_pitch (p);
 125
 126   up_pitch.accidental_i_ = accidental_i_;
 127   down_pitch.accidental_i_ = accidental_i_;
 128
 129   Musical_pitch n = *this;
 130   up_pitch.up_to (notename_i_);
 131   down_pitch.down_to (notename_i_);
 132
 133   int h = p.steps ();
 134   if (abs (up_pitch.steps () - h) < abs (down_pitch.steps () - h))
 135     n = up_pitch;
 136   else
 137     n = down_pitch;
 138
 139   n.octave_i_ += oct_mod;
 140
 141   *this = n;
 142   return *this;
 143 }
 144
 145 void
 146 Musical_pitch::up_to (int notename)
 147 {
 148   if (notename_i_  > notename)
 149     {
 150       octave_i_ ++;
 151     }
 152   notename_i_  = notename;
 153 }
 154
 155 void
 156 Musical_pitch::down_to (int notename)
 157 {
 158   if (notename_i_ < notename)
 159     {
 160       octave_i_ --;
 161     }
 162   notename_i_ = notename;
 163 }
 164