Nicolas Sceaux wrote:
Han-Wen Nienhuys <[EMAIL PROTECTED]> writes:

Thank you for your answer, Han-Wen.



Please count me for this one (195 EUR). I leave the other (reading
tweaks) for later, or someone else. However, I'll wait your combined
proposal with Trevor's request before actually ordering this feature.

Hi Nicolas,

can you have a look at current CVS? I had to deviate from the original design for naming the tweak files. The current interaction between \book, \score \paper etc. was too messy for a sensible automatic solution.

you will need to define your own spacingTweaks music function to set stretching appropriately.

Usage:

***

\paper  {
  #(define write-page-layout #t)
}
...
\book {
  \score {
    \bla
    \layout {
      #(define tweak-key "blabla")
    }
  }
}

***

muurbloem:~/src/lilypond$ lilypond input/regression/page-layout-twopass.ly
GNU LilyPond 2.7.28
Processing `input/regression/page-layout-twopass.ly'
Parsing...
Interpreting music... [8][16][19]
Preprocessing graphical objects...
Calculating line breaks... [3][6][9][12][15][18][19]
Calculating page breaks...Writing page layout to page-layout-twopass-page-layout.ly
Layout output to `page-layout-twopass.ps'...
Converting to `page-layout-twopass.pdf'...
Including file: page-layout-twopass-page-layout.ly
input/regression/page-layout-twopass.ly: 0: warning: no \version statement found, add

\version "2.7.28"

for future compatibility

***

muurbloem:~/src/lilypond$ cat page-layout-twopass-page-layout.ly
blabla = {
\break
\pageBreak
\spacingTweaks #'((system-Y-extent -11.050006 . 0.0)
 (system-refpoint-Y-extent -4.0 . -4.0)
 (system-index . 0)
 (page-system-count . 3)
 (page-printable-height . 148.438777952756)
 (page-space-left . -47.1596563937008))


\skip 1*2/1\grace { \skip 1*1/16 }
\break
\spacingTweaks #'((system-Y-extent -11.050006 . 0.347445669291338)
 (system-refpoint-Y-extent -4.0 . -4.0)
 (system-index . 1)
 (page-system-count . 3)
 (page-printable-height . 148.438777952756)
 (page-space-left . -47.1596563937008))


\skip 1*1/1
\break
\spacingTweaks #'((system-Y-extent -8.0 . 0.313302362204724)
 (system-refpoint-Y-extent -4.0 . -4.0)
 (system-index . 2)
 (page-system-count . 3)
 (page-printable-height . 148.438777952756)
 (page-space-left . -47.1596563937008))



--

Han-Wen Nienhuys - [EMAIL PROTECTED] - http://www.xs4all.nl/~hanwen

LilyPond Software Design
 -- Code for Music Notation
http://www.lilypond-design.com



_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to