Re: Precise markup position

2015-05-07 Thread Robin Bannister

Stephen MacNeil wrote:

the overlay on the lsr will do this


That would be Absolute positioning of markup elements
http://lsr.di.unimi.it/LSR/Item?id=628


Then to position millimetre-wise, you need something like

%%

#(define-markup-command (mm-translate layout props mm-offset arg)
  (number-pair? markup?)
  (let ((o-s (ly:output-def-lookup layout 'output-scale)))
(ly:stencil-translate (interpret-markup layout props arg)
  (cons (/ (car mm-offset) o-s) (/ (cdr mm-offset) o-s)

%%


Cheers,
Robin


___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: TimeSignatures over BarLines

2015-05-07 Thread Thomas Morley
2015-05-08 2:29 GMT+02:00 Thomas Morley thomasmorle...@gmail.com:
 2015-05-07 18:48 GMT+02:00 Alexander Kobel n...@a-kobel.de:
 Dear all,

 I'm trying to move time signatures to print over bar lines for a modern
 piece, to allow for a proportional (or almost proportional) note spacing
 despite several time changes.

 The usual approach is to place them over the staff, like here:
   http://lsr.di.unimi.it/LSR/Item?id=272
 However, the full piece has a whole bunch of staves, so vertical space is at
 a premium; for each staff, the signatures do not fit, and I feel that a
 single time signature over the score is not enough.
 Hence, I decided to break the bar line stencil into two short slices, and
 squeeze the time signature in between.

 I'm almost there. The missing piece is automatic adjustment of time
 signatures at the beginning of a system. If realignTimeSignatures in the
 attached example is delayed by one measure, the default placement of the
 first time signature is perfect - as usual. However, I could not find a way
 to do the same for the time signature in the fourth system (other than
 manually reverting the overrides).
 I achieve either
 1) a nice placement of the in-line signature (with \realignTimeSignatures),
 but have to shift the begin-of-line ones by some amount and cannot make
 enough space for them, xor
 2) the default position for the begin-of-line signatures (with
 \realignTimeSignaturesII), but then I cannot position barlines and time
 signatures on top of each other.
 Can anyone enlighten me here?

 Bonus points for someone who can come up with a proper centered alignment of
 the 4 in the double bar line at the /end/ of the third system...


 Thanks in advance,
 Alexander



 Hi,

 how about:


 \version 2.19.18

 cTime =
 #(define-music-function (parser location time) (fraction?)
#{ \once \override Staff.BarLine #'stencil =
   #(lambda (grob)
  (ly:grob-set-property! grob 'bar-extent '(-2 . -1))
  (ly:stencil-add
   (ly:bar-line::print grob)
   (ly:stencil-translate-axis (ly:bar-line::print grob) 3 Y)))
   \time $time #})

 move-time-sig-into-bar-line =
 \override Staff.BarLine.before-line-breaking =
   #(lambda (grob)
 (let* (
(b-a-g (ly:grob-parent grob X))
(b-a (ly:grob-parent b-a-g X))
(elts (ly:grob-array-list (ly:grob-object b-a 'elements)))
(break-align-groups
  (filter
(lambda (g)
  (grob::has-interface g 'break-aligned-interface))
  elts))
(b-a-g-elts
  (apply append
   (map
(lambda (g)
  (ly:grob-array-list (ly:grob-object g 'elements)))
break-align-groups)))
(time-sig
  (filter
(lambda (g)
(grob::has-interface g 'time-signature-interface))
b-a-g-elts))
(bar-line
  (filter
(lambda (g)
(grob::has-interface g 'bar-line-interface))
b-a-g-elts)))
   (if (and (not (null? time-sig)) (not (null? bar-line)))
   ;; TODO:
   ;; only the first entry of time-sig and bar-line are affected
   ;; may cause problems in cases where a StaffGroup contains Staffs with
   ;; different settings for TimeSignature and/or BarLine
   (let* ((time-sig-length
(interval-length
  (ly:grob-extent (car time-sig) (car time-sig) X)))
  (bar-line-length
(interval-length
  (ly:grob-extent (car bar-line) (car bar-line) X
 (ly:grob-set-property! grob 'space-alist
   `((time-signature extra-space
   .
   ,(/ (+ time-sig-length bar-line-length) -2))
 (custos minimum-space . 2.0)
 (clef minimum-space . 1.0)
 (key-signature extra-space . 1.0)
 (key-cancellation extra-space . 1.0)
 (first-note fixed-space . 0.3)
 (next-note semi-fixed-space . 0.9)
 (right-edge extra-space . 0.0)))

Next two lines don't work. Delete them for now.

(if (= (ly:item-break-dir grob) LEFT)
(ly:grob-set-property! (car time-sig) 'X-extent '(0 . 0)))


 time-sig-space-at-line-end =
 \override Staff.TimeSignature.space-alist =
   #'((cue-clef extra-space . 1.5)
  (first-note fixed-space . 2.0)
  ;; not sure how it should look, for now hardcoded
  (right-edge extra-space . 0)
  (staff-bar extra-space . 1.0))

 global = {
   \cTime 2/4 s2*8 \cTime 3/4 s2. \cTime 2/4 s2*4 \break

   s2*2 \cTime 3/4 s2. \cTime 2/4 s2 \cTime 3/4 s2. \cTime 2/4 s2*5
   \cTime 3/4 s2. \cTime 2/4 s2 \cTime 3/4 s2. \break

   s2. \cTime 2/4 s2 \cTime 3/4 s2. \cTime 2/4 s2*2 \cTime 4/4 s1
   \cTime 2/4 s2*5 \cTime 4/4 s1 \cTime 2/4 s2 \bar || \break

   \cTime 4/4 s1
 }

 mel = \relative c'' {
   | c2 | c | c | c | R | R
   | 

Re: TimeSignatures over BarLines

2015-05-07 Thread Thomas Morley
2015-05-07 18:48 GMT+02:00 Alexander Kobel n...@a-kobel.de:
 Dear all,

 I'm trying to move time signatures to print over bar lines for a modern
 piece, to allow for a proportional (or almost proportional) note spacing
 despite several time changes.

 The usual approach is to place them over the staff, like here:
   http://lsr.di.unimi.it/LSR/Item?id=272
 However, the full piece has a whole bunch of staves, so vertical space is at
 a premium; for each staff, the signatures do not fit, and I feel that a
 single time signature over the score is not enough.
 Hence, I decided to break the bar line stencil into two short slices, and
 squeeze the time signature in between.

 I'm almost there. The missing piece is automatic adjustment of time
 signatures at the beginning of a system. If realignTimeSignatures in the
 attached example is delayed by one measure, the default placement of the
 first time signature is perfect - as usual. However, I could not find a way
 to do the same for the time signature in the fourth system (other than
 manually reverting the overrides).
 I achieve either
 1) a nice placement of the in-line signature (with \realignTimeSignatures),
 but have to shift the begin-of-line ones by some amount and cannot make
 enough space for them, xor
 2) the default position for the begin-of-line signatures (with
 \realignTimeSignaturesII), but then I cannot position barlines and time
 signatures on top of each other.
 Can anyone enlighten me here?

 Bonus points for someone who can come up with a proper centered alignment of
 the 4 in the double bar line at the /end/ of the third system...


 Thanks in advance,
 Alexander



Hi,

how about:


\version 2.19.18

cTime =
#(define-music-function (parser location time) (fraction?)
   #{ \once \override Staff.BarLine #'stencil =
  #(lambda (grob)
 (ly:grob-set-property! grob 'bar-extent '(-2 . -1))
 (ly:stencil-add
  (ly:bar-line::print grob)
  (ly:stencil-translate-axis (ly:bar-line::print grob) 3 Y)))
  \time $time #})

move-time-sig-into-bar-line =
\override Staff.BarLine.before-line-breaking =
  #(lambda (grob)
(let* (
   (b-a-g (ly:grob-parent grob X))
   (b-a (ly:grob-parent b-a-g X))
   (elts (ly:grob-array-list (ly:grob-object b-a 'elements)))
   (break-align-groups
 (filter
   (lambda (g)
 (grob::has-interface g 'break-aligned-interface))
 elts))
   (b-a-g-elts
 (apply append
  (map
   (lambda (g)
 (ly:grob-array-list (ly:grob-object g 'elements)))
   break-align-groups)))
   (time-sig
 (filter
   (lambda (g)
   (grob::has-interface g 'time-signature-interface))
   b-a-g-elts))
   (bar-line
 (filter
   (lambda (g)
   (grob::has-interface g 'bar-line-interface))
   b-a-g-elts)))
  (if (and (not (null? time-sig)) (not (null? bar-line)))
  ;; TODO:
  ;; only the first entry of time-sig and bar-line are affected
  ;; may cause problems in cases where a StaffGroup contains Staffs with
  ;; different settings for TimeSignature and/or BarLine
  (let* ((time-sig-length
   (interval-length
 (ly:grob-extent (car time-sig) (car time-sig) X)))
 (bar-line-length
   (interval-length
 (ly:grob-extent (car bar-line) (car bar-line) X
(ly:grob-set-property! grob 'space-alist
  `((time-signature extra-space
  .
  ,(/ (+ time-sig-length bar-line-length) -2))
(custos minimum-space . 2.0)
(clef minimum-space . 1.0)
(key-signature extra-space . 1.0)
(key-cancellation extra-space . 1.0)
(first-note fixed-space . 0.3)
(next-note semi-fixed-space . 0.9)
(right-edge extra-space . 0.0)))
   (if (= (ly:item-break-dir grob) LEFT)
   (ly:grob-set-property! (car time-sig) 'X-extent '(0 . 0)))


time-sig-space-at-line-end =
\override Staff.TimeSignature.space-alist =
  #'((cue-clef extra-space . 1.5)
 (first-note fixed-space . 2.0)
 ;; not sure how it should look, for now hardcoded
 (right-edge extra-space . 0)
 (staff-bar extra-space . 1.0))

global = {
  \cTime 2/4 s2*8 \cTime 3/4 s2. \cTime 2/4 s2*4 \break

  s2*2 \cTime 3/4 s2. \cTime 2/4 s2 \cTime 3/4 s2. \cTime 2/4 s2*5
  \cTime 3/4 s2. \cTime 2/4 s2 \cTime 3/4 s2. \break

  s2. \cTime 2/4 s2 \cTime 3/4 s2. \cTime 2/4 s2*2 \cTime 4/4 s1
  \cTime 2/4 s2*5 \cTime 4/4 s1 \cTime 2/4 s2 \bar || \break

  \cTime 4/4 s1
}

mel = \relative c'' {
  | c2 | c | c | c | R | R
  | c2 | c | c c4 | c2 | c | R | R
  | c2 | c | c c4 | c2 | c c4 | c2 c | R
  | c2 | c | c c4 | c2 | c c4 | c2. | c4 c | c2 c4 | c2 | c | R1 | R2
  | c2 | c | c | c | R1 | R2
  \once \override 

Re: repeated _\markup{} at same distance from staff...?

2015-05-07 Thread Stephen MacNeil
\override applies to all. to make it only happen once use \once \override

glad to help
Stephen

On Thu, May 7, 2015 at 5:55 PM, B~M viola1...@gmail.com wrote:

 thanks indeed Stephen, its a nice idea to lump the chord symbols into
 one rather
 than do a \markup to all notes. The Vb is just the first inversion of the
 chord, the b is not
 a flat symbol.
 I guess one thing that puzzled me with the \override  TextScript.padding
 is why the outcome didn't just add an further offset but with the same
 result of the symbols going up and down following the music.
 Perhaps \override means not only override the default offset, but turn off
 completely the following
 of the music ?

 Paul


 On Fri, May 8, 2015 at 12:46 AM, Stephen MacNeil classicalja...@gmail.com
  wrote:

 Hey paul

 if the markup is all on one it takes only one staff padding. What i mean
 is each markup is based off of what you attach it to. so a trick I do is
 put them in one markup then all you need to do is center under each with
 halign.

 here is an example
 Also i am not sure why you wanted Vb ... but it does say Exam so...

 %%%

 \paper {

 indent = 0

 top-system-spacing #'basic-distance = #10

 score-system-spacing #'basic-distance = #20

 system-system-spacing #'basic-distance = #20

 last-bottom-spacing #'basic-distance = #10

 }

 I = \markup {I}

 IV = \markup {IV}

 V = \markup {V}

 Vb = \markup {V \raise #1 \tiny\flat}

 roman = \markup {\I \halign #-1.5 {\IV} \halign #-1 {\V} \halign #-2.2
 {\Vb}}


 global = {

 \key d \major

 \numericTimeSignature

 \time 4/4

 }


 sopMusic = \relative c'' {

 % measure 1

 fis4\( d cis8[ b] a4

 % measure 2

 b b a2\)

 % measure 3

 e'4\( d8[ e] fis4 g

 % measure 4

 fis4 d e2\)

 % measure 5

 b4\( d8[ cis] b[ cis d e]

 % measure 6

 fis4 e d2\)

 % measure 7

 d4\( b a e'

 % measure 8

 d cis d2\)

 \bar |.

 }


 bassMusic = \relative c {

 \override NoteHead.color = #blue

 \override Stem.color = #blue

 \override Accidental.color = #blue



  % measure 1

 d4_\roman a a cis

 % measure 2

 g g a2

 % measure 3

 e'4 b d g,

 % measure 4

 d' b a2

 % measure 5

 b4 fis g b

 % measure 6

 d a b2

 % measure 7


 d4 b4 g a




  % measure 8


 g a d2



 }

 \score {




  \new ChoirStaff 

 \new Staff = women 

 \new Voice = sopranos {

 \voiceOne

  \global \sopMusic 

 }

 

 \new Staff = men 

 \clef bass

 \new Voice = basses {

 \voiceTwo  \global \bassMusic 

 }

 

 

 }

 HTH
 Stephen



___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


repeated _\markup{} at same distance from staff...?

2015-05-07 Thread B~M
Dear ALL, at the risk of great embarrassment, I cannot seem to find what
must be a simple
command to set _\markup{} at a constant offset from the staff, rather than
following the music
up and down etc. I've attached my example which is a simple SATB harmony
showing only the Soprano and
Bass. The chord indications (shown int he first bar only) are the symbols I
want to all be at the same distance from the
staff, not the notes.
There seems to be functions to do this for dynamics to be offset a constant
distance from the staff, but I could
not find a similar command for _\markup (or alternatively ^\markup{}).
Any examples or pointers to the manual ?

Paul


HarmQnExamMay2012-2.ly
Description: Binary data


HarmQnExamMay2012-2.pdf
Description: Adobe PDF document
___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: repeated _\markup{} at same distance from staff...?

2015-05-07 Thread Cynthia Karl

 On May 7, 2015, at 6:00 AM, lilypond-user-requ...@gnu.org wrote:
 Message: 4
 Date: Thu, 7 May 2015 21:00:40 +1000
 From: B~M viola1...@gmail.com
 To: lilypond-user@gnu.org
 Subject: repeated _\markup{} at same distance from staff...?
 Message-ID:
   camd7vnwfoavdriyn_c1_ffepyf_ysi-jcgotmprp3zjf47h...@mail.gmail.com
 Content-Type: text/plain; charset=utf-8
 
 Dear ALL, at the risk of great embarrassment, I cannot seem to find what
 must be a simple
 command to set _\markup{} at a constant offset from the staff, rather than
 following the music
 up and down etc. I've attached my example which is a simple SATB harmony
 showing only the Soprano and
 Bass. The chord indications (shown int he first bar only) are the symbols I
 want to all be at the same distance from the
 staff, not the notes.
 There seems to be functions to do this for dynamics to be offset a constant
 distance from the staff, but I could
 not find a similar command for _\markup (or alternatively ^\markup{}).
 Any examples or pointers to the manual ?

Put the markups in a Dynamics context.  (I would have modified your snippet but 
it was too convoluted for the subject.)
 
 Paul


___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


can Keep_alive_together_engraver be temporarily suspended?

2015-05-07 Thread Kieren MacMillan
Hi all,

I have

  PianoStaff
  
Staff
Dynamics
Staff
Pedals
  

By default, the PianoStaff \consists “Keep_alive_together_engraver”, and this 
is generally perfect for me. I have one section of my current score in which I 
would like to reduce the piano part to just the upper staff.

I tried \remove-ing the engraver, but a lot of horrible things happened (e.g., 
the Dynamics disappeared!?), and in my current deadline crunch, I don’t have 
time to properly bug-fix that if there’s a quick way to just pull out the lower 
staff for a few measures.

Thanks!
Kieren.


Kieren MacMillan, composer
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info


___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: Precise markup position

2015-05-07 Thread Les Éditions Valmajour - pg

It does the trick perfectly! Thank you so much!!
Cheers,
Pierre

Le 07/05/2015 11:09, Robin Bannister a écrit :

Stephen MacNeil wrote:

the overlay on the lsr will do this


That would be Absolute positioning of markup elements
http://lsr.di.unimi.it/LSR/Item?id=628


Then to position millimetre-wise, you need something like

%%

#(define-markup-command (mm-translate layout props mm-offset arg)
  (number-pair? markup?)
  (let ((o-s (ly:output-def-lookup layout 'output-scale)))
(ly:stencil-translate (interpret-markup layout props arg)
  (cons (/ (car mm-offset) o-s) (/ (cdr mm-offset) o-s)

%%


Cheers,
Robin




___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: repeated _\markup{} at same distance from staff...?

2015-05-07 Thread B~M
thanks indeed Stephen, its a nice idea to lump the chord symbols into one
rather
than do a \markup to all notes. The Vb is just the first inversion of the
chord, the b is not
a flat symbol.
I guess one thing that puzzled me with the \override  TextScript.padding is
why the outcome didn't just add an further offset but with the same result
of the symbols going up and down following the music.
Perhaps \override means not only override the default offset, but turn off
completely the following
of the music ?

Paul


On Fri, May 8, 2015 at 12:46 AM, Stephen MacNeil classicalja...@gmail.com
wrote:

 Hey paul

 if the markup is all on one it takes only one staff padding. What i mean
 is each markup is based off of what you attach it to. so a trick I do is
 put them in one markup then all you need to do is center under each with
 halign.

 here is an example
 Also i am not sure why you wanted Vb ... but it does say Exam so...

 %%%

 \paper {

 indent = 0

 top-system-spacing #'basic-distance = #10

 score-system-spacing #'basic-distance = #20

 system-system-spacing #'basic-distance = #20

 last-bottom-spacing #'basic-distance = #10

 }

 I = \markup {I}

 IV = \markup {IV}

 V = \markup {V}

 Vb = \markup {V \raise #1 \tiny\flat}

 roman = \markup {\I \halign #-1.5 {\IV} \halign #-1 {\V} \halign #-2.2
 {\Vb}}


 global = {

 \key d \major

 \numericTimeSignature

 \time 4/4

 }


 sopMusic = \relative c'' {

 % measure 1

 fis4\( d cis8[ b] a4

 % measure 2

 b b a2\)

 % measure 3

 e'4\( d8[ e] fis4 g

 % measure 4

 fis4 d e2\)

 % measure 5

 b4\( d8[ cis] b[ cis d e]

 % measure 6

 fis4 e d2\)

 % measure 7

 d4\( b a e'

 % measure 8

 d cis d2\)

 \bar |.

 }


 bassMusic = \relative c {

 \override NoteHead.color = #blue

 \override Stem.color = #blue

 \override Accidental.color = #blue



  % measure 1

 d4_\roman a a cis

 % measure 2

 g g a2

 % measure 3

 e'4 b d g,

 % measure 4

 d' b a2

 % measure 5

 b4 fis g b

 % measure 6

 d a b2

 % measure 7


 d4 b4 g a




  % measure 8


 g a d2



 }

 \score {




  \new ChoirStaff 

 \new Staff = women 

 \new Voice = sopranos {

 \voiceOne

  \global \sopMusic 

 }

 

 \new Staff = men 

 \clef bass

 \new Voice = basses {

 \voiceTwo  \global \bassMusic 

 }

 

 

 }

 HTH
 Stephen

___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


woff svg

2015-05-07 Thread Stephen MacNeil
I made a script a while ago that prints single or multiple pages to jpg or
pdf and those I can easily include on a web page however, woff svg (which i
know nothing about) comes out without the font? what i mean is the staff
shows but there are boxes where the notes go. So my question is how do i
include them in html. I guess how is it done on the LSR (are they svg?)

Stephen
___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: repeated _\markup{} at same distance from staff...?

2015-05-07 Thread Stephen MacNeil
Hey paul

if the markup is all on one it takes only one staff padding. What i mean is
each markup is based off of what you attach it to. so a trick I do is put
them in one markup then all you need to do is center under each with halign.

here is an example
Also i am not sure why you wanted Vb ... but it does say Exam so...

%%%

\paper {

indent = 0

top-system-spacing #'basic-distance = #10

score-system-spacing #'basic-distance = #20

system-system-spacing #'basic-distance = #20

last-bottom-spacing #'basic-distance = #10

}

I = \markup {I}

IV = \markup {IV}

V = \markup {V}

Vb = \markup {V \raise #1 \tiny\flat}

roman = \markup {\I \halign #-1.5 {\IV} \halign #-1 {\V} \halign #-2.2
{\Vb}}


global = {

\key d \major

\numericTimeSignature

\time 4/4

}


sopMusic = \relative c'' {

% measure 1

fis4\( d cis8[ b] a4

% measure 2

b b a2\)

% measure 3

e'4\( d8[ e] fis4 g

% measure 4

fis4 d e2\)

% measure 5

b4\( d8[ cis] b[ cis d e]

% measure 6

fis4 e d2\)

% measure 7

d4\( b a e'

% measure 8

d cis d2\)

\bar |.

}


bassMusic = \relative c {

\override NoteHead.color = #blue

\override Stem.color = #blue

\override Accidental.color = #blue



 % measure 1

d4_\roman a a cis

% measure 2

g g a2

% measure 3

e'4 b d g,

% measure 4

d' b a2

% measure 5

b4 fis g b

% measure 6

d a b2

% measure 7


d4 b4 g a




 % measure 8


g a d2



}

\score {




 \new ChoirStaff 

\new Staff = women 

\new Voice = sopranos {

\voiceOne

 \global \sopMusic 

}



\new Staff = men 

\clef bass

\new Voice = basses {

\voiceTwo  \global \bassMusic 

}





}

HTH
Stephen
___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


TimeSignatures over BarLines

2015-05-07 Thread Alexander Kobel

Dear all,

I'm trying to move time signatures to print over bar lines for a modern 
piece, to allow for a proportional (or almost proportional) note spacing 
despite several time changes.


The usual approach is to place them over the staff, like here:
  http://lsr.di.unimi.it/LSR/Item?id=272
However, the full piece has a whole bunch of staves, so vertical space 
is at a premium; for each staff, the signatures do not fit, and I feel 
that a single time signature over the score is not enough.
Hence, I decided to break the bar line stencil into two short slices, 
and squeeze the time signature in between.


I'm almost there. The missing piece is automatic adjustment of time 
signatures at the beginning of a system. If realignTimeSignatures in the 
attached example is delayed by one measure, the default placement of the 
first time signature is perfect - as usual. However, I could not find a 
way to do the same for the time signature in the fourth system (other 
than manually reverting the overrides).

I achieve either
1) a nice placement of the in-line signature (with 
\realignTimeSignatures), but have to shift the begin-of-line ones by 
some amount and cannot make enough space for them, xor
2) the default position for the begin-of-line signatures (with 
\realignTimeSignaturesII), but then I cannot position barlines and time 
signatures on top of each other.

Can anyone enlighten me here?

Bonus points for someone who can come up with a proper centered 
alignment of the 4 in the double bar line at the /end/ of the third 
system...



Thanks in advance,
Alexander
\version 2.19.15

cTime =
#(define-music-function (parser location time) (fraction?)
   #{ \once \override Staff.BarLine #'stencil =
  #(lambda (grob)
 (ly:grob-set-property! grob 'bar-extent '(-2 . -1))
 (ly:stencil-add
  (ly:bar-line::print grob)
  (ly:stencil-translate-axis (ly:bar-line::print grob) 3 Y)))
  \time $time #})

global = {
  \cTime 2/4 s2*8 \cTime 3/4 s2. \cTime 2/4 s2*4 \break
  s2*2 \cTime 3/4 s2. \cTime 2/4 s2 \cTime 3/4 s2. \cTime 2/4 s2*5 \cTime 3/4 s2. \cTime 2/4 s2 \cTime 3/4 s2. \break
  s2. \cTime 2/4 s2 \cTime 3/4 s2. \cTime 2/4 s2*2 \cTime 4/4 s1 \cTime 2/4 s2*5 \cTime 4/4 s1 \cTime 2/4 s2 \bar || \break
  \cTime 4/4 s1
}

mel = \relative c'' {
  | c2 | c | c | c | R | R
  | c2 | c | c c4 | c2 | c | R | R
  | c2 | c | c c4 | c2 | c c4 | c2 c | R
  | c2 | c | c c4 | c2 | c c4 | c2. | c4 c | c2 c4 | c2 | c | R1 | R2
  | c2 | c | c | c | R1 | R2
  | c1
}

realignTimeSignatures = {
  \override Staff.TimeSignature.break-align-symbol = ##f
  \override Staff.TimeSignature.X-offset = #ly:self-alignment-interface::x-aligned-on-self
  \override Staff.TimeSignature.self-alignment-X = #CENTER
  \override Staff.TimeSignature.after-line-breaking =
  #(lambda (grob)
 (if (= (ly:item-break-dir grob) RIGHT)
 (ly:grob-translate-axis! grob 5.5 X)))
}

realignTimeSignaturesII = {
  \override Staff.TimeSignature.after-line-breaking =
  #(lambda (grob)
 (if (not (= (ly:item-break-dir grob) RIGHT))
 (begin
  (ly:grob-set-property! grob 'break-align-symbol #f)
  (ly:grob-set-property! grob 'X-offset ly:self-alignment-interface::x-aligned-on-self)
  (ly:grob-set-property! grob 'self-alignment-X CENTER
}

perStaff = {
 \override Staff.BarLine #'stencil =
#(lambda (grob)
  (let ((default-bar-glyph? (equal? (ly:grob-property grob 'glyph) |)))
  (if default-bar-glyph?
(begin
  (ly:grob-set-property! grob 'bar-extent '(1 . 2))
  ;(ly:grob-set-property! grob 'extra-offset '(0 . 1))
  (ly:bar-line::print grob))
(ly:bar-line::print grob
  \realignTimeSignatures
  % \set Score.proportionalNotationDuration = #(ly:make-moment 1/4)
  \override Score.SpacingSpanner.strict-note-spacing = ##t
}

#(set-global-staff-size 16.5)

\paper {
  left-margin = 15\mm
  right-margin = 15\mm
}

\score {
  \new Staff  \global \perStaff \mel 
  \layout {
\context {
  \Staff
  \override BarLine.space-alist.next-note = #'(semi-fixed-space . 0)
  \override TimeSignature.style = #'single-digit
  % \override TimeSignature.break-visibility = #end-of-line-invisible
}
  }
}___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: repeated _\markup{} at same distance from staff...?

2015-05-07 Thread Phil Holmes

\override TextScript.padding = #5

Will take you some way to what you want, I think.

BTW - I think the second note should be G, not A?

--
Phil Holmes


- Original Message - 
From: B~M

To: lilypond-user@gnu.org
Sent: Thursday, May 07, 2015 12:00 PM
Subject: repeated _\markup{} at same distance from staff...?


Dear ALL, at the risk of great embarrassment, I cannot seem to find what 
must be a simple
command to set _\markup{} at a constant offset from the staff, rather than 
following the music
up and down etc. I've attached my example which is a simple SATB harmony 
showing only the Soprano and
Bass. The chord indications (shown int he first bar only) are the symbols I 
want to all be at the same distance from the

staff, not the notes.
There seems to be functions to do this for dynamics to be offset a constant 
distance from the staff, but I could

not find a similar command for _\markup (or alternatively ^\markup{}).
Any examples or pointers to the manual ?


Paul



___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user 



___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Custom headers: testing for the first page of a piece (not of a bookpart or book)?

2015-05-07 Thread Leah Velleman
Dear all,

I'm trying to set up custom book headers such that, if a piece runs over a
page break, the header on the second and subsequent pages will say PIECE
(continued).

Lilypond has predefined procedures to check whether a page is the first
page of a *book,* or the first page of a *bookpart.* But it lacks a
procedure to check whether a page is the first page of a *piece, *which is
what I need*.*

One solution would be to enter every piece as a separate bookpart and use
the predefined procedure part-first-page. But I'd rather not do that,
because I would like for pieces to be able to begin midway down a page, and
according to the manual bookparts always begin with a page break.

Suggestions?

Thanks,
Leah
___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user