|
From: | Павел |
Subject: | Re: list of accordion registers as a single markup |
Date: | Sun, 24 Jan 2021 18:04:38 +0300 |
User-agent: | Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.6.0 |
Hi, David. I think I solved your problem. Use:
\version "2.22.0"
#(use-modules (scm accreg))
#(define-markup-command (accordion layout props lst) (list?)
(interpret-markup layout props
(markup (make-line-markup (map (lambda(x) (markup #:discant
x)) lst)))))
\markup \accordion #'("1" "10" "101" "121" "21" "11" "120" "110"
"1+0" "100" "11+0")
Hi!I need to obtain a list of accordion registers.
I know I can engrave them using:
But I want to pass them in a markup function as a list.#(use-modules (scm accreg))
\markup \line {\discant "1"\discant "10"\discant "101"\discant "121"\discant "21"\discant "11"\discant "120"\discant "110"\discant "1+0"\discant "100"\discant "11+0"}
regList = #'("1" "10" "101" "121" "21" "11" "120" "110" "1+0" "100" "11+0")
I've tried map, for-each, do, let loop.... but I can't find a way to do this.
Someone can help me?
thanksDavide
[Prev in Thread] | Current Thread | [Next in Thread] |