LilyPond 記譜法リファレンス: 2.9 古代の記譜法

Editio Vaticana

\relative {
  \[ g' c, a' f d' \]
  a g f
  \[ e f a g \]
}

\score {
  \relative {
    a'1
    \break
    g
  }
  \layout {
    \context {
      \Staff
      \consists "Custos_engraver"
      \override Custos.style = #'mensural
    }
  }
}

\new Lyrics \lyricmode {
  \markup { \column {
    \typewriter "vaticana "
    \line { " " \musicglyph "custodes.vaticana.u0" }
  } }
  \markup { \column {
    \typewriter "medicaea "
    \line { " " \musicglyph "custodes.medicaea.u0" }
  }}
  \markup { \column {
    \typewriter "hufnagel "
    \line { " " \musicglyph "custodes.hufnagel.u0" }
  }}
  \markup { \column {
    \typewriter "mensural "
    \line { " " \musicglyph "custodes.mensural.u0" }
  }}
}

\score {
  <<
    \new MensuralVoice = "discantus" \relative {
      \hide Score.BarNumber {
        c''1\melisma bes a g\melismaEnd
        f\breve
        \[ f1\melisma a c\breve d\melismaEnd \]
        c\longa
        c\breve\melisma a1 g1\melismaEnd
        fis\longa^\signumcongruentiae
      }
    }
    \new Lyrics \lyricsto "discantus" {
      San -- ctus, San -- ctus, San -- ctus
    }
  >>
}

\override NoteHead.style = #'vaticana.punctum
\clef "vaticana-do1"
c'1

\override NoteHead.style = #'medicaea.punctum
\clef "medicaea-do3"
c'1

\override NoteHead.style = #'hufnagel.punctum
\clef "hufnagel-fa2"
c'1

\override NoteHead.style = #'neomensural
\clef "neomensural-c4"
c'1

scm/parser-clef.scm
breveTP = #(ly:make-duration -1 0 3/2)
…
{ c\breveTP f1 }

\set Score.skipBars = ##t
\autoBeamOff
\override NoteHead.style = #'petrucci
a'\maxima a'\longa a'\breve a'1 a'2 a'4 a'8 a'16 a'
\override NoteHead.style = #'semipetrucci
a'\breve*5/6
\override NoteHead.style = #'blackpetrucci
a'8*4/3 a'
\override NoteHead.style = #'petrucci
a'\longa

\relative c' {
  \override Flag.style = #'mensural
  \override Stem.thickness = #1.0
  \override NoteHead.style = #'mensural
  \autoBeamOff
  c8 d e f c16 d e f c32 d e f s8
  c'8 d e f c16 d e f c32 d e f
}

\set Score.skipBars = ##t
\override Rest.style = #'mensural
r\longa^"mensural" r\breve r1 r2 r4 r8 r16 s \break
\override Rest.style = #'neomensural
r\longa^"neomensural" r\breve r1 r2 r4 r8 r16

\override Staff.Accidental.glyph-name-alist =
  #alteration-mensural-glyph-name-alist

\relative {
  fis' gis
  \set suggestAccidentals = ##t
  ais bis
}

