// Carrie-Anne — The Hollies
// 120 bpm, 4/4, key C major. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 87 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(120/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once · [...]/2 spreads a riff over 2 bars.
// A part's distinct bars are riffs (A, B, C...) played in order: edit a riff to change every repeat.

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~@9 A@7 B C D@2 E@2 F@2 G H@7 I J K@2 L@2 M@4 N@6 O P A@7 B C D@2 E@2 F@2 G H@7 I J K@2 L@2 Q@3 R S T@2 ~
>`.pickRestart({
  A: "c4@2 g4 c4 f4 g4 c4 g4", B: "[b3,g4]@4 [b3,g4]@3 ~ [b3,g4]@3 ~ [b3,g4]@4", C: "c5@2 c5!2 c5@2 c5!10",
  D: "[c5 ~@2 c5 ~@2 c5 b4 c5!2 b4 ~ c5 ~@3 c5@2 c5!2 c5@2 c5!10, ~ b4@2 ~ b4@2 ~@7 b4@3 ~@16, ~@2 g4@3 g4@3 g4@3 g4@3 g4@5 ~@13]/2",
  E: "[c5!4 ~@2 c5 b4 ~ c5 ~@2 c5 ~@2 c5 c5!4 c5@2 c5!10, ~@4 b4@2 ~@4 b4@2 ~ b4@2 ~@17, ~@5 g4@3 g4@3 g4@3 g4@11 ~@7]/2",
  F: "[c5!5 ~@2 c5 b4 ~ c5 ~@2 c5 b4 ~ c5@2 c5!6 c5@2 c5!6, ~@5 b4@2 ~@4 b4@2 ~@19, ~@6 g4@3 g4@3 g4@3 g4@4 ~@13]/2",
  G: "c5 ~@2 c5 ~@2 c5 ~@2 c5 b4 g4@2 ~ g4@2, ~ b4@2 ~ b4@2 ~ b4@2 ~@2 c5 ~ b4@2 ~, ~@2 g4@3 g4@3 g4@3 ~@5",
  H: "[[e4,g4]@2 g4!2 [f4,g4]@2 g4 ~@2 [e4,g4] g4!5 ~@2 g4!7 ~ g4!6 ~@2 g4!6 ~@2 e4 g4 ~@2 g4!2 ~@2 e4 g4!4 [e4,g4] ~, c4@11 ~@3 g4@4 ~@2 e4@4 f4@4 e4@8 e4@4 f4@4 e4@8 e4@4 f4@4 e4@4 e4@4 e4@4 f4@4 e4@6 ~@2 e4@4 f4@4 e4@6 ~@2 e4@4 f4@4 ~@4, ~@2 e4@2 ~@2 e4@2 c4@5 ~@2 g4@2 ~@14 g4@2 ~@6 g4@3 ~ g4@2 ~@2 g4@3 ~@6, ~@16 c4@4 c4@4 c4@4 c4@4 c4@4 c4@4 c4@2 c4@4 ~@2 c4@7 ~]/7", // Em Fsus2 Em
  I: "[b3,d4,g4]@4 [b3,d4,g4]@4 [b3,d4,g4]@3 ~ [b3,d4,g4]@4", J: "c5@3 c5!5 c5@2 c5!6",
  K: "[c5 ~@2 c5 b4 c5!2 b4 ~ c5 b4 c5!2 b4 ~ c5@3 c5@2 c5!12, ~ b4@2 ~@29, ~@2 g4@3 g4@3 g4@3 g4@3 g4@3 ~@15]/2",
  L: "[c5 ~@2 c5 b4 ~ c5 b4 ~ c5 b4 c5!2 b4 ~ c5@2 c5!15, ~ b4@2 ~@29, ~@2 g4@3 g4@3 g4@3 g4@3 g4@2 ~@16]/2",
  M: "[c5!2 ~@2 c5 b4 c5!2 b4 c5!2 b4 ~ c5 b4 ~ c5@2 c5!13 c5@2 c5 ~@2 c5 b4 ~ c5 b4 ~ c5 b4 ~ c5 ~@2 f5!16, ~ b4 ~@15 b4 ~@5 b4 ~@8, ~@3 g4@3 g4@3 g4@3 g4@3 g4@2 ~@18 g4@3 g4@3 g4@3 g4@3 g4@2 ~@15]/4",
  N: "f5!16", O: "d5!12 ~ d5 ~ d5, ~@6 [b4,d5]!2",
  P: "[b4,d5] d5 ~ d5 [b4,d5] d5 ~ d5 ~ d5 ~ d5 ~ d5 ~ d5, ~ [b4,d5] ~ [b4,d5]!5", // Bm
  Q: "[c5!2 ~@2 c5 b4 c5!2 b4 c5!2 b4 ~ c5 b4 ~ c5@2 c5!13 c5@2 c5 ~@2 c5 b4 ~ c5 b4 ~ c5 b4 ~ c5 ~ g4, ~ b4 ~@15 b4 ~@5 b4, ~@3 g4@3 g4@3 g4@3 g4@3 g4@2 ~@18 g4@3 g4@3 g4@3 g4@3 ~]/3",
  R: "[a4,f5] ~ [a4,f5] ~ [a4,f5] ~ [a4,f5] ~ [a4,f5] ~ [a4,f5] ~ [a4,f5] ~ [a4,f5] ~", // Dm
  S: "[g4,e5] ~ [g4,e5] ~ [g4,e5] ~ [g4,e5] ~ [g4,e5] ~ [g4,e5] ~ [g4,e5] ~ [g4,e5] ~", // C
  T: "[[g4,d5] ~ [g4,d5] ~ [g4,d5] ~ [g4,d5] ~ [g4,d5] ~ [g4,d5] ~ [g4,d5] ~@3 [g4,c5]@16, ~@15 e4@17]/2", // G5 C5
})).s("gm_acoustic_guitar_steel").gain(0.25).pan(0.4)

// bass · acoustic bass
const bass = note(`<
  ~@5 A B A B C@2 D@4 C E F E F E F E F E D@7 E F E F E F E F E G H I J K H L M@2 D@7 E N E N E N E N E D@7 E N E N E N
  E N E O P Q R@2
