// Butterfly — Mariah Carey
// 58 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 63 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(58/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 · fretless bass · "Bass"
const bass = note("<~@12 A B C A D E F ~@8 G H I J H K L M N O P Q R S T U ~@5 A V C A H K W ~@8>".pickRestart({
  A: "a2@11 ~ g#2@3 ~", B: "f#2@11 ~ f#2@3 ~", C: "c2 g2", D: "f#2@3 e2", E: "c2@8 g2@5 d2@3", F: "~ a2@15",
  G: "a2@3 g#2", H: "f#2@11 ~ e2@4", I: "c2@8 g2@7 ~", J: "a2@11 ~ g#2@4", K: "c2@2 g2 d2", L: "a2@15 ~",
  M: "f#2@6 c#2 ~ c#2@4 g#2@4", N: "f#2@7 ~ f#2@8", O: "g#2@4 c#2@4 g#2@7 ~", P: "f#2@4 ~ f#2 g#2 a2",
  Q: "f2@12 e2 ~ c2@2", R: "a#2@6 a#2 ~ a#2@7 ~", S: "g2@6 g2 ~ g2@8", T: "e2!2", U: "a2@3 ~@5", V: "f#2@11 ~ e2@3 ~",
  W: "a2",
})).s("gm_fretless_bass").gain(0.32)

