// Emotions (12" club No. 1 mix) — Mariah Carey
// 78 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 85 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(78/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 · flute
const flute = note(`<
  ~@8 A B C B A B C B D E F G H I J K@2 L@2 M@2 N@2 O@2 B C B D P F Q R S T K@2 L@2 M@2 N@2 U@2 V W X Y@2 Z AA@2 AB@2
  AC@2 AD@2 AE@2 AB@2 AC@2 AD@2 AF@2 AG AH AG AI AG AH AG ~
>`.pickRestart({
  A: "~@6 [e5,g#5] [f#5,a5] [g#5,b5] ~@7", // E F#m G#m
  B: "~@6 [e5,g#5] [f#5,a5] [g#5,b5] ~ [a5,c#6] [g#5,b5] ~ [f#5,a5] [e5,g#5]@2", // E F#m G#m A G#m F#m E
  C: "~@6 [e5,g#5] [f#5,a5] [g#5,b5] ~@2 [e5,g#5]@3 ~@2", D: "~@4 e5 f#5 g#5 f#5@3 f#5@3 [c#5,e5] ~@2",
  E: "~@2 b4 c#5 e5 c#5 f#5@4 c#5@2 b4@3 ~", F: "~@2 b4 c#5 e5 f#5 g#5 f#5@3 f#5@3 c#5@2 ~, ~@13 e5 ~@2",
  G: "~ d#5@2 c#5 d#5 c#5 ~ b4 g#4 b4 c#5 b4 c#5 b4@3, e5 ~@7", H: "~@2 g#5 a5 b5 a5 g#5 c#6@2 c#6 b5@5 ~",
  I: "~@2 g#5 a5 b5 c#6@3 f#5@2 e5@2 g#5@3 ~", J: "~@2 b4 c#5 e5 f#5 g#5 f#5 ~ f#5 e5@3 b4@2 b4, ~@13 c#5 ~@2",
  K: "[b5@2 a5 g#5 g#5@2 f#5 e5!2 f#5 g#5 f#5@3 g#5 f#5@3 f#5@2 e5!2 b4!2 f#5@2 e5 b4@4 c#5]/2",
  L: "[[a4,b4] ~ f#5@2 e5!2 b4!2 [e5,g#5] [f#5,a5] [g#5,b5] [e5,g#5]@3 [f#5,a5] [g#5,b5]@2 ~ c#6@2 g#5!4 g#5@2 b5 f#5@3 e5@2, ~@11 [f#5,a5] ~@20]/2", // Asus2 E F#m G#m E F#m G#m F#m
  M: "[~@2 g#5@2 f#5 e5!3 g#5@2 b5 f#5@3 [e5,g#5] [f#5,a5]@3 [e5,g#5]@3 ~ b4!2 f#5@2 e5 b4@4 c#5]/2", // E F#m E
  N: "[a4@2 f#5@2 e5 b4!3 [e5,g#5] [f#5,a5] [g#5,b5] [e5,g#5]@3 [f#5,a5] [g#5,b5]@2 ~ c#6@2 g#5!4 g#5@2 b5 f#5@3 g#5@2, b4 ~@10 [f#5,a5] ~@20]/2", // E F#m G#m E F#m G#m F#m
  O: "[f#5 e5 [b4,g#5]@2 f#5 e5!3 g#5@2 b5 f#5@3 [e5,g#5] [f#5,a5]@3 [e5,g#5]@3 ~ [e5,g#5] [f#5,a5] [g#5,b5] ~@7, ~@2 c#5 ~@29]/2", // E F#m E F#m G#m
  P: "~@2 b4 c#5 e5 c#5 f#5@4 c#5@3 g#4 b4@2", Q: "e5 d#5 ~ c#5 d#5 c#5 ~ b4 g#4 b4 c#5 e5 g#5 f#5@3",
  R: "~@2 g#5 a5 b5 a5 g#5 c#6@3 b5@5 ~", S: "~@2 g#5 a5 b5@2 c#6@2 f#5@2 e5@2 g#5@3 ~",
  T: "~@2 b4!2 b5 a5 g#5 f#5 ~ e5 f#5@3 c#5@2 b4, ~@13 e5 ~@2",
  U: "[f#5 e5 [b4,g#5]@2 f#5 e5!3 g#5@2 b5 f#5@3 [e5,g#5] [f#5,a5]@3 [e5,g#5]@2 c#5@4 g#4@4 d#5@4, ~@2 c#5 ~@29]/2", // E F#m E
  V: "c#5@3 [g#4,b4] g#4@3 [e4,f#4] f#4@4 e4@4", W: "~@2 b4 c#5 e5@2 c#5 b4 e5@2 c#5 b4 e5!2 f#5@2",
  X: "g#5 ~ f#5@4 ~@10", Y: "[~@4 c#5@4 b4@4 g#4 b4 f#4@5 ~ g#5@2 f#5 ~ f#5@2 e5@2 c#5 e5@3, ~@28 c#6@3 ~]/2",
  Z: "~ b5 ~ g#5!2 f#5 ~ e5 g#5 f#5 ~ e5!2 f#5 ~ g#5, c#6 ~@7",
  AA: "[g#5@6 ~ c5 a5@2 c6@2 a#5 a5 g5 f5@3 g5@2 f5!2 c5!2 g5@2 f5 c5@4 d5]/2",
  AB: "[[a#4,c5] ~ g5@2 f5!2 c5!2 [f5,a5] [g5,a#5] [a5,c6] [f5,a5]@3 [g5,a#5] [a5,c6]@2 ~ d6@2 a5!4 a5@2 c6 g5@3 f5@2, ~@11 [g5,a#5] ~@20]/2", // A#sus2 F Gm Am F Gm Am Gm
  AC: "[~@2 a5@2 g5 f5!3 a5@2 c6 g5@3 [f5,a5] [g5,a#5]@3 [f5,a5]@3 ~ c5!2 g5@2 f5 c5@4 d5]/2", // F Gm F
  AD: "[a#4@2 g5@2 f5 c5!3 [f5,a5] [g5,a#5] [a5,c6] [f5,a5]@3 [g5,a#5] [a5,c6]@2 ~ d6@2 a5!4 a5@2 c6 g5@3 a5@2, c5 ~@10 [g5,a#5] ~@20]/2", // F Gm Am F Gm Am Gm
  AE: "[g5 f5 [c5,a5]@2 g5 f5!3 a5@2 c6 g5@3 [f5,a5] [g5,a#5]@3 [f5,a5]@2 f5!2 c5!2 g5@2 f5 c5@4 d5, ~@2 d5 ~@29]/2", // F Gm F
  AF: "[g5 f5 [c5,a5]@2 g5 f5!3 a5@2 c6 g5@3 [f5,a5] [g5,a#5]@3 [f5,a5]@3 ~ [f5,a5] [g5,a#5] [a5,c6] ~@7, ~@2 d5 ~@29]/2", // F Gm F Gm Am
  AG: "~@6 [f5,a5] [g5,a#5] [a5,c6] ~ [a#5,d6] [a5,c6] ~ [g5,a#5] [f5,a5]@2", // F Gm Am A# Am Gm F
  AH: "~@6 [f5,a5] [g5,a#5] [a5,c6] ~@2 [f5,a5]@3 ~@2", AI: "~@6 [f5,a5] [g5,a#5] [a5,c6] ~@7",
})).s("gm_flute").gain(0.3)

