% Generated automatically by: lilypond-book.py
% options are filename=/var/www/lilypond/src/lilypond-1.6.9/input/template/melody-lyrics-chords.ly printfilename
\include "paper13.ly"
\paper  {
  linewidth = 433.619940\pt
  
  
}

\header {
  texidoc = "popsong format: chords, melody and lyrics."
  title = "Paranoid"
  composer = "Black Sabbath \break"
}

melody = \notes \relative c'' {
  \key g \major 
  \skip 1 \skip 1 \skip 1 \skip 1 \break
    \repeat volta 5 {
      g'8 g ~ g g ~ g g ~ g g ~ | g  e ~ e e ~ e e ~ e4 | d8 d ~ d d ~ d  fis ~  fis4 | fis8 e ~ e4  e2 |
      g8 g ~ g g ~ g g ~ g g ~ | g  e ~ e e ~ e e ~ e4 | d8 d ~ d d ~ d  fis ~  fis4 |
      \property Score.repeatCommands = #'((volta "1"))
         { fis8 e ~ e4  e2 | r1 |  r1 | r1 | r1 | r1 | r1 | r1 | r1 | \break }
      \property Score.repeatCommands = #'((volta "2") end-repeat )
      \property Score.currentBarNumber = #28
        { fis8 e ~ e4  e2 | g8 g ~ g a ~ a g ~ g4 ~ | r1 | r1 | a8 a ~ a a ~ a a ~ a a ~ | a16 g e8 ~  e4 r2 | r4. g8 ~ g e d e | d1 | r1 | }
    \property Score.repeatCommands = #'((volta "3, 4") end-repeat )
    \property Score.currentBarNumber = #44
         {\break  fis8 e ~ e4  e2 | r1 | | r1 | | r1 | | r1 | | r1 | | r1 | | r1 | | r1 | }
    }
    \property Score.repeatCommands = #'((volta "5") end-repeat )
    \property Score.currentBarNumber = #76
      { fis8 e ~ e4  e2 | r1 | | r1 | | r1 | | r1 | | r1 | | r1 | | r1 | | r1 \bar "|." }
  
}

git = \notes {
  \key g \major
  \clef treble
  \property Voice.autoBeamSettings \override #'(end * * * *) = #(make-moment 1 4)
  \property Staff.voltaSpannerDuration = #(make-moment 1 1)
  < e'4. b'4. e''4. > < e'8 b'8 e''8 > ~ < e'4 b'4 e''4 > < e' b' e'' >  |  a'8 b' d'' e'' a' b' d'' e'' |
   < e'4. b'4. e''4. > < e'8 b'8 e''8 > ~ < e'4 b'4 e''4 > < e' b' e'' >  |  a'8 b' d'' e'' a' b' d'' e'' | \break
  \repeat volta 5 {
      < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > |
      < d' a' d'' fis'' > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 |
      < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > |
      \property Score.repeatCommands = #'((volta "1"))
         { < d' a' d'' fis'' > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 |  \break
	 < e'1 b'1 e''1 > | < c'2 g'2 c''2 > < d'2 a'2 d''2 > |
	 < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < e'1 b'1 e''1 > | < c'2 g'2 c''2 > < d'2 a'2 d''2 > |
	 < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > | }
      \property Score.repeatCommands = #'((volta "2") end-repeat )
      \property Score.currentBarNumber = #28
        { < d'8 a'8 d''8 fis''8 > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 | 
	< e'1 b'1 e''1 > ~ | <e' b' e'' > | < d' a' d'' > ~ | < d' a' d'' > |
	< e' b' e'' > ~ | <e' b' e'' > | < d' a' d'' > ~ | < d' a' d'' > | }
    \property Score.repeatCommands = #'((volta "3, 4") end-repeat )
    \property Score.currentBarNumber = #44
         { \break < d'8 a' d''8 fis''8 > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 |
	 < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > |
	 < d' a' d'' fis'' > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 |
	 < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
	 < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > |
	 < d' a' d'' fis'' > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 | }
    }
    \property Score.repeatCommands = #'((volta "5") end-repeat )
    \property Score.currentBarNumber = #76
      { < d'8 a'8 d''8 fis''8 > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4
      < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > |
      < d' a' d'' fis'' > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 |
      < e'8 b'8 e''8 > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > < e' b' e'' > |
      < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > < d' a' d'' > |
      < d' a' d'' fis'' > < d' a' d'' > ~ < d' a' d'' > ~ < d' a' d'' > < e'4 b'4 e''4 > r4 |  \bar "|." }
}

