On 2019-05-07 12:24 am, Markus Rother wrote:
I am trying to mimick a Jazz Realbook as presented here:
http://leighverlag.blogspot.com/2015/12/mimicking-real-book-look.html.
However, instead of creating a single sheet/score, I want to join
multiple, independent scores from separate files into a book. Each score
should be valid lilypond and contain all self-describing metadata. The
style definition for all scores should not be replicated, but rather
kept in the main file, laying out the whole book. I want the solution to
be lilypond/guile only without relying on templating engines, makefiles
or alike. So, that's the plan.

Hmm... If the goal is simply to have staff lines with the markup, why not use \overlay?

Here are the relevant bits, excerpted from the attached file:

%%%%
  scoreTitleMarkup = \markup \overlay {
    \lower #1 \fontsize #2 \fill-line {
      \rotate #5 \concat {
        \hspace #1 "(" \fromproperty #'header:instruction ")"
      }
      \scale #'(1 . 1.618) \underline \fontsize #3
        \fromproperty #'header:title
      \concat {
        \char ##x2013 " " \fromproperty #'header:composer \hspace #1
      }
    }
    \score {
      \new Staff \with { \omit Clef \omit TimeSignature } { s }
      \layout { indent = 0 ragged-right = ##f }
    }
  }
%%%%


-- Aaron Hill
\version "2.19.82"

\paper {
  scoreTitleMarkup = \markup \overlay {
    \lower #1 \fontsize #2 \fill-line {
      \rotate #5 \concat {
        \hspace #1 "(" \fromproperty #'header:instruction ")"
      }
      \scale #'(1 . 1.618) \underline \fontsize #3
        \fromproperty #'header:title
      \concat {
        \char ##x2013 " " \fromproperty #'header:composer \hspace #1
      }
    }
    \score {
      \new Staff \with { \omit Clef \omit TimeSignature } { s }
      \layout { indent = 0 ragged-right = ##f }
    }
  }

  markup-system-spacing.basic-distance = #15
  system-system-spacing.basic-distance = #15
  score-markup-spacing.basic-distance = #20
}

\layout {
  indent = 0 ragged-right = ##f
  \context { \Lyrics
    \override LyricText.font-size = #2
    \override LyricSpace.minimum-distance = #3
    \override LyricHyphen.minimum-distance = #3
    \override VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #1
  }
}

\score {
  <<
    \new ChordNames \chordmode {
      | c2 d2:m
      | g1
      | c2:6 f4:sus4 f
      | c4/+g g4:7 c2
    }
    \new Staff \new Voice = "melody" \fixed c' {
      | c4. e8 \tuplet 3/2 { f8 g f } a4
      | g4. fis8 \tuplet 3/2 { g8 a b } g4 \break
      | c'8. a16 g4 bes8. a16 f4
      | \tuplet 3/2 { e8 d c } f8. c16 c2 \bar "|."
    }
    \new Lyrics \lyricsto "melody" {
      | Do not try to sing this.
      | I am no lyr -- i -- cist.
      | Ev -- en my mel -- o -- dies
      | Have lit -- tle use -- ful -- ness.
    }
  >>
  \header {
    instruction = "Trudging w/ Optimism"
    title = "Lorem Ipsum"
    composer = "Ebb & Flow"
  }
}

\score {
  <<
    \new ChordNames \chordmode {
      | c4 c:maj7 f2
      | d4:m g:7 c2
      | f4 d4:7/+fis g4 a4:7
      | d4:m f4:m6/+g c2
    }
    \new Staff \new Voice = "melody" \fixed c' {
      | e8. d16 e8. d16 f8 a4.
      | d8. c16 d8. c16 e2 \break
      | f8. g16 a8 c' b16 a g f e4
      | f8. e16 d8. e16 c2 \bar "|."
    }
    \new Lyrics \lyricsto "melody" {
      | Writ -- ing dum -- my lyr -- ics
      | May seem quite the chore.
      | Yet, a tune with noth -- ing un -- der it
      | Caus -- es one to snore.
    }
  >>
  \header {
    instruction = "Irresponsibly Sloppy"
    title = "Dolor Sit Amet"
    composer = "Hither & Tither"
  }
}

Attachment: header-stafflines.pdf
Description: Adobe PDF document

_______________________________________________
bug-lilypond mailing list
bug-lilypond@gnu.org
https://lists.gnu.org/mailman/listinfo/bug-lilypond

Reply via email to