|
From: | David Nalesnik |
Subject: | Re: string numbers (fingering instructions) as roman numerals? |
Date: | Mon, 30 Jun 2014 17:17:10 -0500 |
How do I indicate strings by letter-pitch instead of
numbers, the way Villa Lobos did? Regards, Rale
\version "2.19.8"
#(define strings "EBGDAE")
#(define (string-number::calc-string-name-text grob)
(let* ((event (event-cause grob))
(number-of-strings (string-length strings))
(string-num (ly:event-property event 'string-number))
(string-name
(and
(> string-num 0)
(>= number-of-strings string-num)
(substring strings (1- string-num) string-num))))
(or string-name (number->string string-num))))
{
\override StringNumber.text = #string-number::calc-string-name-text
\clef "treble_8"
e,1\6 a,\5 d\4 g\3 b\2 e'\1
}
%%%
--David
[Prev in Thread] | Current Thread | [Next in Thread] |