[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: parenthesize chord
From: |
Tim McNamara |
Subject: |
Re: parenthesize chord |
Date: |
Thu, 11 Oct 2012 14:06:00 -0500 |
Here's a hack to parenthesize chords in \chordmode that was sent to me by a
kind person here on the list. It can't parenthesize a single chord but will do
two or more.
#(define (left-parenthesis-ignatzek-chord-names in-pitches bass inversion
context)
(markup #:line ("( " (ignatzek-chord-names in-pitches bass inversion context))))
#(define (right-parenthesis-ignatzek-chord-names in-pitches bass inversion
context)
(markup #:line ((ignatzek-chord-names in-pitches bass inversion context) " )")))
LPC = { \set chordNameFunction = #left-parenthesis-ignatzek-chord-names }
RPC = { \set chordNameFunction = #right-parenthesis-ignatzek-chord-names }
NPC = { \unset chordNameFunction }
%%%%%%%%%%%%%%
% \LPC first-chord \NPC more chords \RPC last-chord \NPC
%%%%%%%%%%%%%%