• 簡易サンプルです(lilypond-book.pyを使わない例.)
  • 3個のファイル(UTF-8); short-refer.ly , run--script.cmd , short-refer.texi
  • running実行は; (cmd窓) >run--script short-refer[Enter]
  • OS;windows10(64bit) + lilypond + TeX-system(64bit) + ghostscript(64bit)

  • * short-refer.ly *
    %% Coding: utf-8 editor; Yukio Yoshida.
    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    \version "2.18.0"
    \paper {
        top-margin = 0.00\mm
        bottom-margin = 0.00\mm
        between-system-padding = 0.00\mm
        between-system-spacing = 0.00\mm
        head-separation = 0.00\mm
      paper-height = 100\mm
    }
    tagline = \markup { \null }
    
    sopranoOne = { \clef soprano
                 \set Staff.midiInstrument = "acoustic grand"
    \autoBeamOff
    %1-
     \repeat volta 3 { \repeat volta 2 {
     cis''2._\mp\<\( | e''4. d'' | b'2. | d''4. cis'' |
     e''2. | b'4. cis''\!\) | } d''2.^\fermata | } \break
    }
    
    altoOne = { \clef alto
              \set Staff.midiInstrument = "acoustic grand"
    \autoBeamOff
    %1-
     \repeat volta 3 { \repeat volta 2 {
     fis'2._\mp\<\( | a'4. g' | e'2. | g'4. fis' |
     a'2. | e'4. fis'\!\) | } g'2.^\fermata | } \break
    }
    
    tenorOne = { \clef tenor
              \set Staff.midiInstrument = "acoustic grand"
    \autoBeamOff
    %1-
     \repeat volta 3 { \repeat volta2 {
     fes4 ges\mp_\<  fes | des2.\! | ces4\mp_\< ees des |
     ees2.\! | des4\mp_\< fes ees | ces2.\! | } des2._\fermata | } \break
    }
    
    bassOne = { \clef bass
              \set Staff.midiInstrument = "acoustic grand"
    \autoBeamOff
    %1-
     \repeat volta 3 { \repeat volta2 {
     bes,4 ces\mp_\<  bes, | ges,2.\! | fes,4\mp_\< aes, ges, |
     aes,2.\! | ges,4\mp_\< bes, aes, | fes,2.\! | } ges,2._\fermata | }
    \break
    }
    
    % --- get sheet music
    \score {
     \context ChoirStaff = "UPDOWN" <<
     \context Staff = "Up" { \key d\major \time 3/4 \altoOne \sopranoOne }
     \context Staff = "Down" { \key ces\major \time 3/4 \bassOne \tenorOne }
                                    >>
      \layout { paper-height = 100\mm } }
    
    %% --- get midi music
    \score { \unfoldRepeats
     \context ChoirStaff = "UPDOWN" <<
     \context Staff = "Up" { \key d\major \time 3/4 \tempo 4 = 64
                             \altoOne \sopranoOne }
     \context Staff = "Down" { \key ces\major \time 3/4 \tempo 4 = 64
                             \bassOne \tenorOne }
                                    >>
      \midi {  } }
    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
     

    * run-script.cmd *
    lilypond -dbackend=svg %1.ly
    lilypond --ps %1.ly
    gswin64c -sDEVICE=eps2write -sOutputFile=%1.eps -dNOPAUSE %1.ps -c quit
    ptex %1.texi
    rem texindex %1.cp
    rem ptex %1.texi
    makeinfo --no-split --force --html %1.texi
    dvips -t letter -P dl %1.dvi
    call ps2pdf %1.ps %1.pdf
    %1.pdf | %1.html
    erase *.log %1-synctex.gz *.dvi *.ps *.eps *.png
    dir /oe
    

    * short-refer.texi *
    \input texinfo.tex
    @setfilename short-refer.info
    @settitle 刻印
    @documentlanguage en
    @documentencoding utf-8
    @c @setchapternewpage odd
    
    @tex
    \centerline {\bf 刻印}
    @end tex
    @iftex
    @image{short-refer, 6.0in,}
    @sp 3
    @end iftex
    
    @html
    <div align="center">
    <!--
    <a href="short-refer.ly"><i>short-refer.ly</i></a>  
    <audio src="short-refer.mp3" autoplay loop controls></audio>
      play:loop;
    <br />
    -->
    <a href="short-refer.mid"><i>short-refer.mid</i></a>  
    <br />
    <img src="short-refer.svg" alt="short-refer.svg"><br />
    </div>
    <br />
    <br />
    <div align="center"><b>刻印</b></div>
    @end html
    
    @html
    <span style="font-size: 16px;">
    <blockquote><blockquote><blockquote>
    <div style="background-color: coral;">
    <br />
    @end html
    
    @center "墓場を通って町に入り, 墓場を通って町をでる."
    
    @sp 1
    
    私の好きな言葉です @dots{}@dots{}, その町に眠る人々の間を歩いて町へ入って,
    その町に眠る人々の間を通って町を出る, @dots{}@dots{}旅人には素敵な言葉です.
    
    @sp 2
    
    大地から発掘された古代 Poempei(city)へ陸路から訪れるには,当時は!
    そうであった! 富豪者たちには敷地内の庭から海路へと船着き場はあったが,
    (生き物は全て消されその"悶え苦しみ驚き"の遺体は掘り出され保管され)
    ただただ, @dots{}@dots{}石積みの家屋・鉄製輪っかの荷馬車が行き来した
    轍の道路が @dots{}@dots{}満天星空のもと,ただただ, 無言で月明かりに映り
    だされている.
    
    @sp 1
    
    @center "何時かは, この地球 否! この宇宙も消え去る!"
    
    @html
    <br />
    <br />
    </div>
    </blockquote></blockquote></blockquote>
    </span>
    @end html
    
    @page
    @bye
    

       windows10 cmd窓; >run--script short-refer[Enter]
    実行結果です.(私の環境下)
    [picture]

    Lilypond(楽譜 マークアップ ランゲージ)・ Texinfo(文書 マークアップ ランゲージ)・ Html(ハイパーテキスト マークアップ ランゲージ)
    ......これらのコマンド(or要素)を覚える事はしない.   原稿記述をしていく中で自然に身につくことに任せるを推薦です.
    run--script.cmd の windowsOSのバッチファイルの記述は, 始めは
    "呪文"と理解してゆっくりと検証して理解進める ....これらの歩みで私は歩いてきました。
    今ここで...("1)~~~~5)"")この様に書けているのは 定年退職後10年間の歩みの結果と言うか足跡です.