// I'm Gonna Make You Love Me — The Supremes
// 90 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 76 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(90/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 · trombone
const trombone = note(`<
  ~@8 A B C D E F G H I J K L M N O P M N O Q A B C D E F G H I J K L M N O P M N O Q A B C D E F G H I J K L M N O P M
  N O R M S O P M S O T
>`.pickRestart({
  A: "d5@2 d5!3 d5@2 e5 f#5@2 ~ d5 d5@2 d5@2", B: "[c4,e4,b4]@4 ~ g4 ~ a4 [c4,e4,b4]@2 ~ g4 [c4,e4,g4]@3 ~",
  C: "[b3,d4,f#4]@3 ~ g4@2 [d4,f#4,b4]@2 ~ d5 e5@2 d5@2 g4@2", D: "[e4,g4,b4] d5 [e4,g4,a4,d5]@5 ~",
  E: "d5@2 d5@2 e5@2 f#5@3 ~ d5 e5 d5@3 ~", F: "d5!2 e5 b4!2 g4 g4@2",
  G: "~@2 g4@2 [d4,f#4,b4]@2 d5 e5 [f#4,b4,d5]@5 ~ b4@2", H: "[g#4,b4] [g#4,b4,e5] [g#4,b4,e5]@3 ~ d4 e4",
  I: "b4 a4@2 ~ b4@2 [f#4,a4]@2 g4@2 ~ e4@4 ~", J: "b4@2 a4 g4 b4@2 a4@2 ~ g4 e4@2 [d4,f#4,b4]@2 a4 g4",
  K: "[c4,e4,b4]@2 a4 g4 [c4,e4,b4]@2 [c4,e4,g4]@5 ~ b4!2 [c4,e4,a4]@2", L: "b4!2 a4 g4 b4@2 a4 b4@2 ~ g4@4 ~ c5",
  M: "[f4,a#4,d5]@3 ~ [f4,a#4,d5]@2 [f4,a#4,d5]@2 d#5@2 d5@2 c5@2 c5@2", // A#
  N: "~@2 [d4,g4,a#4]@5 ~ [d4,f4,a#4]@2 [f4,a#4,d5]@3 ~ g4@2", // Gm A#
  O: "[c4,d#4,g4,a#4]@2 [c4,d#4,g4,a#4]@3 ~ [a#3,d#4,g4]@8 ~@2", // Cm7 D#
  P: "[d#4,a4,c5]@2 [d#4,a4,c5]@3 ~ [d#4,a4,d5]@6 ~@2 f4@2", Q: "[d4,f#4,a4,c5]@2 [d4,f#4,a4,c5]@3 ~ [d4,f#4,a4,c5]@10",
  R: "[d#4,a4,c5]@2 [d#4,a4,c5]@3 ~ [d#4,a4,c5]@6 ~@2 f#4@2", S: "~@2 [d4,g4,a#4]@5 ~ [d4,f4,a#4]@5 ~ g4@2",
  T: "[d#4,a4,c5]@2 [d#4,a4,c5]@3 ~ [d#4,a4,d5]@6 ~@4", // Adim D
})).s("gm_trombone").gain(0.72).pan(0.7)

// chords · string ensemble 1 · "Strings"
const string_ensemble_1 = note(`<
  ~ A B C D E D F G ~@3 H I ~@2 J K ~ L@3 ~@2 M@2 ~@2 N ~@3 H I ~@2 J K ~ L@3 ~@2 M@2 ~@2 N ~@3 H I ~@2 J K ~ L@3 ~@2
  M@2 ~@2 O@2 ~@2 O@2 ~@2
>`.pickRestart({
  A: "[f#3,a3,c4,d4]@2 [f#3,a3,c4,d4]@3 ~ [f#3,a3,c4,d4]@8 ~@2", // D7
  B: "[g3,b3,d4]@5 ~ [g3,b3,d4]@2 [g3,b3,d4]@5 ~ [g3,b3,d4]@2", C: "[a3,c4,d4]@2 [a3,c4,d4]@3 ~ [g3,c4,d4]@8 ~@2",
  D: "[d4,g4,a4]@3 ~ [d4,g4,b4]@3 ~ [g4,b4,d5]@3 ~ [d4,g4,b4]@3 ~", E: "[c4,e4,a4]@3 ~ [c4,e4]@3 ~ a4@2 b4@2 e5@2 d5@2",
  F: "[c4,e4,a4]@3 ~ [c4,e4]@6 ~@2 [a3,c4,e4,g4]@3 ~", G: "[f#4,b4]@3 ~ [g4,b4]@3 ~", H: "[f#4,b4]@5 ~ [g4,b4]@8 ~@2",
  I: "[e4,g4]@3 ~ [c4,e4]@4", J: "[c4,e4]@5 ~ [b3,d4]@8 ~@2", K: "[c4,e4]@5 ~ [b3,d4,f#4]@10",
  L: "[[c4,e4]@6 ~ c4@14 ~@3 [f4,a4]@5 ~ [d4,g4]@4 ~@14, ~@7 e4@9 ~@32]/3", M: "[~@8 [f4,a4]@5 ~ [d4,g4]@4 ~@14]/2",
  N: "[f#4,b4]@3 ~ [g4,b4]@4", O: "[~@8 [f#4,a4]@5 ~ [d4,g4]@4 ~@14]/2",
})).s("gm_string_ensemble_1").gain(0.54).pan(0.3)

