input/test/american-chords.ly

   1 \version "1.3.117"
   2 %{
   3   See scm/chord-names.scm: chord::names-alist-american
   4   James Hammons <jlhamm@pacificnet.net>
   5 %}
   6
   7 \include "english.ly"
   8 #(set! chord::names-alist-american
   9       (append
  10       '(
  11         ;; any changes here, see scm/chord-name.scm
  12
  13         )
  14       chord::names-alist-american))
  15
  16 chord =  \notes\transpose c''\chords{
  17         \property Chordnames.Chordname \override #'style = #'american
  18 c         % Major triad
  19 cs:m      % Minor triad
  20 df:m5-    % Diminished triad
  21 c:5^3     % Root-fifth chord
  22 c:4^3     % Suspended fourth triad
  23 c:5+      % Augmented triad
  24 c:2^3     % "2" chord
  25 c:m5-.7-  % Diminished seventh
  26 c:7+      % Major seventh
  27 c:7.4^3   % Dominant seventh suspended fourth
  28 c:5+.7    % Augmented dominant seventh
  29 c:m5-.7   % "Half" diminished seventh
  30 c:5-.7    % Dominant seventh flat fifth
  31 c:5-.7+   % Major seventh flat fifth
  32 c:m7+     % Minor-major seventh
  33 c:m7      % Minor seventh
  34 c:7       % Dominant seventh
  35 c:6       % Major sixth
  36 c:m6      % Minor sixth
  37 c:9^7     % Major triad w/added ninth
  38 c:6.9^7   % Six/Nine chord
  39 c:9       % Dominant ninth
  40 c:7+.9    % Major ninth
  41 c:m7.9    % Minor ninth
  42 }
  43
  44 \score{
  45 <
  46 \context ChordNames \chord
  47 \context Staff \chord
  48 >
  49     \paper
  50     {
  51                 \translator {
  52                         \ChordNamesContext
  53                         ChordName \override #'word-space = #1
  54                 }
  55     }
  56 }