Re: Change page number during score

[David Nalesnik]

Hi,

>
> You're right, there's no way to set the page number, AFAIK :(

Well, no simple way.  It is possible to write a markup function to increment the page numbers at a certain point.

I retooled a function which does Roman numeral page numbers here: http://www.mail-archive.com/address@hidden/msg73483.html

The function below takes a range of "skipped pages."  So, the example "skips" page numbers 2 through 5.  Thus, the score will be numbered 1, 6, 7...

Hope this helps,

David

%%%%%

 \version "2.17.29" % should work with 2.16 too

#(define-markup-command (skip-page-number-range layout props arg) (number-list?)

  (let ((page-number (chain-assoc-get 'page:page-number props -1)))

    (interpret-markup layout props

      (if (>= page-number (car arg))

          (number->string (+ page-number (1+ (- (cadr arg) (car arg)))))

          (chain-assoc-get 'page:page-number-string props -1)))))

\paper {

  print-first-page-number = ##t

  print-page-number = ##t

  oddHeaderMarkup = \markup

    \fill-line {

      " "

      \on-the-fly #not-first-page \fromproperty #'header:instrument

      \on-the-fly #print-page-number-check-first \skip-page-number-range #'(2 5)

    }

  evenHeaderMarkup = \markup

    \fill-line {

      \on-the-fly #print-page-number-check-first \skip-page-number-range #'(2 5)

      \on-the-fly #not-first-page \fromproperty #'header:instrument

      " "

  }

}

\score {

  \new Staff {

    \repeat unfold 6 {

      s1

      \pageBreak

    }

  }

}