// chords · piano
const piano = note(`<
  ~ A B C D E F@2 G@2 H I J E J K L M N O P Q R S T U R V W X G@2 Y Z J AA L AB E AC T AD AE AF T AG AH AI AJ AK G@2 AL
  AC J AM L@2 E AN AO AP AH S T AQ AE AR AS AD AT AU AO AV R AW
>`.pickRestart({
  A: "~@6 f#4 a4, ~@5 d4@3", B: "[g3,b3,d4] ~ [g3,b3,d4] ~@3 [g3,b3,d4]@6 ~@4",
  C: "[c4,d4,f#4,a4]@6 d3@2 [c4,d4,f#4,a4]@3 ~ [c4,d4,f#4,a4] ~@3", // D7
  D: "~@2 [g3,b3,d4]@2 ~@2 d2@2 [g3,b3,d4]@2 ~@2 [g3,b3,d4] ~@3", // G
  E: "[c4,e4,g4,a4] ~ [c4,e4,g4,a4] ~@3 [c4,e4,g4,a4]@6 ~@4", // Am7
  F: "[[g3,a3,c4,e4]@14 ~@2 [g3,a3,c4,e4] ~ [g3,a3,c4,e4] ~@3 [g3,e4]@2 ~@2 d3@2 [g3,a3,e4]@2 ~@2, ~@14 d3@8 [a3,c4] ~@5 c4 ~@3]/2", // Am7 C A7 Am
  G: "[[f#3,g3,b3,d4]@14 ~@2 [f#3,g3,b3,d4] ~ [f#3,g3,b3,d4] ~@3 [f#3,d4]@2 ~@2 g2@2 [f#3,g3,d4]@2 ~@2, ~@14 g2@8 [g3,b3] ~@5 b3 ~@3]/2", // Gmaj7 D Gmaj7 G
  H: "[b3,d4,f#4,a4]@11 ~ [b3,d4,f#4,a4]@3 ~", I: "~ [b3,d4,f#4,a4] ~@2 [b3,d4,f#4,a4]@3 ~",
  J: "~@2 [b3,d4,f#4,a4]@2 ~@2 g2@2 [b3,d4,f#4,a4]@2 ~@2 [b3,d4,f#4,a4] ~@3", K: "[g#3,b3,e4]@15 ~",
  L: "[c4,e4,g4,a4]@6 [a3,b3,d4,f#4]@9 ~", M: "~ [c4,e4,g4,a4]@2 ~@2 [a3,b3,d4,f#4]@2 ~",
  N: "[c4,e4,g4,a4]@6 a2@2 [c4,e4,g4,a4]@3 ~ [c4,e4,g4,a4] ~@3", // Am7
  O: "~@2 [c4,e4,g4,a4]@2 ~@2 d3@2 [c4,e4,g4,a4]@2 ~@2 [c4,e4,g4,a4] ~@3", P: "[f3,a#3,d4]@7 ~@3 [a3,c4,f4]@4 ~@2",
  Q: "[g3,a#3,d4]@7 ~@3 [a#3,d4,f4]@4 ~@2", R: "~@2 [g3,c4,d#4]@4 ~@2 [g3,a#3,d#4]@7 ~",
  S: "[c4,d#4,f4,a4]@7 ~@3 [c4,d#4,f4,a4]@4 ~@2", T: "[a#3,d4,f4]@7 ~ [a3,c4,f4]@7 ~",
  U: "[g3,a#3,d4]@7 ~ [f3,a#3,d4]@7 ~", V: "[c4,d4,f#4,a4]@7 ~ [c4,d4,f#4,a4]@7 ~",
  W: "~@6 d4 f#4, [f#4,a4]@7 ~, d4@3 ~, b3@5 b3@2 ~, ~@2 g3 ~", // F#m
  X: "[b3,d4,f#4,a4] ~ [b3,d4,f#4,a4] ~@3 [b3,d4,f#4,a4]@8 ~@2", // Bm7
  Y: "[b3,d4,f#4,a4] ~ [b3,d4,f#4,a4] ~@3 [b3,d4,f#4,a4]@6 ~@4", Z: "~@8 a3@2 c4@2 e4@2 a4 ~, [c4,e4,g4,a4]@5 ~@3",
  AA: "[g#3,b3,e4] ~ [g#3,b3,e4] ~@3 [g#3,b3,e4]@6 ~@4", AB: "~@2 [c4,e4,g4,a4]@4 [a3,b3,d4,f#4]@9 ~",
  AC: "[c4,e4,g4,a4]@6 d3@2 [c4,e4,g4,a4]@3 ~ [c4,e4,g4,a4] ~@3", AD: "[g3,a#3,d4]@7 ~ [a#3,d4,f4]@7 ~",
  AE: "[g3,c4,d#4]@7 ~@3 [g3,a#3,d#4]@4 ~@2", AF: "~ [c4,d#4,f4,a4]@2 ~@2 [c4,d#4,f4,a4]@2 ~",
  AG: "~ [g3,a#3,d4]@2 ~@2 [a#3,d4,f4]@2 ~", AH: "~ [g3,c4,d#4]@2 ~@2 [g3,a#3,d#4]@2 ~",
  AI: "[c4,d4,f#4,a4]@7 ~@3 [c4,d4,f#4,a4]@4 ~@2", AJ: "[b3,d4,f#4,a4]@5 g2 [b3,d4,f#4,a4] ~",
  AK: "[b3,d4,f#4,a4]@5 g3 b3 ~", AL: "[b3,d4,f#4,a4]@15 ~", AM: "[g#3,b3,e4]@6 e3@2 [g#3,b3,e4]@3 ~ [g#3,b3,e4] ~@3",
  AN: "[c4,e4,g4,a4]@15 ~", AO: "[a#3,d4,f4]@7 ~@3 [a3,c4,f4]@4 ~@2", AP: "~@2 [g3,a#3,d4]@4 ~@2 [f3,a#3,d4]@7 ~",
  AQ: "[d4,g4,a#4]@7 ~@3 [f3,a#3,d4]@4 ~@2", AR: "~@2 [c4,d#4,f4,a4]@4 ~@2 [c4,d#4,f4,a4]@7 ~",
  AS: "[f3,a#3,d4]@7 ~ [a3,c4,f4]@7 ~", AT: "[g3,c4,d#4]@7 ~ [g3,a#3,d#4]@7 ~",
  AU: "[c4,d#4,f4,a4]@7 ~ [c4,d#4,f4,a4]@7 ~", AV: "~@2 [g3,a#3,d4]@4 ~@2 [a#3,d4,f4]@7 ~",
  AW: "~ [c4,d#4,f4,a4]@2 ~ [c4,d#4,f4,a4]@3 ~", // F7
})).s("gm_piano").gain(0.26).pan(0.8)

