input/test/chord-banter.ly

   1 \version "1.7.6"
   2 \header{
   3 filename =      "chord-table.ly"
   4 copyright =     "public domain"
   5 enteredby =     "jcn"
   6 }
   7
   8 tab =  \notes\transpose c c''\chords{
   9         c1 c:m c:4 c:m4 c:5+ \break
  10         c:5- c:dim c:5-.5+ c:6 c:m6\break
  11         c:4.6 c:7 c:m7 c:4.7 c:m4.7\break
  12         c:5+.7 c:5-.7 c:m5-.7 c:maj c:m.maj\break
  13         c:4.maj c:m4.maj c:5+.maj c:m4+.maj c:5-.maj\break
  14         c1:m5-.maj c:dim7 c:5-.5+.7 c:6.maj c:m6.maj\break
  15         c:4.6.maj c:9 c:m9 c:4.9 c:m.4.9\break
  16 }
  17
  18 \score{
  19 %       \context StaffGroup <
  20         <
  21                 \context Staff=c \notes\transpose c' c\tab
  22                 \context ChordNames=c \notes\transpose c' c\tab
  23 %{
  24                 \context Staff=cis \notes\transpose c' cis\tab
  25                 \context ChordNames=cis \notes\transpose c' cis\tab
  26                 \context Staff=des \notes\transpose c' des\tab
  27                 \context ChordNames=des \notes\transpose c' des\tab
  28                 \context Staff=d \notes\transpose c' d\tab
  29                 \context ChordNames=d \notes\transpose c' d\tab
  30                 \context Staff=es \notes\transpose c' es\tab
  31                 \context ChordNames=es \notes\transpose c' es\tab
  32                 \context Staff=e \notes\transpose c' e\tab
  33                 \context ChordNames=e \notes\transpose c' e\tab
  34                 \context Staff=fis \notes\transpose c' fis\tab
  35                 \context ChordNames=fis \notes\transpose c' fis\tab
  36                 \context Staff=g \notes\transpose c' g\tab
  37                 \context ChordNames=g \notes\transpose c' g\tab
  38                 \context Staff=as \notes\transpose c' as\tab
  39                 \context ChordNames=as \notes\transpose c' as\tab
  40                 \context Staff=a \notes\transpose c' a\tab
  41                 \context ChordNames=a \notes\transpose c' a\tab
  42                 \context Staff=bes \notes\transpose c' bes,\tab
  43                 \context ChordNames=bes \notes\transpose c' bes,\tab
  44                 \context Staff=b \notes\transpose c' b,\tab
  45                 \context ChordNames=b \notes\transpose c' b,\tab
  46 %}
  47         >
  48         \paper{
  49                 textheight = \vsize - 4.0 * \staffheight
  50         }
  51
  52 }
  53
  54
  55 %% new-chords-done %%