+++ /dev/null
-
-\version "2.7.39"
-
-\header {
-
- texidoc = "There a many types of bar lines available."
-
-}
-
-\layout { ragged-right = ##t }
-
-\relative {
- \override Score.RehearsalMark #'padding = #3
-
- c4 \bar "|" \mark \markup { \simple #"|" }
- c \bar "|:" \mark \markup { \simple #"|:" }
- c \bar "||" \mark \markup { \simple #"||" }
- c \bar ":|" \mark \markup { \simple #":|" }
- c \bar ".|" \mark \markup { \simple #".|" }
- c \bar ".|." \mark \markup { \simple #".|." }
- c \bar ":|:" \mark \markup { \simple #":|:" }
- c \bar "|." \mark \markup { \simple #"|." }
- c \bar ":" \mark \markup { \simple #":" }
- c
-}
+++ /dev/null
-\header {
- texidoc = "
-
-Bar numbers can be printed at regular intervals, inside a box or a circle.
-
-" }
-
-\version "2.7.39"
-
-\relative c'{
- \override Score.BarNumber #'break-visibility = #end-of-line-invisible
- \set Score.barNumberVisibility = #(every-nth-bar-number-visible 4)
- \override Score.BarNumber #'font-size = #2
-
- \override Score.BarNumber #'stencil
- = #(make-stencil-boxer 0.1 0.25 ly:text-interface::print)
- \repeat unfold 5 { c1 } \bar "|"
-
- \override Score.BarNumber #'stencil
- = #(make-stencil-circler 0.1 0.25 ly:text-interface::print)
- \repeat unfold 4 { c1 } \bar "|."
-}
-
-
+++ /dev/null
-\version "2.7.39"
-\header {
-
-texidoc = " Chord names are generated from a list pitches. The
-functions which construct these names can be customised. Here are shown
-Jazz chords, following Ignatzek (pp. 17-18, 1995) and
-an alternative Jazz chord notation.
-
-Chords following Banter (1987) can also be printed from this file, but
-are turned off for brevity.
-
-"
-
-}
-
-chs = \transpose c' c'
-{
- <c e g>1
- <c es g>% m = minor triad
- <c e gis>
- <c es ges> \break
- <c e g bes>
- <c es g bes>
- <c e g b> % triangle = maj
- <c es ges beses>
- <c es ges b> \break
- <c e gis bes>
- <c es g b>
- <c e gis b>
- <c es ges bes>\break
- <c e g a> % 6 = major triad with added sixth
- <c es g a> % m6 = minor triad with added sixth
- <c e g bes d'>
- <c es g bes d'> \break
- <c es g bes d' f' a' >
- <c es g bes d' f' >
- <c es ges bes d' >
- <c e g bes des' > \break
- <c e g bes dis'>
- <c e g bes d' f'>
- <c e g bes d' fis'>
- <c e g bes d' f' a'>\break
- <c e g bes d' fis' as'>
- <c e gis bes dis'>
- <c e g bes dis' fis'>
- <c e g bes d' f' as'>\break
- <c e g bes des' f' as'>
- <c e g bes d' fis'>
- <c e g b d'>
- <c e g bes d' f' as'>\break
- <c e g bes des' f' as'>
- <c e g bes des' f' a'>
- <c e g b d'>
- <c e g b d' f' a'>\break
- <c e g b d' fis'>
- <c e g bes des' f ' a'>
- <c f g>
- <c f g bes>\break
- <c f g bes d'>
- <c e g d'> % add9
- <c es g f'>
-}
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% alternate Jazz notation
-
-efullmusicJazzAlt =
-{
- <c e gis>1-\markup { "+" }
- <c e g b>-\markup { \normal-size-super
- % \override #'(font-family . math) "N" }
- \override #'(font-family . math) "M" }
- %%c:3.5.7 = \markup { \override #'(font-family . math) "M" }
- %%c:3.5.7 = \markup { \normal-size-super "maj7" }
-
- <c es ges>-\markup { \super "o" } % should be $\circ$ ?
- <c es ges bes>-\markup { \super \combine "o" "/" }
- <c es ges beses>-\markup { \super "o7" }
-}
-
-efullJazzAlt = #(sequential-music-to-chord-exceptions efullmusicJazzAlt #f)
-
-epartialmusicJazzAlt = {
- <c d>1-\markup { \normal-size-super "2" }
- <c es>-\markup { "m" }
- <c f>-\markup { \normal-size-super "sus4" }
- <c g>-\markup { \normal-size-super "5" }
-
- %% TODO, partial exceptions
- <c es f>-\markup { "m" }-\markup { \normal-size-super "sus4" }
- <c d es>-\markup { "m" }-\markup { \normal-size-super "sus2" }
-}
-
-epartialJazzAlt = #(sequential-music-to-chord-exceptions epartialmusicJazzAlt #f)
-
-jazzAltProperties = \sequential {
- \set majorSevenSymbol = #whiteTriangleMarkup
- \set chordNameSeparator = #(make-simple-markup "/")
- \set chordNameExceptionsFull = #efullJazzAlt
- \set chordNameExceptionsPartial = #epartialJazzAlt
- \set chordNameFunction = #jazz-chord-names
-}
-
-banterProperties = \sequential {
- \set chordNameFunction = #banter-chord-names
-}
-
-\score{
- <<
- \new ChordNames {
- \set instrument = #"Ignatzek (default)"
- \set instr = #"Def"
- \chs
- }
-
- \new ChordNames {
- \jazzAltProperties
- \set instrument = #"Alternative"
- \set instr = #"Alt"
- \chs
- }
-
-%{
-
- %% This is the Banter (1987) style. It gives exceedingly
- %% verbose (wide) names, making the output file take up to 4 pages.
- %% (FIXME: how big is is now?)
- %% Turned off by default.
-
- %% FIXME: use smaller font for Banter (or remove some esoteric
- %% chords).
-
- \new ChordNames {
- \banterProperties
- \set instrument = #"Banter"
- \set instr = #"Ban"
- \chs
- }
-%}
-
- \new Staff \transpose c c' { \chs }
- >>
- \layout {
- indent = 3.\cm
- \context {
- \ChordNames
- \consists Instrument_name_engraver
- }
- }
-}
-
+++ /dev/null
-\version "2.7.39"
-\header {
- texidoc = "@cindex Chord Names German
-The english naming of chords (default) can be changed to german
-(@code{\germanChords} replaces B and Bes to H and B), semi-german
-(@code{\semiGermanChords} replaces B and Bes to H and Bb), italian
-(@code{\italianChords} uses Do Re Mi Fa Sol La Si), or french
-(@code{\frenchChords} replaces Re to Ré).
-
-" }
-
-scm = \chordmode {
- e1/d c:m
- % c/c cis/cis
- % yeah, we get the idea. -hwn
-
- % cisis/cisis ces/ces ceses/ceses
- b/b bis/bis bes/bes
- % beses/beses
-}
-
-
-\layout {
- ragged-right = ##t
- \context {\ChordNames \consists Instrument_name_engraver }
-}
-
-<<
- \new ChordNames {
- \set instrument = #"default"
- \scm
- }
- \new ChordNames {
- \set instrument = #"german"
- \germanChords \scm }
- \new ChordNames {
- \set instrument = #"semi-german"
- \semiGermanChords \scm }
- \new ChordNames {
- \set instrument = #"italian"
- \italianChords \scm }
- \new ChordNames {
- \set instrument = #"french"
- \frenchChords \scm }
-
- \context Voice { \scm }
->>
+++ /dev/null
-% possible rename to ancient- or gregorian- ?
-\header {
- texidoc = "@cindex Divisiones
-
-Divisiones are ancient variants of breathing signs.
-Choices are @code{divisioMinima}, @code{divisioMaior},
-@code{divisioMaxima} and @code{finalis}, @code{virgula} and
-@code{caesura}.
-
-" }
-
-\version "2.7.39"
-
-\include "gregorian-init.ly"
-
-\score {
- <<
- \context VaticanaVoice {
- \override TextScript #'padding = #3
- g a g
- s^\markup { "divisio minima" }
- \divisioMinima
- g a g
- s^\markup { "divisio maior" }
- \divisioMaior
- g a g
- s^\markup { "divisio maxima" }
- \divisioMaxima
- \break
- g a g
- s^\markup { "finalis" }
- \finalis
- g a g
- s^\markup { "virgula" }
- \virgula
- g a g
- s^\markup { "caesura" }
- \caesura
- g a g
- }
- >>
-}
+++ /dev/null
-%% texidoc = "Include file for engraver example."
-\version "2.7.39"
-topVoice = \relative c' {
- \key d\major
- es8([ g] a[ fis])
- b4
- b16[-. b-. b-. cis-.]
- d4->
-}
-
-botVoice = \relative c' {
- \key d\major
- c8[( f] b[ a)]
- es4
- es16[-. es-. es-. fis-.]
- b4->
-}
-
-hoom = \relative c {
- \key d \major
- \clef bass
- g8-. r
- r4
- fis8-.
- r8
- r4
- b'4->
-}
-
-pah = \relative c' {
- r8 b-.
- r4
- r8 g8-.
- r16 g-. r8
- \clef treble
- fis'4->
-}
+++ /dev/null
-
-#(set-global-staff-size 16)
-
-\paper {
- %% ugh. text on toplevel is a bit broken... .
-
- oddHeaderMarkup = \markup {}
- evenHeaderMarkup = \markup {}
- oddFooterMarkup = \markup {}
- evenFooterMarkup = \markup {}
- }
-
-\version "2.7.39"
-
-#(define (doc-char name)
- (make-line-markup
- (list
- (make-pad-to-box-markup
- '(0 . 30)
- '(-2 . 2)
- (make-typewriter-markup (make-small-markup name)))
- (make-pad-to-box-markup
- '(-2 . 2)
- '(-2 . 2)
- (make-musicglyph-markup name)))))
-
-#(define (min-length lst n)
- "(min (length lst) n)"
-
- (if (or (null? lst) (<= n 0))
- 0
- (1+ (min-length (cdr lst) (1- n)) )))
-
-#(define (doc-chars names acc)
- (let*
- ((n (min-length names 2))
- (head (take names n))
- (tail (drop names n))
- )
-
- (if (null? head)
- acc
- (doc-chars tail
- (cons (make-line-markup (map doc-char head)) acc)))
- ))
-
-#(define (group-lines lines)
- (let*
- ((n (min-length lines 25))
- (head (take lines n))
- (tail (drop lines n))
- )
-
- (cons
- (make-column-markup head)
- (if (null? tail)
- '()
- (group-lines tail)))))
-
-#(let*
- ((lines (doc-chars
- (ly:otf-glyph-list (ly:font-load "emmentaler-20"))
- '()))
- (pages (group-lines (reverse lines))))
-
- (for-each
- (lambda (x)
- (collect-scores-for-book parser
- (make-override-markup '(word-space . 8) x)))
- pages))
-
-
+++ /dev/null
-
-\header { texidoc = "Ossia fragments can be done with starting and
-stopping staves. " }
-
-\version "2.7.39"
-\paper { ragged-right = ##t }
-
-<<
- \new Staff \with
- {
- \remove "Time_signature_engraver"
- fontSize = #-2
- \override StaffSymbol #'staff-space = #(magstep -2)
- firstClef = ##f
- }
- \relative c'' {
- \stopStaff
- \skip 2
-
- \startStaff
- \clef treble
- bes8[^"ossia" g bes g]
- \stopStaff
-
- s2
-
- \startStaff
- f8 d g4
- }
- \new Staff \relative
- {
- \time 2/4
- c4 c g' g a a g2
- }
-
->>
+++ /dev/null
-
-% this chart is used in the manual too.
-
-\version "2.7.39"
-\header { texidoc = "@cindex Script Abbreviations
-
-Some articulations may be entered using an abbreviation.
-
-"
-
-}
-
-\score {
- \context Voice {
- \override TextScript #'font-family = #'typewriter
- \override TextScript #'font-shape = #'upright
- c''4-._"c-." s4
- c''4--_"c--" s4
- c''4-+_"c-+" s4
- c''4-|_"c-|" s4
- c''4->_"c->" s4
- c''4-^_"c-^" s4
- c''4-__"c-_" s4
- }
- }
-
+++ /dev/null
-\version "2.7.39"
-
-% this chart is used in the manual too.
-
-\header {
- texidoc ="@cindex Feta scripts
-
-This chart shows all articulations, or scripts, that feta font contains.
-
-"
-}
-
-\score {
- <<
- \override Score.LyricText #'font-family = #'typewriter
- \override Score.LyricText #'font-shape = #'upright
- \context Staff {
- \set Score.timing = ##f
- \set Score.barAlways = ##t
- \override Score.SeparationItem #'padding = #2.5
- \override Staff.BarLine #'transparent = ##t
- c''\accent c''\marcato c''\staccatissimo c''\espressivo
- c''\staccato c''\tenuto c''\portato
- c''\upbow c''\downbow c''\flageolet
- c''\thumb c''^\lheel c''\rheel
- c''^\ltoe c''\rtoe c''\open
- c''\stopped c''\turn c''\reverseturn
- c''\trill c''\prall c''\mordent
- c''\prallprall c''\prallmordent c''\upprall
- c''\downprall c''\upmordent c''\downmordent
- c''\pralldown c''\prallup c''\lineprall
- c''\signumcongruentiae c''\shortfermata c''\fermata
- c''\longfermata c''\verylongfermata c''\segno
- c''\coda c''\varcoda
- }
- \context Lyrics \lyricmode {
- accent__ marcato__ staccatissimo__ espressivo__
- staccato__ tenuto__ portato__
- upbow__ downbow__ flageolet__
- thumb__ lheel__ rheel__
- ltoe__ rtoe__ open__
- stopped__ turn__ reverseturn__
- trill__ prall__ mordent__
- prallprall__ prallmordent__ upprall__
- downprall__ upmordent__ downmordent__
- pralldown__ prallup__ lineprall__
- signumcongruentiae__ shortfermata__ fermata__
- longfermata__ verylongfermata__ segno__
- coda__ varcoda__
- }
- >>
- \layout {
- line-width = 5.1\in
- indent = 0.0\mm
- }
- }
-
-
projects / lilypond.git / commitdiff