On Wed, 2014-09-10 at 17:26 -0700, Paul Morris wrote:
> Well, make that:
>
> \paper {
> system-system-spacing =
> #'((basic-distance . 0)
> (minimum-distance . 0)
> (padding . 0))
> }
> Thanks very much - this last code appears to be what is needed, indeed I wonder now that I could have missed it (perhaps I tried it, but with some typo - the error messages when you get this sort of thing wrong are few and far between). This works perfectly on my minimal example but throws up a strangeness on a real-world example. With 10 systems I get two pages with a strange gap beneath the titles. However by putting systems-per-page = #10 all is well. I suspect a bug here, so I tried without success to pare this down to find what is triggering this strange behavior, but FWIW I attach the output and the source code - with that line commented out the ten systems are placed on two pages with a large gap below the titles. Perhaps someone will recognize the symptom of this large gap below the titles and before the music? Thanks for the help Richard > > > -- > View this message in context: > http://lilypond.1069038.n5.nabble.com/Reducing-the-spacing-between-ChordNames-systems-tp166314p166321.html > Sent from the User mailing list archive at Nabble.com. > > _______________________________________________ > lilypond-user mailing list > [email protected] > https://lists.gnu.org/mailman/listinfo/lilypond-user
%% LilyPond file generated by Denemo version 1.1.9 %%http://www.gnu.org/software/denemo/ \version "2.18.0" DenemoGlobalTranspose = #(define-music-function (parser location arg)(ly:music?) #{\transpose c c #arg #}) AutoBarline = {} AutoEndMovementBarline = \bar "|." \defineBarLine ":|]-RepeatEnd" #'(":|]" "" "") \defineBarLine "[|:-RepeatStart" #'("||" "[|:" "") \defineBarLine "||-Double" #'("||" "|" "") \defineBarLine "|-Single" #'("|" "|" "") \defineBarLine "|" #'("|" "|" "|") BarRepeatEnd = \bar ":|]-RepeatEnd" BarRepeatStart = \bar "[|:-RepeatStart" BarDouble = \bar "||-Double" BarSingle = \bar "|-Single" #(define (conditional-string-downcase str condition) (if condition (string-downcase str) str)) #(define (denemo-chord-name->pop-markup pitch lowercase?) (let* ((alt (ly:pitch-alteration pitch))) (make-line-markup (list (make-bold-markup (make-scale-markup '(0.5 . 1) (make-simple-markup (conditional-string-downcase (vector-ref #("C" "D" "E" "F" "G" "A" "B") (ly:pitch-notename pitch)) lowercase?)))) (if (= alt 0) (make-hspace-markup 1) (make-line-markup (list (make-hspace-markup 0.1) (make-fontsize-markup -6 (make-raise-markup 5 (alteration->text-accidental-markup alt)))))))))) #(define (denemo-chord-inv-name->pop-markup pitch lowercase?) (let* ((alt (ly:pitch-alteration pitch))) (make-line-markup (list (make-bold-markup (make-scale-markup '(0.5 . 1) (make-simple-markup (conditional-string-downcase (vector-ref #("C" "D" "E" "F" "G" "A" "B") (ly:pitch-notename pitch)) lowercase?)))) (if (= alt 0) (make-line-markup (list empty-markup)) (make-line-markup (list (make-hspace-markup 0.1) (make-fontsize-markup -4 (alteration->text-accidental-markup alt))))))))) %{ #(set! paper-alist (cons '("a4" . (cons (* 8 in) (* 12 in))) paper-alist)) %} \paper { #(set-paper-size "a4") system-system-spacing = #'((basic-distance . 4) (minimum-distance . 4) (padding . 4)) %systems-per-page = #10 } % The music follows MvmntIVoiceI = { <c' e' g'>1\AutoBarline <c' ees' g'>^\markup\scale #'(0.4 . 0.6) \bold \raise #-1 {\hspace #-1 m}\AutoBarline <c' bes'>1\AutoBarline <c' a'>^\markup\scale #'(.4 . .6) \bold \raise #-1 {\hspace #-1 6} \AutoBarline %5 <c' ees' bes'>1^\markup\scale #'(.4 . .6) \bold \raise #-1 {\hspace #-1 -7} \AutoBarline <c' ees' a'>1^\markup\scale #'(0.4 . 0.6) \bold \raise #-1 {\hspace #-1 m6} \AutoBarline <c' ees' ges' bes'>1^\markup\scale #'(0.6 . 0.8) \bold \raise #-1 {\hspace #-1 ΓΈ } \AutoBarline <c' f' bes' d''>1^\markup\scale #'(0.4 . 0.6) \bold \raise #-1 {\hspace #-1 9 \scale #'(0.8 . 1) sus } \AutoBarline <c' e' g' b'>1^\markup\scale #'(.4 . .6) \bold \override #'(thickness . 0.8) {\hspace #-1 \triangle ##f } \AutoBarline %10 <c' d''>1^\markup\scale #'(.4 . .6) \bold \raise #-1 {\hspace #-1 9} \AutoBarline <c' b' a''>1\AutoBarline <c' f' g'>\AutoBarline <c' d' g'> \AutoEndMovementBarline } \addQuote "Unnamed Mvmnt 1" \MvmntIVoiceI MvmntIIVoiceI = { %{/home/rshann/musicScores/dom/They Can't Take in F ( v2).pdf:63:159:0%} \bar "|" <g bes f'>2 <c' f' bes' d''>\AutoBarline \once \override MultiMeasureRest #'extra-offset = #'(0 . -1) \override MultiMeasureRest #'stencil = #ly:multi-measure-rest::percent \override MultiMeasureRest #'thickness = #0.48 R1*4/4\AutoBarline \once \override MultiMeasureRest #'extra-offset = #'(0 . -1) \override MultiMeasureRest #'stencil = #ly:multi-measure-rest::percent \override MultiMeasureRest #'thickness = #0.48 R1*4/4\AutoBarline <c' f' bes' d''>1 \break%5 <f a c' e'>1\AutoBarline <>-\tweak #'extra-offset #'(2 . -6.5) ^\markup\scale #'(2.5 . 2)\column{\line\large{ "/" \hspace #-0.5 \score{ \DenemoGlobalTranspose { \new ChordNames { a} } \layout{ \context {\Score chordRootNamer = #denemo-chord-inv-name->pop-markup } indent=-2 } }} } <f a c' e'>2 <aes ces' f'>\AutoBarline <g' bes' f''>1\AutoBarline <c' f' bes' d''> \break <c' ees' bes'>1\AutoBarline %10 <f g'>\AutoBarline bes2_\markup\scale #'(.4 . .6) \sans \fontsize #10 { \hspace #8 \bold \override #'(thickness . 0.8) \triangle ##f \hspace #-8 \bold 13} <d' e''>2\AutoBarline <>-\tweak #'extra-offset #'(-5 . -3) -\tweak baseline-skip #2 ^\markup\scale #'(2 . 2)\column{\line\large{\bold 2}\line\large{\bold 4}} <g bes f'>1\AutoBarline <>-\tweak #'extra-offset #'(-5 . -3) -\tweak baseline-skip #2 ^\markup\scale #'(2 . 2)\column{\line\large{\bold 4}\line\large{\bold 4}} <c' f' bes' d''>1 \bar ":|." \break \skip 1 \bar ""%15 s1*4/4 bes2_\markup\scale #'(.4 . .6) \sans \fontsize #10 { \hspace #8 \bold \override #'(thickness . 0.8) \triangle ##f \hspace #-8 \bold 13} <ees' f''>2\AutoBarline <f a c' e'>1 \BarDouble \break <a c' g'>2 <d' e''>\AutoBarline <a c' g'> <d' e''>\AutoBarline %20 <e' g' d''>1\AutoBarline <e' fis''> \break <a c' g'>2 <d' e''>\AutoBarline <a c' g'> <d' e''>\AutoBarline <g f'>1\AutoBarline %25 <c' f' bes' d''> \break \BarDouble <f a c' e'>1\AutoBarline <f a c' e'>2 <aes ces' f'>\AutoBarline <g' bes' f''>1\AutoBarline <c' f' bes' d''> \break%30 <c' ees' bes'>1\AutoBarline <f g'>\AutoBarline bes2_\markup\scale #'(.4 . .6) \sans \fontsize #10 { \hspace #8 \bold \override #'(thickness . 0.8) \triangle ##f \hspace #-8 \bold 13} <d' e''>2\AutoBarline \time 2/4<>-\tweak #'extra-offset #'(-5 . -3) -\tweak baseline-skip #2 ^\markup\scale #'(2 . 2)\column{\line\large{\bold 2}\line\large{\bold 4}} <g bes f'>\AutoBarline \time 4/4<>-\tweak #'extra-offset #'(-5 . -3) -\tweak baseline-skip #2 ^\markup\scale #'(2 . 2)\column{\line\large{\bold 4}\line\large{\bold 4}} <c' f' bes' d''>1 \BarRepeatEnd \break%35 \skip 1 \bar "" \skip 1\AutoBarline bes2_\markup\scale #'(.4 . .6) \sans \fontsize #10 { \hspace #8 \bold \override #'(thickness . 0.8) \triangle ##f \hspace #-8 \bold 13} <ees' f''>2\AutoBarline <f a c' e'>1 \break \BarDouble <g bes f'>2 <c' f' bes' d''>\AutoBarline %40 \once \override MultiMeasureRest #'extra-offset = #'(0 . -1) \override MultiMeasureRest #'stencil = #ly:multi-measure-rest::percent \override MultiMeasureRest #'thickness = #0.48 R1*4/4<>-\tweak #'extra-offset #'(-14.23 . -1.21) ^\markup \bold \fontsize #8 {"x6" } <f a c' e'>1 \bar "|."} \addQuote "Unnamed Mvmnt 2" \MvmntIIVoiceI %Default Score Layout \header{DenemoLayoutName = "Default Score Layout"} \header { tagline = \markup {"/home/rshann/musicScores/dom/TESTING_COMPACT_THEY_CANT_TAKE.denemo" on \simple #(strftime "%x" (localtime (current-time)))} title = \markup { \with-url #'"scheme:(d-ScoreTitle)" "They Can't Take That Away"} } \layout {indent = 0} #(set-default-paper-size "a4") #(set-global-staff-size 20) \paper { print-all-headers = ##t page-limit-inter-system-space = ##t page-limit-inter-system-space-factor = 1.2 } \void \score { %Start of Movement << << \set Score.proportionalNotationDuration = #(ly:make-moment 1/4) << << \context Score \applyContext #(set-bar-number-visibility 4000) << %Start of Staff \new Staff = "Unnamed" << \set Staff.instrumentName = \markup { \with-url #'"scheme:(d-GoToPosition 1 1 1 1)(let ((choice (d-PopupMenu (list (cons (_ \"Change Name\") d-InstrumentName) (cons (_ \"Change Indent\") d-ScoreIndent))))) (if choice (choice))) " \transparent {"Unnamed" }} \new Voice = "VoiceIMvmntI" { \clef treble { \key c \major} { \time 4/4 } \MvmntIVoiceI } %End of voice >> %End of Staff >> >> >> >> >> \header { title = ##f instrument = ##f } } %End of Movement \score { %Start of Movement << << \set Score.proportionalNotationDuration = #(ly:make-moment 1/4) << << \context Score \applyContext #(set-bar-number-visibility 4000) << \new ChordNames \with { chordNameExceptions = #(append (sequential-music-to-chord-exceptions MvmntIVoiceI #t) ignatzekExceptions) \consists "Bar_engraver" \consists "Script_engraver" \consists "Text_engraver" %\consists "Time_signature_engraver" \consists "Multi_measure_rest_engraver" \override ChordName.font-size=#12 \override ChordName.Y-extent = ##f \override ChordName.extra-spacing-width=#'(+inf.0 . -inf.0) \override ChordName.extra-offset = #'(0 . -2) \override BarLine.bar-extent = #'(-4 . 6) \override BarLine #'hair-thickness = #4 \numericTimeSignature } \MvmntIIVoiceI >> >> >> >> >> \header { title = ##f instrument = ##f composer = \markup { \with-url #'"scheme:(d-GoToPosition 2 1 1 1)(d-MovementComposer)" "George & Ira Gershwin"} piece = \markup { \with-url #'"scheme:(d-GoToPosition 2 1 1 1)(d-MovementPiece)" "(Medium Swing)"} } \layout { \set noChordSymbol = \markup \smaller \bold "/" \context { \Score chordRootNamer = #denemo-chord-name->pop-markup } } } %End of Movement
no-fit-to-page.pdf
Description: Adobe PDF document
fit-to-page.pdf
Description: Adobe PDF document
_______________________________________________ lilypond-user mailing list [email protected] https://lists.gnu.org/mailman/listinfo/lilypond-user