// bass · synth bass 1
const bass = note(`<
  ~@8 A B C D A B C E F@3 G H@4 A B C D A B C E ~@4 F@3 G H@4 A B C D A B C E ~@8 I J K L I J K M I J K L I J K M N O P
  Q N O P Q R
>`.pickRestart({
  A: "c#2@3 ~@3 g#1@2 ~@4 g#2@2 g#1@2", B: "a1@3 ~@3 a1@2 b1@4 c2@4", C: "c#2 d#2 c#2 g#1 ~@2 g#2 g#1",
  D: "a1@3 ~@3 a1@2 b1@8", E: "a1@3 ~@3 a1@2 b1@4 b2@4", F: "[e2@12 d#2@3 c#2@12 ~ g#1@3 a1@16 ~]/3",
  G: "f#1@7 ~ b1@3 ~ b1@3 ~", H: "[e2@12 d#2@3 c#2@12 ~ g#1@3 a1@12 ~ g#1@3 f#1@9 b1@3 ~ b1@4]/4",
  I: "d2@3 ~@3 a1@2 ~@4 a2@2 a1@2", J: "a#1@3 ~@3 a#1@2 c2@4 c#2@4", K: "d2 e2 d2 a1 ~@2 a2 a1",
  L: "a#1@3 ~@3 a#1@2 c2@8", M: "a#1@3 ~@3 a#1@2 c2@4 c3@4", N: "f2@3 ~@9 a2@4", O: "a#2@3 ~@5 c3@4 c#3@4",
  P: "d3@3 ~@9 a2@4", Q: "a#2@3 ~@5 c3@3 ~ c3@4", R: "f2 ~",
})).s("gm_synth_bass_1").gain(0.4)