// chords · piano
const piano = note(`<
  A@2 B@5 C D E F G H I J K L M N O P@2 Q R S T U V W X Y Z AA AB AC AD AE AF AG AH AI AJ AK AL AM AN AO AP AQ AR AS AT
  AU AV AW AX@8
>`.pickRestart({
  A: "[~@10 e5@2 e5@4 e5@3 ~@7 a4@2 ~@3 d5, a3@19 e5@3 d5 c#5 d5 c#5@3 a4 b4 c5@2, e5 e4@15, ~ c#4@31, ~@3 e5@3 d5 c#5 d5 c#5@7 f#3@16]/2",
  B: "[~@2 d5 ~@2 c5@2 b4 ~@3 b4@2 b4@2 ~@17 d4@2 ~@43 a4@2 d4, [c3,e5]@8 ~@2 d4@6 a4 c#4@25 f#3@3 f#4@3 [e4,a4] a2 a3 c#4 e4 e3@3 a3@2 c#4 e4 a4@2 f#4@5 a3@3 d4 f#4 a3@8, ~ g3@7 g3@10 e4 b4@24 a3 d4@20 a4@10 d4 f#4@5, ~@2 c4@6 ~ b3@12 a4@3 e4@8 [d3,f#4,a4]@2 d4 f#4 a4 f#4@3 d3@24 d3@16, ~@3 d5@5 b4@3 ~@4 b4 a3@16 d2@32 d4@2 f#3@14]/5", // C A5 D
  C: "[e4,a4] ~@6 f#4, a2@3 a4, ~ c#4@2 a3@5, ~@3 [e4,g#4]@13, ~@3 a4@7 c#4@6", // A5 E
  D: "[d4,f#4] ~@6 f#4, d3!2, a4@3 a4@5, ~ d4@4 a3@3, ~@3 f#4@9 d4@4", // D
  E: "[c#4,e4]@3 ~@11 e4@2, f#3@7 f#4@5 c#4@4, [f#4,a4]@3 c#4 f#2@4, ~@3 c#4@3 a4@10, ~@2 e4@3 f#3@3", // C#m F#m
  F: "g2 ~@6 d4, b4, g4@3 d4@3 g3@2, d4@2 g3@3 g2@3, g3 g2@3 g4@4",
  G: "c#4@2 c#4@2 ~@2 [f#2,f#3]@2 e4@2 e4@2 [e4,g#4,b4]@2 e3 ~, [f#2,f#3]@6 ~@2 [e2,e3]@7 ~, [e4,f#4,a4] [c#4,e4,f#4,a4] [g#4,b4] ~", // F# E F# E F#m7 G#m
  H: "c#4 ~@4 e4!3, a4@3 ~, [a2,a3]@3 a2@3 [g#2,g#3,g#4,b4]@2, e4!2 c#4 ~, ~@2 c#4@5 a3@5 ~@4", // A G#m
  I: "c#4!2 ~@5 c#4, [f#2,f#3]@3 f#2@2 e4@3, [e4,f#4,a4] [f#4,a4]@3, ~ e4 c#4 f#2, ~@4 c#4@3 f#3@9", // F# F#m7 F#m
  J: "c2 ~@2 e4 d4 ~@2 b4, g4@4 b4@3 ~, e4@5 c4@3 g4@4 g4@4, [c3,c4]@3 c4 c3@4 [g2,g3]@8, ~ c2@3 ~ d4@3", // C G
  K: "c#4 ~@4 e4!3, a4@3 ~, a3 a2@2 [g#2,g#3,g#4,b4], [a2,e4]@3 e4@5 c#4@4 ~@4, ~ c#4@2 a3@3 ~@2", // G#m A5
  L: "c#4 ~@6 a4, [f#4,a4]@12 e4 f#4@3, f#3@3 f#2@5, f#2@2 e4@3 c#4@3, e4 c#4@3 f#3@4", // F#m
  M: "c4@2 ~@2 [e4,g4]@2 c4 ~ d4@4 d4@3 ~, [c2,c3]@7 ~ [g2,g3,g4,b4]@7 ~, [e4,g4] ~@3, ~ c4@2 ~@5", // Em C G Em
  N: "[d4,f#4,a4]@4 [d4,f#4,a4]@2 ~@6 a4@3 ~, [d2,d3]@6 [a2,a3]@9 ~, ~@3 a4@3 ~@2, ~@6 e4@4 e4@5 ~, ~@8 c#4@7 ~", // D A
  O: "d4@2 ~@11 d4@3, a4, d3@6 d2@5 f#4@5, d2@2 f#4@3 d4 d2@2, f#4 d4@3 d3@4",
  P: "[~@8 [d2,d3] ~@6 d4, a4@7 a3@5 g#4@2 d4@8 d4 f#3@2 d4 f#4 a4@5, a3@3 e4@5 [f#4,a4]@4 a3@4, [a2,e4]@3 e4@2 c#4@5 [c#4,a4]@6 ~@3 d3@13, ~ c#4 a2@6 ~ d2@7]/2", // D F#m A5 F#m
  Q: "c#4 ~@6 c#4, a3@6 a2@3 e3 g#3@2 a3@4, [e4,g#4,a4] [e4,g#4]@3, ~@2 g#3@3 a4@11, ~@3 c#4@4 d#3@9", // Amaj7 E
  R: "[d4,f#4,a4] ~@6 d4, d3@4 [d2,a4] d4 a4@2, ~ d4@2 f#4@5, ~@3 a4@2 a3@11, ~@3 f#4 f#3@12", // D D5
  S: "[c#4,e4]@2 ~ e4@3 ~@8 a4@2, f#3@8 f#2@3 c#4 e4@4, [f#4,a4]@3 f#4@5, ~ c#4@2 a4@2 f#3@3, ~@6 [c#4,e4]@3 c#3@7", // C#m F#m C#m
  T: "d4@2 d4@2 ~@9 a4@3, g3@2 g3 g2, g2@6 g2@5 g4@5, [g4,b4] b4@3, ~@2 [d4,g4]@3 d4@3", // G G5
  U: "c#4!2 ~ f#3 e4!2 ~ e3, f#2 e2, f#3@3 ~ e3@3 ~, [e4,f#4,a4] [c#4,e4,f#4,a4] [g#4,b4] [e4,g#4,b4]", // F#m7 G#m E
  V: "c#4!3 ~@2 [a2,e4] e4!2, a3@7 c#4 a3@4 [g#2,g#3,g#4,b4]@4, a2@6 a2@3 c#4@3 ~@4, [e4,a4] a4@2 ~, ~@2 e4@3 ~@3", // A5 G#m A5
  W: "f#2 ~@6 f#4, f#4@13 e4@3, a4@7 e4@5 c#4@4, e4@3 c#4 f#3@4 f#2 a4@7, [f#3,c#4] f#2@2 c#4@2 [f#2,f#3]@3", // F#5 F#
  X: "c2 ~@2 g4 [d4,g4] ~@2 d4, [e4,g4]@5 e4@3 ~@2 d4@3 b4@3, [c3,c4]@3 c3@5 [g2,b4]@4 g2@4, ~@2 c2@6 ~@3 g4@5, ~ c4 g3@2", // G5 Em C G
  Y: "~@11 c#4 ~@2 [g#2,g#3,e4,g#4,b4]@2, a4@5 a3 ~@2, a3@8 c#4 a2@3 ~@4, [a2,e4]@3 e4@3 g#4@6 ~ g4@3, ~@2 c#4@2 a2@2 c#4 e4@5 [d4,a4]@4", // E A5 D5
  Z: "c#4 ~@4 c#4 ~ [g4,a4], f#4, a4@13 e4@3, f#3@3 e4@3 f#3@3 f#2@7, [f#2,e4]@2 c#4@2 f#2@3 c#4 e4@4 [f#3,c#4]@4", // Gsus2 F#7 F#5
  AA: "c4@2 ~@3 c4@3 [g2,g3,d4,g4,b4]@2 d4@2 [d2,d3,d4,f#4,a4]@2 d4 ~, c3 ~, [c2,e4,g4]@3 [e4,g4]@5 ~@8, ~ c4 c2@2 ~@4", // G D C Em
  AB: "~@5 c#4 ~ g#4, a3@3 a2@3 [a2,a3,c#4,a4]@2, a2 a4@2 ~, [e4,a4] e4@3, ~ c#4@3 a3@2 ~@2", // A A5
  AC: "c#4@2 c#4@2 ~@2 c#3@2 c#4@2 c#4@2 [c#4,e4,g#4,b4]@2 g#3 ~, c#2 ~, c#3@6 ~@2 [g#2,g#3]@7 ~, [e4,g#4,b4] [c#4,e4,g#4,b4] [e4,g#4,b4] ~", // C#m7 G# E C#m7 E
  AD: "c#4!2 ~@4 c#4!2, f#3@8 f#3@3 e4@5, f#2@3 f#2@3 [f#2,f#3,g#4]@2, [e4,f#4,a4] [f#4,a4]@3, ~@2 [c#4,e4]@3 c#4 ~@2", // F#sus2 F#m7 F#m C#m
  AE: "c#4!2 ~ g#2 c#4!2 ~ g#3, g#3@4 g#3@3 ~, g#2@3 ~ g#2@4, [e4,g#4,b4] [c#4,e4,g#4,b4] [e4,g#4,b4] [c#4,e4,g#4,b4]", // E C#m7 E C#m7
  AF: "c#4!2 ~ f#2 c#4 ~@2 g#4, f#3@4 ~ c#4@3, f#2@3 ~ [f#2,f#3,f#4]@2 [f#2,f#3,f4,f#4]@2, [e4,f#4,a4] [c#4,e4,f#4,a4] [e4,a4]@2", // F# F#maj7 F#m7 A5
  AG: "c4!2 ~ [f2,f3] c4!2 ~ c3, [f2,f3]@3 ~ c2@4, [f4,a4]@2 [c4,f4,a4]@2 c3@3 ~, ~@2 [e4,g4] [c4,e4,g4]", // F Em C
  AH: "d4@2 d4@2 ~@2 a#2@2 d4@2 d4@2 [d4,f4,a#4]@2 a#3 ~, a#3 ~, a#2@6 ~@2 [a#2,a#3]@7 ~, [f4,a#4] [d4,f4,a#4] [f4,a#4] ~", // A# A#5 A# A#5
  AI: "d4!2 ~ [g2,g3] d4!2 ~ [g2,g3], [g2,g3]@3 ~ [g2,g3]@3 ~, [g4,b4] [d4,g4,b4] [g4,b4] [d4,g4,b4]", // G
  AJ: "[e2,e3,e4,g#4,b4]@4 [e2,e3,e4,g#4,b4]@4 [e3,e4]@4 [e3,e4,a4]@3 ~, ~@8 [e2,g#4,b4]@7 ~", // E A5 E
  AK: "[a2,a3,c#4,e4,a4]@15 ~", AL: "[f#2,f#3,c#4,e4,f#4,a4]@15 ~", AM: "[c2,c3,c4,e4,g4]@3 ~ [g2,g3,d4,g4,b4]@3 ~",
  AN: "[a2,a3,c#4,e4,a4] ~@5 [g#2,g#3,e4,g#4,b4] ~", AO: "[f#2,f#3,c#4,e4,f#4,a4] ~@7",
  AP: "[c2,c3,c4,e4,g4]@6 ~@2 [g2,g3,d4,g4,b4]@2 ~@2 [d2,d3,d4,f#4,a4]@3 ~", // C G D
  AQ: "[c#4,e4]@2 ~@6 [a2,c#4,a4]@2 a3 ~ [g#2,g#3,e4,g#4,b4]@2 e4 ~, a4@7 e4@4 ~@5, [a2,a3] a2 ~@2, ~@2 c#4@3 a3@5 ~@6, ~@3 e4@3 c#4@2 ~@8", // C#m A E A
  AR: "[f#2,c#4] ~@6 [f#3,a4], f#4@7 a4@5 c#4@4, a4@5 e4@5 f#4@6, [f#3,e4]@3 c#4@5 f#3@5 e4@3, ~ f#2 f#3 f#2@5", // F#5 F#m F#7
  AS: "[c4,e4]@2 c4 ~@4 e4 g2@2 ~@4 g2 ~, g4@8 ~@3 [g4,b4]@4 ~, [c2,c3]@4 c2@4 ~@3 d4@2 d4@2 ~, ~@3 [c4,e4]@3 c4@2 [g3,d4,g4,b4]@4 g3@3 ~, ~@5 c3@3 ~@2 g2@4 ~@2", // C G C G
  AT: "~@2 c#4 ~@7 a3 ~ [g#2,g#3,e4,g#4,b4]@2 e4 ~, a3@3 a3@2 ~@3, [a2,e4,a4]@3 [e4,a4]@8 ~@5, ~@3 c#4@4 c#4@2 c#4@2 ~@5, ~@4 a2@4 a2@3 ~@5", // E A5
  AU: "[f#2,c#4] ~@2 f#2 ~ f#4 ~ g4, f#4@5 ~@3, a4@5 e4@7 ~ e4@3, [f#3,e4]@3 c#4@9 ~@4, ~ f#2 f#3@2 [f#2,f#3,a4]@2 [c2,c3,c4]@2", // F#5 F#7 F#m C
  AV: "c2@2 ~@4 g4@2 d4@2 d4@2 [d4,f#4,a4]@2 d3 ~, [e4,g4]@5 e4@3 [f#4,a4]@4 ~@4, [c3,c4]@3 c3@5 ~@8, ~@2 c2@6 [d2,d3]@7 ~, ~ c4 ~@2", // D Em F#m C D
  AW: "d4@2 ~@2 [e4,a4]@2 ~@6 c#4@2 e4 ~, [g2,g3,g4,b4]@3 c#4@3 ~@2, ~@2 d4@4 [e4,a4]@9 ~, ~@4 a3@6 a3@5 ~, ~@4 a2@4 a2@7 ~", // A5 G A5
  AX: "[[c4,e4,g4]@4 c4@2 c4@2 ~ [d4,g4,b4]@4 ~@2 g3@2 ~@2 e5 ~@24 a4@2 ~@3 d5 ~@2 d5 ~@25 e4@2 e4@2 [c4,e4]@3 ~@3 g4@3 ~ d4@4 d4@4 ~ [a2,a3,c#4,e4]@19 ~@8, [c2,c3]@8 ~ g2@8 [a2,a3,c#4,e4,a4]@16 e3@10 c#5@4 b4 c5@2 ~@3 d5@9 b4 a4 b4@2 [a3,a4]@3 e4@2 a4@2 e5@5 d5@4 ~@4 e4@5 ~@37, ~@4 [e4,g4]@4 ~ g3@6 ~@8 d5@2 d5@8 ~@7 d5 c#5 d5@4 a4@4 ~@5 c5@27 g4@6 ~@40, ~@13 [d4,g4,b4]@4 ~@3 e5@7 e5@9 ~ e5@13 e5@7 b4 a3@4 g3@20 ~@3 c4@7 [g3,g4,b4]@9 ~@27, ~@24 c#5@2 c#5@7 ~@3 f#3@14 [c3,f5]@32 c3@9 ~@37]/8", // C G C A C A Em G …
})).s("gm_piano").gain(0.35)

