Next: , Previous: , Up: ("dirTop")  

Top

Milano-5

[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) ----

      milano-5.midi(//The one below is mp3//)         milano-5.pdf          • All files (milano-5.tar.gz;<3,110bytes)


Next: , Previous: , Up: Top  

Music Sheet

[picture of music]




Next: , Previous: , Up: Top  

milano-5.ly

%%  3:28 AM Tuesday, April 18, 2023
%% Yukio Yoshida
\version "2.24.1"
#(set-default-paper-size "letter")
#(set-global-staff-size 18)

addMs = { R1. * 48 | r1^\pp r4^\ppp des''4^\sfp | ees''1.^\ppppp_\fermata \bar "|." }
addMa = { R1. * 48 | r1^\pp r4^\ppp bes'4^\sfp | ces''1.^\ppppp_\fermata  \bar "|." }
addMt = { R1. * 48 | r1^\pp r4^\ppp ges'4^\sfp | aes'1.^\ppppp_\fermata  \bar "|." }

solo = {
%%1-5
       \clef soprano
       ees'4^\markup { "soprano"} fes'4. ees'8[ des' ces'] des'2 |
       ees'1 fes'4. ces''8 | ces''4 bes'8[ aes'] ges'4 aes'2. |
       r2 ces''2 aes'4 ces''4~ | ces''4 bes'8[ aes'] ges'4 aes'2 ges'4 |
\break
%%6-12
       aes'1.^\fermata | r1 r4 ges'4 | aes'1.^\fermata |
       ces''4 bes'8[ aes'] ges'4 aes'2. |
       \clef tenor
       ces'1^\markup { "tenor"} bes2 | ces'2 aes ges |
       aes4 ces'2 bes8[ ges] bes2 |
\break
%%13-17
       bes8[ aes ges] aes2 ces'4. ees'4 | aes2 ges8[ fes] ces'4 des'2 |
       ees'4 ces'4. bes8[ aes ges] aes2 |
       ges4. aes8 bes4 ces' bes8 ees'4. | r1 r4 ges4 |
\break
%%18-23
        aes1.^\fermata |
       \clef alto
       r1^\markup { "alto"} r4 bes8[ ces'] | des'1.^\fermata |
       ges'8[ fes'] aes'4. ees'8[ ces' bes] ees'2 |
       fes'8 ees'4. des'8 ces'4. bes8 aes4. |
       aes2 ces'2. bes8[ aes] |
\break
%%24-35
       ges2 fes2 r2 | aes4. bes8 ces'4. des'8 ees'4. fes'8 |
       ces'8[ des'] fes'2 ges'4 aes'2 | r1 bes8 aes4. |
       \repeat volta 3 { r4 ges'4 aes'1^\fermata |
       r1 r4 ges4 | aes1.^\fermata | }
       \repeat volta 2 { R1. * 3 |}
       \clef bass
       \repeat volta 4 { r1^\markup { \circle\italic "bass" }
       r4^\markup { \score {{
                    \set Staff.fontSize = #-4
                    \override Staff.StaffSymbol.staff-space = #(magstep -4)
                    \override Staff.StaffSymbol.thickness =#(magstep -4)
                    \override NoteHead.color = #red
                    \override Stem.color = #red
                    \clef treble \key ces\major \time 3/2
                         r1^\markup{ \italic "Tutti" S A T }
                         r4 < ges' bes' des'' >4^\markup {\italic\bold "f.o." } |
                         < aes' ces'' ees'' >1._\fermata \bar "|." }
                    \layout { indent = 0.00\mm line-width = 60.00\mm
                   }}}
        ges4| aes1.^\fermata } \bar "|."
}

bass = {
%%1-35
       \repeat unfold 5 {
       <aes, ees>2_( <fes, ces>1)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat unfold 4 {
       <aes, ees>2_( <fes, ces>1)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat volta 3 {
       <aes, ees>2_( <fes, ces>1)( | <ees, bes,>1_\markup { \column {\line { " "}
       \line { \small {\raise #.5 \musicglyph #"scripts.coda"}
       "As for dynamic freely."}}}
        )_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat volta 2 {
       <aes, ees>2_( <fes, ces>1)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat volta 4 { <ees, bes,>1.\>^\markup { \italic "f.o." } |
       <bes, ees,>1.\!^\fermata } \bar "|."
}

bassm = {
%%1-35
       \repeat unfold 5 {
       <aes, ees>2_( <fes, ces>1\ff)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat unfold 4 {
       <aes, ees>2_( <fes, ces>1\ff)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat unfold 3 {
       <aes, ees>2_( <fes, ces>1\ff)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat unfold 2 {
       <aes, ees>2_( <fes, ces>1)( | <ees, bes,>1)_( <bes, des>2)_( |
       <bes, ees,>1.)^\fermata | }
       \repeat unfold 4 { <ees, bes,>1.\mp | <bes, ees,>1.\p^\fermata |}
}

\header {
  dedication = \markup { \column { " " " " "Wordless Poem" " " } }
  title = "Milano 5"
  subtitle = "The Milano aspiration. II"
  subsubtitle = \markup \center-column {
                   "soprano; C clef on 1th line,   alto; C clef on 3th line."
                   "     tenor; C clef on 4th line,   bass; F clef on 4th line." }
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.23(Aug. 09, 2007)"}
copyright = "public Domain"
%% tagline = " "
}

%% get sheet music --------------------------------------------------------
\score {
         <<
           \new Voice = "soprano" { \key ces\major \time 3/2
                   \set Staff.instrumentName =
                   \markup {\italic \small \column {" " "soprano" "alto" "tenor"} }
                        \solo }

           \new Voice = "bass" { \clef bass \key ces\major \time 3/2
                        \set Staff.instrumentName = "piano   " \bass }
         >>
  \layout { }
       }
%% get midi music ---------------------------------------------------------
\score {
         <<
           \new Staff { \clef soprano \key ces\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 4 (choir)"
                                         \unfoldRepeats       \solo }
           \new Staff { \clef treble \key ces\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 4 (choir)" \addMs }
           \new Staff { \clef treble \key ces\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 4 (choir)" \addMa }
           \new Staff { \clef treble \key ces\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 4 (choir)" \addMt }

           \new Staff { \clef bass \key ces\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "acoustic grand"
                                         \unfoldRepeats          \bassm }
         >>
   \midi { }
        }

Next: , Previous: , Up: Top  

milano-5.texi

%% 9:40 AM Friday, January 19, 2024
%% Yukio Yoshida
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\input colordvi.tex
\input texinfo

@c %**start of header
@setfilename milano-5.info
@c @settitle milano-5
@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>Milano-5</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
* milano-5::                 --- Music Sheet:                    Music Sheet.
* milano-5.ly::             --- Source code framework:  milano-5.ly.
* milano-5.texi::          --- Source code document:    milano-5.texi.
* run--makeinfo::   --- Source code run-file:        run--makeinfo.
@end menu
@end ifhtml
@c @ignore ------------------------------------------------------------------------
@html
<p align = "center">
&#160;&#160;&#160;&#160;&#160;
<a href="earth.mid">milano-5.midi</a>(//The one below is mp3//)&#160;&#160;&#160;
&#160;&#160;&#160;&#160;&#160;<a href="milano-5.pdf">milano-5.pdf</a>
&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;
&#149;&#160;<a href="milano-5.tar.gz">All files</a>&#160;(milano-5.tar.gz;&lt;3,110bytes)<br />
<audio src="milano-5.mp3" controls>
Download <a href="earth.mp3">episode 42 Learnung to love HTML5</a>
</audio></p>
@end html

@ifnottex
@node        Music Sheet,   milano-5.ly,       Top,      Top
@comment      node-name,     next,          previous,    up
@c @top
@end ifnottex
@unnumbered Music Sheet
@ifhtml
@html
<p align = "center">
<a href="milano-5.pdf">
<img src="milano-5.svg" alt="[picture of music]" /><!--  -->
<hr style="width:68%; height:4px;" />
</a></p>
<br />
@end html
@end ifhtml
@html
</div>
@end html

@ifnottex
@node          milano-5.ly,       milano-5.texi,  Music Sheet,  Top
@comment    node-name,     next,         previous,        up
@end ifnottex
@unnumbered milano-5.ly
@html
<blockquote><blockquote>
@end html
@verbatiminclude milano-5.ly
@html
</blockquote></blockquote>
@end html

@ifnottex
@node     milano-5.texi,   run--makeinfo,      milano-5.ly, Top
@comment   node-name,         next,          previous,    up
@end ifnottex
@unnumbered milano-5.texi
@html
<blockquote><blockquote>
@end html
@verbatiminclude milano-5.texi
@html
</blockquote></blockquote>
@end html

@ifnottex
@node     run--makeinfo,           ,  milano-5.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>
&#160;&#160;&#160;<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: , Up: Top  

run–makeinfo

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 -lX

    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)—