[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Nashville notation as chord symbols
From: |
Amelie Zapf |
Subject: |
Re: Nashville notation as chord symbols |
Date: |
Mon, 15 Jun 2015 14:32:10 +0200 |
User-agent: |
Mozilla/5.0 (X11; Linux x86_64; rv:31.0) Gecko/20100101 Thunderbird/31.7.0 |
Dear Klaus, Stan,
the following code moves the transposition into the
#note-name->international-markup routine, thereby eliminating MIDI
playback problems. Downside: we still cannot pass the tonic to the
routine directly, but have to state it there anew.
And, of course, the rhythmic elements of Nashville notation aren't
implemented yet.
Greetings,
Amy
\version "2.18.2"
% Chords
#(define (note-name->international-markup pitch lowercase?)
(let* (
(root (ly:make-pitch 0 1 0)) ; this defines d' as the root
; (octave 0, degree 1, alteration 0)
(diff (ly:pitch-diff pitch root))
(name (ly:pitch-notename diff))
(alt (ly:pitch-alteration diff))
(hspace (vector-ref #(0.15 0.15 0.05 0.05 0.15) (+ (* alt 2) 2)))
(raise (vector-ref #(0.6 0.6 0.65 0.8 0.7) (+ (* alt 2) 2)))
)
(make-line-markup
(list
(if (= alt 0)
;; If it's natural and not b, do nothing
(make-line-markup (list empty-markup))
;; Else add alteration
(make-line-markup
(list
(make-smaller-markup
(make-raise-markup raise
(make-musicglyph-markup (assoc-get alt
standard-alteration-glyph-name-alist ""))))
(make-hspace-markup hspace)
)))
(make-simple-markup
(vector-ref #("1" "2" "3" "4" "5" "6" "7") name)
)
))))
nashvilleChords = {
\set chordRootNamer = #note-name->international-markup
\unset chordNoteNamer
}
\score {
\chords {
d1 e:m f g:maj7 gis:sus4 a:7 d
\nashvilleChords
d1 e:m f g:maj7 gis:sus4 a:7 d
}
\midi {
\tempo 4 = 180
}
\layout {
}
}
--
Dr. Amelie Zapf (address@hidden)
Pianist, Bassist, Guitarist, Composer, Friedrich-Ebert-Str. 25, 14548
Caputh, Germany
http://www.ameliezapf.com/
PGP public key ID: 4E0A7F00
"When the power of love overcomes the love of power, the world will know
peace." - Jimi Hendrix
- Re: Nashville notation as chord symbols, Amelie Zapf, 2015/06/15
- Re: Nashville notation as chord symbols, Klaus Blum, 2015/06/15
- Re: Nashville notation as chord symbols,
Amelie Zapf <=
- Re: Nashville notation as chord symbols, David Kastrup, 2015/06/15
- Re: Nashville notation as chord symbols, Amelie Zapf, 2015/06/15
- Re: Nashville notation as chord symbols, Amelie Zapf, 2015/06/15
- Re: Nashville notation as chord symbols, Paul Morris, 2015/06/15
- Re: Nashville notation as chord symbols, David Kastrup, 2015/06/15
- Re: Nashville notation as chord symbols, Amelie Zapf, 2015/06/17
- Re: Nashville notation as chord symbols, Amelie Zapf, 2015/06/17
- Re: Nashville notation as chord symbols, David Nalesnik, 2015/06/17
- Re: Nashville notation as chord symbols, David Nalesnik, 2015/06/17
- Re: Nashville notation as chord symbols, Amelie Zapf, 2015/06/17