\version "2.24.2"

% Started rescoring this in Lilypond, 26 March 2025.

\header {
  title = "Can’t skip the pain"
  composer = "Rofotsez (Ruud Harmsen)"
  instrument = "Spanish guitar"
  copyright = \markup { Copyright © 1991, 1993, 2025 by Rofotsez }
  }

% Bars 1 thru 7
"u001" = {
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16]_~4\3
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16] e'8 e'8
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16]_~4\3
	\break
	r8 e8 <a\3 cis'\2 g'\1>8. q       q8 r16 <g b>8.
	r8 e8 <a\3 cis'\2 g'\1>8. e'8 cis'8. r16 <g b>8.
	\break
	r8 e'8\1[b16\2_(d')g16\3] e'8[d'g16] e'8e'
	r8 e'8\1[d'8\2     g16\3] e'8[d'g16] g'4\1
	\break
}
"l001" = {
	e,2. g,4
	e,1
	e,2. b,4
	a,4. a,4.         g,4
	a,4. a,4 r16 e,16(g,4)
	e,1
	e,1
}

% Bar 8 thru 11
"u002" = {
	% Continued scoring around 16 and 19 April 2025
	\time 15/16
	<g'b g>16r8 q16r8 <fis'cis'a>8.[q16]r <e'c'g>8 q8
	\time 4/4
	<g'b g>8.[  q8.]  <fis'cis'a>8.[q]    <e'c'g>8 q8
	\break
	\time 15/16
	<g'b g>16r8 q16r8 <fis'cis'a>8.[q16]r <e'c'g>8 q8
	\time 4/4
	<g'b g>8.[  q8.]  <fis'cis'a>8.[q]    <e'c'g>8 q8
	\break
}
"l002" = {
	\time 15/16
	g,16r8g,16r8 fis,8.[fis,16] r16 c8c
	\time 4/4
	g,8.[ g,]    fis,8.[fis,8.]     c8\5 c8
	\time 15/16
	g,16r8g,16r8 fis,8.[fis,16] r16 c8c
	\time 4/4
	g,8.[ g,]    fis,8.[fis,8.]     c8\5 c8
}

% Bar 12 and 13
% Bar 29 and 30
"u003" = {
	% Added chord diagrams 21 April 2025
	<g cis' e'>8. ^\markup {
		\fret-diagram "5-4-3;3-o;2-2-1;1-o;"}
	r16 <g cis' e'>8.
	r16 <g\3d'\2e'\1>2  ^\markup {
		\fret-diagram "5-5-3;3-o;2-3-1;1-o;"}
	% Bar 13
	r16 <g\4g\3dis'\2>2 ^\markup {
		\fret-diagram "5-6-3;4-5-2;3-o;2-4-1;"}
	r16 <g\3e'\2e'\1>4. ^\markup {
		\fret-diagram "5-7-3;3-o;2-5-1;1-o;"}
}
% Bar 12 and 13
% Bar 29 and 30
"l003" = {
	cis8.r16 cis8.r16 d2\5
	r16dis2\5 r16e4.\5
}

% Bars 14 thru 19
% Bars 31 thru 36
"u004" = {
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16]_~4\3
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16] e'8 e'8
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16] g'8[g'8]
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16]_~4\3
	r8 e8 <a\3 cis'\2 g'\1>8. q       q8 r16 <g b>8.
	r8 e8 <a\3 cis'\2 g'\1>8. e'8 cis'8. r16 <g b>8.
}
% Bars 14 thru 19
"l004" = {
	e,2. g,4
	e,1
	e,1
	e,16~8.~2 b,4
	a,4. a,4.         g,4
	a,4. a,4 r16 e,16(g,4)
}
% Bars 31 thru 36
% Bars 49 thru 54
"l004a" = {
	e,2. g,4
	e,1
	e,1
	e,2. b,4
	a,4. a,4.         g,4
	a,4. a,4 r16 e,16 g,4
}

% Scored 30 April 2025
% Bars 20 thru 25
% Bars 37 thru 42
"u005" = {
	r8 e'8\1[b16\2_(d')g16\3] e'8[d'g16] e'8e'
	r8 e'8\1[d'8\2     g16\3] e'8[d'g16] g'4\1
	r8 e8 <a\3 cis'\2 g'\1>8. q       q8 r16 <g b>8.
	r8 e8 <a\3 cis'\2 g'\1>8. e'8 cis'8. r16 <g b>8.
	r8 e'8\1[b16\2d'g16\3] e'8[d'g16] e'8e'
	r8 e'8\1[d'8\2  g16\3] e'8[d'g16] g'4\1
	\break
}
"l005" = {
	e,1
	e,1
	a,4. a,4.         g,4
	a,4. a,4 r16 e,16 g,4
	e,1
	e,1
}