>`.pickRestart({
  A: "c2@2 c2@2 c2@2 c2@2 c2@2 c2@2 c2@2 b1 a1", B: "g1!8", C: "c2@4 c3@2 g2@2 a2@4 g2@3 ~", D: "c2@2 c3 g2 a2@2 g2@2",
  E: "g2!4", F: "c2@4 f2@2 f2 f#2", G: "f2@2 f2@2 c2!2 d2 e2", H: "f2@4 f2@3 f2 c2@2 f2@2 g2@2 a2@2",
  I: "a#2@4 a#2@3 a#2 f2@2 a#2@2 a2@2 g2@2", J: "f2@4 f2@3 f2 c2 ~ c2@2 d2@2 e2@2",
  K: "f2@4 f2@3 f2 c2@2 c2@2 d2@2 e2@2", L: "a#2!8", M: "g2!8", N: "c2@2 c2@2 f2@2 f2 f#2",
  O: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~", P: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~",
  Q: "d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ g1@2 a1@2 b1 ~", R: "[c2@5 ~@3]/2",
})).s("gm_acoustic_bass").gain(0.38)

// bass · acoustic bass · soft notes
const bass_soft = note(`<
  ~
  [c2@2 c2@2 c2@2 c2@2 c2@2 c2@2 c2@2 b1 a1]
  [g1!8]
  [c2@2 c2@2 c2@2 c2@2 c2@2 c2@2 c2@2 b1 a1]
  [g1!8]
  ~@82
>`).s("gm_acoustic_bass").gain(0.16)

// chords · acoustic guitar steel
const acoustic_guitar_steel_2 = note(`<
  ~@9 A@7 B C D@2 E F G H I A@7 B C D@2 E F G H J K@2 L M@3 N O@2 A@7 B C D@2 E F G H J A@7 B C D@2 E F G H J P Q R@3
