[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Proposed changes to LSR Snippet 906
From: |
tisimst |
Subject: |
Proposed changes to LSR Snippet 906 |
Date: |
Tue, 20 Jan 2015 10:13:07 -0700 (MST) |
LSR Maintainers,
I'd like to propose the following changes to make LSR snippet 906
<http://lsr.di.unimi.it/LSR/Item?id=906> "Orchestral grouping with a
postscript brace"
Current output (using postscript code):
<http://lilypond.1069038.n5.nabble.com/file/n170797/Image.image>
Proposed code and output (using the built-in braces):
%< ------------------------------------ START SNIP
\version "2.18.2"
%% http://lsr.di.unimi.it/LSR/Item?id=906
% by Kieren MacMillan and P.P.Schneider.
% => http://lists.gnu.org/archive/html/lilypond-user/2013-03/msg00260.html
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% LSR workaround:
#(set! paper-alist (cons '("snippet" . (cons (* 90 mm) (* 120 mm)))
paper-alist))
\paper {
#(set-paper-size "snippet")
tagline = ##f
}
\markup \vspace #1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%here starts the snippet:
someMusic = {
\tempo "Andante."
\time 3/4
\key c \minor
c'2. r8
}
\paper {
indent = 40
}
\layout {
\context {
\Staff
\override InstrumentName.font-size = #-1
\override InstrumentName.extra-offset = #'(6 . 0)
}
\context {
\StaffGroup
\name ViolinGroup
\alias StaffGroup
systemStartDelimiter = #'SystemStartBrace
}
\context {
\StaffGroup
\name WindGroup
\alias StaffGroup
systemStartDelimiter = #'SystemStartBracket
\override SystemStartBracket.collapse-height = #1
}
\context {
\StaffGroup
\name StringGroup
\alias StaffGroup
\accepts ViolinGroup
systemStartDelimiter = #'SystemStartBracket
}
\context {
\StaffGroup
\name OrchestraGroup
\accepts WindGroup
\accepts StringGroup
\remove "System_start_delimiter_engraver"
instrumentName = \markup {
\lower #0.75 \rotate #90 "Orchestra" \hspace #1
\left-brace #175 \hspace #5
}
}
\context {
\GrandStaff
\remove "System_start_delimiter_engraver"
\accepts OrchestraGroup
\accepts StaffGroup
\accepts VocalGroup
}
\context {
\StaffGroup
\name VocalGroup
\alias StaffGroup
systemStartDelimiter = #'SystemStartBracket
}
}
\score {
\new GrandStaff <<
\new OrchestraGroup <<
\new WindGroup <<
\new Staff \with {
instrumentName = "Oboe"
} \someMusic
>>
\new StringGroup <<
\new ViolinGroup <<
\new Staff \with {
instrumentName = "Violino I"
} \someMusic
\new Staff \with {
instrumentName = "Violino II"
} \someMusic
>>
\new Staff \with {
instrumentName = "Viola"
} { \clef C \someMusic }
>>
>>
\new VocalGroup <<
\new Staff \with {
instrumentName = "Soprano"
} \someMusic
\new Staff \with {
instrumentName = "Alto"
} { \clef C \someMusic }
>>
>>
}
%< ------------------------------------ END SNIP
<http://lilypond.1069038.n5.nabble.com/file/n170797/snippet906-updated.png>
What do you think?
I guess it might also need a new name since it doesn't actually use
postscript anymore... There's probably more that could be done to make this
even more automagic, but I'm leaving it at this for now.
-Abraham
--
View this message in context:
http://lilypond.1069038.n5.nabble.com/Proposed-changes-to-LSR-Snippet-906-tp170797.html
Sent from the User mailing list archive at Nabble.com.
- Proposed changes to LSR Snippet 906,
tisimst <=
- Re: Proposed changes to LSR Snippet 906, Kieren MacMillan, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, tisimst, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, Kieren MacMillan, 2015/01/20
- Message not available
- Re: Proposed changes to LSR Snippet 906, Kieren MacMillan, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, tisimst, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, Thomas Morley, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, tisimst, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, tisimst, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, Kieren MacMillan, 2015/01/20
- Re: Proposed changes to LSR Snippet 906, Pierre Perol-Schneider, 2015/01/21