% Bar 26 thru 28
"u006" = {
	% Continued scoring 4 May 2025
	\time 15/16
	<g'b g>16r8 q16r8 <fis'cis'a>8.[q16]r    <e'c'g>8 q8
	\time 4/4
	<g'b g>8.[  q8.  ]  <fis'cis'a>8.[q]     <e'c'g>4
	<g'b g>8.[  q8~32]  <fis'cis'a>8.[q8~32] <e'c'g>8. q8
	\break
}
"l006" = {
	\time 15/16
	g,16r8g,16r8  fis,8.[fis,16] r16 c8c
	\time 4/4
	g,8.[ g,    ] fis,8.[fis,8.  ] c4 \5
	g,8.[ g,8~32] fis,8.[fis,8~32] c8.\5 c8
}

% Bar 43 thru 48
"u007" = {
	% Continued scoring 25 and 26 May 2025
	\time 15/16
	<g'b g>16r8 q16r8 <fis'cis'a>8.[q16]r    <e'c'g>8 q8
	\time 17/16
	<g'b g>8.[  q8.  ]  <fis'cis'a>8.[q]     <e'c'g>8[~32] q8[~32]
	\time 15/16
	<g'b g>16r8 q16r8 <fis'cis'a>8.[q16]r    <e'c'g>8 q8
	\time 17/16
	<g'b g>8.[  q8.  ]  <fis'cis'a>8.[q]     <e'c'g>8.q8

	% Bar 47
	\time 16/16
	<g cis' e'>8. r16 <g cis' e'>8. r16 <g\3d'\2e'\1>2 
	% Bar 48
	r16 <g\4g\3dis'\2>2 r16 <g\3e'\2e'\1>4.
	\break
}
% Bar 43 thru 48
"l007" = {
	\time 15/16
	g,16r8g,16r8  fis,8.[fis,16] r16 c8c
	\time 17/16
	g,8.[ g,8.  ] fis,8.[fis,8.] c8[~32]c8[~32]
	\time 15/16
	g,16r8g,16r8  fis,8.[fis,16] r16 c8c
	\time 17/16
	g,8.[ g,8.  ] fis,8.[fis,8.] c8.c8

	\time 16/16
	cis8.r16 cis8.r16 d2 
	r16 dis2 r16e4.
}

Upper = {
	\"u001" \"u002" \"u003"
	\"u004" \"u005" \"u006" \"u003"
	\"u004" \"u005" \"u007"
	\"u004" \"u005" \"u006" \"u003"
}
Lower = {
	\"l001"  \"l002" \"l003"
	\"l004"  \"l005" \"l006" \"l003"
	\"l004a" \"l005" \"l007"
	\"l004a" \"l005" \"l006" \"l003"
}

"AdlibUpper" = {
	r8 e'8\1[d'8\2 g16\3] e'8\1[d'8\2 g16]_~4\3
	^"Ad libitum, ad infinitum, ad nauseam ..."
}
"AdlibLower" = {
	e,2. g,4 s1
}

Fretdiagoptions = {
	\override TextScript.fret-diagram-details.orientation = #'landscape
	\override TextScript.fret-diagram-details.number-type = #'roman-upper
	\override TextScript.size = 1.2
	\override TextScript.fret-diagram-details.finger-code = #'in-dot
	\override TextScript.fret-diagram-details.dot-color   = #'black
}

BaseMusiq = {
  \new StaffGroup = "tab with traditional" <<
    \new Staff = "guitar traditional"
    {
    \set Staff.midiInstrument = "acoustic guitar (nylon)"
    \tempo 4 = 108
    <<
	\new Voice = "upper" {
	\Fretdiagoptions
        \clef "treble_8" { \voiceOne \omit Voice.StringNumber
	\Upper \AdlibUpper }
        }
	\new Voice = "lower" {
	\Fretdiagoptions
	\clef "treble_8" { \voiceTwo \omit Voice.StringNumber
	\Lower \AdlibLower }
        }
    >>
    }
    \new TabStaff = "guitar tab" {
    <<
      \new TabVoice = "upper" { \voiceOne \Upper \AdlibUpper }
      \new TabVoice = "lower" { \voiceTwo \Lower \AdlibLower }
    >>
    }
  >>
}