Hoppa till innehållet

Sida:Psalm1695-2.djvu/2

Från Wikisource, det fria biblioteket.
Den här sidan har korrekturlästs av flera personer
238 Jule Högtijds Psalmer. 239

[ till föreg. uppslag ]

Så må nu hwar man wara gladh/
Och prisa Gudh i allan stadh;
Han är wår käre Fader.

IV.

Jule Högtijds Psalmer/

Om Christi Födelse.

121.

Koral nr 121 [visa] [redigera] [historik] [rensa sidcachen]


\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 3/2
  \key c \major
}

premelody = {
  \autoBeamOff
  \clef "petrucci-c1"
  \pre
}

prebass = {
  \autoBeamOff
  \clef "mensural-f"
  \pre
}

voicename = MyVoice

%%% melodi %%%

melody = \relative c' {
  a'2 a1 a2 g1 a2 c1 a2 g1 \fermata\divMax
c2 d1 d2 d1 c2 d1 d2 e1 \fermata\divMax
e2 e1 d2 e1 c2 d( c) b a1 \fermata\divMax
a2 gis1 a2 c1 d2 a1 gis2 a1 \fermata\divFin
}

%%% bas %%%

bass = \relative c {
  a2 a1 d2 e1 d2 c1 d2^"#" g,1  \fermata\divMax
a2 d1. b1 a2 g1 g2 c1  \fermata\divMax
c2 c1 g2 c1 a2 d1 e2^"#" a,1 \fermata\divMax
a2 e'1^"#" d2 c1 b2 c^"6" d e^"#" a,1 \fermata\divFin
}

verse = \lyricmode {
 Werl -- de -- nes Fräl -- sa -- re kom här;
Låt see at Jung -- fru mo -- der är.
All werl -- den må thess vnd -- ra sigh.
En så -- dan -- na börd höf -- des tigh.
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%% 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 120 3  % 2.16+
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 120 3)
    }
    \context {
      \Staff
      midiInstrument = #"church organ"
    }
  }
}

1 WErldenes Frälsare kom här;
Låt see at Jungfru moder är.
All werlden må thess vndra sigh/
En sådana börd höfdes tigh.

2. Af mans hielp är thet eij så skedt/
Gudh sielf hafwer sin nådh betedt.
Gudz Ord är här nu wordet kött:
Af Jungfru lifwe är thet födt.

3. Jungfrunes qwedh här fruchtsam war/
Men jungfrudomen blef doch qwar.
Gudz stora krafft lät sigh skina/
Werckandes i Temple sino.

4. Af Himmels throne kom här nidh
En starck kämpe och bar oss frijd:
Han är nu både Gudh och Man/
Then som oss allom hielpa kan.

5. Från Fadren han vthgången war;
Sann mandom han til Fadren bar.
Hans wälde går öfwer all land:
Han sitter på Gudz högra hand.

6. Så stoor som Fadrens/ är hans macht/
Döden hafwer han nederlagt.
Helwetis krafft gaf sigh ther widh/
Åt hennes Förste lades nidh.

7. Ähra och prijs ske Fadrenom;
Thesslikes också Sonenom:
Then Helga Anda ske också/
At ther är ingen ände på.


122.

Koral nr 122 [visa] [redigera] [historik] [rensa sidcachen]


\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 \minor
}

premelody = {
  \autoBeamOff
  \clef "petrucci-c1"
  \pre
}

prebass = {
  \autoBeamOff
  \clef "mensural-f"
  \pre
}

voicename = MyVoice

%%% melodi %%%

melody = \relative c' {
  g'1 a bes c( d) g, a( bes) c( bes a) a \fermata\divMax
c1 d( f) f f( e) d( c) d( e) e e \fermata\divMax
d1 e( f g) e f( e d) c d( bes a g bes) c d \fermata\divMax
g,1 a g d' d( e f e d c) a( bes c) bes( a) a \fermata\divFin
}

%%% bas %%%

bass = \relative c {
  
}

verse = \lyricmode {
 Wij lof -- wom Christ en Ko -- nung båld/
Af Sol -- sens vp -- gång är hans wåld/
Alt vth så wijdt om jor -- den är.
Han föd -- des af een jung -- fru skär.
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%% png / svg %%%

\score {
  <<
    \new \voicename = "melody" { \premelody \melody }
      \new Lyrics \lyricsto "melody" { \verse }
    
  >>
  \layout {}
}

%%% midi / ogg %%%

\score {
  <<
  \new Staff { \unfoldRepeats { \melody } }
  
  >>
  \midi {
    % \tempo 180 2  % 2.16+
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 180 2)
    }
    \context {
      \Staff
      midiInstrument = #"church organ"
    }
  }
}

1. Wij lofwom Christ en Konung båld.
Af Solsens vpgång är hans wåld/
Alt vth så wijdt som jorden är.
Han föddes af en jungfru skär.

2. Then werlden skop aldeles wäl/
Påtog Mandom/ och wardt en träl/
At menniskian som förtappad låg/
I honom måtte frälsas så.

Han Hh 3. Gudz