// Baby Love — The Supremes
// 150 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 82 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(150/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.

// bass · acoustic bass · "Bass    (BB)"
const bass = note(`<
  ~@2 A B C D@2 A D E F E G H A I J F K A L M D E G N O B J F P E D A D E Q N O R C P D S T E T O U N S B V K P A T E P
  A U W A R C D P A P A D A G W X Y ~@6
>`.pickRestart({
  A: "c2@2 ~@2 c2@2 ~@2 c2@2 ~@2 c2@2 ~ g1", B: "b1@3 ~ b1@3 ~ b1@3 ~ b1@2 ~ g2", C: "a1@3 ~ a1@3 ~ a1@3 ~ a1@2 ~ e2",
  D: "d2@2 ~@2 d2@2 ~@2 d2@3 ~ d2@3 ~", E: "c2@2 ~@2 c2@2 ~@2 c2@3 ~ c2@3 ~", F: "d2@3 ~ d2@3 ~ d2@3 ~ d2@2 ~ a2",
  G: "f2@2 ~@2 f2@2 ~@2 e2@3 ~ e2@2 ~@2", H: "d2@3 ~ d2@2 ~@2 g2@2 ~@2 g2@2 ~@2",
  I: "b1 ~ b2@2 g2@2 b1@2, ~@3 b1@2 ~@11", J: "a1@2 ~@2 a1@2 ~@2 a1@2 ~@2 a1@2 ~ e1", K: "d2 ~@2 d2 a2@4 d2@2 ~@2 d2@4",
  L: "d2@2 ~@2 d2@3 ~ d2@3 ~ d2@2 ~ d2", M: "c2 ~@2 c2 g2@4 c2@2 ~@2 c2@4", N: "d2 ~ d2 ~ g2 ~ g2 ~",
  O: "c2@3 ~ c2@3 ~ c2@3 ~ c2@2 ~ g2", P: "d2@2 ~@2 d2@2 ~@2 d2@2 ~@2 d2@2 ~ a1",
  Q: "f2@3 ~ f2@2 ~@2 e2@2 ~@2 e2@2 ~@2", R: "b1@2 ~@2 b1@2 ~@2 b1@3 ~ b1@3 ~", S: "c2 ~ c3@2 g2@2 c2@2, ~@3 c2@2 ~@11",
  T: "d2 ~ d3@2 a2@2 d2@2, ~@3 d2@2 ~@11", U: "f2 ~ f2 ~ e2 ~ e2 ~", V: "a1@2 ~@2 a1@2 ~@2 a1@3 ~ a1@3 ~",
  W: "d2@2 ~@2 d2@2 ~@2 g2@3 ~ g2@2 ~@2", X: "c2@3 ~ c2@3 ~ c2@2 ~@2 c2@2 ~ g1", Y: "c2 ~@3 g1@3 ~ c2@8, ~@3 c2@2 ~@11",
})).s("gm_acoustic_bass").gain(0.32)

// chords · piano · "Piano   (BB)"
const piano = note(`<
  ~@2 A B C D E A D A D B F G A H C D@2 A E A E A I G A B C E@2 A D A E A J E B@2 C E@2 B D A E B F E A H C D@2 A E B D
  A J E B H C D E A E B D B I G K L ~@6
>`.pickRestart({
  A: "[e4,g4,c5,e5] ~@3 [e4,g4,c5,e5] ~@3 [e4,g4,c5,e5] ~@3 [e4,g4,c5,e5] ~@3", // C
  B: "[e4,g4,c5] ~@3 [e4,g4,c5] ~@3 [e4,g4,c5] ~@3 [e4,g4,c5] ~@3", // C
  C: "[c#4,e4,g4,a4] ~@3 [c#4,e4,g4,a4] ~@3 [c#4,e4,g4,a4] ~@3 [c#4,e4,g4,a4] ~@3", // A7
  D: "[f4,a4,d5] ~@3 [f4,a4,d5] ~@3 [f4,a4,d5] ~@3 [f4,a4,d5] ~@3", // Dm
  E: "[f4,a4,c5,d5] ~@3 [f4,a4,c5,d5] ~@3 [f4,a4,c5,d5] ~@3 [f4,a4,c5,d5] ~@3", // Dm7
  F: "[a4,c5,f5] ~@3 [a4,c5,f5] ~@3 [d4,e4,g4,b4] ~@3 [d4,e4,g4,b4] ~@3", // F Em7
  G: "[f4,a4,d5] ~@3 [f4,a4,d5] ~@3 [f4,a4,c5,d5] ~@3 [f4,a4,c5,d5] ~@3", // Dm Dm7
  H: "[e4,g4,b4,d5] ~@3 [e4,g4,b4,d5] ~@3 [e4,g4,b4,d5] ~@3 [e4,g4,b4,d5] ~@3", // Em7
  I: "[e4,g4,a4,c5] ~@3 [e4,g4,a4,c5] ~@3 [d4,e4,g4,b4] ~@3 [d4,e4,g4,b4] ~@3", // Am7 Em7
  J: "[e4,g4,a4,c5] ~@3 [e4,g4,a4,c5] ~@3 [g4,b4,e5] ~@3 [g4,b4,e5] ~@3", // Am7 Em
  K: "[e4,g4,e5] ~@3 [e4,g4,e5]@2 ~@2 [e4,g4,e5]@2 ~@2 [e4,g4,e5]@2 ~@2", L: "[e4,g4] ~@7 [e5,g5,e6]@8, e5 ~@7",
})).s("gm_piano").gain(0.24)

