/usr/share/denemo/actions/lilypond/note-name-markup.ily is in denemo-data 2.0.2-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | #(define (denemo-bass-inversion pitch)
(let* ((alt (ly:pitch-alteration pitch)))
(make-sans-markup (make-scale-markup '(2.50 . 3.0) (make-line-markup
(list
(make-raise-markup 1;1.5
(make-scale-markup '(0.75 . 0.5)
(make-bold-markup (make-simple-markup "/"))))
(make-hspace-markup -0.3)
(make-raise-markup 0.5
(make-bold-markup
(make-scale-markup '(0.4 . 0.6)
(make-simple-markup
(vector-ref #("C" "D" "E" "F" "G" "A" "B") (ly:pitch-notename
pitch))))))
(make-raise-markup 0.5
(if (= alt NATURAL)
(make-hspace-markup 0)
(make-line-markup
(list
(make-hspace-markup 0.1)
(make-fontsize-markup -7
(if (= alt SHARP)
(make-raise-markup 0.1
(alteration->text-accidental-markup alt))
(make-raise-markup 0.2
(alteration->text-accidental-markup alt))))))))))))))
|