// Everybody Needs Somebody to Love — The Blues Brothers
// 97 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 79 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
// note: The whole transcription plays 18 ms ahead of the beat; the grid follows it, so its parts stay together.
setcpm(97/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, A@4 for four bars: edit a riff to change every repeat.

// bass · acoustic bass · "ACOU BASS"
const bass = note("<A@28 B C D E F@7 G B C D E A@4 H ~ I@3 J A@12 K L@8 M N O P>".pickRestart({
  A: "~ c2 ~@2 c2 ~@2 f2 ~@2 f2@2 ~ a#1 ~@2 a#1 ~@2 f2 ~@2 f2@2",
  B: "~ a2 ~@2 a2 ~@2 a2 ~@2 a2 ~@2 a2@2 ~ a2@2 ~ a2@2 ~ g2@2",
  C: "~ f2@2 ~ f2 ~@2 f2@2 ~ f2@2 ~ f2@2 ~ f2@2 ~ g2@2 ~ g#2@2",
  D: "~ a2 ~@2 a2 ~@2 a2 ~@2 a2 ~@2 a2 ~@2 a2 ~@2 a2 ~@2 a2@2",
  E: "~ g2 ~@2 g2 ~@2 g2 ~@2 g2 ~@2 g2@2 ~ f2 ~@2 e2 ~@2 d2 ~",
  F: "~ c2@2 ~ c2@2 ~ e2@2 ~ g2@2 ~ f2@2 ~ f2@2 ~ a2@2 ~ c3@2",
  G: "~ c2@2 ~ c2@2 ~ e2@2 ~ g2@2 ~ f2@2 ~ f2@2 ~ a2@3 c3@2", H: "~ c2@4 ~@19",
  I: "~ g3@6 a3@6 a#3@6 a3@3 ~@2, ~ d3@21 ~@2", J: "~ g3@6 a3@6 a#3@6 a3@5, ~ d3@22 ~",
  K: "~ c2@3 e2@3 f2@2 ~ a1@3 a#1@3 d2@3 f2@2 a#1 b1@2",
  L: "[~ c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@3 c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@2 a#1 b1@2]/8",
  M: "~ c2@3 e2@3 f2@3 a1@3 a#1@3 d2@3 f2@3 b1@2, ~@22 a#1 ~", N: "~ c2@3 ~@9 c2@3 c2!7 ~", O: "c2 ~ c2!2 ~ c2!14 c2@5",
  P: "~@5 c2 ~@18",
})).s("gm_acoustic_bass").gain(0.63)

// chords · drawbar organ · "ORGAN 1"
const drawbar_organ = note("<A@28 B C B D E F G H@2 I J K L C B D A@4 M ~@5 A@19 N A@2 O@3>".pickRestart({
  A: "~@4 [c5,e5,g5]@3 ~@3 [c5,f5,a5]@3 ~@3 [d5,f5,a#5]@3 ~@3 [c5,f5,a5]@2", B: "~ [c5,e5,a5]@23", C: "~ [a4,c5,f5]@23",
  D: "~ [b4,d5,g5]@23", // G
  E: "~@4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~@2 [a4,c5,f5]@3 ~@2 [c5,f5,a5]@2 ~ f4 [c5,c6]@2, ~@16 f3@4 ~@2 f5 ~", // C F C
  F: "~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~ [a#3,c4] [a4,c5,f5]@3 f4 ~ [a4,c5,f5] ~@2 f4 [c5,f5,a5]@2, ~@4 g4 ~@8 f3@7 ~@4", // C A#sus2 F
  G: "~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~ c4 [f3,a4,c5,f5]@2 ~ f4 ~ [c5,f5,a5]@2 ~ f4 [c5,f5,c6]@2", // C F F5
  H: "[~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~ c4 [a4,c5,f5]@3 f4 ~ [a4,c5,d#5,f5] ~@2 f4 [c5,f5,a5]@2 ~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~ c4 [a4,c5,f5]@3 f4 ~ [a4,c5,f5] ~@2 f4 [c5,f5,a5]@2, ~@4 g4 ~@8 f3@7 ~@2 c7@21 ~@5, ~@22 b6 ~@14 f3@7 ~@4]/2", // C F F7 F C F
  I: "~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~ c4 [a4,c5,f5]@2 ~ f4 ~ [c5,f5,a5]@3 f4 [c5,c6]@2, ~@13 f3@8 ~ f5 ~", // C F C
  J: "~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5,a5] ~ c4 [c5,f5]@2 ~ f4 ~ [c5,f5,a5] ~@2 f4 [a4,f5]@2, ~ c6@15 ~@8, ~@13 f3@8 ~@3, ~@13 a4 ~@8 c5 ~", // C Am7 F5 F Dm
  K: "~@3 g4 [c5,e5,g5]@5 ~ [c5,e5,g5] ~@2 [a4,c5] ~@2 f4 ~ [c5,f5,a5]@2 ~ f4 [c5,f5,c6] ~, ~@13 f3@7 ~@4, ~@13 f5@2 ~@9", // C Am F F5
  L: "e4 ~ [e5,a5]@22, ~ c5@23", M: "~ [c4,c5,e5,g5]@3 ~@20",
  N: "~@4 [c5,e5,g5]@3 ~@3 [c5,f5,a5]@3 ~@3 [d5,f5,a#5]@3 ~@3 [f5,a5]@2", // C F A# F
  O: "[~@14 [e5,g5,c6]@15 ~ [d6,e6] [a5,b5,c6] [e5,f5,g5,a5] [a4,b4,c5,d5] [d4,e4,f4,g4,a4] [g3,a3,b3,c4] [a2,c3,d3,e3,f3] [g2,b2] d2@2 [g2,a2] [c3,d3,e3,f3] [g3,a3,b3,c4,d4,e4] [f4,g4,a4,b4,c5] [g4,d5,e5,f5,g5,a5,b5,c6,d6,e6] [f6,g6,a6] [c6,d6,e6,g6] [a4,b4,d5,e5,f5,g5,a5,b5] [b3,d4,e4,f4,g4,d5] [g3,a3,d4] [e4,f4,g4,a4,b4,c5,d5] ~ [c5,a5] g#5 c6@4 ~@14, ~@14 [c3,c4,c5]@18 ~@5 [e2,f2]@3 ~@7 c5@3 e5@7 ~@15, ~@38 c2 ~@9 c4@2 [f5,g5]@2 ~ [c3,c4]@4 ~@15, ~@53 b5@2 ~@17]/3", // C Dsus2 Am Fmaj7 D7 Dm Cmaj7 Dm7 …
})).s("gm_drawbar_organ").gain(0.27)

// chords · brass section · "BRASS 1"
const brass_section = note(`<
  ~ A B C D E@10 F@4 G H F@2 I J K J@2 L M N O P Q R S T U V W X M L Y B Z B AA AB ~@5 F@2 AC F K@2 J AD B Z B Z B Z B Z
  B Z B Z B Z AE@3
>`.pickRestart({
  A: "~@21 [g4,g5] [a4,a5] ~", B: "[c5,c6]@20 ~ [d#4,d#5] d4@2, ~@22 d5 ~", C: "[c4,c5]", D: "b3 c4 ~@22",
  E: "b3 c4@2 ~@21", F: "[b3,f#4] [c4,g4]@2 ~@21", G: "b3 c4@2 ~ c5@2 ~@18, [f#4,g4]@2 ~@2 g4 ~@19",
  H: "[b3,f#4] [c4,g4]@2 ~ [g4,c5]@2 ~@18", I: "[b3,f#4] [c4,g4]@2 ~ [c4,c5]@2 ~@18, ~@4 c6 ~@19",
  J: "b3 [c4,g4]@2 ~ [c4,c5,c6]@3 ~@17, f#4 ~@11", K: "~ [c4,g4]@2 ~ [c4,c5,c6]@2 ~@18, [b3,f#4] ~@11",
  L: "~ [a4,c5,e5]@22 ~", M: "~ [a4,c5,f5]@22 ~", N: "~ [a4,c5]@21 ~@2", O: "~ [g4,b4,d5,g5]@23",
  P: "~@4 e4@6 d4 ~@2 c4@3 ~@2 c4 ~@5", Q: "b3 c4@2 ~ [e4,e5]@6 [d4,d5] ~@2 [c4,c5]@4 ~ [c4,c5] ~@5",
  R: "b3 c4@2 ~ [e4,c5,e5]@6 [g4,c5,e5,g5] ~@2 [a4,c5,f5,a5]@4 c5 [f5,a5,c6] ~@5, ~@9 c5 ~@2", // C F
  S: "b3 c4@2 ~ [e4,c5,e5]@6 [g4,c5,e5,g5] ~@2 [a4,c5,f5,a5]@4 ~ [f5,a5,c6] ~@5, ~@9 c5 ~@2", // C F
  T: "b3 c4@2 ~ [c5,e5]@6 [a#4,a#5,c6] ~@2 [a4,c5,f5,a5]@4 ~ [a4,c5,f5,a5] ~@5, ~@4 c6@5 ~@15", // C A#sus2 F
  U: "b3 c4@2 ~ [c5,e5,c6]@6 [a#4,e5,a#5] ~@2 [a4,c5,f5,a5]@3 ~@2 [a4,c5,f5,a5] ~@5", // C A#dim F
  V: "b3 c4@2 ~ [e5,c6]@5 ~ [e5,a#5] ~@2 [c5,f5,a5]@4 ~ [f5,a5]@2 ~@4, ~@4 c5@6 ~@8 [c5,c6] ~@5", // C Edim F C
  W: "~ c4@2 ~ [c5,e5,c6]@5 ~ [c5,e5,a#5,c6] ~@2 [c5,f5,a5]@4 ~ [c5,f5,a5,c6]@6, b3 ~@11", X: "~ [a4,c5]@23, ~ a5 ~@22",
  Y: "~ [g4,b4,d5]@15 ~@5 [g4,g5] a5@2, ~@22 a4 ~", Z: "[c4,c5]@19 ~@2 [g4,g5] [a4,a5] ~", AA: "[c4,c5]@19 ~@5",
  AB: "~ [g5,c6]@3 ~@20, ~ c5@6 ~@17", AC: "~ [c4,g4]@2 ~@21, [b3,f#4] ~@11",
  AD: "b3 [c4,g4]@3 [c4,c5,c6]@2 ~@15 [g4,g5] a5@2, f#4@2 ~@20 a4 ~", // C5 C G
  AE: "[[c5,c6]@2 ~@11 [c4,c5,g5,c6]@40 c6 [c5,g5,c6]@2 ~@16, ~@53 c4@2 ~@17]/3", // C C5
})).s("gm_brass_section").gain(0.64)

// chords · piano · "A.PIANO 1"
const piano = note("<A@28 B C D E F G H I@2 J K L@2 M D N O A@3 P ~ Q@4 A@22 R@3>".pickRestart({
  A: "~ [c4,e4,g4] ~@2 [c4,e4,g4] ~@2 [c4,f4,a4] ~@2 [c4,f4,a4] ~@2 [d4,f4,a#4] ~@2 [d4,f4,a#4] ~@2 [c4,f4,a4] ~@2 [c4,f4,a4] ~", // C F A# F
  B: "~ [e4,a4] ~ a3 a4@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [d4,g4]@2, ~@4 e4 ~@19", // A5 G5
  C: "g3 [c4,f4]@2 f3 f4@2 f3 [c4,f4] ~ f3 [c4,f4]@2 f3 f4@2 f3 f4@2 f3 [c4,f4]@2 g3 [d4,g4]@2, ~@4 c4 ~@8 c4 ~@2 c4 ~@7", // F5 G5
  D: "a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 a4@2 a3 [e4,a4]@2, ~@19 e4 ~@4", // A5
  E: "[d3,a3] [d4,g4]@2 g3 g4@2 g3 [d4,g4] ~ g3 [d4,g4] ~@6 e6 ~@5 [a3,b3,c4], ~ g2@15 [a6,b6,c7,d7] [d6,f6,g6] [a5,b5,c6,e6] [e5,f5,g5] [b4,c5,d5] [f4,g4,a4] [d4,e4]@2, ~@4 d4 ~@5 d3@14, ~@13 g3@11, ~@5 [e7,f7,g7]@3", // D5 G5 Am D7 G7 Am Em Bm …
  F: "g3 g2@2 ~ [c4,e4,g4]@3 c3 ~ [c4,e4,g4] c3 [g#2,c3] a#2 [a3,c4,f4]@2 ~ f3 ~ [a3,c4,f4] ~@2 [f2,f3] [a3,c4,f4] a#2, ~@3 c2@6 ~@4 f2@3 ~@8", // C G# F
  G: "a#1 ~@2 c3 [g3,c4,e4,g4]@3 c3 ~ [g3,c4,e4,g4] c3 g#2 c3 [f2,a3,c4,f4]@3 f3 ~ [a3,c4,f4] ~@2 [f2,f3] [a3,c4,f4] ~, ~ c2@8 ~@15", // C F
  H: "[a#1,a#2] ~@2 c3 [g3,c4,e4,g4]@3 c3 ~ [g3,c4,e4,g4] c3 g#2 c3 [f2,a3,c4,f4]@3 f3 ~ [a3,c4,f4] ~@2 [f2,f3] [a3,c4,f4] ~, ~ c2@8 ~@15", // A# C F
  I: "[a#1,a#2] ~@2 c3 [g3,c4,e4,g4]@3 c3 ~ [g3,c4,e4,g4] c3 g#2 [a#2,c3] [a3,c4,f4]@3 f3 ~ [a3,c4,f4] ~@2 [f2,f3] [a3,c4,f4] ~, ~ c2@9 ~@3 f2@5 ~@6", // A# C A#sus2 F
  J: "[a#1,a#2] ~@2 c3 [g3,c4,e4,g4]@3 c3 ~ [g3,c4,e4,g4] c3 ~ [a#2,c3] [a3,c4,f4]@3 f3 ~ [a3,c4,f4] ~@2 [f2,f3] [a3,c4,f4] ~, ~ c2@9 ~@3 f2@5 ~@6", // A# C A#sus2 F
  K: "[a#1,a#2] ~@2 c3 [g3,c4,e4,g4]@3 c3 [g3,c4,e4,g4] ~ c3 [g#2,a#2] c3 [a3,c4,f4] ~@2 f3 ~ [c4,f4,a4]@2 ~ [f2,f3] [c4,f4,c5] ~, ~ c2@8 ~@4 f2@5 ~@6", // A# C G#sus2 F F5
  L: "[[a#1,a#2] ~@2 c3 [g3,c4,e4,g4]@3 c3 ~ [g3,c4,e4,g4] c3 ~ [a#2,c3] [c4,f4]@3 g4 ~@2 g6 ~ [c6,d6] ~ [a4,c5] [e2,f4,g4,a4,c5] [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [e4,a4]@2 a3 [d4,g4]@2, ~ c2@8 ~@4 f2@8 [e6,f6] [f5,g5,a5,b5,c6,d6] [b4,d5,e5]@2 ~@23, ~@13 a3 ~@2 f3@9 ~@23, ~@16 [a4,b4,c5]@2 [a5,b5,c6,d6] a6@6 ~@23, ~@17 [d5,e5,f5,g5]@2 [e6,f6] [g6,b6]@5 ~@23]/2", // A# C A#sus2 F5 Csus2 Am Fmaj7 A5 …
  M: "a3 [c4,f4]@2 f3 f4@2 f3 f4@2 f3 [c4,f4]@2 f3 f4@2 f3 f4@2 f3 f4@2 g3 g4@2, ~@4 c4 ~@2 c4 ~@5 c4 ~@2 c4 ~@2 c4 ~@2 d4 ~", // F5
  N: "[d2,a3] [d4,g4]@2 g3 g4@2 g3 [d4,g4]@2 g3 [d4,g4]@2 g3 [d4,g4] ~@6 [c5,d5] [f4,g4,a4,b4] [c4,d4,e4] ~, ~ g1@18 [g5,a5,b5]@3 ~@2, ~@4 d4 ~@11 [g2,c7,d7]@6 ~@2, ~@17 [g6,a6,b6]@3 [e5,f5]@2 ~@2, ~@9 [c6,d6,e6,f6]@2 ~", // D5 G5 Csus2 G7 C G Gsus4 G …
  O: "~ [c2,c3,c4,e4,g4] ~@2 [c4,e4,g4] ~@2 [f2,c4,f4,a4] ~@2 [c4,f4,a4] ~@2 [d4,f4,a#4] ~@2 [d4,f4,a#4] ~@2 [c4,f4,a4] ~@2 [c4,f4,a4] ~", // C F A# F
  P: "~ [c4,g4] ~@22", Q: "[~ [g1,g2,g3]@42 ~@5]/2",
  R: "[~ [e4,g4,c5]@2 ~@14 g4 ~ [g4,c5]!2 ~@3 c5 ~@13 d#5 ~@2 d6 ~@5 d3 [d4,e4] d5 g5 [g6,a6] g6 [c2,c3,g6]@3 ~@16, ~ c4 ~@11 f#4@36 [c4,d4,e4,f4,g4,a4,b4,c5]@8 ~@15, ~@13 c3@26 c4 [g6,a6,b6,c7] [c6,e6,f6] [f5,g5,a5,b5,d6] [b4,c5,d5,e5] [f4,g4,a4] [a3,b3,c4,d4,e4] [e3,f3,g3]@2 [d3,e3,f3,g3,a3,b3]@2 [d5,e5,f5,a5,b5] [g5,c6,d6,e6,f6] [a6,b6,c7]@5 ~@15, ~@13 c5@4 g3@4 g4@13 e5 g5 e5 c5 [g3,g5] d#5@18 ~@15, ~@13 g4 c4@5 c4@2 c5 g3@2 c4 [c5,e5] [g5,a5,b5] c6 [d6,e6,b6] a6 [e6,g6] [b5,c6] a5 g5 a#5@22 ~@16]/3", // C C5 Dsus2 Gsus2 C5 Cmaj7 Fmaj7 G7 …
})).s("gm_piano").gain(0.56)

// drums · kick
const kick = s("bd").struct(`<
  A@3 B A@8 B A B A@2 B@11 C@3 D A@7 B C@3 D A@3 B E@5 B A@3 B A@7 B A@10 F G H
>`.pickRestart({
  A: "~ x ~@5 x ~ x ~@3 x ~@5 x ~ x ~@2", B: "~ x ~ x ~@3 x ~@5 x ~ x ~@3 x ~@4", C: "~ x ~@5 x ~@5 x ~@5 x ~@4",
  D: "~ x ~@5 x ~@5 x ~ x ~@3 x ~@4", E: "~ x ~ x ~@2 x ~@2 x ~@3 x ~ x ~@2 x ~@2 x ~@2", F: "~ x ~@11 x ~@10",
  G: "~ x ~ x ~ x ~ x ~@5 x ~ x ~ x ~ x ~@4", H: "~@5 x ~@18",
})).gain(0.62)

// drums · snare
const snare = s("sd").struct(`<
  A@3 B C A@7 B C B C A@11 B C A@2 B C A@6 B C A@2 B C A@2 B C A@4 B C A@2 B C A@6 B C A@9 D E F
>`.pickRestart({
  A: "~@2 x ~@2 x ~@2 x ~@2 x", B: "~@4 x ~@5 x ~@5 x ~@2 x!5", C: "x ~ x ~@2 x ~@2 x ~@2 x", D: "~@20 x!4",
  E: "x ~@9 x!3 ~@11", F: "~@4 x!2 ~@18",
})).gain(0.56)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<[~@5 x ~@18]!76 [~@18 x!2 ~@4] [~ x ~@7 x ~@14] ~>").gain(0.06)

// drums · clap
const clap = s("cp").struct("<~@32 [~@2 x ~@2 x ~@2 x ~@2 x]!44 ~@3>").gain(0.56)

// drums · hihat
const hihat = s("hh").struct(`<
  A@3 B A@8 B A B A@12 B A@3 B A@7 B A@3 B A@3 B A@5 B A@3 B A@7 B A@10 C D ~
>`.pickRestart({
  A: "~ x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~", B: "~ x ~@2 x ~@2 x ~@2 x ~@2 x ~@10",
  C: "~ x ~@11 x ~ x!2 ~ x!2 ~ x!3", D: "~ x!2 ~ x!2 ~ x ~ x!3 ~ x ~ x!2 ~ x ~@5",
})).gain(0.5)

// drums · open hat
const open_hat = s("oh").struct("<~@3 A ~@8 A ~ A ~@12 A ~@3 A ~@7 A ~@3 A ~@3 A ~@5 A ~@3 A ~@7 A ~@13>".pickRestart({
  A: "~@2 x",
})).gain(0.62)

// drums · high tom
const high_tom = s("ht").struct("<~@76 [~ x ~@22] ~@2>").gain(0.62)

// drums · crash
const crash = s("cr").struct(`<
  ~@4 A ~@7 A ~@2 A ~@12 A ~@3 A ~@7 A ~@3 A ~@3 A ~@5 A ~ A@4 B@3 ~@5 A ~ A ~ C ~ A ~ D E ~
>`.pickRestart({
  A: "~ x ~@22", B: "~ x ~@4", C: "~@7 x ~@16", D: "~@13 x ~@10", E: "~ x ~ x ~ x ~ x ~@5 x ~ x ~ x ~ x ~@4",
})).gain(0.56)

// drums · bongos
const bongos = s("bongo:4").struct("<~@13 [~ x ~@22] ~@56 [~@7 x ~@16] ~ [~ x ~@22] ~@6>").gain(1.47)

stack(
  bass, drawbar_organ, brass_section, piano, kick, snare, snare_soft, clap, hihat, open_hat, high_tom, crash, bongos
)