// chords · electric guitar clean · "Guitar  (BB)"
const electric_guitar_clean = note(`<
  ~@2 A B C D E A E A D A F G A B C D E A D A D A H G A B C D E A E A E A H G A B C D@2 A E A D A F G A B C E D A D A E
  A F E A B C D@2 A D A E A F E I J ~@6
>`.pickRestart({
  A: "~@4 [e4,c5] ~@7 [e4,c5] ~@3", B: "~@4 [e4,b4] ~@7 [e4,b4] ~@3", C: "~@4 [c#4,g4] ~@7 [c#4,g4] ~@3",
  D: "~@4 [f4,d5] ~@7 [f4,d5] ~@3", E: "~@4 [f4,c5] ~@7 [f4,c5] ~@3", F: "~@4 [e4,a4] ~@7 [g4,e5] ~@3",
  G: "~@4 [f4,d5] ~@7 [f4,c5] ~@3", H: "~@4 [e4,a4] ~@7 [d4,g4] ~@3", I: "~@4 [e4,e5] ~@7 [e4,e5] ~@3", J: "~ [e4,e5]",
})).s("gm_electric_guitar_clean").gain(0.28)

// chords · string ensemble 2 · "Strings (BB)"
const string_ensemble_2 = note(`<
  ~@14 A B C D E C E A D A F G C B C D E A E A E C H G C B C E D C D C E C F I ~@12 C B C E D A D C E C H G J@2 ~@6
>`.pickRestart({
  A: "[c5,e5]", B: "b4", C: "g4", D: "c5", E: "[d5,f5]", F: "a4 [e5,g5]", G: "c5!2", H: "a4 g4", I: "[d5,f5] c5",
  J: "[~ e4@31, c5]/2",
})).s("gm_string_ensemble_2").gain(0.16)

// chords · string ensemble 2 · "Strings (BB)" · soft notes
const string_ensemble_2_soft = note(`<
  ~@15 A B C ~ A ~@2 C ~ D E A@2 B C ~@5 A F E A@2 B ~ C A C A ~ A D G ~@12 A@2 B ~ C ~ C A ~ A F E ~@8
>`.pickRestart({
  A: "e5", B: "c#5", C: "f5", D: "e5 ~", E: "f5!2", F: "e5 d5", G: "~ f5",
})).s("gm_string_ensemble_2").gain(0.08)

// drums · kick
const kick = s("bd").struct("<~@2 A@13 B@10 A@2 B@10 A@2 B@10 A@14 B@11 A C ~@6>".pickRestart({
  A: "x!4", B: "x ~@3 x ~@3 x ~@3 x ~@2 x", C: "x!3 ~",
})).gain(0.28)

// drums · rim
const rim = s("rim").struct("<[x!2] [x!4] ~@80>").gain(0.28)

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

// drums · hihat
const hihat = s("hh").struct("<~@2 [x ~@2 x!2 ~@2 x!2 ~@2 x!2 ~@2 x]!73 [x ~@2 x!2 ~@2 x!2 ~@7] ~@6>").gain(0.24)

// drums · crash
const crash = s("cr").struct("<~@2 A ~@11 A ~@11 A ~@11 A ~@11 A ~@11 A ~@12 B ~@6>".pickRestart({
  A: "x", B: "x!2",
})).gain(0.28)

// drums · tambourine
const tambourine = s("tb").struct("<~@14 [~ x ~ x]!36 ~@12 [~ x ~ x]!13 [~ x!2 ~] ~@6>").gain(0.28)

stack(
  bass, piano, electric_guitar_clean, string_ensemble_2, string_ensemble_2_soft, kick, rim, snare, hihat, crash,
  tambourine
)