// chords · piano
const piano = note(`<
  ~@8 A@2 B@2 A@2 C@2 D@3 E F@3 E A@2 B@2 A@2 C@2 G@2 H@2 I@3 E J@3 E A@2 B@2 A@2 C@2 K@2 L@2 M@2 N@2 O@2 P@2 O@2 Q@2
  O@2 P@2 O@2 Q@2 O@2 P@2 O@2 Q@2 R
>`.pickRestart({
  A: "[~@2 [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ b3@3 c#4@3 [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [f#3,c4,d#4] ~ [f#3,c4,d#4] ~]/2", // E A Cdim
  B: "[~@2 [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ b3@3 c#4@2 ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [e3,a3,c#4]@4]/2", // E A
  C: "[~@2 [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ [g#3,b3,e4] ~ b3@3 c#4@2 ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~@3 [e3,a3,c#4]@4]/2", // E A
  D: "[[g#3,b3,e4]@12 [f#3,b3,d#4]@3 [g#3,c#4,e4]@13 [d#3,g#3,b3]@3 [e3,a3,c#4]@16 ~]/3", // E B C#m G#m A
  E: "[a3,c#4,e4]@8 [a3,c#4,e4]@4 [b3,d#4,f#4]@3 ~", // A B
  F: "[[g#3,b3,e4]@12 [f#3,b3,d#4]@3 [g#3,c#4,e4]@13 [e3,g#3,b3]@3 [e3,a3,c#4]@16 ~]/3", // E B C#m E A
  G: "[[g#3,b3,e4]@12 [g#2,d#3,g#3,b3]@3 [a2,e3,a3,c#4]@9 [b2,a3,c#4,e4]@7 b2]/2", // E G#m A
  H: "[~@4 g#4@7 ~ [g#2,d#3,g#3,b3]@3 [a2,e3,a3,c#4]@8 ~ [a3,c#4,e4]@4 [a3,c#4,e4]@4, e2@11 ~@21, ~ b2@9 ~@14 b2@7 ~, ~@3 e4@8 ~@21]/2", // G#m A
  I: "[[b3,e4,g#4]@12 [b3,d#4,f#4]@3 [g#3,c#4,e4]@13 [d#3,g#3,b3]@3 [e3,a3,c#4]@16 ~]/3", // E B C#m G#m A
  J: "[[b3,e4,g#4]@12 [b3,d#4,f#4]@3 [g#3,c#4,e4]@13 [e3,g#3,b3]@3 [e3,a3,c#4]@16 ~]/3", // E B C#m E A
  K: "[[e4,g#4,c#5,e5]@12 [g#2,e4,g#4,c#5,e5] ~ [f#2,e4,f#4,a#4,c#5]@9 ~ [f#2,c#4,f#4,a#4,c#5]@2 ~@2 [g#2,e4,f#4,b4,c#5]@2 ~@2]/2", // C#m F#7 F# C#m7
  L: "[[a2,e4,a4,c#5,e5]@12 [a2,e4,a4,c#5,e5] ~ [g#2,d#4,g#4,b4,d#5]@10 [g#2,d#4,g#4,b4,d#5]@2 ~@2 [g#2,d#4,g#4,b4,d#5]@2 ~@2]/2", // A G#m
  M: "[[c#3,e4,g#4,c#5,e5]@12 [g#2,e4,g#4,c#5,e5] ~ [f#2,e4,f#4,a#4,c#5]@9 ~ [f#2,c#4,f#4,a#4,c#5]@2 ~@2 [g#2,e4,f#4,b4,c#5]@2 ~@2]/2", // C#m F#7 F# C#m7
  N: "[[a2,e4,a4,c#5,e5]@12 [a2,e4,a4,c#5,e5] ~ [b2,f#4,b4,d#5,f#5]@8 [b2,f#4,b4,d#5,f#5] ~ [c3,g4,c5,e5,g5]@3 ~ [c3,g4,c5,e5,g5]@3 ~]/2", // A B C
  O: "[~@2 [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ c4@3 d4@3 [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [g3,c#4,e4] ~ [g3,c#4,e4] ~]/2", // F A# C#dim
  P: "[~@2 [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ c4@3 d4@2 ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [f3,a#3,d4]@4]/2", // F A#
  Q: "[~@2 [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ c4@3 d4@2 ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~ [a#3,d4,f4] ~@3 [f3,a#3,d4]@4]/2", // F A#
  R: "[a3,c4,f4] ~", // F
})).s("gm_piano").gain(0.32).pan(0.6)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  A@2 B C D@2 E C A@2 B C D@2 E C ~@8 A@2 B C D@2 E C ~@12 A@2 B C D@2 E C F@2 G@2 H@3 I J@2 K L M@2 N L J@2 K L M@2 N L
  J@2 K L M@2 N L ~
