matthiasm@8
|
1 %
|
matthiasm@8
|
2 %NOTE2FIFTHPOSITION find note position on the line of fifths w.r.t. C=0
|
matthiasm@8
|
3 %
|
matthiasm@8
|
4 % [noteposition, success, errormessage] = note2fifthposition(note,{verbose})
|
matthiasm@8
|
5 %
|
matthiasm@8
|
6 % Converts a note string to a natural position on the line of fifths and its
|
matthiasm@8
|
7 % corresponding number of sharps or flats. Reference on line of fifths is C = 0.
|
matthiasm@8
|
8 %
|
matthiasm@8
|
9 % Success = 1 if note converted correctly, 0 otherwise.
|
matthiasm@8
|
10 %
|
matthiasm@8
|
11 % If optional argument 'verbose' is 1, function prints any errormessage to
|
matthiasm@8
|
12 % the screen.
|
matthiasm@8
|
13 %
|
matthiasm@8
|
14 % calls: note2fifthinfo
|
matthiasm@8
|
15 %
|
matthiasm@8
|
16 % returns: noteposistion (integer)
|
matthiasm@8
|
17 % success (boolean)
|
matthiasm@8
|
18 % errormessage (string)
|
matthiasm@8
|
19 %
|
matthiasm@8
|
20 %
|
matthiasm@8
|
21 % Author: Christopher Harte, September 2005
|
matthiasm@8
|
22 %
|
matthiasm@8
|
23 % Copyright: Centre for Digital Music, Queen Mary University of London 2005
|
matthiasm@8
|
24 %
|
matthiasm@8
|
25 % This file is part of the C4DM Chord Toolkit.
|
matthiasm@8
|
26 %
|
matthiasm@8
|
27 % The C4DM Chord Toolkit is free software; you can redistribute it and/or
|
matthiasm@8
|
28 % modify it under the terms of the GNU General Public License as published
|
matthiasm@8
|
29 % by the Free Software Foundation; either version 2 of the License, or
|
matthiasm@8
|
30 % (at your option) any later version.
|
matthiasm@8
|
31 %
|
matthiasm@8
|
32 % The C4DM Chord Toolkit is distributed in the hope that it will be useful,
|
matthiasm@8
|
33 % but WITHOUT ANY WARRANTY; without even the implied warranty of
|
matthiasm@8
|
34 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
matthiasm@8
|
35 % GNU General Public License for more details.
|
matthiasm@8
|
36 %
|
matthiasm@8
|
37 % You should have received a copy of the GNU General Public License
|
matthiasm@8
|
38 % along with the C4DM Toolkit; if not, write to the Free Software
|
matthiasm@8
|
39 % Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
matthiasm@8
|
40
|
matthiasm@8
|
41 %
|
matthiasm@8
|
42 function [noteposition, success, errormessage] = note2fifthposition(note, verbose)
|
matthiasm@8
|
43
|
matthiasm@8
|
44 % set verbose default to 0
|
matthiasm@8
|
45 if nargin < 3
|
matthiasm@8
|
46 verbose = 0;
|
matthiasm@8
|
47 end
|
matthiasm@8
|
48
|
matthiasm@8
|
49 errormessage = '';
|
matthiasm@8
|
50 success = 1;
|
matthiasm@8
|
51 noteposition = '';
|
matthiasm@8
|
52
|
matthiasm@8
|
53 [notenatural, noteaccidentals, success1,errormessage] = note2fifthinfo(note);
|
matthiasm@8
|
54
|
matthiasm@8
|
55 if success
|
matthiasm@8
|
56 noteposition = notenatural + 7.*noteaccidentals -1;
|
matthiasm@8
|
57 end
|
matthiasm@8
|
58
|
matthiasm@8
|
59 if (success == 0) && (verbose == 1)
|
matthiasm@8
|
60 fprintf(1,errormessage);
|
matthiasm@8
|
61 end
|
matthiasm@8
|
62
|