input/just-friends.ly

   1 \version "1.3.146"
   2 \header {
   3   filename =    "just-friends.ly"
   4   title =       "Just Friends"
   5   description = "Jazz chords example with bar lines"
   6   opus =        ""
   7   source =      "mutex@gmd.de"
   8   composer =    ""
   9   enteredby =   "jcn"
  10   copyright =   "Public Domain"
  11 }
  12
  13 %{
  14 In response to
  15
  16 Message-Id: <19990206153950.A7474@gil.physik.rwth-aachen.de>
  17 Date: Sat, 6 Feb 1999 15:39:50 +0100
  18 From: Christoph Kukulies <kuku@gilberto.physik.RWTH-Aachen.DE>
  19 Subject: chord bars
  20
  21 I was looking out for a FAQ on the www.gmd.de/Misc/Music page but didn't
  22 find any so bear with me when asking a FAQ question:
  23
  24 I want to generate some sheets that contain only the chords (changes)
  25 of a certain tune (Jazz, Real Book, for example), like
  26
  27               Just Friends
  28
  29 [...]
  30
  31 %}
  32
  33 %{
  34
  35 FIXME
  36
  37 This should (and once used to) look like:
  38
  39     | Fmaj7  | Fmaj7  | F7 | Bes7 |
  40
  41 but all bar lines (note bar line at line start) are now gone.
  42
  43 %}
  44
  45 \score{
  46         \context ChordNames \chords{
  47                 \property Score.barAtLineStart = 1
  48                 \repeat volta 2 {
  49                         f1:maj f:maj f:7 bes:7
  50                         c:maj c:maj es es
  51                         d:7 g:7 b2:7/fis e:7 a1:7\break
  52                         d:7 d:7 d:7 g2:7 ges:7
  53
  54                         f1:maj f1:maj f:7 bes:7
  55                         c:maj c:maj es es
  56                         d:7 g:7 b2:7/fis e:7 a1:7\break
  57                         d:7 d2:7 g:7 c1:6 g2:7 c:7
  58                 }
  59         }
  60         \paper{
  61                 indent = 0.0\mm
  62                 linewidth = 120.0\mm
  63                 \translator{
  64                         \ChordNamesContext
  65                         barNonAuto = ##f
  66
  67                         % added
  68                         barAuto = ##t
  69                         defaultBarType = #"|"
  70                         Bar \override #'bar-size = #4
  71                         %ChordName \override #'word-space = #3
  72
  73                         \consists Bar_engraver
  74                         \consists "Volta_engraver"
  75                 }
  76         }
  77 }
  78
  79