bass = \notes {
  \key g \major
  \clef bass
  \property Voice.autoBeamSettings \override #'(end * * * *) = #(make-moment 1 4)
  \property Staff.voltaSpannerDuration = #(make-moment 1 1)
  e4. e8 ~ e4 e |  a8 b d' e' a b d' e' | e4. e8 ~ e4 e | a8 b d' e' a b d' e' | \break
  \repeat volta 5 {
      e8 e e e e e e e | e e e e e e e e | d d d d d d d d | fis d ~ d ~ d e4 r  |
      e8 e e e e e e e | e e e e e e e e | d d d d d d d d |
      \property Score.repeatCommands = #'((volta "1"))
          { fis d ~ d ~ d e4 r  | \break
	  e1 | c2 d2 | e8 e e e e e e e | e e e e e e e e |
	  e1 | c2 d2 | e8 e e e e e e e | e e e e e e e e |
	  }
      \property Score.repeatCommands = #'((volta "2") end-repeat )
      \property Score.currentBarNumber = #28
        {  fis d ~ d ~ d e4 r | e1 ~  | e | d ~ | d | e ~ | e | d ~ | d | }
    \property Score.repeatCommands = #'((volta "3, 4") end-repeat )
    \property Score.currentBarNumber = #44
          { \break  fis8 d ~ d ~ d e4 r |
	  e8 e e e e e e e | e e e e e e e e | d d d d d d d d | fis d ~ d ~ d e4 r  |
	  e8 e e e e e e e | e e e e e e e e | d d d d d d d d | fis d ~ d ~ d e4 r  |
	  }
    }
    \property Score.repeatCommands = #'((volta "5") end-repeat )
    \property Score.currentBarNumber = #76
      { fis8 e ~ e4  e2 |  
      e8 e e e e e e e | e e e e e e e e | d d d d d d d d | fis d ~ d ~ d e4 r  |
      e8 e e e e e e e | e e e e e e e e | d d d d d d d d | fis d ~ d ~ d e4 r  | \bar "|." }
}

text = \lyrics { <  
  \context LyricsVoice = "duet-1" {
    \property LyricsVoice . stanza = "1"
    Finish- ed with my wo- man 'cause she could- n't help me with my mind Peo- ple say I'm in- sane be- cause I am frou- ning all the time.
  }
  \context LyricsVoice = "duet-2" {
    \property LyricsVoice . stanza = "2"
    All day long I think of things but no- thing seems to sa- tis- fy Think I'll lose my mind if I don't find some- thing  to " "" "" " pa- ci- fy.
    Can you help me oc- cu- py my bra- -  in? Oh- - -  ye- ah.
  }
  \context LyricsVoice = "duet-3" {
    \property LyricsVoice . stanza = "3"
    I need some- one to show me the things in life that I can't find I can't see the things that make true hap- pi- ness, I
    " "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "must be blind.
  }
  \context LyricsVoice = "duet-4" {
    \property LyricsVoice . stanza = "4"
    Make a joke and I will sigh and you will laugh and I will cry Hap- pi- ness I can- not feel and love to me is
    " "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "so un- real.
  }
  \context LyricsVoice = "duet-5" {
    \property LyricsVoice . stanza = "5"
    And so as you hear these words - tell- ing you now of my state I tell you to en- joy life I wish I could but 
     " "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "it's too late.
  } >
}

accompaniment = \chords {
  \skip 1 \skip 1 \skip 1 \skip 1
  e1:min e1:min  d1 d2 e2:min e1:min e1:min  d1 d2 e2:min
  e1:min c2 d2 e1:min e1:min e1:min c2 d2 e1:min e1:min 
  d2 e2:min e1:min e1:min  d1 d1 e1:min e1:min  d1 d1
  d2 e2:min e1:min e1: min d1 d2 e2:min e1:min e1: min d1 d2 e2:min
  d2 e2:min e1:min e1: min d1 d2 e2:min e1:min e1: min d1 d2 e2:min
}

\score {
  <
    \context ChordNames \accompaniment
    \addlyrics
      \context Staff = one {
        \property Voice.autoBeamSettings \override #'(end * * * *) = #(make-moment 1 32)
        \property Staff.automaticMelismata = ##t
	\property Staff.voltaSpannerDuration = #(make-moment 1 1)
        \melody
      }
      \context Lyrics \text
      \context PianoStaff { <
	\context Staff = git \git
	\context Staff = bass \bass
      > }
  >
  \paper { papersize = "a4"}
  \midi  { }
}