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

Top

Pompei-3

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

      pompei-3.midi(//The one below is mp3//)         pompei-3.pdf          • All files (pompei-3.tar.gz;<2,600bytes)

Next: , Previous: , Up: Top  

Music Sheet

[picture of music]


Next: , Previous: , Up: Top  

pompei-3.ly

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

\header {
  dedication = \markup { \column { " " " " "Wordless Poem" " " } }
  title = "Permanence of Pompei"
  subtitle = "At Pompei city in Italia"
  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."}
  poet = ""
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.18(Mar. 25, 2007)"}
copyright = "public Domain"
%% tagline = " "
}

sopranoOne = {
             \clef soprano
             \set Staff.midiInstrument = "pad 4 (choir)"
\autoBeamOff
%25-29
 \repeat volta 2 {
 b!1.^\ppp^(_\( | cis')^( | fis')^( | b')( | cis'')( | ais')( | cis'')( |
\break
 dis'')( | eis'')( | cis'')( | dis'')( | eis'')\)_(\ff^\fermata } |
 eis'')^\fermata\sfp
  \bar "|."
\break
}


altoOne = {
          \clef alto
          \set Staff.midiInstrument = "pad 4 (choir)"
\autoBeamOff
%1-4
  r8 fis4. b16[ cis'8. cis'8] dis'8 b2 |
  r8 eis4. ais16[ b8. b8] eis'8 cis'2 |
  r8 gis4. cis'16[ dis'8. dis'8] eis'8 c'!2 |
  dis'16[ fis'8. eis'16 gis'8.] dis'2. b16[ ais8.] |
\break
%5-9
  r4 ais4. b16[ cis'8.] dis'4. cis'4 |
  gis2.( fis') | eis2._( ais') |
  ais8[ gis] b16[ ais8.] cis'8[ b] dis'16[ b8.]
  cis'8[ ais] b16[ gis8.] |
  f8 b16[ cis'8. cis'8] dis'8.[ eis'16 fis'8 e'!] b2 |
\break
}


tenorOne = {
          \clef tenor
          \set Staff.midiInstrument = "pad 4 (choir)"
\autoBeamOff
%17-20
 eis2 fis16[ gis8. ais8.] r16 b2 |
 g!8. bes16 ais1 b!16 gis8. |
 r16 d!16 eis1 f!8 fis16 dis8. | r8. ees8 fis1 e!8 gis16 |
\break
%21-24
 aes8. fis16 gis1 a!16 fis8. | r16 ais8 gis1 g!8 aes8. |
 g!16 e!8. fis1 eis16 gis8. | r16 d! f!8 eis1 dis16 fis8. |
\break
}


bassOne = {
          \clef bass
          \set Staff.midiInstrument = "pad 4 (choir)"
\autoBeamOff
%10-12
 b,16 r8. dis16 r8. cis16 r8. eis16 r8. dis8. r16 cis8. r16 |
 b,8. r16 ais,8. r16 dis16 r8. gis16 r8. cis'16 r8. b16 r8. |
 ais8. r16 gis8. r16 fis8. r16 eis8. r16 dis16 r8. cis16 r8. |
\break
%13-16
 b,16 r8. ais,16 r8. gis,8. r16 b,8. r16 dis8. r16 fis8. r16 |
 bes2_( fes,1)( | ees,1)_( fis,2)_( | bes,1) r16 dis8.[ cis16 b,8.] |
\break
}



%% --- get sheet music
\score {
         \new Voice { \key fis\major \time 3/2 \tempo 4 = 62
                          \altoOne \bassOne \tenorOne \sopranoOne }

  \layout { }
}
%% --- get midi music
\score {
         \new Staff { \key fis\major \time 3/2
                       \altoOne \bassOne \tenorOne { \sopranoOne }
                     }

  \midi { }
}

Next: , Previous: , Up: Top  

pompei-3.texi

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

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

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

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

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

@ifnottex
@node     run--makeinfo,           ,  pompei-3.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)—