// other · synth strings 1 · "Synth1"
const synth_strings_1 = note("<A@4 ~@59>".pickRestart({
  A: "e5/4",
})).s("gm_synth_strings_1").gain(0.07)

// other · acoustic guitar steel · "Guitar"
const acoustic_guitar_steel = note("<A@2 ~@61>".pickRestart({
  A: "[~@12 g#3 b3 e4@4 ~@14]/2",
})).s("gm_acoustic_guitar_steel").gain(0.17)

// chords · string ensemble 2 · "Strings"
const string_ensemble_2 = note(`<
  ~@9 A B C D@2 E F G H@2 ~@5 A B I J K L M N O P Q N R@2 S T B U ~@6 V W X Y K Z P ~@6 AA@2
>`.pickRestart({
  A: "~ [c#4,e4,f#4,a4]", B: "[d4,g4,b4]", C: "~ f#4 [e4,g#4,b4]@2, [c#4,e4,a4]@7 ~@9",
  D: "[[c#4,e4,a4]@11 ~ e4@4 [c#4,e4,f#4,a4]@16, ~@3 [g#4,b4]@5]/2", E: "[c4,e4,g4]@8 [d4,g4,b4]@7 ~",
  F: "[c#4,e4,a4]@15 ~", G: "[c#4,a4]@4 [c#4,f#4,a4]@11 ~, e4@15 ~",
  H: "[[c4,e4,g4]@2 [d4,g4,b4] a4 [c#4,e4,a4]@4, ~@12 [d4,f#4]@19 ~]/2", I: "[c#4,e4,f#4,a4] [e4,g#4,b4]",
  J: "[c#4,e4]@11 ~ [e4,g#4,b4]@4, a4", K: "[c#4,e4,f#4,a4]@15 ~", L: "[c4,e4,g4]@7 ~ [d4,g4,b4]@8",
  M: "[c#4,e4,a4]@11 ~ [e4,g#4,b4]@4", N: "[c#4,e4,f#4,a4]", O: "g4@2 [d4,g4,b4]!2, [c4,e4]@3 ~", P: "[c#4,e4,a4]",
  Q: "[c#4,e4,g#4,b4]", R: "[~ [c#4,e4,f#4,a4], b4, [c#4,e4,f#4] ~, ~ g#4@7]/2", S: "[f4,a4] [e4,g4], c4",
  T: "[c4,e4,g4] [d4,f4,a#4]@3", U: "[e4,g#4,b4]", V: "[c#4,e4]@3 [e4,g#4,b4], a4", W: "[c#4,e4,f#4,a4]@3 [c4,e4,g4]",
  X: "[c4,e4,g4]@7 ~ [d4,g4,b4]@7 ~", Y: "[c#4,e4,a4]@3 [e4,g#4,b4]", Z: "[c4,e4]@2 [d4,b4] [d4,f#4,a4], g4@15 ~",
  AA: "[~@5 [c#4,e4,a4]@19 ~@8]/2", // A
})).s("gm_string_ensemble_2").gain(0.11)

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