>`.pickRestart({
  A: "[[e3,c4,e4]@4 [e3,c4,e4]@2 e3 ~ g3@2 [g3,c4]@2 ~@4 e3@4 e4@2 ~@2 g3@2 [g3,c4]@2 [c3,e3,g3]@4 g3@2 ~@4 e4@2 [f3,g3,c4,e4]@2 [f3,g3,c4,e4]@2 c4@2 c4@2 c4@2 c4@2 [c4,e4]@2 c4@2 c4@2 [g3,c4,e4]@2 [c4,e4]@2 c4@2 [e3,c4]@4 [c4,e4]@2 c4@2 [g3,c4]@2 ~@4 [c4,e4]@2 [g3,c4]@4 [c4,e4]@2 ~@4 [c4,e4]@2 [c4,e4]@2 c4@2 c4@2 c4@2 e4@2 ~@2 [f3,g3]@2 [f3,g3,c4,e4]@2 [e3,c4,e4]@2 [e3,c4,e4]@2, c3@14 ~@2 c3@6 c3@20 [c3,e3,g3]@2 c3@11 ~, g3@8 f3@4 [g3,c4]@8 ~@2 e4@4 ~@2 e4@2 ~@14 e4 ~ e4@6 ~@2 e4@4 ~@4 e4@6 ~@2 e4@4 [c4,e4]@4 ~@8 [c4,e4]@4 ~@4 e4@4 ~@2 c4@6 ~@6, ~@3 [c4,e4]@2 e4@2 e4@3 c4@3 ~ c4@3 [g3,c4]@3 ~@4 g3@2 g3@3 ~ g3@4 ~@3 g3@3 ~@11 e4@2 ~@3, ~@3 e3 ~ [e3,g3] f3 ~ e3@2 ~ [e3,g3] e3@2 f3 e3 ~ [e3,g3] f3 e3@2 ~ [f3,g3] [e3,g3] [e3,g3]!2 ~ g3]/7", // C C5 C C5 C C5 C Fsus2 …
  B: "[d3,g3,d4] [g3,b3]!2 [g3,b3,g4], [g2,b2]!2, ~ d3@3, ~ g4@2 ~", // G5 G
  C: "[c3,e3,g3,c4,e4]@3 [g3,c4] c4@2 [c4,e4]@2 [f3,c4,f4]@3 [c4,f4] [c4,f4]@2 [a3,c4,f4] ~, ~@3 [c3,e3,e4]@4 ~@9, ~@4 g3@4 ~@3 [f3,a3]@4 ~", // C C5 C F5 F C F
  D: "[[b2,g3,b3,g4]@3 g4 [g2,b2,g3]@2 g3@2 [d3,g3,b3]@4 [g3,b3]@2 b3@2 [c3,c4,e4]@3 e4 e4@2 ~ c4 [a2,a3,c4,f4]@3 [a3,c4,f4] [a3,c4,f4]@2 [f3,c4,f4] ~, d3@6 b2@6 [b2,d3]@4 e3@7 ~ f3@6 ~@2, ~@3 b3@5 ~@6 g3@8 ~@10, ~@4 g4@10 g4 ~@17, ~@6 g2@9 ~@4 [c3,c4]@3 [c3,g3,c4,e4]@2 ~@8]/2", // Em G C F F5 Bm C
  E: "[b2,g3,b3,g4]@3 [g3,g4] [g3,b3,g4]@3 g4 [g3,g4]@2 [g3,g4]@2 g4@2 g4@2, d3, ~@4 b2@11 ~, ~@2 b3 [g2,g3,b3]", // Em G
  F: "[e3,g3,c4,e4]@3 [c3,e3,e4] [e3,g3,c4,e4]@2 [e3,g3,c4,e4]@2 [f3,a3,c4,f4]@3 [a3,c4,f4] [f3,a3,c4,f4]@2 [a3,f4] ~, ~ c3 ~@2", // C F Dm
  G: "[g3,b3]@3 g4 [g2,b3]@2 b3@2 b3@2 g3@2 [g3,b3]@2 [g3,b3,g4]@2, b2@3 g3@2 ~@3, d3@6 g2@9 ~, ~@3 g3@3 d3@6 [b2,d3]@4, ~@2 g4@5 ~", // G Bm
  H: "[e3,g3,c4,e4]@3 e4 e4@2 ~ c4 [f3,a3,c4,f4]@3 [a3,c4,f4] [a3,c4,f4]@2 [a3,c4] ~, c3@7 ~@9, ~@3 [e3,g3,c4]@3 [e3,g3,c4,e4]@2 ~@3 f3@4 ~", // C F Am C
  I: "[d3,g3,b3,g4]@3 ~ g3@2 [g3,b3,g4]@3 [g3,b3,g4]@3 [g3,b3]@2 [g3,b3]@2, b2@3 [b2,d3,g4], ~@3 [b3,g4]@3 ~@10, ~ d3@2 ~", // G Em
  J: "[d3,g3,b3,g4]@3 ~ g3@2 [g3,b3,g4]@3 [g3,b3,g4]@3 [g3,b3]@2 [g2,g3,b3]@2, b2@3 [b2,d3,g4], ~@3 [b3,g4]@3 ~@10, ~ d3@2 ~", // G Em
  K: "[~ f4@3 [a3,c4]@4 c4@2 [c4,f4]@2 f4@2 ~@2 [f3,a3,c4]@4 f4@2 ~@2 c4@2 [c4,f4]@2 [a3,c4,f4]@2 f4 ~, [f3,a3,c4]@4 f3@8 [f3,a3,c4]@4 ~@4 f3@11 ~, ~@2 f4@3 ~@2 f4@3 ~ f4@2 ~@3, ~@2 a3 ~@2 [a3,c4] a3 ~]/2", // Am F5 F F5 F Am
  L: "[a#3,d4,f4]@4 f4@2 f4@2 f4@2 f4@2 [a#3,f4]@2 f4 ~, f3@7 ~, ~@4 [a#3,d4]@4 d4@7 ~, ~@2 a#3 ~", // A# A#5 A#
  M: "[~@2 f4@2 f4@2 ~@4 [c4,f4]@2 f4@2 f4@2 [a3,f4]@4 [c4,f4]@4 [c4,f4]@2 f4@2 f4@2 f4@2 [c4,f4]@4 [c4,f4]@2 [c4,f4]@2 [a3,c4,f4]@2 [a3,c4,f4]@2 [f3,a3,c4,f4]@2 f4 [a3,c4], [a3,c4]@2 c4@3 ~ c4@4 ~@3 c4@3 ~@8, ~@2 a3@2 f3@11 f3@3 f3@4 ~@2, ~@3 f4@2 ~@19, ~@4 a3@2 a3@2 ~@2 a3@3 a3@5 a3@2 ~@4]/3", // F5 Dm F5 F Am
  N: "f4@2 f4@2 [a#3,f4]@2 a#3@2 [a#3,d4]@2 [a#3,f4]@2 [a#3,f4]@2 [a#3,f4] ~, a#3@2 f3@5 ~, ~@2 d4@2 ~ d4@2 ~, ~@3 f4@2 ~@3", // A#5 A# A#5
  O: "[[b3,d4,g4]@2 [b3,d4]@2 [b3,d4]@2 d4@2 ~ b3!2 [b3,g4]!3 [g3,b3,d4]!2, g3@6 [g3,b3]@3 g3@3 [g3,d4]@2 ~@2, ~@2 g4@4 g4@5 ~@3 g4@2, ~@4 d4!2 ~@2]/2", // G Bm Em G G5
  P: "[f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~", // F5
  Q: "[e2,c3] ~ [e2,c3] ~ [e2,c3] ~ [e2,c3] ~ [e2,c3] ~ [e2,c3] ~ [e2,c3] ~ [e2,c3] ~", // C
  R: "[[g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~@3 [g3,c4]@19 ~@13, ~@15 [c3,e3]@19 ~@14]/3", // G5 C5 C
})).s("gm_acoustic_guitar_steel").gain(0.3).pan(0.4)

// chords · acoustic guitar steel · soft notes
const acoustic_guitar_steel_3 = note(`<
  ~@10 A@2 ~@3 B ~ C D E F G H I ~@2 A@2 ~@3 B ~ C D E F G H I J K L M N ~ E O ~@3 A@2 ~@3 B ~ C D E F G H I J ~ A@2 ~@3
  B ~ C D E F G H I J ~@5
