[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Gnu-music-discuss] cue context?
From: |
Scott Ballantyne |
Subject: |
Re: [Gnu-music-discuss] cue context? |
Date: |
12 Sep 2000 21:33:39 -0000 |
Han-Wen Nienhuys <address@hidden> writes:
>
> address@hidden writes:
> > Well, hmmm.. it turns out my macros only work some of the time... No
> > errors are printed, but sometimes the smaller fonts are used and
> > sometimes they are not. Can anyone shed a clue as to what I did wrong?
>
> example please?
>
See the comments below for where they work and where they don't.
---------------------------------------------------------------
\header{
filename = "elevy.ly";
title = "Concerto";
date = "1947";
composer = "Ernst Levy";
%latexheaders = "mydefs";
}
\paper{
papersize="legal";
}
\include "paper20.ly"
\include "english.ly"
startcue = {
\property Voice.basicStemProperties \push #'stem-length = #6.0
\property Voice.basicNoteHeadProperties \push #'font-size = #-1
\property Voice.basicStemProperties \push #'font-size = #-1
\property Voice.basicBeamProperties \push #'font-size = #-1
\property Voice.basicTextScriptProperties \push #'font-size = #-1
\property Voice.basicSlurProperties \push #'font-size = #-1
\property Voice.basicLocalKeyProperties \push #'font-size = #-1
}
endcue = {
\property basicStemProperties \pop #'stem-length
\property basicNoteHeadProperties \pop #'font-size
\property basicStemProperties \pop #'font-size
\property basicBeamProperties \pop #'font-size
\property basicTextScriptProperties \pop #'font-size
\property basicSlurProperties \pop #'font-size
\property basicLocalKeyProperties \pop #'font-size
}
barfermata = \mark "\\font\\fetafont=feta20\\fetafont\char40";
first = \context Staff \notes\relative c {
\time 4/4;
\clef bass;
\property Voice.basicStemProperties \push #'default-neutral-direction =
#-1
d4.(^"\bf Tranquillo"-\p e8 fs4 )d |
c( [a8 )c ] d2 |
e4.( g8 a4 )c |
d( [c8 )b] [a()g] [e()g] |
a1 | R |
e4.-\mf e8()a2~ |
\time 9/8;
[a8 b8(] [a8 g )e] g4()e~ |
e8\< r8\! b'4~[b8 a(] [g8 e )g] |
\time 4/4;
e4.()d8
c4()e \> |
fs4( [a8 )fs ] <e2 { s4 \! s4 } >
R1 |
a2-\f b8->()a4. |
[b16->(d] )b4.\<~ b8 \! e8~ \times 4/5 { [e16( ds cs a cs] } |
)as2 d! \cr |
~d4 \times 2/3 {[ \! fs8( f )df] } c2~ |
\times 4/5 { [ c8 ef( df bf af ]} )b4. [bf16( g] |
)bf4\cr \! d2 |
<
\context Voice = vone {
cs4 ( b )as gs( )c! |
a1 |
}
\context Voice = vtwo {
s4 s2.\< s8 \!s8 |
}
>
\clef treble;
% This one works properly
\startcue
[a''8--^"Trpts." fs--] e4. d8-- \times 2/3 {[e-- fs-- d--] }
[a'8 fs] e4 \times 2/3{[d8_"\it accelerando"-- e-- fs--]} \times 2/3{
[d-- a'-- fs--]}
[e8-- d--] \times 2/3 {[ e-- fs-- d--]} [a'8-- fs--] \times 2/3 {[e--
fs-- d--]} |
[a'8-- fs--] \times 2/3 {[ e-- fs-- d-- ]} [a'8-- fs--] \times 2/3
{[ e-- fs-- d-- ]} |
\endcue
\clef treble;
e,1^"Solo"_"\bf\it molto f" |
~e4 f( gs )f |
\times 2/3 { [ e8( ds d ] }
\clef bass;
\times 2/3 { [gs, c )d ] }
\clef treble;
e2~ |
e4 d8-> c4. e4 |
fs [a8( )fs] [bf()a] [fs()f] |
[af()g] [e()ef] fs4.
\clef bass;
<
\context Voice = vone {
b,8( )d4 ef,2. |
af2 g |
}
\context Voice = vtwo {
s8 s4 s2.\> s2. \!s4 }
>
d4.(-\p e8 fs4 )d |
c( [ a8 )c ] d2 |
e4.( g8 a4 )c |
d( [ c8 )b] [ a()g ] [e( )g ] |
a2 [c8( d] )e4~ |
e [ fs8( )f ] [e()b] d4~ |
d e()d [b8()d] |
b4.( )a8 g2-"\it cresc." |
~g4 a c2~ |
c4. \clef treble;
d8( e4 )c |
fs2.( )gs4 |
as4.(\f )b8 cs4()as |
gs [ as8()fs] e4. ds8( |
)b'4 d,!2-"dim." e4 |
g [c,8( d ] [e )fs a( )fs ] |
e1 |
d4.()e8 fs2~ |
[ fs8( )a ]
\clef bass;
[ a,() c ] d2~ |
[d8()e ] [e,()g] a2~ |
[a8()c ] [ c,-._"rit." ()d-.] e4 [fs8-.()g-.] |
a2^"\bf Piu mosso" r2 |
\clef treble;
% This one have any effect.
\startcue
[c8-.^"Vln. II" a-.] d4. [e16( g] )a4~ |
[a8 c16( b] [)a8 g-.] [e16( g] )a4 [c16( )d] |
\endcue
\clef bass;
[a,8.^"Solo"_"\it\bf quasi f cresc." b16-.] [c8-. a-.]
\clef treble;
[d-. e16( g] )a4~ |
[ a16 b( a )g ] [ e( g )a8~ ] [a16 df( af c] [ g gf bf )f] |
\time 3/4;
<
\context Voice = vone {
[a!8 af] g2
}
\context Voice = vtwo {
s4\< s4. \!s8-\f
}
>
\time 4/4;
\clef bass;
g,4-\mf af8-. g4 [b16()cs] g4~ |
[g8 e'] \times 4/5 { [ ef16( df b! g b ] } )d4
\clef treble;
f~ |
f8 [ af16()g] e4. g8 [ef16()d8 df16(] |
[)gf8 df] [c16()b f'8~] [f16(e b )ef] [bf( a df )af] |
g8 r8 r2-"\it cresc." g'4 |
af8 g4 [b16( )cs] g4. e'8 |
\times 4/5 { [ ef16( df b! g )b ] } d4 f4. [af,16()g] |
e'4. g,8 [ ef'16()d8 df16(] [)df,8 gf16 df~] |
[df d( g )ef] [e( f c )fs] [e( f bf )fs ] ] [g()af ef a] |
f'4.-\ff e8 ef4 b! |
<
\context Voice = vone {
r16 [f8 e!16] a2\breathe
% This one only works within this voice context
% resuming normal fonts at the !!! mark
\startcue
\clef treble;
bf'4^"Vlns."~ [bf8 bf-.]
}
\context Voice = vtwo {
s4 s4\< s8 \!s8 s4 s4
}
>
% !!! (normal fonts resume, they shouldn't
[gf16()f8 ef16(] [)bf'8-. f-.] r8 bf-. |
[gf16()f8 ef16(] )bf'8-.
\endcue
\clef bass;
a,,8-\ff [ds16^"Solo" ds8 cs16( ]
\clef treble;
[ )a'8 b ]
\startcue
\time 5/8;
r8^"Trpts." b8~ [b8. b16 b b] |
b4 a g8 |
\time 7/8;
r8 b4 [cs8 e16 cs] b4
\time 5/8;
r8 b8~ [b8. b16 b b] |
b4 cs e8 |
\time 6/8;
r8 cs4 b [a16 a] |
\endcue
\clef bass;
\time 5/8;
r8^"Solo" [e,8-\f( fs16 a] )b8 r8 |
}
\score{
\notes \context Voice
{
% \first
\second
% \third
}
\paper
{
\translator{
\StaffContext
\remove "Time_signature_engraver";
}
\translator{
\VoiceContext
\remove "Auto_beam_engraver";
}
\translator {
\ScoreContext
barScriptPadding = #2.0
markScriptPadding = #4.0
barNumberScriptPadding = #15
}
}
}
- [Gnu-music-discuss] cue context?, Scott Ballantyne, 2000/09/12
- [Gnu-music-discuss] Missing legal.ly, beam questions, padding..., Scott Ballantyne, 2000/09/12
- Re: [Gnu-music-discuss] Missing legal.ly, beam questions, padding..., Mats Bengtsson, 2000/09/12
- Re: [Gnu-music-discuss] Missing legal.ly, beam questions, padding..., Han-Wen Nienhuys, 2000/09/12
- Re: [Gnu-music-discuss] Missing legal.ly, beam questions, padding..., Scott Ballantyne, 2000/09/12
- Re: [Gnu-music-discuss] Missing legal.ly, beam questions, padding..., Han-Wen Nienhuys, 2000/09/13
[Gnu-music-discuss] cue context?, Han-Wen Nienhuys, 2000/09/12