// drums · rim
const rim = s("rim").struct("<~@4 A@7 B A@6 ~ A@7 ~ C@6 D ~@8 D ~@20>".pickRestart({
  A: "~@3 x", B: "~@5 x ~@2", C: "~ x ~ x", D: "~ x ~@2",
})).gain(0.54)

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

// drums · low tom
const low_tom = s("lt").struct("<~@11 A ~@14 B ~@3 C ~@2 B ~ D ~ E ~ C@2 F ~@7 C E C ~ G ~@2 C ~@6>".pickRestart({
  A: "~@12 x ~ x!2", B: "~@11 x!4 ~", C: "~@14 x!2", D: "~@15 x", E: "~@11 x!2 ~@3", F: "~@11 x ~ x!2 ~",
  G: "~@8 x!3 ~@3 x ~",
})).gain(0.48)

// drums · mid tom
const mid_tom = s("mt").struct("<~@11 A ~@14 B ~@3 A ~@2 B ~ C ~ B ~ A C D ~@5 E ~ A ~ A ~ F ~@2 A ~@6>".pickRestart({
  A: "~@13 x ~@2", B: "~@5 x ~@2", C: "~@7 x", D: "~@3 x", E: "~@13 x!3", F: "~ x",
})).gain(0.48)

// drums · open hat
const open_hat = s("oh").struct("<~@37 [~@7 x] ~@25>").gain(0.54)

