Wow, thanks Stephen. That is wicked cool. You extended a great deal of
help and I really appreciate it.
I need some time to work through the alignment, markup, padding, etc that
you have employed to get my head around it. As well, I need to find the
definition of <> and other characters that are present.
Thanks again for your consideration and time.
Regards,
Lance
On Tue, Apr 21, 2015 at 4:13 PM, Stephen MacNeil <classicalja...@gmail.com>
wrote:
> here you go
>
> %%%%%%%% CUT
>
> \version "2.18.2"
>
>
> \header {
>
> title = "Root Position 7th Chords"
>
> composer = "Lance James"
>
> }
>
>
> harmonies = \chordmode {
>
> c1:maj7 d:m7 e:m7 f:maj7 g:7 a:m7 b:m7.5- \break
>
> f1:maj7 g:m7 a:m7 bes:maj7 c:7 d:m7 e:m7.5- \break
>
> bes1:maj7 c:m7 d:m7 ees:maj7 f:7 g:m7 a:m7.5- \break
>
> ees1:maj7 f:m7 g:m7 aes:maj7 bes:7 c:m7 d:m7.5- \break
>
> aes1:maj7 bes:m7 c:m7 des:maj7 ees:7 f:m7 g:m7.5- \break
>
> des1:maj7 ees:m7 f:m7 ges:maj7 aes:7 bes:m7 c:m7.5- \break
>
> ges1:maj7 aes:m7 bes:m7 ces:maj7 ces:7 ees:m7 f:m7.5- \break
>
> ces1:maj7 ees:m7 fes:m7 fes:maj7 ges:7 aes:m7 bes:m7.5- \break
>
> }
>
>
> I = <>^\markup \pad-around #.2 \concat{\italic {I \lower #.5 \super 7}}
>
> ii = <>^\markup \concat{\italic {ii \lower #.5 \pad-around #.2 \super 7}}
>
> iii = <>^\markup \concat{\italic {iii \lower #.5 \pad-around #.2 \super 7}}
>
> IV = <>^\markup \concat{\italic {IV \lower #.5 \pad-around #.2 \super 7}}
>
> V = <>^\markup \concat{\italic {V \lower #.5 \pad-around #.2 \super 7}}
>
> vi = <>^\markup \concat{\italic {vi \lower #.5 \pad-around #.2 \super 7}}
>
> vii = <>^\markup \concat{\italic {vii \lower #.5 \pad-around #.2 \combine
> \super\draw-line #'(.7 . .9)\super o}}
>
> roman = { \repeat volta 8 {\I s1 \ii s1 \iii s1 \IV s1 \V s1 \vi s1 \vii
> s1 }}
>
> keychangevisual = {
>
> \set Staff.explicitKeySignatureVisibility = #end-of-line-invisible
>
> \set Staff.printKeyCancellation = ##f
>
> \override Staff.KeySignature.break-visibility = #begin-of-line-visible
>
> }
>
> cmajortreble = {
>
> \clef treble \key c \major \time 4/4
>
> <c e g b>1 <d f a c>1 <e g b d>1 <f a c e>1 <g b d f>1 <a c e g>1 <b d f
> a>1
>
> }
>
> fmajortreble = {
>
> \keychangevisual
>
> \key f \major \break
>
>
> <f a c e>1 <g bes d f>1 <a c e g>1 <bes d f a>1 <c e g bes>1 <d f a c>1
> <e g bes d>1
>
> }
>
> bflatmajortreble = {
>
> \keychangevisual
>
> \key bes \major \break
>
> <bes, d f a>1 <c ees g bes>1 <d f a c>1 <ees g bes d>1 <f a c ees>1 <g bes
> d f>1 <a c ees g>1
>
> }
>
> eflatmajortreble = {
>
> \keychangevisual
>
> \key ees \major \break
>
> <ees g bes d>1 <f aes c ees>1 <g bes d f>1 <aes c ees g>1 <bes d f aes>1
> <c ees g bes>1 <d f aes c>1
>
> }
>
> aflatmajortreble = {
>
> \keychangevisual
>
> \key aes \major \break
>
> <aes, c ees g>1 <bes des f aes>1 <c ees g bes>1 <ees g bes des>1 <f aes c
> ees>1 <g bes des f>1 <aes c ees g>1
>
> }
>
> dflatmajortreble = {
>
> \keychangevisual
>
> \key des \major \break
>
> <des,,f aes c>1 <ees ges bes des>1 <f aes c ees>1 <ges bes des f>1 <aes c
> ees ges>1 <bes des f aes>1 <c ees ges bes>1
>
> }
>
> gflatmajortreble = {
>
> \keychangevisual
>
> \key ges \major \break
>
> <ges bes des f>1 <aes ces ees ges>1 <bes des f aes>1 <ces ees ges bes>1
> <des f aes ces>1 <ees ges bes des>1 <f aes ces ees>1
>
> }
>
> cflatmajortreble = {
>
> \keychangevisual
>
> \key ces \major \break
>
> <ces ees ges bes>1 <des fes aes ces>1 <ees ges bes des>1 <fes aes ces
> ees>1 <ges bes des fes>1 <aes ces ees ges>1 <bes des fes aes>1
>
> }
>
> cmajorbass = {
>
> \clef bass \key c \major \time 4/4
>
> <c e g b>1 <d f a c>1 <e g b d>1 <f a c e>1 <g b d f>1 <a c e g>1 <b d f
> a>1
>
> }
>
> fmajorbass = {
>
> \keychangevisual
>
> \key f \major \break
>
> <f a c e>1 <g bes d f>1 <a c e g>1 <bes d f a>1 <c e g bes>1 <d f a c>1 <e
> g bes d>1
>
> }
>
> bflatmajorbass = {
>
> \keychangevisual
>
> \key bes \major \break
>
> <bes d f a>1 <c ees g bes>1 <d f a c>1 <ees g bes d>1 <f a c ees>1 <g bes
> d f>1 <a c ees g>1
>
> }
>
> eflatmajorbass = {
>
> \keychangevisual
>
> \key ees \major \break
>
> <ees, g bes d>1 <f aes c ees>1 <g bes d f>1 <aes c ees g>1 <bes d f aes>1
> <c ees g bes>1 <d f aes c>1
>
> }
>
> aflatmajorbass = {
>
> \keychangevisual
>
> \key aes \major \break
>
> <aes c ees g>1 <bes des f aes>1 <c ees g bes>1 <ees g bes des>1 <f aes c
> ees>1 <g bes des f>1 <aes c ees g>1
>
> }
>
> dflatmajorbass = {
>
> \keychangevisual
>
> \key des \major \break
>
> <des,,f aes c>1 <ees ges bes des>1 <f aes c ees>1 <ges bes des f>1 <aes c
> ees ges>1 <bes des f aes>1 <c ees ges bes>1
>
> }
>
> gflatmajorbass = {
>
> \keychangevisual
>
> \key ges \major \break
>
> <ges bes des f>1 <aes ces ees ges>1 <bes des f aes>1 <ces ees ges bes>1
> <des f aes ces>1 <ees ges bes des>1 <f aes ces ees>1
>
> }
>
> cflatmajorbass = {
>
> \keychangevisual
>
> \key ces \major \break
>
> <ces ees ges bes>1 <des fes aes ces>1 <ees ges bes des>1 <fes aes ces
> ees>1 <ges bes des fes>1 <aes ces ees ges>1 <bes des fes aes>1
>
> }
>
> dmajorbass = {
>
> \keychangevisual
>
> \key d \major \break
>
> <d, fis a cis>1 <e g b d>1 <fis a cis e>1 <g b d fis>1 <a cis e g>1 <b d
> fis a>1 <cis e g b>1
>
> }
>
> upper = \relative c' {
>
> \override Score.TextScript.padding = #3.3
>
> \cmajortreble
>
> \fmajortreble
>
> \bflatmajortreble
>
> \eflatmajortreble
>
> \aflatmajortreble
>
> \dflatmajortreble
>
> \gflatmajortreble
>
> \cflatmajortreble
>
> }
>
> lower = \relative c, {
>
> \cmajorbass
>
> \fmajorbass
>
> \bflatmajorbass
>
> \eflatmajorbass
>
> \aflatmajorbass
>
> \dflatmajorbass
>
> \gflatmajorbass
>
> \cflatmajortreble
>
> }
>
>
> \score { \unfoldRepeats
>
> <<
>
> \new PianoStaff <<
>
> \new ChordNames {
>
> \set chordChanges = ##t
>
> \harmonies
>
> }
>
> \new Staff = "upper" \roman\upper
>
> \new Staff = "lower" \lower
>
> >>
>
> >>
>
> \layout {
>
> \context { \Staff \RemoveEmptyStaves }
>
> }
>
> \midi { }
>
> }
>
>
>
>
>
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
