\version "2.12.2"

\header {
  title = "Basic Instinct - Main Theme"
  composer = "composed by Jerry Goldsmith"
  arranger = \markup \line { "piano transcription by" \with-url #"http://www.youtube.com/user/PhilippeLernould" "Philippe Lernould" }  
  tagline = \markup \override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7) \box \column { { \small \line { Reconstructed and cast in notes by \with-url #"mailto:treitmayr@devbase.at" "Thomas Reitmayr" ", 2010 • " \with-url #"http://www.devbase.at/" "www.devbase.at" • Typeset using \with-url #"http://www.LilyPond.org" "LilyPond.org" } } }
}

\paper {
  #(set-paper-size "a4")
  line-width    = 180\mm
  left-margin   = 15\mm
  top-margin    = 15\mm
  bottom-margin = 20\mm
  %%indent = 50\mm 
  %%set to ##t if your score is less than one page: 
  ragged-last = ##t
  ragged-last-bottom = ##t
  %%ragged-bottom = ##t
}

global = {
  \key c \major
  \time 4/4
  %%\override Fingering #'stencil = ##f
  %%\override Fingering #'add-stem-support = ##t
  %%\override Fingering #'staff-padding = #'()
}

right = \relative c' {
  \global
  % Musik folgt hier.
  %\clef treble
  %\set Score.doubleRepeatType = #":|.|:"

  \repeat volta 2 {
  << d1 \\ { a'8 ( f a f a f a f ) } >> | % 1
  << d1 \\ { a'8 ( f a f a f a f ) } >> | % 2
  << cis1 \\ { a'8 ( fis a fis a fis a fis ) } >> | % 3
  << cis1 \\ { a'8 ( fis a fis a fis a fis ) } >> | % 4
  }
  \break
  
  << <f'^2 a-4>1\startTrillSpan \\ s2\stopTrillSpan >> | % 5
  <e gis>4 <dis g> <e, gis> <f a> | % 6
  << { <fis' a>1~\startTrillSpan | <fis a>1 } % 7
     \\ s2\stopTrillSpan >> | % 8
  \break

  << <f a>1\startTrillSpan \\ s2\stopTrillSpan >> | % 9
  <e gis>4 <dis g> <e, gis> <f a> | % 10
  << { <a' cis>1~\startTrillSpan | <a cis>1 } % 11
     \\ s1.\stopTrillSpan >> | % 12
  \break

  << <c e>1\startTrillSpan \\ s2\stopTrillSpan >> | % 13
  <b dis>4 <ais d> <b, dis> <c e> | % 14
  <dis, fis>1 | % 15
  <e g>1 | % 16
  \break

  << <c'' e>1\startTrillSpan \\ s2\stopTrillSpan >> | % 17
  <b dis>4 <ais d> <b, dis> <c e> | % 18
  <dis, fis>1 |
  <b e>1 |
  \break

  <ais''^3 d-5 d,>4 <a cis cis,> <gis c c,> <a, cis cis,> |
  <ais d d,>1 |
  r2 <a d>4 <a c> |
  <fis'^4 a-5 a,>1 |
  \break
  
  <a^3 cis-5 cis,>4 <gis c c,> <g b b,> <gis, c c,> |
  <a cis cis,>1 |
  r2 <gis cis>4 <gis b> |
  <f'^4 gis-5 gis,>1 |
  \break
  
  <g b b,>1 |
  r4 <g,^4 b-5 b,>4 <d'^3 fis-5 fis,> <e^4 g-5 g,> |
  <fis^3 b-5 b,>4 <fis a a,> <fis b b,>2~ |
  <fis b b,>1 |
  \break

  <f a a,>4 <e g g,> <f a a,>2~ |
  <f a a,>2 <a, d f,>2 |
  <cis e a,>1~ |
  <cis e a,>1 |
  \break
  
  % 84'' (1'24'')
  << <f a>1\startTrillSpan \\ s2\stopTrillSpan >> | % 5
  <e gis>4 <dis g> <e, gis> <f a> | % 6
  << { <fis' a>1~\startTrillSpan | <fis a>1 } % 7
     \\ s2\stopTrillSpan >> | % 8
  \break

  << <f a>1\startTrillSpan \\ s2\stopTrillSpan >> | % 41
  <e gis>4 <dis g> <e, gis> <f a> | % 42
  << { <a' cis>1~\startTrillSpan | <a cis>1 } % 43
     \\ s1.\stopTrillSpan >> | % 44
  \break

  << <c e>1\startTrillSpan \\ s2\stopTrillSpan >> | % 45
  <b dis>4 <ais d> <b, dis> <c e> | % 46
  <fis, b,>4 <dis b> <fis b,> <dis b> | % 47
  <g b,>4 <e b> <g b,> <e b> | % 48
  \break

  << <c'' e>1\startTrillSpan \\ s2\stopTrillSpan >> | % 49
  <b dis>4 <ais d> <b, dis> <c e> | % 50
  <fis, b,>4 <dis b> <fis b,> <dis b> | % 51
  <e g,>4 <b g> <e g,> <b g> | % 52
  \break

  <e fis,>4 <b fis> <e fis,> <b fis> | % 53
  <dis fis,>4 <b fis> <dis fis,> <b fis> | % 54
  <e b g>1 | % 55
}


left = \relative c {
  \global
  % Musik folgt hier.

  \repeat volta 2 {
  d,8 ( d'8\staccato ) r4 r2  | % 1
  d,8 ( d'8\staccato ) r4 r2  | % 2
  fis,,8 ( fis'8\staccato ) r4 r2  | % 3
  fis,8 ( fis'8\staccato ) r4 r2  | % 4
  }
  
  << d'1 \\ { d8\sustainOn ( a' f' a, f' a, f' a, ) } >>
  << d,1 \\ { d8  ( a' f' a, f' a, f' a, ) } >>
  << fis1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  << fis,1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  
  << d,1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << d,1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << fis1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  << fis,1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  
  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  e,8 ( e' e, e' e, e' e, e' )
  e,8 ( e' e, e' e, e' e, e' )

  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  e,8 ( e' e, e' e, e' e, e' )
  e,8 ( e' e, e' e, e' e, e' )

  << g,1 \\ { g8 ( d' ais' d, ais' d, ais' d, ) } >>
  << g,1 \\ { g8 ( d' ais' d, ais' d, ais' d, ) } >>
  << fis,1 \\ { fis8 ( d' a' d, a' d, a' d, ) } >>
  << fis,1 \\ { fis8 ( d' a' d, a' d, a' d, ) } >>

  << fis,1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  << fis,1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  << f,1 \\ { f8 ( cis' gis' cis, gis' cis, gis' cis, ) } >>
  << f,1 \\ { f8 ( cis' gis' cis, gis' cis, gis' cis, ) } >>

  << e,1 \\ { e8 ( b' g' b, g' b, g' b, ) } >>
  << e,1 \\ { e8 ( b' g' b, g' b, g' b, ) } >>
  << dis,1 \\ { dis8 ( b' fis' b, fis' b, fis' b, ) } >>
  << dis,1 \\ { dis8 ( b' fis' b, fis' b, fis' b, ) } >>

  << d,1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << d,1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << cis,1 \\ { cis8 ( a' e' a, e' a, e' a, ) } >>
  << cis,1 \\ { cis8 ( a' e' a, e' a, e' a, ) } >>

  << d1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << d,1 \\ { d8  ( a' f' a, f' a, f' a, ) } >>
  << fis1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  << fis,1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  
  << d,1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << d,1 \\ { d8 ( a' f' a, f' a, f' a, ) } >>
  << fis1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  << fis,1 \\ { fis8 ( cis' a' cis, a' cis, a' cis, ) } >>
  
  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  e,8 ( e' e, e' e, e' e, e' )
  e,8 ( e' e, e' e, e' e, e' )

  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  << a,1 \\ { a8 ( e' c' e, c' e, c' e, ) } >>
  e,8 ( e' e, e' e, e' e, e' )
  e,8 ( e' e, e' e, e' e, e' )

  b,8 ( b' b, b' b, b' b, b' )
  b,8 ( b' b, b' b, b' b, b' )
  <e, e,>1
}


pianoPart = \new PianoStaff \with {
  instrumentName = "Klavier"
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"
  } \right
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  } { \clef bass \left }
>>

\score {
  <<
    \override pianoPart.BarLine #'hair-thickness = #1.0
    \pianoPart
  >>
  \layout { }
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 120 4)
    }
  }
}