input/test/american-chords.ly

   1 #(set! chord::names-alist-american
   2       (append
   3       '(
   4
   5         )
   6       chord::names-alist-american))
   7
   8 chord = \notes\transpose c''\chords{
   9 \property ChordNames.chordNameStyle = "american"
  10 c
  11 c:m
  12 c:m5-
  13 c:5^3
  14 c:4^3
  15 c:5+
  16 c:2^3
  17 c:m5-.7-
  18 c:7+
  19 c:7.4^3
  20 c:5+.7
  21 c:m5-.7
  22 c:5-.7+
  23 c:m7+
  24 c:m7
  25 c:7
  26 c:6
  27 c:m6
  28 c:9^7
  29 c:6.9^7
  30 c:9
  31 c:7+.9
  32 }
  33
  34 \score{
  35 <
  36 \context ChordNames \chord
  37 \context Staff \chord
  38 >
  39     \paper
  40     {
  41         \translator { \ChordNameContext chordNameWordSpace = #1 }
  42         \translator { \LyricsContext textScriptWordSpace = #0.3 }
  43     }
  44 }
  45
  46 %    (((0 . 0) (2 . -1) (4 . 0)) . ("Bar" . ("script" . "Baz")))