Thank you so much Aaron, How could I have *never* used chain-assoc-get. I've read the docs about it since then. I also used (display props) to know what was available (which by itself was instructing).
Again, I'm very grateful for your help. Le lun. 29 avr. 2024, à 12 h 43, Aaron Hill <lilyp...@hillvisions.com> a écrit : > On 2024-04-29 7:50 am, Pierre-Luc Gauthier wrote: > > Can a markup command introspect its direction ? > > > > Is it possible to set in a markup command some conditionals (not paper > > related) ? > > > > \version "2.25.15" > > > > #(define-markup-command (conditionalMrkp layout props) > > () > > (interpret-markup layout props #{ > > \markup { > > %\if #DOWN > > "↑" > > %\if #UP > > "↓" > > }#})) > > > > {b'^\markup \conditionalMrkp b'_\markup \conditionalMrkp} > > > %%%% > \version "2.24.3" > > is-directional = > #(lambda (layout props) > (number? (chain-assoc-get 'direction props #f))) > > is-upward = > #(lambda (layout props) > (eq? UP (chain-assoc-get 'direction props #f))) > > is-downward = > #(lambda (layout props) > (eq? DOWN (chain-assoc-get 'direction props #f))) > > asdf = \markup \circle \overlay { > \if \is-upward ↑ \if \is-downward ↓ > \unless \is-directional \pad-around #0.25 * > } > > \layout { indent = 0 } > \asdf > { b'4-\asdf 4_\asdf 2^\asdf } > %%%% > > > -- Aaron Hill -- *Pierre-Luc Gauthier*