[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Taille altérations sur les fondamentales des accords (chordRootNamer
From: |
M4rty |
Subject: |
Re: Taille altérations sur les fondamentales des accords (chordRootNamer ?) |
Date: |
Wed, 28 Apr 2021 04:11:06 -0700 (MST) |
Merci beaucoup Schneidy !! J'ai réussi à faire exactement ce que je voulais
(cf code ci dessous). Il me reste un détail, j'aimerais si possible espacer
légèrement la nature d'accord. Je vais faire quelques recherches là dessus.
#(define (chordNamer pitch majmin) ;majmin is un argument nécessaire à
"chordNamer" mais inutile ici
(let* ((alt (ly:pitch-alteration pitch)))
(make-line-markup
(list
(make-simple-markup
(vector-ref #("C" "D" "E" "F" "G" "A"
"B")
(ly:pitch-notename pitch)))
(if (= alt 0)
(markup "")
(if (= alt FLAT)
(make-line-markup
(list
(make-small-markup (make-raise-markup 1
(markup #:musicglyph "accidentals.flat")))))
;; or handle adding the sharp symbol
(make-line-markup
(list
(make-small-markup (make-raise-markup 1
(markup #:musicglyph "accidentals.sharp")))))))))))
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/