// chords · string ensemble 1 · "Strings"
const string_ensemble_1_2 = note(`<
  ~@20 A B C D E F G H ~@12 I J K D L B M N ~@12 I B O P I Q R S T J U V E W M X
>`.pickRestart({
  A: "[f5,d6] [f6,a6]", B: "[a#5,g6] [f5,d6]", C: "[d#6,c7] [g5,d#6]", D: "[a5,d#6]!2", E: "[f5,d6] [a5,f6]",
  F: "[g6,d7] [a#5,d6]", G: "[c6,d#6] [a#5,d#6]", H: "[c6,f#6] [f#6,a6]", I: "[d6,a#6] [a5,f6]", J: "[a#5,g6] [d6,a#6]",
  K: "[d#6,g6]!2", L: "[d6,a#6] [c6,f6]", M: "[g5,d#6]!2", N: "[c6,f#6] [f#6,c7]", O: "[d#6,g6] [g5,d#6]",
  P: "[d#6,a6] [a5,d#6]", Q: "[d6,g6] [d6,a#6]", R: "[g5,d#6] [a#5,d#6]", S: "[d#6,f6]!2", T: "[d6,f6] [f6,c7]",
  U: "[g5,d#6] [d#6,a#6]", V: "[a5,d#6] [d#6,a6]", W: "[d6,g6] [f5,d6]", X: "[d#6,a6]@4 [a5,d#6]@3 ~",
})).s("gm_string_ensemble_1").gain(0.19).pan(0.9)

