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.midi(//The one below is mp3//)         pompei.pdf          • All files (pompei.tar.gz;<2,550bytes)

Next: , Previous: , Up: Top  

Music Sheet

[picture of music]


Next: , Previous: , Up: Top  

pompei.ly

%%11:41 AM Monday, October 4, 2021
%%yukio yoshida
\version "2.22.2"
#(set-default-paper-size "letter")
#(set-global-staff-size 20)

\header {
  dedication = \markup { \column { " " " " "Wordless Poem" " " } }
  title = "Linger at Pompei"
  subtitle = "At Pompei city in Italia"
  subsubtitle = \markup\center-column {
                   "soprano; C clef on 1th line,   alto; C clef on 3th line."
                   "         bass; F clef on 4th line,   tenor; C clef on 4th line."}
  poet = ""
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.12(Nov 24 2006)"}
  copyright = "public Domain"
%% tagline = " "
}

sopranoOne = {
             \clef soprano
             \set Staff.midiInstrument = "synth voice"
\autoBeamOff
%%1-5
 e''1._\ppp\(~ | e''( | d'')~ | d''( | e'')~ |
\break
%%6-10
 e''1.( | d'')~ | d''\)( | c''2)( b')( c'')( | d''1.)(_\ff^\fermata | \break
}

altoOne = {
          \clef alto
          \set Staff.midiInstrument = "pad 4 (choir)"
\autoBeamOff
%%11-14
 <g' d'>1) <e' b>4 <fis' c'>4 | <g' c'>1 <d' a>4 <e' b> | <a' e'>1 < b' e'>2 |
 <a' e'>2. <g' c'>4 <fis' b>4 <e' b>4~ |
\break
%%15-19(21)
 <e' b>2 <fis' c'>4 <e' b> d'2~_\mp | d'1.( |
 \repeat volta 2 { g'1.)\(( | fis')\)( | } <g' c'>2.)_\f <fis' b>\( | \break
}

bassOne = {
          \clef bass
          \set Staff.midiInstrument = "synth voice"
\autoBeamOff
%%20(22)-25(32)
 e1.\)(\ppp | \repeat volta 2 { c)(_\( | d)( | b,)( | e)( | a)_\)( | }
\break
}

tenorOne = {
          \clef tenor
          \set Staff.midiInstrument = "pad 4 (choir)"
\autoBeamOff
%%26(33)-30(37)
  e'1.)(\fff | fis')( | a'2.)( g')( | d')( b)( | fis'1.)( |
\break
%%31(38)-36(47)
\repeat volta 2 {
 a'1.)(_\( | fis'2.)( g')( | e'1.)~ | e'1.( | }
 \alternative { { fis'2.)( g')_\) | } {fis'2.(\f a')( | } } \break
}

sopranoTwo = {
             \clef soprano
             \set Staff.midiInstrument = "synth voice"
\autoBeamOff
%%37(48)-41(52)
 e''1._\ppp)\(~ | e''( | d'')~ | d''( | e'')\)^\fermata \bar "|."
}

%% --- get sheet music
\score {
         \new Voice { \key g\major \time 3/2 \tempo 4 = 62
                          \sopranoOne \altoOne \bassOne \tenorOne \sopranoTwo }
  \layout { }
}
%% --- get midi music
\score {
         \new Staff { \key g\major \time 3/2 \tempo 4 = 62
                      \sopranoOne { \unfoldRepeats \altoOne }
                      { \unfoldRepeats \bassOne } { \unfoldRepeats \tenorOne }
                      \sopranoTwo }
  \midi { }
}

Next: , Previous: , Up: Top  

pompei.texi

%% 8:06 AM Thursday, January 18, 2024
%% Yukio Yoshida
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\input colordvi.tex
\input texinfo

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

@ifnottex
@node        Music Sheet,   pompei.ly,       Top,      Top
@comment      node-name,     next,          previous,    up
@c @top
@end ifnottex
@unnumbered Music Sheet
@ifhtml
@html
<p align = "center">
<a href="pompei.pdf">
<img src="pompei.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.ly,       pompei.texi,  Music Sheet,  Top
@comment    node-name,     next,         previous,        up
@end ifnottex
@unnumbered pompei.ly
@html
<blockquote><blockquote>
@end html
@verbatiminclude pompei.ly
@html
</blockquote></blockquote>
@end html

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

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