lbajardsilogic@0
|
1 /* -*- c-basic-offset: 4 indent-tabs-mode: nil -*- vi:set ts=8 sts=4 sw=4: */
|
lbajardsilogic@0
|
2
|
lbajardsilogic@0
|
3 /*
|
lbajardsilogic@0
|
4 Sonic Visualiser
|
lbajardsilogic@0
|
5 An audio file viewer and annotation editor.
|
lbajardsilogic@0
|
6 Centre for Digital Music, Queen Mary, University of London.
|
lbajardsilogic@0
|
7 This file copyright 2006 Chris Cannam.
|
lbajardsilogic@0
|
8
|
lbajardsilogic@0
|
9 This program is free software; you can redistribute it and/or
|
lbajardsilogic@0
|
10 modify it under the terms of the GNU General Public License as
|
lbajardsilogic@0
|
11 published by the Free Software Foundation; either version 2 of the
|
lbajardsilogic@0
|
12 License, or (at your option) any later version. See the file
|
lbajardsilogic@0
|
13 COPYING included with this distribution for more information.
|
lbajardsilogic@0
|
14 */
|
lbajardsilogic@0
|
15
|
lbarthelemy@187
|
16 #include <cmath>
|
lbarthelemy@187
|
17
|
lbajardsilogic@0
|
18 #include "system/System.h"
|
lbajardsilogic@0
|
19 #include "Pitch.h"
|
lbajardsilogic@0
|
20 #include "Preferences.h"
|
lbajardsilogic@0
|
21
|
lbarthelemy@187
|
22
|
lbajardsilogic@0
|
23
|
lbajardsilogic@0
|
24 float
|
lbajardsilogic@0
|
25 Pitch::getFrequencyForPitch(int midiPitch,
|
lbajardsilogic@0
|
26 float centsOffset,
|
lbajardsilogic@0
|
27 float concertA)
|
lbajardsilogic@0
|
28 {
|
lbajardsilogic@0
|
29 if (concertA <= 0.0) {
|
lbajardsilogic@0
|
30 concertA = Preferences::getInstance()->getTuningFrequency();
|
lbajardsilogic@0
|
31 }
|
lbajardsilogic@0
|
32 float p = float(midiPitch) + (centsOffset / 100);
|
lbajardsilogic@0
|
33 return concertA * powf(2.0, (p - 69.0) / 12.0);
|
lbajardsilogic@0
|
34 }
|
lbajardsilogic@0
|
35
|
lbajardsilogic@0
|
36 int
|
lbajardsilogic@0
|
37 Pitch::getPitchForFrequency(float frequency,
|
lbajardsilogic@0
|
38 float *centsOffsetReturn,
|
lbajardsilogic@0
|
39 float concertA)
|
lbajardsilogic@0
|
40 {
|
lbajardsilogic@0
|
41 if (concertA <= 0.0) {
|
lbajardsilogic@0
|
42 concertA = Preferences::getInstance()->getTuningFrequency();
|
lbajardsilogic@0
|
43 }
|
lbajardsilogic@0
|
44 float p = 12.0 * (log(frequency / (concertA / 2.0)) / log(2.0)) + 57.0;
|
lbajardsilogic@0
|
45
|
lbajardsilogic@0
|
46 int midiPitch = int(p + 0.00001);
|
lbajardsilogic@0
|
47 float centsOffset = (p - midiPitch) * 100.0;
|
lbajardsilogic@0
|
48
|
lbajardsilogic@0
|
49 if (centsOffset >= 50.0) {
|
lbajardsilogic@0
|
50 midiPitch = midiPitch + 1;
|
lbajardsilogic@0
|
51 centsOffset = -(100.0 - centsOffset);
|
lbajardsilogic@0
|
52 }
|
lbajardsilogic@0
|
53
|
lbajardsilogic@0
|
54 if (centsOffsetReturn) *centsOffsetReturn = centsOffset;
|
lbajardsilogic@0
|
55 return midiPitch;
|
lbajardsilogic@0
|
56 }
|
lbajardsilogic@0
|
57
|
lbajardsilogic@0
|
58 static QString notes[] = {
|
lbajardsilogic@0
|
59 "C%1", "C#%1", "D%1", "D#%1",
|
lbajardsilogic@0
|
60 "E%1", "F%1", "F#%1", "G%1",
|
lbajardsilogic@0
|
61 "G#%1", "A%1", "A#%1", "B%1"
|
lbajardsilogic@0
|
62 };
|
lbajardsilogic@0
|
63
|
lbajardsilogic@0
|
64 static QString flatNotes[] = {
|
lbajardsilogic@0
|
65 "C%1", "Db%1", "D%1", "Eb%1",
|
lbajardsilogic@0
|
66 "E%1", "F%1", "Gb%1", "G%1",
|
lbajardsilogic@0
|
67 "Ab%1", "A%1", "Bb%1", "B%1"
|
lbajardsilogic@0
|
68 };
|
lbajardsilogic@0
|
69
|
lbajardsilogic@0
|
70 QString
|
lbajardsilogic@0
|
71 Pitch::getPitchLabel(int midiPitch,
|
lbajardsilogic@0
|
72 float centsOffset,
|
lbajardsilogic@0
|
73 bool useFlats)
|
lbajardsilogic@0
|
74 {
|
lbajardsilogic@0
|
75 int octave = -2;
|
lbajardsilogic@0
|
76
|
lbajardsilogic@0
|
77 if (midiPitch < 0) {
|
lbajardsilogic@0
|
78 while (midiPitch < 0) {
|
lbajardsilogic@0
|
79 midiPitch += 12;
|
lbajardsilogic@0
|
80 --octave;
|
lbajardsilogic@0
|
81 }
|
lbajardsilogic@0
|
82 } else {
|
lbajardsilogic@0
|
83 octave = midiPitch / 12 - 2;
|
lbajardsilogic@0
|
84 }
|
lbajardsilogic@0
|
85
|
lbajardsilogic@0
|
86 QString plain = (useFlats ? flatNotes : notes)[midiPitch % 12].arg(octave);
|
lbajardsilogic@0
|
87
|
lbajardsilogic@0
|
88 int ic = lrintf(centsOffset);
|
lbajardsilogic@0
|
89 if (ic == 0) return plain;
|
lbajardsilogic@0
|
90 else if (ic > 0) return QString("%1+%2c").arg(plain).arg(ic);
|
lbajardsilogic@0
|
91 else return QString("%1%2c").arg(plain).arg(ic);
|
lbajardsilogic@0
|
92 }
|
lbajardsilogic@0
|
93
|
lbajardsilogic@0
|
94 QString
|
lbajardsilogic@0
|
95 Pitch::getPitchLabelForFrequency(float frequency,
|
lbajardsilogic@0
|
96 float concertA,
|
lbajardsilogic@0
|
97 bool useFlats)
|
lbajardsilogic@0
|
98 {
|
lbajardsilogic@0
|
99 if (concertA <= 0.0) {
|
lbajardsilogic@0
|
100 concertA = Preferences::getInstance()->getTuningFrequency();
|
lbajardsilogic@0
|
101 }
|
lbajardsilogic@0
|
102 float centsOffset = 0.0;
|
lbajardsilogic@0
|
103 int midiPitch = getPitchForFrequency(frequency, ¢sOffset, concertA);
|
lbajardsilogic@0
|
104 return getPitchLabel(midiPitch, centsOffset, useFlats);
|
lbajardsilogic@0
|
105 }
|
lbajardsilogic@0
|
106
|