>`.pickRestart({
  A: "[~@6 b3@6 b3@2 ~ c#4@3 ~@9 d#4@5, g#4@2 e4@13 ~@4 c#4@5 c#4@3 ~@5, ~ b3@5 ~@8 b3@2 ~@2 b3@5 b3@3 b3@6, ~@3 g#4@12 ~@5 e4@5 e4@2 ~@5]/2",
  B: "~@3 f#4@4 ~@3 e4@2 [b3,d#4]@4, g#4@8 ~ f#4@3 ~@4, ~ b3@6 b3@5 ~@4, ~ e4@3 e4 ~@3", // B
  C: "~@3 e4 ~@2 b3 ~ e4@2 [b3,e4]@6, b3@6 ~ b3@3 ~@6, ~ c#4@3 c#4@12, ~ f#4@7, ~ e4 ~@2", // E5
  D: "[~@6 b3@6 b3@2 ~ c#4@3 ~@9 d#4@5, g#4@2 e4@13 ~@4 c#4@5 c#4@3 ~@5, ~ b3@4 ~@9 b3@2 ~@2 b3@5 b3@3 b3@6, ~@3 g#4@12 ~@5 e4@5 e4@2 ~@5]/2",
  E: "~@5 e4 [b3,d#4]@2, g#4@9 ~@7, ~ b3@6 b3@5 ~@4, ~ e4@3 e4 ~@3, ~@3 f#4@6 f#4@3 ~@4", // B
  F: "~@5 c#4@11, ~ c#4 b3@6, ~@3 g#3@13", G: "[~@11 e4@9 ~@12, ~@6 e4@5 ~@21, ~@2 b3@3 ~@3, ~@9 c#4@11 ~@12]/2",
  H: "~@11 c#4@5, ~ c#4 b3 g#3 c#4 b3@3, ~@3 g#3@2 c#4@2 b3@2 g#3@7",
  I: "~@5 f#4@3 ~@3 g4@5, ~ f#4 d#4@2 g4 e4@3, ~@3 b3@5 ~ c4@7",
  J: "[~@6 c4@6 c4@2 ~ d4@3 ~@9 e4@5, a4@2 f4@13 ~@4 d4@5 d4@3 ~@5, ~ c4@5 ~@8 c4@2 ~@2 c4@5 c4@3 c4@6, ~@3 a4@12 ~@5 f4@5 f4@2 ~@5]/2",
  K: "~@3 g4@4 ~@3 f4@2 [c4,e4]@4, a4@8 ~ g4@3 ~@4, ~ c4@6 c4@5 ~@4, ~ f4@3 f4 ~@3", // C
  L: "~@3 f4 ~@2 c4 ~ f4@2 [c4,f4]@6, c4@6 ~ c4@3 ~@6, ~ d4@3 d4@12, ~ g4@7, ~ f4 ~@2", // F5
  M: "[~@6 c4@6 c4@2 ~ d4@3 ~@9 e4@5, a4@2 f4@13 ~@4 d4@5 d4@3 ~@5, ~ c4@4 ~@9 c4@2 ~@2 c4@5 c4@3 c4@6, ~@3 a4@12 ~@5 f4@5 f4@2 ~@5]/2",
  N: "~@5 f4 [c4,e4]@2, a4@9 ~@7, ~ c4@6 c4@5 ~@4, ~ f4@3 f4 ~@3, ~@3 g4@6 g4@3 ~@4", // C
})).s("gm_acoustic_guitar_steel").gain(0.26).pan(0.2)

// chords · acoustic guitar steel
const acoustic_guitar_steel_2 = note(`<
  A@2 B@2 A@2 C@2 A@2 B@2 A@2 C@2 ~@8 A@2 B@2 A@2 C@2 ~@12 A@2 B@2 A@2 C@2 D@2 E@2 F@3 G H@2 I@2 H@2 J@2 H@2 I@2 H@2 J@2
  H@2 I@2 H@2 J@2 ~