ficta = { \once \set suggestAccidentals = ##t }
\score { \relative
  \new MensuralVoice  {
    \once \set suggestAccidentals = ##t
    bes'4 a2 g2 \ficta fis8 \ficta e! fis2 g1
  }
}

\layout {
  \context {
    \Voice
    \remove "Ligature_bracket_engraver"
    \consists "Mensural_ligature_engraver"
  }
}

\score {
  \relative {
    \set Score.timing = ##f
    \set Score.defaultBarType = "-"
    \override NoteHead.style = #'petrucci
    \override Staff.TimeSignature.style = #'mensural
    \clef "petrucci-g"
    \[ c''\maxima g \]
    \[ d'\longa
       \override NoteHead.ligature-flexa = ##t
       \once \override NoteHead.flexa-width = #3.2
       c\breve f e d \]
    \[ c\maxima d\longa \]
    \[ e1 a, g\breve \]
  }
  \layout {
    \context {
      \Voice
      \remove "Ligature_bracket_engraver"
      \consists "Mensural_ligature_engraver"
    }
  }
}

\include "gregorian.ly"
\score {
  <<
    \new VaticanaVoice = "cantus" {
      \[ c'\melisma c' \flexa a \]
      \[ a \flexa \deminutum g\melismaEnd \]
      f \divisioMinima
      \[ f\melisma \pes a c' c' \pes d'\melismaEnd \]
      c' \divisioMinima \break
      \[ c'\melisma c' \flexa a \]
      \[ a \flexa \deminutum g\melismaEnd \] f \divisioMinima
    }
    \new Lyrics \lyricsto "cantus" {
      San- ctus, San- ctus, San- ctus
    }
  >>
}

\override Staff.Accidental.glyph-name-alist =
  #alteration-mensural-glyph-name-alist

gregorian.ly
gregorian.ly
ly/gregorian.ly
\include "gregorian.ly"
\score {
  \new VaticanaVoice {
    \override TextScript.font-family = #'typewriter
    \override TextScript.font-shape = #'upright
    \override Script.padding = #-0.1
    a\ictus_"ictus " \bar "" \break
    a\circulus_"circulus " \bar "" \break
    a\semicirculus_"semicirculus " \bar "" \break
    a\accentus_"accentus " \bar "" \break
    \[ a_"episema" \episemInitium \pes b \flexa a b \episemFinis \flexa a \]
  }
}

\include "gregorian.ly"
\score {
  \new VaticanaVoice {
    \[ \augmentum a \flexa \augmentum g \]
    \augmentum g
  }
}

gregorian.ly
gregorian.ly
% Font settings for Cyrillic
\paper {
  #(define fonts
    (set-global-fonts
     #:roman "Linux Libertine O,serif"
   ))
}

\score {
  <<
    \new KievanVoice = "melody" \relative c' {
      \cadenzaOn
        c4 c c c c2 b\longa
        \bar "k"
    }
    \new Lyrics \lyricsto "melody" {
      Го -- спо -- ди по -- ми -- луй.
    }
  >>
}

  \clef "kievan-do"
  \kievanOn
  c'

\autoBeamOff
\cadenzaOn
\kievanOn
b'1 b'2 b'4 b'8 b'\breve b'\longa
\kievanOff
b'2

\clef "kievan-do"
\override Accidental.glyph-name-alist =
 #alteration-kievan-glyph-name-alist
bes' dis'

  \kievanOn
  \clef "kievan-do"
  c' \bar "k"

\layout {
  \context {
    \Voice
    \remove "Ligature_bracket_engraver"
    \consists "Kievan_ligature_engraver"
  }
}

% Font settings for Cyrillic
\paper {
  #(define fonts
    (set-global-fonts
     #:roman "Linux Libertine O,serif"
   ))
}

\score {
  <<
    \new KievanVoice = "melody" \relative c' {
      \cadenzaOn
        e2 \[ e4( d4 ) \] \[ c4( d e  d ) \] e1 \bar "k"
    }
    \new Lyrics \lyricsto "melody" {
      Га -- врі -- и -- лу
    }
  >>
}

