Survey on the use of \transparent in markups

2013-08-30 Thread Mike Solomon
Hey all,

Do any of you have scores where you use the \transparent command in markups?  
For example,

{
  c''4^\markup \transparent \draw-circle #10 #1 ##f r4 c''2^"foo" |
}
I'm doing some work on development and it would be useful to see how 
\transparent is used in real scores.

Cheers,
MS___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


Re: "Unbound variable" error in Scheme code after switch to 2.17

2013-08-30 Thread Robert Schmaus



http://lilypond.1069038.n5.nabble.com/Pseudo-handwritten-font-tt142117.html#a147230

Does it help?

-Harm



Hi Harm,

it does indeed! Thanks a lot! I should have searched the archives more 
thoroughly, I guess.


Best,
Robert



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


Re: Getting xpdf point-and-click to go back to existing emacs window

2013-08-30 Thread David Kastrup
Nick Payne  writes:

> I've been setting up emacs and xpdf for use with lilypond 17.25 on
> Ubuntu 13.04, using emacs 24.3, and the Debian install files for xpdf
> 3.03 and libpoppler19. Most things seem to be working - I have syntax
> highlighting, I can run Lilypond with C-c C-l, and C-c C-s opens the
> PDF output in xpdf. But when I click on a hyperlink in the PDF output,
> what happens is that a new  emacs window opens with another copy of
> the ly source file and the cursor is positioned there. If I click on
> another hyperlink, yet another emacs window with yet another copy of
> the source opens...and so on.
>
> What do I need to configure to get the hyperlink to go to the ly
> source file that I already have open in emacs? I followed the
> instructions at
> http://www.lilypond.org/doc/v2.17/Documentation/usage/configuring-the-system-for-point-and-click
> to do the configuration for emacs and xpdf.

Put

(server-start)

in your personal .emacs file.

-- 
David Kastrup


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


2nd time only

2013-08-30 Thread Simon Bailey
hi,  

i'm typesetting a piano piece for a young composer, and he has a descrescendo 
in one repetition which should only be played the second time.

