194 Gudh heligste Treenighet

Källa: Sid 368, Tonart: d \dorian

$\version "2.14.2" % Lilypond i MediaWikis Score extension är tämligen begränsad då Lilypond körs i safe mode (lilypond -dsafe=#t) % vilket slår av de flesta avancerade funktionerna av säkerhetsskäl. Dessutom kör svenska % wikisource med en ganska gammal version av Lilypond (2.14) som saknar en del funktionalitet % eller som är omöjlig att använda i safe mode. %%% taktstreck %%% % "divisioMaxima" = heldraget taktstreck divMax = { % Egentligen vore det kanske önskvärt med divisioMaxima genom % \once \override BreathingSign #'stencil = #ly:breathing-sign::divisio-maxima % \once \override BreathingSign #'Y-offset = #0 % \breathe % men det fungerar inte av okänd anledning. Går inte heller att inkludera "gregorian.ly" (safe mode). % % i stället använder vi ett vanligt taktstreck. \bar "|" } % slutstreck divFin = { \bar "||" } %%% paper & layout %%% \paper { indent=0\mm short-indent=0\mm oddFooterMarkup=##f oddHeaderMarkup=##f print-page-number=##f } % Vi kan inte ändra accidentalStyle manuellt. Som lösning använder vi MensuralVoice som har rätt bra inställningar. % \accidentalStyle "neo-modern" % Kräver 2.15 % #(ly:set-accidental-style 'neo-modern) % Fungerar inte i safe mode \layout { \context { \Score timing = ##f \remove "Bar_number_engraver" } % \context { % \Staff % \override TimeSignature #'style = #'mensural % \override NoteHead #'style = #'petrucci % } % MyVoice = MensuralVoice med Petrucci NoteHeads \context { \MensuralVoice \name "MyVoice" \alias "Voice" \consists "Slur_engraver" \override NoteHead #'style = #'petrucci \override Rest #'style = #'mensural % \override Flag #'style = #'mensural % 2.16+ \override Stem #'flag-style = #'mensural % 2.14 \override Stem #'thickness = #1.7 % \override Stem #'length = #5.5 } % MyStaff = MensuralStaff, fast med taktstreck \context { \MensuralStaff \name "MyStaff" \alias "Staff" \denies "Voice" \defaultchild "MyVoice" \accepts "MyVoice" \override BarLine #'transparent = ##f \override StaffSymbol #'thickness = #1.0 % default % \override StaffSymbol #'thickness = #1.3 } \context { \Score \accepts "MyStaff" } } %%% takt, tonart etc %%% pre = { \time 2/2 \key d \dorian } premelody = { \autoBeamOff \clef "petrucci-c1" \pre } prebass = { \autoBeamOff \clef "mensural-f" \pre } voicename = MyVoice %%% melodi %%% melody = \relative c' { a'8 d,4 e f e d cis d4.\fermata\divMax e8 f4 e d a' gis2 a4.\fermata\divMax a8 c4 d e c b4. a8 a4.\fermata\divMax c8 c4 a bes g g4. f8 f4.\fermata\divMax a8 c4. bes8 a4 d cis4. d8 d4.\fermata\divMax e8 e4. e8 e4.\fermata\divMax f8 e4. d8 cis4 d8 (e) e4.d8 d4\fermata\divFin } %%% bas %%% bass = \relative c { d8 d4 cis^"6" d e f8^"6" g a4^"#" d,4. cis8^"6" d4 cis^"6" b^"56" a e'^"#" e, a4.\fermata a'8 a2^"b" a,4 d^"7" e2^"4#" a,4.\fermata a8 f2 g4^"b" a8 b c2 f4.\fermata f,8 e2^"65" f4 g a2^"#" d4.\fermata a'8^"#" a4^"#" a,^"#" cis4.^"6" d8 e4 f8 g a4^"#" b^"6" a^"4" a,^"#" d4 } verse = \lyricmode { << { O Ska -- par' och o go -- de Gudh/ } \context Lyrics = "versRad2" { \set associatedVoice = "melody" För -- låt hwad giordt är mot tin Budh } >> << { All nå -- des brunn och Fa -- der/ } \context Lyrics = "versRad2" { \set associatedVoice = "melody" At Sa -- tan oss eij ska -- der. } >> Ejj han -- dla medh oss ef -- ter rätt/ Fast me -- ra up -- på Fa -- ders sätt/ At wij tin barn i tro -- ne reen/ Tigh u -- tan meen/ J dagh må tie -- na hwar och en. } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%% png / svg %%% \score { << \new \voicename = "melody" { \premelody \melody } \new Lyrics \lyricsto "melody" { \verse } \new \voicename {\prebass \bass } >> \layout {} } %%% midi / ogg %%% \score { << \new Staff { \unfoldRepeats { \melody } } \new Staff { \unfoldRepeats { \bass } } >> \midi { % \tempo 50 2 % 2.16+ \context { \Score tempoWholesPerMinute = #(ly:make-moment 50 2) } \context { \Staff midiInstrument = #"church organ" } } }$