>`.pickRestart({
  A: "[~@5 e4 ~ e4@4 ~@5]/2", B: "~ e4 ~@6", C: "~@7 c4 a3@3 ~@5", D: "g2@4 ~@11 b2", E: "~@15 f4",
  F: "g2@4 g2@8 ~@3 b2", G: "~@7 c4 ~@7 f4", H: "[g2,g4]@2 ~@3 b3 ~@2", I: "~@11 a2 a2@4", J: "g2@7 ~",
  K: "~@4 a2@6 ~ a2@4 ~", L: "~@15 [a3,f4]", M: "a#2@3 ~@12 [f3,f4]", N: "f3 ~, f4 ~@7", O: "d4 ~@3",
})).s("gm_acoustic_guitar_steel").gain(0.2).pan(0.4)

// other · steel drums
const steel_drums = note("<~@50 A B C D E F G H I ~@28>".pickRestart({
  A: "~@2 g4 ~ a4 ~ g4 ~ a4 ~ d5 ~ e5 ~ d5 ~",
  B: "g5@2 ~ [e5,g5]@2 [d5,f5] ~@2 c5@2 ~ d5@2 ~ [d5,f5]@2, e5 ~@7 e5 ~@2 b4 ~@4", // Em Dm
  C: "~@2 [d5,f5]@2 ~ [c5,e5] ~@2 [b4,d5] ~@2 [a4,c5] ~@2 [e4,g4] ~", // Dm C Bm Am Em
  D: "[e4,g4] e4 [e4,g4] g4 [e4,g4]!4 e4 [e4,g4] g4 [e4,g4]!2 e4 [e4,g4]!2", E: "~@2 g5@2 ~@2 g5@2 ~@2 g5@2 ~@2 g5 ~",
  F: "[a5,c6]@2 ~ [a5,c6]@2 ~ g5@2 [f5,a5]@2 ~ [e5,g5]@2 ~ [g5,b5]@2, ~@6 b5 ~@9", // Am F Em G
  G: "~@2 [g5,b5]@2 ~ [f5,a5]@2 ~ [e5,g5]@2 ~ [d5,f5] ~@2 [g4,b4] ~", // G F Em Dm G
  H: "[g4,b4] g4 [g4,b4]!4 b4 [g4,b4]!3 g4 [g4,b4]!2 b4 [g4,b4]!2", I: "g4 ~@15",
})).s("gm_steel_drums").gain(0.38).pan(0.6)

// drums · kick
const kick = s("bd").struct(`<
  ~@9 A@7 B C@7 D E A E A E A E F C@7 G C@8 H C@6 I C@9 E A E A E A E B C@3 J C@4 K@2 L M ~