\score {
  \new Staff <<
    \new Voice = Tenor {
      \set Staff.instrumentName = "Tenor"
      \override Staff.InstrumentName.self-alignment-X = #RIGHT
      \incipit { \clef "mensural-c4" \key f \major r\breve r1 c'1 }
      \clef "treble_8"
      \key f \major
      R1 r2 c'2 |
      a4. c'8
    }
    \new Lyrics \lyricsto Tenor { Cyn -- thia your }
  >>
  \layout
  {
    indent = 5\cm
    incipit-width = 3\cm
  }
}

global = {
  \hide Staff.BarLine
  s1 s
  % the final bar line is not interrupted
  \undo \hide Staff.BarLine
  \bar "|."
}

\new StaffGroup \relative c'' {
  <<
    \new Staff { << \global { c1 c } >> }
    \new Staff { << \global { c c } >> }
  >>
}

\layout {
  …
  \context {
    \Voice
      \remove "Stem_engraver"
  }
}

\include "gregorian.ly"
chant = \relative {
  \clef "G_8"
  c'\breve c4 b4 a c2 c4  \divisioMaior
  c\breve c4 c f, f \finalis
}

verba = \lyricmode {
  \once \override LyricText.self-alignment-X = #-1
  "Noctem quietam et" fi -- nem per -- fec -- tum
  \once \override LyricText.self-alignment-X = #-1
  "concedat nobis Dominus" om -- ni -- po -- tens.
}
\score {
  \new Staff <<
  \new Voice = "melody" \chant
  \new Lyrics = "one" \lyricsto melody \verba
  >>
  \layout {
    \context {
      \Staff
      \remove "Time_signature_engraver"
      \remove "Bar_engraver"
    }
    \context {
      \Voice
      \remove "Stem_engraver"
    }
  }
}

\include "gregorian.ly"
chant = \relative {
  \clef "G_8"
  \set Score.timing = ##f
  \hide Stem
  c'\breve \hide NoteHead  c c c c c
  \undo \hide NoteHead
  \undo \hide Stem \stemUp c4 b4 a
  \hide Stem c2 c4  \divisioMaior
  c\breve \hide NoteHead c c c c c c c
  \undo \hide NoteHead c4 c f, f \finalis
}

verba = \lyricmode {
  No -- ctem qui -- e -- tam et fi -- nem per -- fec -- tum
  con -- ce -- dat no -- bis Do -- mi -- nus om -- ni -- po -- tens.
}

\score {
  \new Staff <<
    \new Voice = "melody" \chant
    \new Lyrics \lyricsto "melody" \verba
  >>
  \layout {
    \context {
      \Staff
      \remove "Time_signature_engraver"
      \hide BarLine
    }
  }
}

spiritus = \relative {
  \time 1/4
  \override Lyrics.LyricText.X-extent  = #'(0 . 3)
  d'4 \tuplet 3/2 { f8 a g } g a a4 g f8 e
  d4 f8 g g8 d f g a g f4 g8 a a4  s
  \tuplet 3/2 { g8 f d } e f g a g4
}

spirLyr = \lyricmode {
  Spi -- ri -- _ _ tus  _ Do -- mi -- ni  _ re -- ple -- _ vit _
  or -- _ bem _  ter -- ra -- _ rum, al -- _ _ le -- _ lu
  -- _ ia.
}
\score {
  \new Staff <<
    \new Voice = "chant" \spiritus
    \new Lyrics = "one" \lyricsto "chant" \spirLyr
  >>
  \layout {
    \context {
      \Staff
      \remove "Time_signature_engraver"
      \override BarLine.X-extent = #'(-1 . 1)
      \hide Stem
      \hide Beam
      \hide BarLine
      \hide TupletNumber
    }
  }
}

menrest = #(define-music-function (note)
  (ly:music?)
#{
    \tag #'mens $(make-music 'RestEvent note)
    \tag #'mod $(make-music 'RestEvent note 'pitch '())
#})

MensStyle = {
  \autoBeamOff
  \override NoteHead.style = #'petrucci
  \override Score.BarNumber.transparent = ##t
  \override Stem.neutral-direction = #up
}

finalis = {
  \once \override BreathingSign.stencil = #ly:breathing-sign::finalis
  \once \override BreathingSign.Y-offset = #0
  \once \override BreathingSign.minimum-X-extent = #'(-1.0 . 0.0)
  \once \override BreathingSign.minimum-Y-extent = #'(-2.5 . 2.5)

  \breathe
}

Music = \relative c'' {
  \set Score.tempoHideNote = ##t
  \key f \major
  \time 4/4
  g1 d'2 \menrest bes4 bes2 a2 r4 g4 fis2.
  \tag #'mens { \finalis }
  \tag #'mod { \bar "||" }
}

MenLyr = \lyricmode { So farre, deere life, deare life }
ModLyr = \lyricmode { So far, dear life, dear life }

\score {
  \keepWithTag #'mens {
    <<
      \new MensuralStaff
      {
        \new MensuralVoice = Cantus \clef "mensural-c1" \MensStyle \Music
      }
      \new Lyrics \lyricsto Cantus \MenLyr
    >>
  }
}