in his score, it's labelled "2. x: >" (see attached original-snippet.png). this 
is perfectly comprehensible for anybody who speaks german, i'm not sure if 
anyone else would understand it though… what would be the most international 
way of writing this? my current ideas are "2nd x:" or some abbreviation of 
"[solo] seconda volta" (probably \markup { \concat { "solo 2" \super "a" " 
x."}} ).

does anyone have any other suggestions?

regards,
sb

--  
Simon Bailey
+43/699/190 631 25



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


Re: 2nd time only

2013-08-30 Thread Simon Bailey
please pardon the double post, i forgot the attachment… :)

--  
Simon Bailey
+43/699/190 631 25


On Friday, 30 August 2013 at 11:00, Simon Bailey wrote:

> hi,  
>  
> i'm typesetting a piano piece for a young composer, and he has a descrescendo 
> in one repetition which should only be played the second time.
>  
> in his score, it's labelled "2. x: >" (see attached original-snippet.png). 
> this is perfectly comprehensible for anybody who speaks german, i'm not sure 
> if anyone else would understand it though… what would be the most 
> international way of writing this? my current ideas are "2nd x:" or some 
> abbreviation of "[solo] seconda volta" (probably \markup { \concat { "solo 2" 
> \super "a" " x."}} ).
>  
> does anyone have any other suggestions?
>  
> regards,
> sb
>  
> --  
> Simon Bailey
> +43/699/190 631 25


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


Re: 2nd time only

2013-08-30 Thread Phil Holmes
- Original Message - 
From: "Simon Bailey" 

To: "lilypond-user" 
Sent: Friday, August 30, 2013 10:00 AM
Subject: 2nd time only



hi,

i'm typesetting a piano piece for a young composer, and he has a 
descrescendo in one repetition which should only be played the second 
time.


in his score, it's labelled "2. x: >" (see attached original-snippet.png). 
this is perfectly comprehensible for anybody who speaks german, i'm not 
sure if anyone else would understand it though… what would be the most 
international way of writing this? my current ideas are "2nd x:" or some 
abbreviation of "[solo] seconda volta" (probably \markup { \concat { "solo 
2" \super "a" " x."}} ).


does anyone have any other suggestions?

regards,
sb

--
Simon Bailey
+43/699/190 631 25



No attachment.  The normal way of saying this is to use "2nd time only" in 
my experience.


--
Phil Holmes 



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


Re: 2nd time only

2013-08-30 Thread Urs Liska

Am 30.08.2013 11:02, schrieb Simon Bailey:

please pardon the double post, i forgot the attachment... :)

--
Simon Bailey
+43/699/190 631 25


On Friday, 30 August 2013 at 11:00, Simon Bailey wrote:


hi,
  
i'm typesetting a piano piece for a young composer, and he has a descrescendo in one repetition which should only be played the second time.
  
in his score, it's labelled "2. x: >" (see attached original-snippet.png). this is perfectly comprehensible for anybody who speaks german, i'm not sure if anyone else would understand it though... what would be the most international way of writing this? my current ideas are "2nd x:" or some abbreviation of "[solo] seconda volta" (probably \markup { \concat { "solo 2" \super "a" " x."}} ).
  
does anyone have any other suggestions?

Hm, difficult.

I'd suggest _not_ to use English except the score is specifically meant 
for such an international market.
If you have problems with German and don't find a language-agnostic 
solution I find Italian still the most appropriate language.


OTOH I wouldn't consider "2. x" a problem (but maybe that's because I 
_am_ German ...). But please use a lowercase x (as you wrote in your 
message, but different from the png).


And what about "2. *" ?

HTH
Urs
  
regards,

sb
  
--

Simon Bailey
+43/699/190 631 25




___
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


Re: 2nd time only

2013-08-30 Thread David Kastrup
Simon Bailey  writes:

> please pardon the double post, i forgot the attachment… :)
>
> --  
> Simon Bailey
> +43/699/190 631 25
>
>
> On Friday, 30 August 2013 at 11:00, Simon Bailey wrote:
>
>> hi,  
>>  
>> i'm typesetting a piano piece for a young composer, and he has a 
>> descrescendo in one repetition which should only be played the second time.
>>  
>> in his score, it's labelled "2. x: >" (see attached original-snippet.png). 
>> this is perfectly comprehensible for anybody who speaks german, i'm not sure 
>> if anyone else would understand it though… what would be the most 
>> international way of writing this? my current ideas are "2nd x:" or some 
>> abbreviation of "[solo] seconda volta" (probably \markup { \concat { "solo 
>> 2" \super "a" " x."}} ).
>>  
>> does anyone have any other suggestions?

You use an X here.  That's the wrong character.  Try using × instead,
either writing it directly or as \markup \char ##xd7


-- 
David Kastrup


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


Re: Getting xpdf point-and-click to go back to existing emacs window

2013-08-30 Thread Nick Payne

On 30/08/13 18:54, David Kastrup wrote:

Nick Payne  writes:


I've been setting up emacs and xpdf for use with lilypond 17.25 on
Ubuntu 13.04, using emacs 24.3, and the Debian install files for xpdf
3.03 and libpoppler19. Most things seem to be working - I have syntax
highlighting, I can run Lilypond with C-c C-l, and C-c C-s opens the
PDF output in xpdf. But when I click on a hyperlink in the PDF output,
what happens is that a new  emacs window opens with another copy of
the ly source file and the cursor is positioned there. If I click on
another hyperlink, yet another emacs window with yet another copy of
the source opens...and so on.

What do I need to configure to get the hyperlink to go to the ly
source file that I already have open in emacs? I followed the
instructions at
http://www.lilypond.org/doc/v2.17/Documentation/usage/configuring-the-system-for-point-and-click
to do the configuration for emacs and xpdf.

Put

(server-start)

in your personal .emacs file.


Thanks. That fixes it. Should this not be documented somewhere? I didn't 
find anything in the documentation, and a Google search for


"server-start" site:.lilypond.org

doesn't return any hits.

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


Re: Getting xpdf point-and-click to go back to existing emacs window

2013-08-30 Thread David Kastrup
Nick Payne  writes:

> On 30/08/13 18:54, David Kastrup wrote:
>> Nick Payne  writes:
>>
>>> I've been setting up emacs and xpdf for use with lilypond 17.25 on
>>> Ubuntu 13.04, using emacs 24.3, and the Debian install files for xpdf
>>> 3.03 and libpoppler19. Most things seem to be working - I have syntax
>>> highlighting, I can run Lilypond with C-c C-l, and C-c C-s opens the
>>> PDF output in xpdf. But when I click on a hyperlink in the PDF output,
>>> what happens is that a new  emacs window opens with another copy of
>>> the ly source file and the cursor is positioned there. If I click on
>>> another hyperlink, yet another emacs window with yet another copy of
>>> the source opens...and so on.
>>>
>>> What do I need to configure to get the hyperlink to go to the ly
>>> source file that I already have open in emacs? I followed the
>>> instructions at
>>> http://www.lilypond.org/doc/v2.17/Documentation/usage/configuring-the-system-for-point-and-click
>>> to do the configuration for emacs and xpdf.
>> Put
>>
>> (server-start)
>>
>> in your personal .emacs file.
>
> Thanks. That fixes it. Should this not be documented somewhere? I
> didn't find anything in the documentation, and a Google search for
>
> "server-start" site:.lilypond.org
>
> doesn't return any hits.

Well, it is documented somewhere:
http://www.gnu.org/software/emacs/manual/html_node/emacs/Emacs-Server.html>.
Arguably, it may be somewhat optimistic for the LilyPond documentation
to assume that prospective Emacs users would already have catered to
having a working emacs-server setup.

-- 
David Kastrup


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


Re: 2nd time only

2013-08-30 Thread Simon Bailey
On Friday, 30 August 2013 at 11:13, David Kastrup wrote:
> You use an X here. That's the wrong character. Try using × instead,
> either writing it directly or as \markup \char ##xd7

david,

this is the original score the composer sent me from finale. i used \markup { 
\normal-text "2. ×:" } (see snipped png).

urs:
the composer titled the piece "Piano Piece 3" so i don't think there should be 
a problem using english. i'll see what he thinks…
--  
Simon Bailey
+43/699/190 631 25


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


Re: 2nd time only

2013-08-30 Thread Urs Liska

Am 30.08.2013 12:11, schrieb Simon Bailey:

On Friday, 30 August 2013 at 11:13, David Kastrup wrote:

You use an X here. That's the wrong character. Try using × instead,
either writing it directly or as \markup \char ##xd7

david,

this is the original score the composer sent me from finale. i used \markup { \normal-text 
"2. ×:" } (see snipped png).

urs:
the composer titled the piece "Piano Piece 3" so i don't think there should be 
a problem using english. i'll see what he thinks...
If the title is English you surely can write "2nd time only" as Phil 
suggested.

What about other performance indications throughout the piece?

Urs

--
Simon Bailey
+43/699/190 631 25




___
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


Re: 2nd time only

2013-08-30 Thread Francois Planiol
Hello:

\alternative{blabla}

or italian (that remains the international musician lang.) Solo 2a volta

2013/8/30, Urs Liska :
> Am 30.08.2013 12:11, schrieb Simon Bailey:
>> On Friday, 30 August 2013 at 11:13, David Kastrup wrote:
>>> You use an X here. That's the wrong character. Try using в instead,
>>> either writing it directly or as \markup \char ##xd7
>> david,
>>
>> this is the original score the composer sent me from finale. i used
>> \markup { \normal-text "2. ×:" } (see snipped png).
>>
>> urs:
>> the composer titled the piece "Piano Piece 3" so i don't think there
>> should be a problem using english. i'll see what he thinks...
> If the title is English you surely can write "2nd time only" as Phil
> suggested.
> What about other performance indications throughout the piece?
>
> Urs
>> --
>> Simon Bailey
>> +43/699/190 631 25
>>
>>
>>
>>
>> ___
>> 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


Re: Put the text on the left above a centered note

2013-08-30 Thread Tommaso Gordini
Thank you, Thomas.
In fact, I was interested in having the expressions "Fa" and "Sib" on the
left of the bae, and not centered as they are now.

But let's assume that they should be good to me as they are: there is no
way to have the expressions a little closer to the pentagram and not so
high? What do I have to change in the code?

Grazie e ciao
Tommaso


2013/8/27 Thomas Morley 

> "
>
> 2013/8/27 Tommaso Gordini :
> > Hello to all,
> > is possible to put some text to the left above a centered note in a bar?
> >
> > I have to write something like that that you see below. If you think that
> > everything is OK, no problem.
> >
> > Ciao
> > Tommaso
> >
> > Here's the code:
> >
> > %-%
> >
> > \version "2.16.2"
> >
> >
> > #(define (sort-by-X-coord sys grob-lst)
> >
> > "Arranges a list of grobs in ascending order by their X-coordinates"
> >
> > (let* ((X-coord (lambda (x) (ly:grob-relative-coordinate x sys X)))
> >
> > (comparator (lambda (p q) (< (X-coord p) (X-coord q)
> >
> > (sort grob-lst comparator)))
> >
> > #(define (find-bounding-grobs note-column grob-lst)
> >
> > (let* ((sys (ly:grob-system note-column))
> >
> > (X-coord (lambda (n) (ly:grob-relative-coordinate n sys X)))
> >
> > (note-column-X (X-coord note-column)))
> >
> > (define (helper lst)
> >
> > (if (and (< (X-coord (car lst)) note-column-X)
> >
> > (> (X-coord (cadr lst)) note-column-X))
> >
> > (cons (car lst) (cadr lst))
> >
> > (if (null? (cddr lst))
> >
> > (cons note-column note-column)
> >
> > (helper (cdr lst)
> >
> > (helper grob-lst)))
> >
> >
> > #(define (read-out l1 l2)
> >
> > (define (helper ls1 ls2 ls3)
> >
> > "Filters all elements of ls1 from ls2 by their grob-name and appends it
> to
> > ls3"
> >
> > (let ((grob-name-proc (lambda (x) (assq-ref (ly:grob-property x 'meta)
> > 'name
> >
> > (if (null? ls1)
> >
> > ls3
> >
> > (helper
> >
> > (cdr ls1)
> >
> > ls2
> >
> > (append ls3 (filter (lambda (x) (eq? (car ls1) (grob-name-proc x)))
> > ls2))
> >
> > (helper l1 l2 '()))
> >
> > #(define ((center-note-column x-offs) grob)
> >
> > (let* ((sys (ly:grob-system grob))
> >
> > (elements-lst (ly:grob-array->list (ly:grob-object sys 'all-elements)))
> >
> > (grob-name (lambda (x) (assq-ref (ly:grob-property x 'meta) 'name)))
> >
> > (X-extent (lambda (q) (ly:grob-extent q sys X)))
> >
> > ;; NoteColumn
> >
> > (note-column-coord (ly:grob-relative-coordinate grob sys X))
> >
> > (grob-ext (X-extent grob))
> >
> > (grob-length (interval-length grob-ext))
> >
> > ;; NoteHeads
> >
> > (note-heads (ly:grob-object grob 'note-heads))
> >
> > (note-heads-grobs (if (not (null? note-heads))
> >
> > (ly:grob-array->list note-heads)
> >
> > '()))
> >
> > (one-note-head (if (not (null? note-heads-grobs))
> >
> > (car note-heads-grobs)
> >
> > '()))
> >
> > (one-note-head-length (if (not (null? one-note-head))
> >
> > (interval-length (X-extent one-note-head)) ;; NB
> >
> > 0))
> >
> > ;; Stem
> >
> > (stem (ly:grob-object grob 'stem))
> >
> > (stem-dir (ly:grob-property stem 'direction))
> >
> > (stem-length-x (interval-length (X-extent stem))) ;; NB
> >
> > ;; DotColumn
> >
> > (dot-column (ly:note-column-dot-column grob))
> >
> > ;; AccidentalPlacement
> >
> > (accidental-placement (ly:note-column-accidentals grob))
> >
> > ;; Arpeggio
> >
> > (arpeggio (ly:grob-object grob 'arpeggio))
> >
> > ;; Rest
> >
> > (rest (ly:grob-object grob 'rest))
> >
> > ;; BassFigure + ChordName
> >
> > (other-grobs-to-center
> >
> > ;; TODO
> >
> > ;; Not sure: What belongs to the list, what not?
> >
> > (list 'BassFigure
> >
> > ;'BassFigureAlignment
> >
> > ;'BassFigureAlignmentPositioning
> >
> > 'BassFigureBracket
> >
> > 'BassFigureContinuation
> >
> > ;'BassFigureLine
> >
> > 'ChordName
> >
> > 'FretBoard
> >
> > ))
> >
> > (all-other-grobs (read-out other-grobs-to-center elements-lst))
> >
> > (condensed-other-grobs
> >
> > (remove
> >
> > (lambda (x)
> >
> > (not (= (ly:grob-relative-coordinate x sys X)
> >
> > note-column-coord)))
> >
> > all-other-grobs))
> >
> > ;; Grobs to center between
> >
> > (args (list 'BarLine
> >
> > 'Clef
> >
> > 'KeySignature
> >
> > 'KeyCancellation
> >
> > 'TimeSignature))
> >
> > (grob-lst (read-out args elements-lst))
> >
> > (new-grob-lst (remove (lambda (x) (interval-empty? (X-extent x)))
> grob-lst))
> >
> > (sorted-grob-lst (sort-by-X-coord sys new-grob-lst))
> >
> > ;; Bounds
> >
> > (bounds (find-bounding-grobs grob sorted-grob-lst))
> >
> > (left (cdr (X-extent (car bounds
> >
> > (right (car (X-extent (cdr bounds
> >
> > ;;(bounds-coord (cons left right)) ;; delete
> >
> > (basic-offset
> >
> > (- (average left right)
> >
> > (interval-center (X-extent grob))
> >
> > (* -1 x-offs)))
> >
> > (dir-correction
> >
> > (if (> grob-length one-note-head-length)
> >
> > (* stem-dir (* -2 stem-length-x) grob-length)
> >
> > 0))
> >
> > ) ;; End of Defs in let*
> >
> > ;; Calculation
> >
> > (begin
> >
> > ;; (display "\n\tacciden

Conditionally setting variables in \paper section

2013-08-30 Thread Daniel Thompson
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

Hi Folks

I am trying to modify an shared include file the allow it to switch
the score that uses it between A4 "normal" mode and an cut-down A5
form (for an e-book reader).

I can make set-paper-size conditional using a $(if construct but can't
find a way to conditionally set the margins. I've constructed a tiny
example showing what I have trouble with (it no longer shows my motive
but does show my problem).

- --- cut here ---
\version "2.16.2"
\paper {
$(if (ly:get-option 'binder-margins) #{
  left-margin = 20
  line-width = 180
#})
}
\score \relative { c4 d e f g a b c }
- --- cut here ---

When run "lilypond -dbinder-margins" it issues the following:
- --- cut here ---
test.ly:6:14: error: syntax error, unexpected '=', expecting end of input
  left-margin
  = 20
test.ly:5:0: error: error in #{ ... #}

$(if (ly:get-option 'binder-margins) #{
test.ly:5:0: error: syntax error, unexpected STRING_IDENTIFIER

$(if (ly:get-option 'binder-margins) #{
- --- cut here ---

It works fine without the -dbinder-margins (but then I don't get the
margins set up for a ring binder).

I've tried many "random" things including replacing the lilypond-style
assignment with #(define left-margin 20) but just cannot make it work.

Any ideas?


Thanks.

Daniel.
-BEGIN PGP SIGNATURE-
Version: GnuPG v2.0.19 (GNU/Linux)
Comment: Using GnuPG with Thunderbird - http://www.enigmail.net/

iD8DBQFSIJt2rr8Ifkjg/MwRArPqAJ4upYPsnfv12btOzAkVsSC/TCp4RwCfYe1b
6nkrD0jKONnpH11uM+hIWm8=
=del5
-END PGP SIGNATURE-

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


Re: Conditionally setting variables in \paper section

2013-08-30 Thread David Kastrup
Daniel Thompson  writes:

> Hi Folks
>
> I am trying to modify an shared include file the allow it to switch
> the score that uses it between A4 "normal" mode and an cut-down A5
> form (for an e-book reader).
>
> I can make set-paper-size conditional using a $(if construct but can't
> find a way to conditionally set the margins. I've constructed a tiny
> example showing what I have trouble with (it no longer shows my motive
> but does show my problem).
>
> --- cut here ---
> \version "2.16.2"
> \paper {
> $(if (ly:get-option 'binder-margins) #{
>   left-margin = 20
>   line-width = 180
> #})
> }

Well, inside of #{ ... #} there is music by default.  If you want to
have an output block, you need to place it there.  For me,

\version "2.16.2"
\paper {
$(if (ly:get-option 'binder-margins) #{
  \paper {
left-margin = 20
line-width = 5
  }
#})
}
\score { \relative { c4 d e f g a b c } }

appears to do the trick.

-- 
David Kastrup


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


system and staff spacing

2013-08-30 Thread Gilberto Agostinho
Hello all,

I have been trying to modify the distance between systems and staves, but I
found it somehow difficult to understand. I am using the following code (on
which I added the a \paper snippet):

\version "2.17.24"

\paper {

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

  score-system-spacing =

#'((basic-distance . 12)

(minimum-distance . 6)

(padding . 1)

(stretchability . 12))

}

\new Staff {

  \repeat unfold 200 { a4 b c' d' }

}


I was playing with the values of the snippet above, and the only line that
affects something is the *system-system-spacing. *All parameters of
*score-system-spacing
*seem to do nothing here, even though it is defined in the reference as
"the distance between the last system of a score and the first system of
the score that follows it, when no (title or top-level) markup exists
between them."


Also, in another score of mine (which has more than one staff per system,
and it has several systems per page), I altered the *system-system-spacing
#'basic-distance* to various values but couldn't see any difference.


Could someone please direct me to a page where I can learn more about this?


Thanks a lot!

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


Re: system and staff spacing

2013-08-30 Thread Pierre Perol-Schneider
2013/8/30 Gilberto Agostinho 

> Hello all,
>

Hi Gilberto,


>
>  I altered the *system-system-spacing #'basic-distance* to various values
> but couldn't see any difference.
>
>
> 'Cause that has changed in 2.17.
Use :

system-system-spacing = #'((basic-distance . 8) (padding . 1))

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


Re: [slightly OT] polymeter (was "Re: chopin example")

2013-08-30 Thread David Rogers
Kieren MacMillan  writes:

> This thread reminded me that I wanted to let you all see the first few pages 
> of a recent commission, which ended up requiring polymetrics across line 
> breaks, etc.
>
> I love the way it turned out, and I can't imagine how difficult it would be 
> to engrave in something other than Lilypond.  =)

A. I like the music, thanks for showing it;

B. It's both very nice looking AND very clear and easy to read. I'd
   certainly be happy (when asked to play something) to receive a score
   as lovely as that one.

-- 
David R

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


Re: Strummed chord as straight line arpeggio

2013-08-30 Thread Robin Bannister

Peter Bjuhr" wrote:
My starting point was that this could be achieved by using some kind of 
alternative arpeggio, but so far this has not been a successful approach.


Here is a rough sketch of such an approach, 
without considering collisions and other subtleties.


It has its own arrowdir parameter, bypassing arpeggio-direction.


Cheers, 
Robin\version "2.16"

#(define ((strum arrowdir) grob) 
  (let* (
(longer 0.5)
(closer 0.5)
(chord-lo-hi (ly:grob-property grob 'positions))
(line-lo-hi (interval-widen chord-lo-hi longer))
(len (interval-length line-lo-hi))
)
(if (not (= 1 (abs arrowdir))) #f ; only for UP or DOWN
  (grob-interpret-markup grob 
(markup 
  #:translate (cons closer (interval-center line-lo-hi)) 
  #:scale (cons 1 (- arrowdir))
  #:translate (cons 0 (* -0.5 len)) 
  #:combine 
  #:draw-line (cons 0 len)
  #:tiny #:arrow-head Y DOWN #t)


strumUP = \once \override Arpeggio #'stencil = #(strum UP)
strumDOWN = \once \override Arpeggio #'stencil = #(strum DOWN)


{
  \strumUP4 \arpeggio 
  \strumDOWN  4 \arpeggio 
}
<>___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user


polymetics in piano

2013-08-30 Thread Mark Stephen Mrotek
Hello:

 

In a previous thread
(http://lists.gnu.org/archive/html/lilypond-user/2013-08/msg00673.html), a
Chopin Nocturne was discussed that has polymetrics starting on the second
page of the score.  I have looked at the .ly file (attached) and have a
minimal understanding of the "\set Timing.measureLength = #(ly:make-moment 4
8)" command. Where in the manual can I find a detailed explanation -
especially the role of the two numbers?

 

My particular goal is to write one 9/4 measure against three 3/4 measures. 

 

Thank you.

 

Mark

\version "2.16.2"
\pointAndClickOff
#(ly:set-option 'midi-extension "mid")

\paper {
  top-margin = 1.5\cm
  bottom-margin = 1.5\cm
  left-margin = 1.5\cm
  right-margin = 1.5\cm
}

\header {
  title = "NOCTURNE"
  subsubtitle = \markup \center-column \normal-text {
"Fassung nach dem Autograph"
"Komponiert Frühjahr 1830"
  }
  opus = "KK IVa Nr.16"
}

\layout {
  \context {
\Score
\remove "Timing_translator"
\remove "Default_bar_line_engraver"
  }
  \context {
\Staff
\consists "Timing_translator"
\consists "Default_bar_line_engraver"
  }
  \context {
\Dynamics
\consists "Timing_translator"
\consists "Default_bar_line_engraver"
  }
}

RH = \relative c' {
  \clef treble
  \key cis \minor
  \time 2/2
  <<
{
  4 b'8\rest 8 4 b8\rest 8 |
  4 gis
}
\\
{
  s4. cis,4. s8 cis~ | cis4 
}
  >>
  r2 |
  <<
{
  4 b'8\rest 8 4 b8\rest 8 |
  4 gis
}
\\
{
  s4. cis,4. s8 cis | cis4 
}
  >>
  r2 |
  
  gis''2 fis\trill |
  gis cis, |
  cis' cis8.[ b16] \times 2/3 { cis8( b a) } |
  a2 r |
  gis dis |
  e fis4 cis |
  \grace e4 dis2.~\trill dis8 cis |
  dis2 r4 gis, |
  gis'2 fis2*1/2\trill
  \stemUp \teeny e8*1/2 fis gis a \normalsize \stemNeutral |
  gis2 cis,4 cis'-. |
  \ottava #1 \set Staff.ottavation = #"8"
  cis'8*2/3[ d b] a[ gis fis] eis16 d
  \ottava #0
  cis16*2/3[ b a] gis[ fis eis] d[ cis b] |
  a1 |
  d,2 d'4. cis8 |
  bis4\trill bis8 b32( c cis dis e4 dis8) cis |
  gis r a2-> gis4 |
  cis,2 r |
  \pageBreak
  
   PAGE2 
  \time 3/4
  \set Timing.measureLength = #(ly:make-moment 4 8)
  \scaleDurations 2/3 {
e4 fis8[ gis a b] |
cis4 d8[ cis] b4 |
e4 d8[ cis b a] |
cis4 d8[ cis] b4 |
  }
  
  \time 4/4
  \set Timing.measureLength = #(ly:make-moment 4 4)
   q8. q16 4  |
  \acciaccatura 8 8. 16 8. 16 2 |
  
  \time 3/4
  \set Timing.measureLength = #(ly:make-moment 4 8)
  \scaleDurations 2/3 {
cis,4 dis8[ eis fis gis] |
a4 b8[ a8] gis4 |
cis4 b8[ a gis cis,] |
a'4 b8[ a] fis4 |
  }
  
  \time 4/4
  \set Timing.measureLength = #(ly:make-moment 4 4)
   q8. q16 4  |
  \acciaccatura 8 8. 16 8. 16 2 |
  cis'4\trill bis8 cis e4. dis8 |
  
  \time 3/4
  \set Timing.measureLength = #(ly:make-moment 4 8)
  \scaleDurations 2/3 {
dis,8[ cis'] cis4 cis |
bis dis2 |
\times 2/3 { gis,8 ais gis } fisis4 eis |
eis2 dis4 |
dis8. dis'16 eis,4 fisis |

gis8\noBeam gis'( bis,4. cis8) |
dis2.~ |
dis4 r r |

\change Staff="lh"
\set Timing.measureLength = #(ly:make-moment 4 8)
\stemUp
r4 dis,,8*2/3 fisis bis ais4 |
r8*2/3^( dis, gis) bis4. gis8 |
r4 dis8*2/3 fisis dis' cis4 |
r8*2/3^( dis, gis) bis4. gis8 |
s4 dis8*2/3 fisis bis ais4 |
r8*2/3 dis, gis bis4. gis8 |
r4 dis8*2/3 fisis bis ais4 |
r8*2/3 dis, gis bis4. gis8 |
r4 dis8*2/3 fisis bis ais4 |
  }
  
  \time 4/4
  \set Timing.measureLength = #(ly:make-moment 4 4)
  gis,,8*2/3^( dis''[ bis'] gis) bis
  \change Staff="rh"
  \set Timing.measureLength = #(ly:make-moment 4 4)
  dis8*2/3
  \stemNeutral
  bis' gis bis dis gis bis |
  gis'2.\fermata gis,,4( |
  \pageBreak
  
   PAGE 3 
  gis'2)^\markup "a tempo primo" fis4\trill e16 fis gis a |
  gis2( cis,4) cis' |
  \ottava #1
  \set Staff.ottavation = #"8"
  cis'8*2/3 d b a gis fis eis16[ d]
  \ottava #0
  cis16*2/3[ b a] gis[ fis eis] d[ cis b] |
  a2 a' |
  gis dis |
  e2*7/8\trill \stemUp \teeny dis8*1/4 e
  \stemNeutral \normalsize
  fis4 cis |
  dis8*2/3 [ e dis cisis dis e]
  \times 4/5 { fis16( gis a ais b) }
  \times 4/5 { bis( cis cisis dis fis) } |
  
  e2 dis4 cis( |
  bis) a( gis) dis |
  e fis8 gis fis4 cis |
  \grace { cis8[ dis] } dis1*15/16\trill \teeny \stemUp cis8*1/2 |
  \normalsize \stemNeutral
  cis2
  \set fontSize=#-4
  \times 8/18 {
dis16[( e fis gis a b cis dis cis b a gis fis e\! dis cis b a])
  } |
  \set fontSize=#0
  gis2
  \set fontSize=#-4
  \times 8/35 {
a16[ b cis dis e fis gis
\once \override Stem #'minimum-X-extent = #'(0 . 0.6) a
\ottava #1 \set Staff.ottavation = #"8"
b cis dis e fis gis a b cis
dis cis b a gis fis e dis cis b a
\ottava #0
gis fis e dis cis b a]
  } |
  \set fontSize=#0
  gis2
  \set fontSize=#-4
  \times 4/11 {
a8[( b cis dis e fis e dis cis b a]) |
  }
  \set fontSize=#0
  gis2
  \set fontSize=#-4
  \times 4/13 {
a8[( b cis dis e fis gis fis e dis-. cis-. b-. a-.]) |