// bass · electric bass finger · "Bass"
const bass = note(`<
  A@8 B C B C B C D E F G H I J K L M J K N O B C B C B C D E F G H I J K L M J K N O B C B C B C D E F G H I J K L M J
  K N M J K N M J K N P
>`.pickRestart({
  A: "d2@3 d2 d2@3 d2", B: "g2@2 g2@5 g2 g2@2 b2@2 c3@2 c#3@2", C: "d3@7 a2 d3@2 d3@4 d3@2",
  D: "g2@2 g2@5 g2 g2@3 g2 f#2@2 f2@2", E: "e2@3 f2 f#2@2 g2@2 g#2@4 b2@2 e2@2", F: "a2@2 a2 b2@2 b2 b2@2",
  G: "a2@4 a2@2 b2@4 b2@2 b2@2 e2 g2", H: "a2@2 a2@4 e2 g2 a2@2 a2@6", I: "d2 d2@3 d2@2 d3 a2",
  J: "a#2@2 a#2@3 f2 a#2 f2 a2@2 a2@4 f2 a2", K: "g2@2 g2@5 g2 f2@2 f2@3 g2 a#2 g2",
  L: "c3@2 c3@2 g2@2 c3@2 a#2@2 a#2@3 g2 a#2@2", M: "a2@2 a2@4 a2@2 f2@2 f2@2 f2 g2 a2@2",
  N: "c3@2 c3@2 g2@2 c3@2 a#2@2 a#2@3 f2 g2@2", O: "a2@2 a2 d3@3 d3@2", P: "a2@2 a2@4 a2@2 f2@2 f2@2 f2 g2 ~@2",
})).s("gm_electric_bass_finger").gain(0.64).pan(0.1)

// drums · kick
const kick = s("bd").struct(`<
  A B A B A B A C@2 A C A C A C A C A C@2 A B A B A B A C@2 A C A C A C A C A C D A B A B A B A C@2 A C A C A C A C A
  C@2 A B A B A B A E A B A B A B A C
>`.pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "x ~@2 x!3 ~ x", C: "x ~@2 x!2 ~@3", D: "~@4 x!2 ~@2", E: "~@7 x",
})).gain(0.56)

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

// drums · clap
const clap = s("cp").struct("<~@15 [~@2 x!2 ~@4] ~@60>").gain(0.64)

// drums · low tom
const low_tom = s("lt").struct("<~@7 A ~@7 B ~@6 C ~@24 A ~@22 C ~@5>".pickRestart({
  A: "~@7 x", B: "~@3 x", C: "~@5 x ~@2",
})).gain(0.64)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@7 A ~@19 B ~@19 A ~@11 B ~@15 A>".pickRestart({
  A: "~@3 x ~ x!2 ~", B: "~@12 x!4",
})).gain(0.64)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@3 A B ~ B C ~@3 A ~@7 A ~@3 A ~ A ~@3 A ~@5 A ~@6 B A ~ A D C ~ A ~@3 A ~@16 E A ~ A ~ F
>`.pickRestart({
  A: "~@7 x", B: "~@15 x", C: "~@2 x ~@4 x", D: "~ x ~@13 x", E: "~ x ~@14", F: "~ x ~@2",
})).gain(0.48)

// drums · high tom
const high_tom = s("ht").struct("<~@7 [~ x] ~@39 [~ x] ~@27 [~ x]>").gain(0.64)

// drums · crash
const crash = s("cr").struct("<A ~@7 A ~@11 A ~@7 A ~@11 A ~@7 A ~@11 A ~@7 A ~@7>".pickRestart({
  A: "x",
})).gain(0.56)

// drums · tambourine
const tambourine = s("tb").struct(`<
  ~@9 A ~ A ~ A ~ B ~ A ~@11 A ~ A ~ A ~ A ~ A ~@11 A ~ A ~ A ~ A ~ A ~@18
>`.pickRestart({
  A: "~@3 x", B: "~@10 x!3 ~@3",
})).gain(0.72)

stack(
  trombone, string_ensemble_1, piano, string_ensemble_1_2, bass, kick, snare, clap, low_tom, hihat, mid_tom, open_hat,
  high_tom, crash, tambourine
)