// drums · crash
const crash = s("cr").struct("<~@40 A ~ A ~@5 B ~@2 A ~ C D ~@8>".pickRestart({
  A: "x", B: "x!2 ~@6", C: "~@3 x", D: "~@7 x",
})).gain(0.54)

// drums · ride
const ride = s("rd").struct("<~@27 A@6 B A@7 C ~@6 D E@4 F G ~@8>".pickRestart({
  A: "x!16", B: "x!13 ~ x!2", C: "x ~@3 x!12", D: "~@2 x!14", E: "x ~ x!14", F: "x ~ x!7 ~ x!6", G: "x ~ x!5 ~ x ~@7",
})).gain(0.42)

// drums · shaker
const shaker = s("sh").struct("<~@4 A@23 B ~@4 C D E@4 F E G ~@5 H ~ I A@6 B ~@7>".pickRestart({
  A: "x!16", B: "x", C: "~@9 x!3 ~@4", D: "~@5 x ~@2", E: "~@2 x!2 ~@6 x!2 ~@4", F: "~@3 x!2 ~@6 x!2 ~@3",
  G: "~@7 x!2 ~@7", H: "~@6 x!2 ~@8", I: "x!5 ~ x!3 ~ x!6",
})).gain(0.24)

stack(
  bass, piano, synth_strings_1, acoustic_guitar_steel, string_ensemble_2, kick, rim, snare, low_tom, mid_tom, open_hat,
  crash, ride, shaker
)