>`.pickRestart({
  A: "x!2 ~@2 x!2 ~@2", B: "x!4", C: "x ~@3 x!2 ~ x", D: "x ~@3 x!2 ~@2", E: "x!2 ~@2 x!2 ~ x", F: "~@3 x ~@2 x!2",
  G: "x ~ x ~ x ~ x!2", H: "~@7 x", I: "x ~ x!2", J: "x!2", K: "x!8", L: "x!5 ~@2 x", M: "x",
})).gain(0.44)

// drums · snare
const snare = s("sd").struct(`<
  ~@8 A B C B C B C B D E@7 F B C B C B C B G E@7 H E@8 I B@7 J E@3 K E@3 F B C B C B C B L E@3 M E@4 ~@2 N ~@2
>`.pickRestart({
  A: "~@12 x!4", B: "~@2 x!2 ~@2 x ~", C: "~@4 x ~ x ~@5 x!4", D: "x!13 ~ x ~", E: "~ x ~ x", F: "~@4 x ~@7 x!4",
  G: "~@2 x!2 ~@4 x ~ x ~@5", H: "~@3 x ~@3 x ~@3 x ~@4", I: "~ x!5 ~@2", J: "x!2 ~@2 x!2 ~@2 x ~ x!3 ~ x ~",
  K: "~@4 x ~@3 x!3 ~ x ~@3", L: "x!9 ~ x!6", M: "~@4 x ~@4 x!2 ~ x ~ x ~", N: "~@10 x!3 ~@3",
})).gain(0.44)

// drums · clap
const clap = s("cp").struct("<~@41 [x!4]!9 ~@37>").gain(0.38)

// drums · low tom
const low_tom = s("lt").struct("<~@32 [~@3 x ~@4] ~@16 [~@7 x] ~@7 [~@3 x ~@3 x ~@8] ~@29>").gain(0.44)

// drums · hihat
const hihat = s("hh").struct("<~@5 A B@2 C B D B D B D B E ~@8 B@7 F ~@33 B D B D B D B F ~@13>".pickRestart({
  A: "~@6 x!2", B: "x!8", C: "x!6 ~@2", D: "x!7 ~", E: "x!4", F: "x",
})).gain(0.33)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~ [x!8]!4 [x!6 ~@2] ~@81>").gain(0.16)

// drums · mid tom
const mid_tom = s("mt").struct("<~@32 [~ x ~@2] ~@16 [~@13 x ~@2] ~@7 [~ x ~ x ~@4] ~@29>").gain(0.38)

// drums · high tom
const high_tom = s("ht").struct("<~@49 [~@3 x] ~@37>").gain(0.44)

// drums · crash
const crash = s("cr").struct("<~@33 A ~@6 B C ~@6 D ~@9 A ~@3 A ~@11 A ~@3 A ~@2 D ~@3 A ~>".pickRestart({
  A: "x", B: "~ x!3", C: "x!2 ~@2", D: "~@3 x",
})).gain(0.38)

// drums · ride
const ride = s("rd").struct(`<
  ~@17 A@7 B ~@8 C A@6 D E A@6 F ~ A@7 ~ C A@2 G C A@2 H ~@8 C A@2 I C A@2 H ~@5
