I want to write a piece with coda. Now I found out the commands \coda and
\segno. But there are still two questions:
1. How do I get the \coda above the bar line?
2. How do I write "D.S. al Coda"? I would like to have the same sign "\coda"
in this comment. This does't work using \mark, also I cannot place it in the
right position, it is either in front of the bar or afterwards (I have only a
single note in this bar)
Regards Jan Kohnert
------------------------------------------------------------------------
\include "paper13.ly"
\paper {
linewidth = 433.619940\pt
}
\header {
title = "Poison"
composer = "Alice Cooper"
}
melody = \notes \relative c' {
\time 4/4
\key f \major
\clef treble
R1*16
\repeat volta 2 {
r4 f4 f2 | r4 f4 f2 | r4 a4 a2 | r4 g4 a2 | r4 bes4 bes2 | r4 bes4 bes2 | r4
d4 d2 | r4 c4 d2 | ~ d1 |
r8^\segno bes bes bes bes bes g a | bes bes c4 a2 | r8 es' es es es es c d |
es4 es4 \times 2/3 { d c bes } |
c8 c c c c c a b | c c d4 b2 | r8 f' f f f f d e | f4 f e8 d e4 |
f4 d2. | ~ d2 r4 e | f f f8 f ~ f f | ~ f f ~ f e ~ e4 e | f d2. | ~ d2 r2 |
f4 f f8 f ~ f f | ~ f f ~ f e ~ e4 e^\coda | }
\alternative {
{ f4 d2. | ~ d2 r2 | }
{ \property Score.currentBarNumber = #69
f4 d2. | ~ d2 r2 | R1*8
r4 bes4 bes2 | r4 bes4 bes2 | r4 d4 d2 | r4 c4 d2 | ~ d1 \mark "D.S. al Coda"\bar
":|" }
}
\property Score.currentBarNumber = #100
f4 d2.( | ) f2 r2 |
r8 f f f f f d e | f f g4 e2 | r8 f f f f f d e | f4 f \times 2/3 { e d e } |
f8 f f f f f d e | f f g4 e2 | r8 f f f f f d e | f4 f e8 d e4 |
f4 d2. | ~ d2 r4 e | f f f8 f ~ f f | ~ f f ~ f e ~ e4 e | f d2. | ~ d2 r2 |
f4 f f8 f ~ f f | ~ f f ~ f e ~ e4 e |
f4 d2. | ~ d2 r2 \bar "|."
}
gita = \notes {
\time 4/4
\key f \major
\clef treble
\property Voice.autoBeamSettings \override #'(end * * * *) = #(make-moment 1
4)
\property Staff.voltaSpannerDuration = #(make-moment 1 1)
r1 | r1 | d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d'
~ | ) d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d' ~ |
) d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d' ~ | )
d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d' ~ |
) d'8 ( a' d'' d' e'' d' d'' ) a' | ges' ( g' c'' fis' g' c'' e' d' ~ | ) d'8 ( a' d'' d'
e'' d' d'' a' | d' a' e'' d' d'' a' d' ) a' | < d'1 a'1 d''1 > | ~ < d'1 a'1 d''1
> |
\repeat volta 2 {
r1 | r1 | r1 | r1 | r1 | r1 | r1 | r1 |
< d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8
a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > |
< g4. d'4. g'4.^\segno > < es'8 bes'8 es''8 > ~ < es'4 bes'4 es''4 > r4 | < bes4. f'4.
bes'4. > < f8 c'8 f'8 > ~ < f4 c'4 f'4 > r4 |
< c'4. g'4. c''4. > < as8 es'8 as'8 > ~ < as4 es'4 as'4 > r4 | < es'2 bes'2 es''2 >
< bes2 f'2 bes'2 > |
< a4. e'4. a'4. > < f8 c'8 f'8 > ~ < f4 c'4 f'4 > r4 | < c'4. g'4. c''4. > < g8 d'8
g'8 > ~ < g4 d'4 g'4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2^\coda > | }
\alternative {
{ d'8 ( a' d'' d' e'' d' d'' a' | d' a' e'' d' d'' a' d' ) a' | }
{ d'8 ( a' d'' d' e'' d' d'' a' | d' a' e'' d' d'' a' d' ) a' |
d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d' ~ | )
d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d' ~ |
) d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' d' ~ |
) d'8 ( a' d'' d' e'' d' d'' ) a' | fis' ( g' c'' fis' g' c'' e' ) d' |
r1 | r1 | r1 | r1 |
< d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > \bar ":|" }
}
\break
d'8^\coda ( a' d'' d' e'' d' d'' a' | d' a' e'' d' d'' a' d' ) a' |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< bes1 f'1 bes'1 > | ~ < bes1 f'1 bes'1 > \bar "|."
}
gitb = \notes {
\time 4/4
\key f \major
\clef treble
\property Voice.autoBeamSettings \override #'(end * * * *) = #(make-moment 1
4)
\property Staff.voltaSpannerDuration = #(make-moment 1 1)
< d'1 a'1 d''1 > | ~ < d'1 a'1 d''1 > | < d'8 a'8 d''8 > < d'8 a'8 d''8 > r2. | r1| <
d'8 a'8 d''8 > < d'8 a'8 d''8 > r2. | r1 |
< bes1 f'1 bes'1 > | < d'1 a'1 d''1 > | < bes1 f'1 bes'1 > | < d'1 a'1 d''1 >
|
< bes1 f'1 bes'1 > | < d'1 a'1 d''1 > | < bes1 f'1 bes'1 > | < bes1 f'1 bes'1 > | <
d'1 a'1 d''1 > | ~ < d'1 a'1 d''1 > |
\repeat volta 2 {
r1 | r1 | r1 | r1 |
g8 ( d' g' g bes' g' d' ) g' | es' ( bes' es'' es' f'' es'' bes' ) es'' | bes
( f' bes' bes d'' bes' f' ) bes' | d' ( a' d'' d' fis'' d'' a' ) d'' |
< d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8
a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > |
< g4. d'4. g'4.^\segno > < es'8 bes'8 es''8 > ~ < es'4 bes'4 es''4 > r4 | < bes4. f'4.
bes'4. > < f8 c'8 f'8 > ~ < f4 c'4 f'4 > r4 |
< c'4. g'4. c''4. > < as8 es'8 as'8 > ~ < as4 es'4 as'4 > r4 | < es'2 bes'2 es''2 >
< bes2 f'2 bes'2 > |
< a4. e'4. a'4. > < f8 c'8 f'8 > ~ < f4 c'4 f'4 > r4 | < c'4. g'4. c''4. > < g8 d'8
g'8 > ~ < g4 d'4 g'4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2^\coda > | }
\alternative {
{ < bes1 f'1 bes'1 > | ~ < bes1 f'1 bes'1 > | }
{ < bes1 f'1 bes'1 > | ~ < bes1 f'1 bes'1 > |
r1 | r1 | r1 | r1 | r1 | r1 | r1 | r1 |
g8 ( d' g' g bes' g' d' ) g' | es' ( bes' es'' es' f'' es'' bes' ) es'' | bes ( f' bes' bes d'' bes' f' ) bes' | d' ( a' d'' d' fis'' d'' a' ) d'' |
< d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > < d'8 a'8
d''8 > < d'8 a'8 d''8 > < d'8 a'8 d''8 > \bar ":|" }
}
\break
< g1 d'1 g'1^\coda > | < bes1 f'1 bes'1 >
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f4. c'4. f'4. > <
c'8 g'8 c''8 > ~ < c'4 g'4 c''4 > r4 |
< d'4. a'4. d''4. > < bes8 f'8 bes'8 > ~ < bes4 f'4 bes'4 > r4 | < f2 c'2 f'2 >
< c'2 g'2 c''2 > |
< bes1 f'1 bes'1 > | ~ < bes1 f'1 bes'1 > \bar "|."
}
bass = \notes {
\time 4/4
\key f \major
\clef bass
\property Voice.autoBeamSettings \override #'(end * * * *) = #(make-moment 1
4)
\property Staff.voltaSpannerDuration = #(make-moment 1 1)
d1 | ~ d | d8 d8 r2. | r1 | d8 d8 r2. | r1 |
bes, | d | bes, | d | bes, | d | bes, | bes, | d | ~ d |
\repeat volta 2 {
d | bes, | f, | c | g, | es | bes, | d | d8 d d d d d d d |
g,4.^\segno es8 ~ es4 r4 | bes,4. f,8 ~ f,4 r4 | c4. as,8 ~ as,4 r4 | es2
bes,2 |
a,4. f,8 ~ f,4 r4 | c4. g,8 ~ g,4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2 |
d4. bes,8 ~ bes,4 r4 | f,4. c8 ~ c4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2 |
d4. bes,8 ~ bes,4 r4 | f,4. c8 ~ c4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2^\coda
| }
\alternative {
{ bes,1 | ~ bes,1 | }
{ bes,1 | ~ bes,1 |
bes,1 | d1 | bes,1 | d1 | bes,1 | d1 | bes,1 | d1 |
g, | es | bes, | d | d8 d d d d d d d \bar ":|" }
}
\break
g,1^\coda | bes,1 |
d4. bes,8 ~ bes,4 r4 | f,4. c8 ~ c4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2 |
d4. bes,8 ~ bes,4 r4 | f,4. c8 ~ c4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2 |
d4. bes,8 ~ bes,4 r4 | f,4. c8 ~ c4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2 |
d4. bes,8 ~ bes,4 r4 | f,4. c8 ~ c4 r4 | d4. bes,8 ~ bes,4 r4 | f,2 c2 |
bes,1 ~ | bes,1 \bar "|."
}
text = \lyrics { <
\context LyricsVoice = "sop-1" {
\property LyricsVoice . stanza ="1."
Your cruel de- vice your blood, like ice
One look, could kill My pain, your thrill...
I wan- na love you but I bet- ter not touch
I wan- na hold you, but my sen- ses tell me to stop
I wan- na kiss you but I want it too much
I wan- na taste you but your lips are ve- no- mous poi- son
You're poi- son, run- ning through my veins. You're poi- son
I don't wan- na play these games. You're poi- son... poi- son...
One look, could kill My pain, your thrill... poi- son...
I wan- na love you but I bet- ter not touch
I wan- na hold you, but my sen- ses tell me to stop
I wan- na kiss you but I want it too much
I wan- na taste you but your lips are ve- no- mous poi- son
You're poi- son, run- ning through my veins. You're poi- son
I don't wan- na play these games. You're poi- son...
}
\context LyricsVoice = "sop-2" {
\property LyricsVoice . stanza ="2."
Your mouth, so hot Your web, I'm caught
Your skin, so wet Black lace, on sweat....
I hear you cal- ling and it's need- les and pins
I wan- na hurt you just to hear you scream- ing my name
Don't wan- na touch you but you're un- der my skin
I wan- na taste you but your lips are ve- no- mous poi- son
You're poi- son, run- ning through my veins. You're poi- son
I don't wan- na break these chains.
} >
}
accompaniment = \chords {
\skip 1*16
d1:min bes f c g:min es bes d d
g4.:min es \skip 4 bes4. f \skip 4 c4.:min as \skip 4 es2 bes
a4.:min f \skip 4 c4. g4. \skip 4 d4.:min bes4. \skip 4 f2 c
d4.:min bes \skip 4 f4. c \skip 4 d4.:min bes \skip 4 f2 c
d4.:min bes \skip 4 f4. c \skip 4 d4.:min bes \skip 4 f2 c
bes1 bes bes bes bes d bes d bes d bes d g:min es bes d d
g:min bes
d4.:min bes \skip 4 f4. c \skip 4 d4.:min bes \skip 4 f2 c
d4.:min bes \skip 4 f4. c \skip 4 d4.:min bes \skip 4 f2 c
d4.:min bes \skip 4 f4. c \skip 4 d4.:min bes \skip 4 f2 c
d4.:min bes \skip 4 f4. c \skip 4 d4.:min bes \skip 4 f2 c
bes1 bes
}
\score {
<
\context ChordNames \accompaniment
\addlyrics
\context Staff = one {
\property Voice.autoBeamSettings \override #'(end * * * *) =
#(make-moment 1 32)
\property Staff.automaticMelismata = ##t
\property Staff.voltaSpannerDuration = #(make-moment 1 1)
\melody
}
\context Lyrics = sop <
\text
>
\context PianoStaff { <
\context Staff = gita \gita
\context Staff = gitb \gitb
\context Staff = bass \bass
> }
>
\paper {
papersize = "a4"
\translator { \HaraKiriStaffContext }
}
\midi { \tempo 4 = 120 }
}
------------------------------------------------------------------------
_______________________________________________
Lilypond-user mailing list
address@hidden
http://mail.gnu.org/mailman/listinfo/lilypond-user