>`.pickRestart({
  A: "[~@6 b3 ~@13 e4@2 b3 ~@4 f#4@5, g#4@13 g#3@3 ~@3 f#4@4 ~@2 f#4@2 ~@5, c#3@11 b3 g#2@4 a2@8 b2@8, ~ b3@3 e4@3 b3@3 e4@4 b3@2 ~@2 e4@2 ~@4 e4@2 e4@6, ~@2 e4 f#4@5 e4 f#4@6 c#4@8 b3@9]/2",
  B: "[~@6 b3 ~@4 b3 b3@2 b3 ~@7 b3 ~ e4@2 ~ b3@5, g#4@15 ~@5 e4@3 b3@3 e4@6, c#3@3 g#2 a2@2 b2@2, ~ b3@3 e4@3 b3@3 e4@5 c#4@16 ~, ~@2 e4 f#4@5 e4 f#4@6 ~@3 f#4@14]/2",
  C: "[~@6 b3 ~@15 b3 ~ e4@2 ~ b3@5, g#4@14 b3@6 e4@3 b3@3 e4@6, c#3@11 b3 g#2@4 a2@8 b2@8, ~ b3@3 e4@3 b3@3 e4@5 c#4@17, ~@2 e4 f#4@5 e4 f#4@6 ~@3 f#4@14]/2",
  D: "~@5 c#4@11, ~ c#4 b3@6, ~@3 g#3@13", E: "[~@11 e4@13 ~@8, ~@6 e4@5 ~@21, ~ b3@2 ~, ~@9 c#4@15 ~@8]/2",
  F: "~@11 c#4@5, ~ c#4 b3 g#3 c#4 b3@3, ~@3 g#3@2 c#4@2 b3@2 g#3@7",
  G: "~@5 f#4@3 ~@3 g4@5, ~ f#4 d#4@2 g4 e4@3, ~@3 b3@5 ~ c4@7",
  H: "[~@6 c4 ~@13 f4@2 c4 ~@4 g4@5, a4@13 a3@3 ~@3 g4@4 ~@2 g4@2 ~@5, d3@11 c4 a2@4 a#2@8 c3@8, ~ c4@3 f4@3 c4@3 f4@4 c4@2 ~@2 f4@2 ~@4 f4@2 f4@6, ~@2 f4 g4@5 f4 g4@6 d4@8 c4@9]/2",
  I: "[~@6 c4 ~@4 c4 c4@2 c4 ~@7 c4 ~ f4@2 ~ c4@5, a4@15 ~@5 f4@3 c4@3 f4@6, d3@3 a2 a#2@2 c3@2, ~ c4@3 f4@3 c4@3 f4@5 d4@16 ~, ~@2 f4 g4@5 f4 g4@6 ~@3 g4@14]/2",
  J: "[~@6 c4 ~@15 c4 ~ f4@2 ~ c4@5, a4@14 c4@6 f4@3 c4@3 f4@6, d3@11 c4 a2@4 a#2@8 c3@8, ~ c4@3 f4@3 c4@3 f4@5 d4@17, ~@2 f4 g4@5 f4 g4@6 ~@3 g4@14]/2",
})).s("gm_acoustic_guitar_steel").gain(0.26).pan(0.8)

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

// drums · snare
const snare = s("sd").struct("<~@8 A@7 B A@15 B ~@4 A@15 B ~@4 A@3 B A@7 B A@7 B A@7 B ~>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2",
})).gain(0.48)

// drums · hihat
const hihat = s("hh").struct("<~@8 A@24 B@3 ~ A@16 B@3 ~ A@28 ~>".pickRestart({
  A: "~ x!7", B: "~ x",
})).gain(0.36)

// drums · open hat
const open_hat = s("oh").struct("<~@8 x!24 ~@4 x!16 ~@4 x!29>").gain(0.42)

// drums · congas
const congas = s("conga:33").struct(`<
  ~@8 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@5 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@9 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A
  ~ A ~ A ~ A ~ A ~@2
>`.pickRestart({
  A: "~@9 x ~@6",
})).gain(1.34)

stack(flute, bass, piano, acoustic_guitar_steel, acoustic_guitar_steel_2, kick, snare, hihat, open_hat, congas)