\score {
  \keepWithTag #'mod {
    \new ChoirStaff <<
      \new Staff
      {
        \new Voice = Sop \with {
          \remove "Note_heads_engraver"
          \consists "Completion_heads_engraver"
          \remove "Rest_engraver"
          \consists "Completion_rest_engraver" }
        {
          \shiftDurations #1 #0 { \autoBeamOff \Music }
        }
      }
      \new Lyrics \lyricsto Sop \ModLyr
    >>
  }
}

2.9.1 サポートされているスタイルの概要
2.9.2 古代音楽で共通の記譜法
2.9.3 計量音楽の記譜
2.9.4 グレゴリオ聖歌の記譜
2.9.5 キエフ記譜法で譜刻する
2.9.6 古代音楽に取り組む—事例とその解決法

計量記譜法のコンテキスト
計量記譜法の音部記号
計量記譜法の拍子記号
計量記譜法の符頭
計量記譜法の符尾
計量記譜法の休符
計量記譜法の臨時記号と調号
注釈的な臨時記号 (ムジカ・フィクタ)
白色計量記譜法のリガトゥーラ

グレゴリオ聖歌のコンテキスト
グレゴリオ聖歌の音部記号
グレゴリオ聖歌の臨時記号と調号
ディビジオ
グレゴリオ聖歌のアーティキュレーション
付点 (モラ)
グレゴリオ聖歌の四角形ネウマのリガトゥーラ

説明	サポートされている音部記号	例
Editio Vaticana スタイルのハ音記号	`vaticana-do1`, `vaticana-do2`, `vaticana-do3`
Editio Vaticana スタイルのヘ音記号	`vaticana-fa1`, `vaticana-fa2`
Editio Medicaea スタイルのハ音記号	`medicaea-do1`, `medicaea-do2`, `medicaea-do3`
Editio Medicaea スタイルのヘ音記号	`medicaea-fa1`, `medicaea-fa2`
hufnagel スタイルのハ音記号	`hufnagel-do1`, `hufnagel-do2`, `hufnagel-do3`
hufnagel スタイルのヘ音記号	`hufnagel-fa1`, `hufnagel-fa2`
hufnagel style のハ音記号とヘ音記号を組み合わせたもの	`hufnagel-do-fa`

主要な/液化した形	出力	LilyPond コード
プンクトゥム (Punctum)		`\[ b \]`
		`\[ \cavum b \]`
		`\[ \linea b \]`
Punctum Auctum Ascendens		`\[ \auctum \ascendens b \]`
Punctum Auctum Descendens		`\[ \auctum \descendens b \]`
プンクトゥムインクリナトゥム (Punctum inclinatum)		`\[ \inclinatum b \]`
Punctum Inclinatum Auctum		`\[ \inclinatum \auctum b \]`
Punctum Inclinatum Parvum		`\[ \inclinatum \deminutum b \]`
ヴィルガ (Virga)

定義されているコンテキスト
リガトゥーラ
クストス

クリヴィス/フレクサ (Clivis vel Flexa)		`\[ b \flexa g \]`
Clivis Aucta Descendens		`\[ b \flexa \auctum \descendens g \]`
Clivis Aucta Ascendens		`\[ b \flexa \auctum \ascendens g \]`
Cephalicus		`\[ b \flexa \deminutum g \]`
ポダトゥス/ペス Podatus vel Pes		`\[ g \pes b \]`
Pes Auctus Descendens		`\[ g \pes \auctum \descendens b \]`
Pes Auctus Ascendens		`\[ g \pes \auctum \ascendens b \]`
Epiphonus		`\[ g \pes \deminutum b \]`
Pes Initio Debilis		`\[ \deminutum g \pes b \]`
Pes Auctus Descendens Initio Debilis		`\[ \deminutum g \pes \auctum \descendens b \]`

