Next: Music Sheet, Previous: ("dir"), Up: ("dirTop")
Siena
[file-code; "ly,texi,sh are UTF-8"]
Normally; Windows & Linux "[Prompt] lilypond --png --pdf name.ly[Enter]"
And---- Only;
Linux(Prompt) $ ./run--lily.sh name[Enter](need makeinfo) ----
siena.midi(//The one below is mp3//)
siena.pdf
All files (siena.tar.gz;<3,500bytes)
Next: siena.texi, Previous: Music Sheet, Up: Top
%% 3:28 AM Tuesday, April 18, 2023 %% Yukio Yoshida \version "2.24.1" #(set-default-paper-size "letter") #(set-global-staff-size 16) \paper{ paper-height = 280\mm } \header { dedication = \markup { \column { " " " " "Wordless Poem" " " } } title = "Siena in Autumn" subtitle = \markup \center-column { "tenor; C clef on 4th line, bass; F clef on 4th line." \italic " Please, Piano is free " } composer = \markup { \italic "yukio yoshida" } arranger = \markup{\tiny "No.25(Nov. 01, 2007)"} copyright = "public Domain" %% tagline = " " } tenor = { %1--4 \autoBeamOff \repeat volta 2 { r8^\markup { \column{\italic "Largo" " "} } <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>4. | r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | } <f f'>2 <bes bes'>8 <f f'>2 r4. | << { \stemDown g'2 aes'8 g'2.. } \\ { R1. } >> | \break %5--8 << { R1.} \\ { g2 bes8 g2.. } >> | \repeat volta 2 { <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8.]~ <c' f'>8[ <bes ees'> <aes d'>8.]~ <aes d'>2 | <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>2 | } << { bes'4 aes' g' f'2. } \\ { R1. } >> | \break %9--12 << { R1. } \\ { c4 f bes ees'2. }>> | <f f'>2 <bes bes'>8 <f f'>2 r4. | \repeat volta 2 { <c' f'>4 <c' f'>4 <c' f'>4 <c' f'>4 <ees' aes'>2 | <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <f' bes'>8 <ees' aes'>4. | } \break %13--17 \repeat volta 2 { <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>2 | <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8.]~ <c' f'>8[ <bes ees'> <aes d'>8.]~ <aes d'>2 | } <g c'>4 <g c'>4 <g c'>4 <g c'>4 <f bes>2 | << { R1. } \\ { c4 f bes ees'2. }>> | << { \stemDown bes'4 aes' g' f'2. \stemNeutral} \\ { R1. } >> | \break %18--20 r8^\markup{ \column{\italic "Accelerndo" " "} } <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>4. | r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | <c' f'>4 <c' f'>4 <c' f'>4 <c' f'>4 <ees' aes'>2 | \break %21-23 <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <f' bes'>8 <ees' aes'>4. | \repeat volta 2 { r8 <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>4. | r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | } \break %24--27 <f f'>2^\markup { \italic "A tempo" } <bes bes'>8 <f f'>2 r4. | << { \stemDown g'2 aes'8 g'2.. } \\ { R1. } >> | \repeat volta 2 { <aes d'>16[^\markup { "Veloce" } <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8.]~ <c' f'>8[ <bes ees'> <aes d'>8.]~ <aes d'>2 | <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>2 | } \break %28--32 r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | <f f'>2^\markup { \italic "A tempo" } <bes bes'>8 <f f'>2 r4. | << { bes'4 aes' g' f'2. } \\ { R1. } >> | << { R1. } \\ { c4 f bes ees'2.~ }>> | << { aes'1.^\fermata } \\ {ees'1._\fermata } >> \bar "|." } bass = { %1--4 \autoBeamOff \repeat volta 2 { << { ees4^\markup { \italic "Largo" } ees ees ees g2 } \\ { bes,4 bes, bes, bes, d2 }>> | << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | } << { c'4 c' c' c' ees'2 } \\ { c4 c c c ees2 } >> | << { R1. } \\ { ees4 d c bes,2. } >> | \break %5--8 << { c'4 bes aes g2. } \\ { R1. } >> | \repeat volta 2 { r8 << { d4 d d d2 ees8 } \\ { aes,4 aes, aes, aes,2 bes,8 } >> | r8 << { ees4 ees ees ees2~ ees8 } \\ { g,4 g, g, g,2~ g,8 } >> | } << { g4 aes bes c'2. } \\ { R1. } >> | \break %9--12 << { R1. } \\ { g4 f ees d2. } >> | << { bes4 bes bes c'2. } \\ { bes,4 bes, bes, c2. } >> | \repeat volta 2 { r8 << { bes16[ aes g8] bes16[ aes g8] f8[ g aes bes]~ bes4. } \\ { bes,16[ aes, g,8] bes,16[ aes, g,8] f,8[ g, aes, bes,]~ bes,4. } >> | r8 << { ees16[ f g8] ees16[ f g8]~ g8[ f ees]~ ees4. } \\ { bes,16[ c d8] bes,16[ c d8]~ d8[ c bes,]~ bes,4. } >> r8 | } \break %13--17 \repeat volta 2 { << { bes16[ aes g8] bes16[ aes g8] f8[ g aes bes]~ bes2 } \\ { f16[ ees d8] f16[ ees d8] c8[ d ees f]~ f2 } >> | << { ees16[ f g8] ees16[ f g8.]~ g8[ f ees8.]~ ees2 } \\ { ees,16[ f, g,8] ees,16[ f, g,8.]~ g,8[ f, ees,8.]~ ees,2 } >> | } << { ees4 ees ees ees c2 } \\ { bes,4 bes, bes, bes, g,2 }>> | << { R1. } \\ { g4 f ees d2. } >> | << { \stemDown g4 aes bes c'2. \stemNeutral } \\ { R1. } >> | \break %18-20 << { ees4^\markup{ \italic "Accelerndo" } ees ees ees g2 } \\ { bes,4 bes, bes, bes, d2 }>> | << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | << { bes16[ aes g8] bes16[ aes g8] f8[ g aes bes]~ bes2 } \\ { f16[ ees d8] f16[ ees d8] c8[ d ees f]~ f2 } >> | \break %21--23 r8 << { ees16[ f g8] ees16[ f g8]~ g8[ f ees]~ ees4. } \\ { bes,16[ c d8] bes,16[ c d8]~ d8[ c bes,]~ bes,4. } >> r8 | \repeat volta 2 { << { ees4 ees ees ees g2 } \\ { bes,4 bes, bes, bes, d2 }>> | << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | } \break %24--27 << { c'4^\markup { \italic "A tempo" } c' c' c' ees'2 } \\ { c4 c c c ees2 } >> | << { R1. } \\ { ees4 d c bes,2. } >> | \repeat volta 2 { r8^\markup { \italic "Veloce" } << { d4 d d d2 ees8 } \\ { aes,4 aes, aes, aes,2 bes,8 } >> | r8 << { ees4 ees ees ees2~ ees8 } \\ { g,4 g, g, g,2~ g,8 } >> | } \break %28--32 << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | << { bes4^\markup { \italic "A tempo" } bes bes c'2. } \\ { bes,4 bes, bes, c2. } >> | << { g4 aes bes c'2. } \\ { R1. } >> | << { R1. } \\ { g4 f ees d2.~ } >> | << { g1.^\fermata } \\ { d1._\fermata } >> \bar "|." } %{ pianoUP = { %1--32 << { s1. * 32 } \\ {s1. * 32 } >> } pianoDown = { %1--32 << { s1. * 32 } \\ {s1. * 32 } >> } %} %%%--- MID GeT --------------------------------------------------------------------- tenorM = { %1--4 \autoBeamOff \repeat volta 2 { r8 <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>4. | r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | } <f f'>2 <bes bes'>8 <f f'>2 r4. | << { \stemDown g'2 aes'8 g'2.. } \\ { R1. } >> | \break %5--8 << { R1.} \\ { g2 bes8 g2.. } >> | \repeat volta 2 { <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8.]~ <c' f'>8[ <bes ees'> <aes d'>8.]~ <aes d'>2 | <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>2 | } << { bes'4 aes' g' f'2. } \\ { R1. } >> | \break %9--12 << { R1. } \\ { c4 f bes ees'2. }>> | <f f'>2 <bes bes'>8 <f f'>2 r4. | \repeat volta 2 { <c' f'>4 <c' f'>4 <c' f'>4 <c' f'>4 <ees' aes'>2 | <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <f' bes'>8 <ees' aes'>4. | } \break %13--17 \repeat volta 2 { <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>2 | <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8.]~ <c' f'>8[ <bes ees'> <aes d'>8.]~ <aes d'>2 | } <g c'>4 <g c'>4 <g c'>4 <g c'>4 <f bes>2 | << { R1. } \\ { c4 f bes ees'2. }>> | << { \stemDown bes'4 aes' g' f'2. \stemNeutral} \\ { R1. } >> | \break %18--20 \tempo 4 = 84 r8 <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>4. | r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | <c' f'>4 <c' f'>4 <c' f'>4 <c' f'>4 <ees' aes'>2 | \break %21-23 <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <ees' aes'>4 <f' bes'>8 <ees' aes'>4. | \repeat volta 2 { r8 <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>4. | r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | } \break %24--27 \tempo 4 = 48 <f f'>2 <bes bes'>8 <f f'>2 r4. | << { \stemDown g'2 aes'8 g'2.. } \\ { R1. } >> | \tempo 4 = 108 \repeat volta 2 { <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8.]~ <c' f'>8[ <bes ees'> <aes d'>8.]~ <aes d'>2 | <ees' aes'>16[ <d' g'> <c' f'>8] <ees' aes'>16[ <d' g'> <c' f'>8] <bes ees'>8[ <c' f'> <d' g'> <ees' aes'>]~ <ees' aes'>2 | } \break %%28--32 r8 <aes d'>16[ <bes ees'> <c' f'>8] <aes d'>16[ <bes ees'> <c' f'>8]~ <c' f'>8[ <bes ees'> <aes d'>]~ <aes d'>4. r8 | \tempo 4 = 48 <f f'>2 <bes bes'>8 <f f'>2 r4. | << { bes'4 aes' g' f'2. } \\ { R1. } >> | << { R1. } \\ { c4 f bes ees'2.~ }>> | << { aes'1.^\fermata } \\ {ees'1._\fermata } >> \bar "|." } bassM = { %1--4 \autoBeamOff \repeat volta 2 { << { ees4 ees ees ees g2 } \\ { bes,4 bes, bes, bes, d2 }>> | << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | } << { c'4 c' c' c' ees'2 } \\ { c4 c c c ees2 } >> | << { R1. } \\ { ees4 d c bes,2. } >> | \break %5--8 << { c'4 bes aes g2. } \\ { R1. } >> | \repeat volta 2 { r8 << { d4 d d d2 ees8 } \\ { aes,4 aes, aes, aes,2 bes,8 } >> | r8 << { ees4 ees ees ees2~ ees8 } \\ { g,4 g, g, g,2~ g,8 } >> | } << { g4 aes bes c'2. } \\ { R1. } >> | \break %9--12 << { R1. } \\ { g4 f ees d2. } >> | << { bes4 bes bes c'2. } \\ { bes,4 bes, bes, c2. } >> | \repeat volta 2 { r8 << { bes16[ aes g8] bes16[ aes g8] f8[ g aes bes]~ bes4. } \\ { bes,16[ aes, g,8] bes,16[ aes, g,8] f,8[ g, aes, bes,]~ bes,4. } >> | r8 << { ees16[ f g8] ees16[ f g8]~ g8[ f ees]~ ees4. } \\ { bes,16[ c d8] bes,16[ c d8]~ d8[ c bes,]~ bes,4. } >> r8 | } \break %13--17 \repeat volta 2 { << { bes16[ aes g8] bes16[ aes g8] f8[ g aes bes]~ bes2 } \\ { f16[ ees d8] f16[ ees d8] c8[ d ees f]~ f2 } >> | << { ees16[ f g8] ees16[ f g8.]~ g8[ f ees8.]~ ees2 } \\ { ees,16[ f, g,8] ees,16[ f, g,8.]~ g,8[ f, ees,8.]~ ees,2 } >> | } << { ees4 ees ees ees c2 } \\ { bes,4 bes, bes, bes, g,2 }>> | << { R1. } \\ { g4 f ees d2. } >> | << { \stemDown g4 aes bes c'2. \stemNeutral } \\ { R1. } >> | \break %18-20 \tempo 4 = 84 << { ees4 ees ees ees g2 } \\ { bes,4 bes, bes, bes, d2 }>> | << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | << { bes16[ aes g8] bes16[ aes g8] f8[ g aes bes]~ bes2 } \\ { f16[ ees d8] f16[ ees d8] c8[ d ees f]~ f2 } >> | \break %21--23 r8 << { ees16[ f g8] ees16[ f g8]~ g8[ f ees]~ ees4. } \\ { bes,16[ c d8] bes,16[ c d8]~ d8[ c bes,]~ bes,4. } >> r8 | \repeat volta 2 { << { ees4 ees ees ees g2 } \\ { bes,4 bes, bes, bes, d2 }>> | << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | } \break %24--27 \tempo 4 = 48 << { c'4 c' c' c' ees'2 } \\ { c4 c c c ees2 } >> | << { R1. } \\ { ees4 d c bes,2. } >> | \tempo 4 = 108 \repeat volta 2 { r8 << { d4 d d d2 ees8 } \\ { aes,4 aes, aes, aes,2 bes,8 } >> | r8 << { ees4 ees ees ees2~ ees8 } \\ { g,4 g, g, g,2~ g,8 } >> | } %28--32 << { g4 g g g bes8 g4. } \\ { d4 d d d f8 d4. } >> | \tempo 4 = 48 << { bes4 bes bes c'2. } \\ { bes,4 bes, bes, c2. } >> | << { g4 aes bes c'2. } \\ { R1. } >> | << { R1. } \\ { g4 f ees d2.~ } >> | << { g1.^\fermata} \\ { d1._\fermata } >> \bar "|." } %{ pianoUPM = { %1--32 << { s1. * 32 } \\ {s1. * 32 } >> } pianoDownM = { %1--32 << { s1. * 32 } \\ {s1. * 32 } >> } %} %% get sheet music -------------------------------------------------------- \score { << \context ChoirStaff = "FourPartStaffaddchorus" << \new Voice = "tenor" { \clef tenor \key ees\major \time 3/2 \set Staff.instrumentName = "tenor" \tenor } \new Voice = "alto" { \clef bass \key ees\major \time 3/2 \set Staff.instrumentName = "bass " \bass } >> >> \layout { } } %% get midi music -------------------------------------------------------- \score { << \context ChoirStaff = "FourPartStaffaddchorus" << \new Voice = "tenor" { \clef tenor \key ees\major \time 3/2 \set Staff.midiInstrument = "pad 4 (choir)" \unfoldRepeats \tenorM } \new Voice = "alto" { \clef bass \key ees\major \time 3/2 \set Staff.midiInstrument = "synth voice" \unfoldRepeats \bassM } >> >> \midi { tempoWholesPerMinute = #(ly:make-moment 48 4) } }
Next: run–makeinfo, Previous: siena.ly, Up: Top
%% 1:05 PM Friday, January 19, 2024 %% Yukio Yoshida %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \input colordvi.tex \input texinfo @c %**start of header @setfilename siena.info @c @settitle siena @documentlanguage en @documentencoding utf-8 @setchapternewpage odd @c %**end of header @c *********** Body start ****************** @node Top, Music Sheet, ("dir"), ("dirTop") @comment node-name, next, previous, up @c @node Top @ifhtml @html <p align = "center"> <span style="font-size: 40px;"><b>Siena</b></spam> </p> <code> [file-code; "ly,texi,sh are UTF-8"]<br /> <span style="font-size: 16px;"> <b>Normally; Windows & Linux "[Prompt] <kbd> lilypond --png --pdf name.ly</kbd>[Enter]"</b><br /> <b>And---- Only; <i>Linux(Prompt)<kbd> <span style="color: red;">$ ./run--lily.sh name</span></kbd>[Enter]</i>(need makeinfo) ----</b><br /> </span> </code> <br /> @end html @end ifhtml @c @top @c @ignore ------------------------------------------------------------------------ @ifhtml @menu * siena:: --- Music Sheet: Music Sheet. * siena.ly:: --- Source code framework: siena.ly. * siena.texi:: --- Source code document: siena.texi. * run--makeinfo:: --- Source code run-file: run--makeinfo. @end menu @end ifhtml @c @ignore ------------------------------------------------------------------------ @html <p align = "center">       <a href="earth.mid">siena.midi</a>(//The one below is mp3//)         <a href="siena.pdf">siena.pdf</a>          • <a href="siena.tar.gz">All files</a> (siena.tar.gz;<3,500bytes)<br /> <audio src="siena.mp3" controls> Download <a href="earth.mp3">episode 42 Learnung to love HTML5</a> </audio></p> @end html @ifnottex @node Music Sheet, siena.ly, Top, Top @comment node-name, next, previous, up @c @top @end ifnottex @unnumbered Music Sheet @ifhtml @html <div align = "center"> <a href="siena.pdf"> <img src="siena-1.svg" alt="[picture of music]" /><!-- --> <hr style="width:68%; height:4px;" /> <img src="siena-2.svg" alt="[picture of music]" /><!-- --> <hr style="width:68%; height:4px;" /> </a></div> <br /> @end html @end ifhtml @html </div> @end html @ifnottex @node siena.ly, siena.texi, Music Sheet, Top @comment node-name, next, previous, up @end ifnottex @unnumbered siena.ly @html <blockquote><blockquote> @end html @verbatiminclude siena.ly @html </blockquote></blockquote> @end html @ifnottex @node siena.texi, run--makeinfo, siena.ly, Top @comment node-name, next, previous, up @end ifnottex @unnumbered siena.texi @html <blockquote><blockquote> @end html @verbatiminclude siena.texi @html </blockquote></blockquote> @end html @ifnottex @node run--makeinfo, , siena.texi, Top @comment node-name, next, previous, up @end ifnottex @unnumbered run--makeinfo @html <blockquote><blockquote> <b><i>Only; running is on Linux(on WSL).</i></b><br /> @end html @ifhtml @html <span style="font: 16px;"> <table> <td>    <b><i>run--lily.sh</i></b><br /> <span style="color: red;"> @verbatiminclude run--lily.sh </span> </td> </table> @end html @end ifhtml @ @ @ @ This is under the following environment.@* @ @ @ @ Linux[on WSL(windows11)]@ ---(GNU/Linux 4.4.0-19041-Microsoft x86_64) or (GNU/Linux 5.10.16.3-microsoft-standard-WSL2 x86_64)---@* @html </blockquote></blockquote> <br /> <br /> @end html @c *********** End Body ********************* @bye
Previous: siena.texi, Up: Top
Only; running is on Linux(on WSL).
run--lily.sh
#!/usr/bin/bash # rm -r html lilypond --pdf --png $1.ly lilypond --svg $1.ly makeinfo --no-split --force --html $1.texi mkdir html mv *.svg html/ mv *.pdf html/ mv *.midi html/ mv *.html html/ cd html xdg-open $1.pdf | xdg-open $1.midi | explorer.exe $1.html cd ../ rm *.eps *.png ls -lXThis is under the following environment.
Linux[on WSL(windows11)] —(GNU/Linux 4.4.0-19041-Microsoft x86_64) or (GNU/Linux 5.10.16.3-microsoft-standard-WSL2 x86_64)—