>`.pickRestart({
  A: "x!8", B: "x!7 ~", C: "~ x!7", D: "x", E: "~ x ~ x!5", F: "x!6 ~ x", G: "x!5 ~@3", H: "x!6 ~@2", I: "x!5 ~@2 x",
})).gain(0.38)

// drums · tambourine
const tambourine = s("tb").struct("<~@17 A@8 ~@8 A@17 ~@8 A@8 ~@8 A@8 ~@5>".pickRestart({
  A: "x!16",
})).gain(0.27)

// drums · cowbell
const cowbell = s("cb").struct("<~ [x!4]!8 ~@78>").gain(0.38)

// drums · congas
const congas = s("conga:18").struct(`<
  ~
  [~ x ~@2]!3
  [~ x!2 ~]!2
  [~@2 x ~@2 x!2 ~ x ~@7]
  [~ x ~@2]
  [~@2 x ~@2 x!2 ~ x ~@7]
  ~@78
>`).gain(1.4)

// drums · congas
const congas_2 = s("conga:33").struct("<~ [~@6 x!2] [~@5 x!3] [~@6 x!2]!3 [~@5 x!3] [~@6 x!2]!2 ~@78>").gain(1.4)

// drums · guiro
const guiro = s("guiro:0").struct("<~ [~@2 x!2 ~@2 x!2]!8 ~@78>").gain(6.93)

// drums · guiro
const guiro_2 = s("guiro:4").struct("<~ [x!2]!8 ~@78>").gain(6.93)

// drums · claves
const claves = s("clave:2").struct("<[x!2 ~@2] [x ~ x!3 ~ x!2]!8 ~@78>").gain(1.88)

stack(
  acoustic_guitar_steel, bass, bass_soft, acoustic_guitar_steel_2, acoustic_guitar_steel_3, steel_drums, kick, snare,
  clap, low_tom, hihat, hihat_soft, mid_tom, high_tom, crash, ride, tambourine, cowbell, congas, congas_2, guiro,
  guiro_2, claves
)