トルクルス (Torculus)		`\[ a \pes b \flexa g \]`
Torculus Auctus Descendens		`\[ a \pes b \flexa \auctum \descendens g \]`
Torculus Deminutus		`\[ a \pes b \flexa \deminutum g \]`
Torculus Initio Debilis		`\[ \deminutum a \pes b \flexa g \]`
Torculus Auctus Descendens Initio Debilis		`\[ \deminutum a \pes b \flexa \auctum \descendens g \]`
Torculus Deminutus Initio Debilis		`\[ \deminutum a \pes b \flexa \deminutum g \]`
ポレクトゥス (Porrectus)		`\[ a \flexa g \pes b \]`
Porrectus Auctus Descendens		`\[ a \flexa g \pes \auctum \descendens b \]`
Porrectus Deminutus		`\[ a \flexa g \pes \deminutum b \]`
クリマクス (Climacus)		`\[ \virga b \inclinatum a \inclinatum g \]`
Climacus Auctus		`\[ \virga b \inclinatum a \inclinatum \auctum g \]`
Climacus Deminutus		`\[ \virga b \inclinatum a \inclinatum \deminutum g \]`
スカンディクス (Scandicus)		`\[ g \pes a \virga b \]`
Scandicus Auctus Descendens		`\[ g \pes a \pes \auctum \descendens b \]`
Scandicus Deminutus		`\[ g \pes a \pes \deminutum b \]`

クイリスマ (Quilisma)		`\[ g \pes \quilisma a \pes b \]`
Quilisma Pes Auctus Descendens		`\[ \quilisma g \pes \auctum \descendens b \]`
オリスクス (Oriscus)		`\[ \oriscus b \]`
Pes Quassus		`\[ \oriscus g \pes \virga b \]`
Pes Quassus Auctus Descendens		`\[ \oriscus g \pes \auctum \descendens b \]`
サリクス (Salicus)		`\[ g \oriscus a \pes \virga b \]`
Salicus Auctus Descendens		`\[ g \oriscus a \pes \auctum \descendens b \]`
(アポ)ストロファ ((Apo)stropha)		`\[ \stropha b \]`
Stropha Aucta		`\[ \stropha \auctum b \]`
ビストロファ (Bistropha)		`\[ \stropha b \stropha b \]`
トリストロファ (Tristropha)		`\[ \stropha b \stropha b \stropha b \]`
Trigonus		`\[ \stropha b \stropha b \stropha a \]`

キエフ記譜法のコンテキスト
キエフ記譜法の音部記号
キエフ記譜法の音符
キエフ記譜法の臨時記号
キエフ記譜法の小節線
キエフ記譜法のメリスマ

インキピット
Mensurstriche レイアウト
グレゴリオ聖歌を転写する
1 つのソースから古代譜と現代譜の両方を生成する
編集上のマーク

2.9 古代の記譜法

参照

2.9.1 サポートされているスタイルの概要

参照

2.9.2 古代音楽で共通の記譜法

定義されているコンテキスト

参照

リガトゥーラ

参照

既知の問題と警告

クストス

参照

2.9.3 計量音楽の記譜

計量記譜法のコンテキスト

参照

計量記譜法の音部記号

参照

既知の問題と警告

計量記譜法の拍子記号

参照

既知の問題と警告

計量記譜法の符頭

計量記譜法の符尾

参照

既知の問題と警告

計量記譜法の休符

参照

既知の問題と警告

計量記譜法の臨時記号と調号

参照

注釈的な臨時記号 (ムジカ・フィクタ)

参照

白色計量記譜法のリガトゥーラ

参照

既知の問題と警告

2.9.4 グレゴリオ聖歌の記譜

参照

グレゴリオ聖歌のコンテキスト

グレゴリオ聖歌の音部記号

参照

グレゴリオ聖歌の臨時記号と調号

参照

ディビジオ

定義済みコマンド

参照

グレゴリオ聖歌のアーティキュレーション

参照

既知の問題と警告

付点 (モラ)

参照

グレゴリオ聖歌の四角形ネウマのリガトゥーラ

定義済みコマンド

参照

既知の問題と警告

2.9.5 キエフ記譜法で譜刻する

キエフ記譜法のコンテキスト

参照

既知の問題と警告

キエフ記譜法の音部記号

参照

キエフ記譜法の音符

参照

既知の問題と警告

キエフ記譜法の臨時記号

参照

キエフ記譜法の小節線

参照

キエフ記譜法のメリスマ

参照

既知の問題と警告

2.9.6 古代音楽に取り組む—事例とその解決法

インキピット

既知の問題と警告

Mensurstriche レイアウト

グレゴリオ聖歌を転写する

1 つのソースから古代譜と現代譜の両方を生成する

編集上のマーク