Hoppa till innehållet

Sida:Psalm1695-1.djvu/121

Från Wikisource, det fria biblioteket.
Den här sidan har inte korrekturlästs
216 Konung Dawidz Psalmer. Konung Dawidz Psalmer. 217

Then som liter på hans nådh/
Och hos honom söker rådh.

6. Gudh är tehn som medh ett ord
Skapte Himmel/ haaf och jord/
Medh alt hwad som ther på är;
Håller troo och sanning kär.

7. Then som hungrar giör han mätt;
Skaffar then förtryckta rätt;
Löser then som fången är;
Blindom åter syn beskär.

8. Rättar up alt meer och meer
Then som ligger slagen neer;
Älskar then som lefwer from:
Spaar then onda til sin doom.

9. HErren seer til enkiors nödh/
Gifwer theras barnom bördh;
Främlingar bewisar godt;
Giör the ondas wägh til spott.

10. Zions Gudh är sannerlig
En stoor Konung ewiglig:
Lofwa HErran gammal/ ung/
Gladlig Halleluja siung.


108.

Koral nr 108 [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 g \major
}

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

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

voicename = MyVoice

%%% melodi %%%

melody = \relative c' {
  \repeat volta 2{g'8 b4 c4 d4 e4 c4. b8 b4.\fermata\divMax
a8 g4 g4 c4 b4 a4. g8 g4.\fermata\divMax}
b8 d4 b4 g4 b4 a4. g8 fis4.\fermata\divMax
fis8 g4 a4 b4 e,4 fis4. e8 d4.\fermata\divMax
d8 g4 a4 b4 c4 a4. (g8) g4.\fermata\divFin
}

%%% bas %%%

bass = \relative c {
  \repeat volta 2{g8 g4 a4 b4^"6" c4 a2^"76" g4.\fermata\divMax
d'8 e4 d4 c2 d4 d,4 g4.\fermata\divMax}
g'8 fis2 e4 g,4 a2 b4.\fermata\divMax
d8 e4 fis4 g4 a4 d,4 a4 d4.\fermata\divMax
b8^"6" e4 d4 g4 c,4 d4 d,4 g4.\fermata\divFin
}

verse = \lyricmode {
 <<
{ Min siäl skal ut -- haf hier --tans grund
Tigh lof -- wa Gudh min HErre/ }
\context  Lyrics = "versRad2" { \set associatedVoice = "melody" 
Lof -- siun -- ga skal ock tigh min munn/
Och pri -- sa tins Namns äh --  r -- a. }


>>

Jagh skal i alt mitt lef -- wer -- ne/
Stedz gif -- wa Gudh tack -- säij -- el -- se/
Så län -- ge jagh här lef -- wer.
}

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

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


1. MIn siäl skal uthaf hiertans grund
Tigh lofwa Gudh min HErre/
Lofsiunga skal ock tigh min munn/
Och prisa tins Namns ähra.
Jagh skal i alt mitt lefwerne/
Stedz gifwa Gudh tacksäijelse/
Så länge jagh hör lefwer.

2. Tigh Gudh bör prijs efter titt Ord/
Som hielpa kanst af nöden.
En Förste är doch stofft och jord/
Och undkommer eij döden:
På then man eij förtrösta skal/
Thess hielp hon länder doch til fall/
Tå nöden oss mäst trycker.

3. Alsingen mennskia är så stoor/
Som eij skal andan upgifwa/
Och åter bliifwa wist til jord/
Hon kan eij ewigt lefwa.
Så måste hon rätt snart sin koos/
Här är platt ingen uthwäg hos/
All anslag tå eij gälla.

4. Säll then sigh HErran Gudh betroor
Och honom rätt åkallar:

Jagh Ee 2 I