Re: Bold Maj7 Triangle

[Carl Sorensen]

 

 

From: lilypond-user <lilypond-user-bounces+carl.d.sorensen=gmail.com@gnu.org> on behalf of Gregory Hollands <gregory.j.hollands@gmail.com>
Date: Tuesday, November 30, 2021 at 9:41 AM
To: Lilypond-User Mailing List <lilypond-user@gnu.org>
Subject: Re: Bold Maj7 Triangle

 

I was able to get something bolder by using the uppercase delta glyph. But it isn't perfect.

 

-Greg

 

% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - %

\version "2.22"

embiggenChordNames = #(define-scheme-function (size) (number?)
   #{ \with {
     chordNameFunction = #(lambda (in-pitches bass inversion context)
       (define exemptions (list musicglyph-markup))
       (define (helper mu)
         (if (list? mu)
           (if (memq (car mu) exemptions)
             (markup (#:fontsize (- size) mu))
             (map helper mu))
           mu))
       (let ((orig (ignatzek-chord-names in-pitches bass inversion context)))
         (markup (#:fontsize size (helper orig)))))
   } #} )

\paper {
  ragged-last = ##f
}

\layout {
  indent = #0
  \context { \ChordNames \embiggenChordNames #2.5 }
  \override ChordName #'font-name = #"Open Sans Soft Cd SemiBd"
  \override Staff.BarLine.hair-thickness = #4
  \override Staff.BarLine.thick-thickness = #8
}

IntroChords = \chordmode {
  \time 6/8
  \set majorSevenSymbol = \markup { Δ }

 

You could use your own custom markup as a lilypond path.  See http://lilypond.org/doc/v2.22/Documentation/notation/graphic under \path

 

That will let you customize your thickness and size pretty easily.

  \set minorChordModifier = \markup { − }
  a2.:m7 c2.:maj7 des2. f2.:dim
  a2.:m6 e2.:aug a2.:m eis2.:7
}

<<
  \new ChordNames \with {
    \override BarLine.bar-extent = #'(-1 . 3.5)
    \consists "Bar_engraver"
  }
  \IntroChords
>>

% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - %