lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: headers and footers


From: Jacques Menu Muzhic
Subject: Re: headers and footers
Date: Wed, 28 Jun 2017 18:24:48 +0200

Hello William,

For your second point, you can start with the following « oddFooterMarkup » and 
adapt it to your needs.

JM


\version "2.19.40"

#(define (fileName)
   (let* ((args (program-arguments))
          (args-len (length args)))
     (list-ref args (- args-len 1))))
#(define fileSize                 (object->string (stat:size (stat 
(fileName)))))
#(define lilypondVersion          (object->string (lilypond-version)))
#(define currentDateAndTime       (strftime "%d/%m/%Y" (localtime 
(current-time))))
#(define currentTime              (strftime "%H:%M:%S" (localtime 
(current-time))))
#(define modificationTime         (stat:mtime (stat (fileName))))
#(define modificationTimeAsString (strftime "%d/%m/%Y - %H:%M:%S" (localtime 
modificationTime)))

\header {
  title = "Sonata I"
  %instrument = "Fagottino et Basson"
  composer = "Daniel Speer, 1697"
}

\paper {
  paper-width = 21.0\cm
  paper-height = 29.72\cm
  top-margin = 1.0\cm
  bottom-margin = 1.0\cm
  left-margin = 1.49\cm
  right-margin = 1.49\cm

  indent = 3\cm
  %  page-count = 3
  %markup-system-spacing.basic-distance = 20
  %system-count = 20

  ragged-bottom = ##t
  ragged-last-bottom = ##t

  scoreTitleMarkup = ##f
  bookTitleMarkup = \markup \override #'(baseline-skip . 4) \fill-line {
    \center-column {
      \abs-fontsize #18 \fromproperty #'header:title
      \fill-line {
        \abs-fontsize #15 \fromproperty #'header:instrument
        \override #'(baseline-skip . 3) \center-column {
          %\abs-fontsize #15 \fromproperty #'header:keyForTitle
          %\abs-fontsize #14 \fromproperty #'header:opus
        }
        \override #'(baseline-skip . 2.25) \center-column {
          \abs-fontsize #12 \fromproperty #'header:composer
          %\abs-fontsize #10 \concat { ( \fromproperty #'header:catalogueNumber 
) }
        }
      }
    }
  }

  oddHeaderMarkup = \markup {
    \on-the-fly\not-first-page
    \fill-line {
      \fromproperty #'header:title
      %   \fromproperty #'header:piece
      \fromproperty #'header:instrument
      \fromproperty #'page:page-number-string
    }
  }
  evenHeaderMarkup = \oddHeaderMarkup

  oddFooterMarkup = \markup {
    \teeny
    \column {
      \fill-line {
        #(string-append
          "Music edited with Frescobaldi and engraved by LilyPond " 
(lilypond-version))
      }
      \fill-line {
        "http://www.frescobaldi.org - http://www.lilypond.org";
      }
      \fill-line { \italic { \modificationTimeAsString }}
    }
  }
}



> Le 28 juin 2017 à 18:13, William Zeitler <address@hidden> a écrit :
> 
> I'm still new to Lilypond. I have RTFMed the documentation, but where to 
> begin to do the following eludes me:
> 
> * After the first page, I want a header like "MyTitle - Page X of Y"
> 
> * On all pages, in the lower right: "Revision: today's-MM/DD/YY"
> 
> How would I do that?
> 
> Many thanks, oh wise ones!
> 
> william zeitler
> 
> 
> 
> _______________________________________________
> lilypond-user mailing list
> address@hidden
> https://lists.gnu.org/mailman/listinfo/lilypond-user




reply via email to

[Prev in Thread] Current Thread [Next in Thread]