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")
23.01.2021 21:45, Aps Alchechengi пишет:
Hi!
I need to obtain a list of accordion registers.
I know I can engrave them using:
#(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"
}
But I want to pass them in a markup function as a list.
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?
thanks
Davide
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient>
Mail priva di virus. www.avast.com
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient>
<#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
