// Music Box — Mariah Carey
// 64 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 8 "strings low 2" string ensemble 1 (copy of ch 7 "strings low" string ensemble 1)
// note: Full arrangement: all 84 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(64/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.

// other · music box
const music_box = note("<A B C@2 ~@80>".pickRestart({
  A: "~@2 b4 ~ g#5 ~ b4 ~@3 b4 ~ b5 ~ b4 ~", B: "~@2 b4 ~ g#5 ~ b4 ~@3 a5 ~ g#5 ~ e5 ~",
  C: "[c#5@3 ~ c#5 ~ b4@4 ~@2 b4 ~ c#5@4 ~@2 e5@3 ~@2 f#5@5 ~@2]/2",
})).s("gm_music_box").gain(0.5).pan(0.3)

// chords · music box
const music_box_2 = note(`<
  ~@4 A@2 B@2 C D E@2 F@2 G@7 H@4 I@8 D E@2 F@2 J@2 K L@4 M N O@2 P Q R C D E@2 F@2 J@2 K L@4 M N O@2 P Q S@3 T U T V W
  X Y Z AA@2
>`.pickRestart({
  A: "[[g#3,b3,e4] ~ b3 ~ g#4 ~ f#4@2 [b3,d#4] ~ b3 ~ f#4 ~@5 b3 ~ e4 ~ b3 ~ e4 ~ a4 ~ g#4 ~ e4 ~, ~@7 e4@2 ~@7, ~@16 g#3@5 ~@3 b3@5 ~@3]/2", // E B
  B: "[[e3,a3,c#4] ~ e3 ~ c#4 ~ b3@2 [e3,g#3] ~ e3 ~ b3 ~@5 e4 ~ b3 ~ f#4@3 ~ a4 ~ g#4 ~ e4 ~, ~@7 c#4@2 ~@7, ~@16 a3@5 ~@11]/2", // A E
  C: "[g#3,c#4] ~ b3 ~ g#4 ~ f#4@2 [b3,d#4] ~ g#3 ~ f#4 ~ b3 ~", D: "e4 ~ b3 ~ e4 ~ b3@3 ~ a4 ~ g#4 ~ e4 ~, g#3@5 ~@11",
  E: "[[e3,a3,c#4] ~ e3 ~ c#4 ~ b3@2 [e3,g#3] ~ e3 ~ b3 ~@5 e4@3 ~ [a3,e4,f#4]@3 ~ a4 ~ g#4 ~ e4 ~, ~@7 c#4@2 ~@7, ~@4 [e3,a3] ~@3]/2", // A E F#m7 A5
  F: "[[g#3,c#4] ~ b3 ~ g#4 ~ f#4@2 [b3,d#4] ~ g#3 ~ b4 ~@5 b3 ~ e4 ~ b3@2 g#3 ~ a4 ~ g#4 ~ e4 ~, ~@7 e4@2 ~@7, ~@16 g#3@5 ~@11]/2", // C#5 B
  G: "[[e3,a3,c#4] ~ e3 ~ c#4 ~ b3@2 [e3,g#3] ~ e3 ~ b3 ~@5 e4@3 ~ f#4@2 [g#3,d#4] ~ g#3 ~ d#4 ~@5 e4@3 ~ e4 d#4 c#4@3 ~ e4 ~ g#4 f#4 e4@3 ~ f#4 ~ f#4 ~@5 e4 f#4 ~@2 [b3,e4]@2 g#4 ~ e4 ~ [g#3,b3]@2 b3 g#3 ~@2 e4 f#4 ~@4 g#4@3 ~ f#4 ~ [a3,c4,e4]@3 ~ g#4 a4 ~@2 [e3,g#3]@3 ~ c#5 ~ e4 ~ [b2,d#3]@3 ~@3 g#4 b4, ~@14 c#4@4 ~@14 g#3@11 ~@5 [g#3,c4]@11 ~@21 [c4,e4]@8 ~@24, ~@16 [e3,f#3]@5 ~@9 f#3@74 f#3@8, ~@32 c#4@8 ~@22 g#4@4 ~@4 e4 ~@7 a4@4 ~@12 c#5@4 ~@14]/7", // A E G#5 E5 G#m Am E B …
  H: "[c#5 ~ b4 b4@2 ~ a4 g#4 ~ g#4 ~ f#4 ~ g#4 b4 ~ [c#3,e3,a4]@5 ~ b4 ~ [c#3,e3,a3]@5 ~@3 a4 ~ a4 b4 ~ b4 ~ g4 [a2,c3,e3,e4]@3 ~ g#4 a4 ~@2 [e3,g#3]@3 ~ [g#3,g#4] ~ [e3,e4] ~ [b2,d#3]@5 ~@3, f#3@7 f#3, d3@5 ~@3 [d3,f3]@5 ~@19 [c3,e3]@5 ~@9 b4@4 ~@14]/4", // A Am E G# E B Dm C
  I: "[c#5 ~ b4!2 ~ a4 ~@4 f#4!2 ~ g#4 b4 ~ [c#3,e3,a4]@5 ~@3 [c#3,e3,a3]@5 ~@3 a4 ~ g4 g4@2 ~ f#4 ~@3 b3 b3@2 ~ b3 g#4@2 ~ e3 ~ g#4 ~ f#4@2 [b3,d#4] ~ b3 ~ f#4 ~@5 b3 ~ e4 ~ b3 ~ e4 ~ a4 ~ g#4 ~ e4 ~ [e3,a3,c#4] ~ e3 ~ c#4 ~ b3@2 [e3,g#3] ~ e3 ~ b3 ~@3 [e3,a3]@4 e4@3 ~ f#4 ~ a3 ~ g#3 ~ e3 ~ [g#3,c#4] ~ b3 ~ g#4 ~ f#4@2 [b3,d#4] ~ g#3 ~ f#4 ~ b3 ~, f#3, d3@5 ~@2 g#4@2 ~@30 f#4@2 ~@9 e4@4 ~@8 e4@4 ~@62, ~@8 [d3,f3]@5 ~@19 [b2,e3]@5 ~@3 a2@5 ~@19 g#3@5 ~@5 b3@4 ~@16 c#4@4 ~@30]/8", // A B A E A5 C#5 B Dm …
  J: "[[e3,a3,c#4] ~ e3 ~ c#4 ~ b3@2 [e3,g#3] ~ e3 ~ b3 ~@5 e4@3 ~ f#4@2 [g#3,d#4] ~ g#3 ~ d#4 ~ f#3@2, ~@7 c#4@2 ~@7, ~@16 [e3,f#3]@5 ~@11]/2", // A E G#5 Esus2
  K: "~@2 e4@3 ~ e4 d#4 c#4@3 ~ e4 ~ g#4 f#4, g#3@11 ~@5, c#4 ~",
  L: "[e4@3 ~ f#4 ~ f#4 ~@5 e4 f#4 ~@2 [b3,e4]@2 g#4 ~ e4 ~ [g#3,b3]@2 b3 g#3 ~@2 e4 f#4 ~@4 g#4@3 ~ f#4 ~ [a3,c4,e4]@3 ~ g#4 a4 ~@2 [e3,g#3]@3 ~ c#5 ~ e4 ~ [b2,d#3,f#3]@3 ~@3 g#4 b4, [g#3,c4]@11 ~@3 g#4@4 ~@4 e4 ~@7 a4@4 ~@12 c#5@4 ~@14, ~@4 [c4,e4] ~@3]/4", // E5 G#m Am E B G# C
  M: "c#5 ~ b4 b4@2 ~ a4 g#4 ~ g#4 ~ f#4 ~ g#4 b4 ~, [d3,f#3]@5 ~@3 [d3,f3]@5 ~@3", // D Dm
  N: "[c#3,e3,a4]@5 ~ b4 ~ [c#3,e3,a3]@5 ~@3", // A
  O: "[a4 ~ a4 b4 ~ b4 ~ g4 [a2,c3,e3,e4]@3 ~ g#4 a4 ~@2 [e3,g#3]@3 ~ [g#3,g#4] ~ [e3,e4] ~ [b2,d#3,f#3]@5 ~@3, [c3,e3]@5 ~@9 b4@4 ~@14]/2", // Am E G# E B C
  P: "c#5 ~ b4!2 ~ a4 ~@4 f#4!2 ~ g#4 b4 ~, [d3,f#3]@5 ~@2 g#4@2 ~@7, ~@8 [d3,f3]@5 ~@3", // D Dm
  Q: "[c#3,e3,a4]@5 ~@3 [c#3,e3,a3]@5 ~@3", // A
  R: "a4 ~ g4 g4@2 ~ f#4 ~@3 b3 b3@2 ~ b3 [e3,e4], [b2,e3]@5 ~@2 f#4@2 ~@7, ~@8 a2@5 ~@3", // E E5
  S: "[a4 ~ g4 g4@2 ~ f#4 ~@3 b3 b3@2 ~ b3 ~ g#3 ~@3 g#4 ~ f#4@2 [b3,d#4] ~ b3 ~ [e3,f#4] f#3 ~@4 b3 ~ a3 ~ a3@2 ~@2 g3 ~ f#3 ~ g#3 ~, [b2,e3]@5 ~@2 f#4@2 ~@6 g#4@2 ~ [e3,e4]@4 ~@8 [g3,e4]@4 ~@14, ~@8 a2@5 ~@3 [g#2,b2]@8 ~@8 [c3,e3]@5 ~@3 [a2,d3]@5 ~@3]/3", // B Esus2 E5 E C G#m C D5
  T: "[g#2,b2,e3]@11 ~@5", U: "e3@2 ~ e3 ~ d3 f#3 e3 [f#2,a2,d3,d#3]@3 ~ b3 ~ a3 g3, [g2,b2]@5 ~@11",
  V: "a3@2 g3 g3@2 ~@2 f#3 f#3@2 ~ b2!2 a2 b2@2", W: "~ b2 g#3 ~ [g#2,b2,e3]@3 ~ g#4 ~ f#4@2 [b3,d#4] ~ b3 ~",
  X: "f#4 ~ e4@4 b3 ~ e4@3 ~ b3 ~ a4 ~", Y: "g#4 ~ e4 ~ [e3,a3,c#4] ~ e3 ~ c#4 ~ b3@2 [e3,g#3] ~ e3 ~",
  Z: "b3@3 ~ [a#3,e4]@5 ~@4 f#4@3, ~@12 [a3,e4]@3 ~", AA: "[e4@3 ~@4 b3@14 ~@11, ~@5 b2@14 ~@13, ~@3 [e3,g#3]@7 ~@6]/2",
})).s("gm_music_box").gain(0.5)

// chords · music box
const music_box_3 = note("<A B C D ~@75 E@2 ~@3>".pickRestart({
  A: "e4@5 ~@3 d#4@5 ~@3", B: "c#4@5 ~@3 b3@5 ~@3", C: "~ e4@2 ~@2 e4@2 ~, a3@5 ~@3 g#3@5 ~@3",
  D: "~@2 e4@4 ~@2 [c4,e4,a4]@5 ~@3, f#3@5 ~@11", E: "[~ g#3@2 b3@2 ~@3]/2",
})).s("gm_music_box").gain(0.5)

// bass · fretless bass · "bass"
const bass = note(`<
  ~@4 A B C D E F G H E F G I J K L M E N J O E N J P A Q R S E F G H E F G I J K L M E N J O E N J P E F G H E F G I J
  K L M E N J O E N J P T U V P V W X Y Z AA@3
>`.pickRestart({
  A: "e3@5 ~@3 d#3@5 ~@3", B: "c#3@5 ~@3 b2@5 ~@3", C: "a2@4 e3@3 ~ g#2@4 e3@3 ~", D: "[f#2,e3]@5 ~@3 [b2,a3]@5 ~@3",
  E: "e3@4 ~@2 e3 ~ d#3@5 ~@3", F: "c#3@4 ~@2 c#3 ~ b2@4 ~@2 b2 ~", G: "a2@4 ~@2 a2 ~ g#2@5 ~@3",
  H: "f#2@4 ~@2 f#2 ~ b2@5 ~@3", I: "a#2@4 ~@2 a#2 ~ c3@5 ~@3", J: "c#3@4 ~@2 c#3 ~ c#3@5 ~@3",
  K: "c3@4 ~@2 c3 ~ c3@4 ~@2 c3 ~", L: "b2@4 ~@2 b2 ~ b2@5 ~@3", M: "b2@4 ~@2 b2 ~ b2@4 ~@2 b2 ~",
  N: "d3@4 ~@2 d3 ~ d3@4 ~@2 d3 ~", O: "b2@11 ~@5", P: "c3@5 ~@3 b2@5 ~@3", Q: "c#3@5 ~@5 b2@4 ~@2",
  R: "a2@5 ~@3 g#2@5 ~@3", S: "f#2@5 ~@3 b2@3 ~ c#3 ~ g#2 f#2", T: "e3@5 ~@3 d#3@5 ~ e3 d3, ~@6 e3@5 ~@5",
  U: "c3@4 ~@2 c3 ~ b2@5 ~@3", V: "e2@4 ~@2 e2 ~ e2@5 ~@3", W: "c3@6 ~@3 b2@7", X: "~@4 e3@5 ~@3 d#3@4",
  Y: "~@4 c#3@5 ~@3 b2@4", Z: "~@4 a2@5 ~@3 g#2@4", AA: "[~@4 f#2@5 ~@3 b1@6 ~@3 e2@14 ~@13]/3",
})).s("gm_fretless_bass").gain(0.53)

// chords · synth strings 1 · "sinth"
const synth_strings_1 = note(`<
  ~@4 A B C D A B C D A B C E F G H I J K L I J K L M A B C D A B C D A B C E F G H I J K L I J K L M A B C D A B C E F
  G H I J K L I J K L M N O H O H P@7
>`.pickRestart({
  A: "[g#4,b4,e5] [f#4,b4,d#5]", B: "[g#4,c#5,e5] [g#4,b4,e5]", C: "[a4,c#5,e5] [g#4,b4,e5]",
  D: "[a4,c#5,f#5] [f#4,b4,d#5]", E: "[a#4,c#5,f#5] [g#4,c5,d#5]", F: "[g#4,c#5,e5]", G: "[g#4,c5,e5]",
  H: "[g#4,b4,e5]", I: "[a4,c5,e5]", J: "[g#4,b4,e5] [b4,d#5,f#5]", K: "[a4,d5,f#5] [a4,d5,f5]", L: "[a4,c#5,e5]",
  M: "[a4,b4,e5] [b4,d5,f#5]", N: "b4 [f#4,b4,d#5], [g#4,e5]", O: "[g#4,c5,e5] [b4,d5,f#5]",
  P: "[[a4,b4,e5]@9 [b4,d5,f#5]@10 ~ [g#4,b4,e5]@8 [b4,d#5,f#5]@8 [g#4,c#5,e5]@8 [g#4,b4,e5]@8 [a4,c#5,e5]@8 [g#4,b4,e5]@8 [a#4,c#5,e5]@8 [a4,e5,f#5]@9 [g#4,b4,e5]@22 ~@5]/7", // Asus2 Bm E B C#m E A E …
})).s("gm_synth_strings_1").gain(0.3)

// chords · string ensemble 2 · "strings"
const string_ensemble_2 = note(`<
  ~@16 A B C D E F G D E F G H I J K L ~@8 A B C D E F G D E F G H ~@8 A B C D E F G D E F G H M N C N C O@7
>`.pickRestart({
  A: "[g#4,c#5,e5]", B: "[g#4,c5,e5]", C: "[g#4,b4,e5]", D: "[a4,c5,e5]", E: "[g#4,b4,e5] [b4,d#5,f#5]",
  F: "[a4,d5,f#5] [a4,d5,f5]", G: "[a4,c#5,e5]", H: "[a4,b4,e5] [b4,d5,f#5]", I: "[g#4,b4,e5] [f#4,b4,d#5]",
  J: "[g#4,c#5,e5] [g#4,b4,e5]", K: "[a4,c#5,e5] [g#4,b4,e5]", L: "[a4,c#5,f#5] [f#4,b4,d#5]",
  M: "b4 [f#4,b4,d#5], [g#4,e5]", N: "[g#4,c5,e5] [b4,d5,f#5]",
  O: "[[a4,b4,e5]@9 [b4,d5,f#5]@10 ~ [g#4,b4,e5]@8 [b4,d#5,f#5]@8 [g#4,c#5,e5]@8 [g#4,b4,e5]@8 [a4,c#5,e5]@8 [g#4,b4,e5]@8 [a#4,c#5,e5]@8 [a4,e5,f#5]@9 [g#4,b4,e5]@22 ~@5]/7", // Asus2 Bm E B C#m E A E …
})).s("gm_string_ensemble_2").gain(0.32)

// chords · string ensemble 1 · "strings low"
const string_ensemble_1 = note("<~@44 A B C D E B C F ~@20 G H G H G I@7>".pickRestart({
  A: "[g#4,b4,e5] [b4,d#5,f#5]", B: "[a3,d4,f#4] [a3,d4,f4]", C: "[a3,c#4,e4]", D: "[a3,c4,e4]",
  E: "[g#3,b3,e4] [b3,d#4,f#4]", F: "[a3,b3,e4] [b3,d4,f#4]", G: "[g#3,b3,e4]", H: "[g#3,c4,e4] [b3,d4,f#4]",
  I: "[[a3,b3,e4]@9 [b3,d4,f#4]@10 ~ [g#3,b3,e4]@8 [b3,d#4,f#4]@8 [g#3,c#4,e4]@8 [g#3,b3,e4]@8 [a4,c#5,e5]@8 [g#4,b4,e5]@8 [a#4,c#5,e5]@8 [a4,e5,f#5]@9 [g#4,b4,e5]@22 ~@5]/7", // Asus2 Bm E B C#m E A E …
})).s("gm_string_ensemble_1").gain(0.4).pan(0.2)

// drums · kick
const kick = s("bd").struct("<~@32 [x ~@2 x!2 ~@3]!45 [x ~@6 x ~ x ~@6] [~@2 x ~@2 x!2 ~]!4 ~@2>").gain(0.6)

// drums · congas
const congas = s("conga:13").struct("<~@31 [~ x]!9 [~ x ~@2 x ~@3]!37 [~@2 x ~@6 x ~@6] [~@3 x ~@2 x ~]!4 ~@2>")
  .gain(1.92)

// drums · congas
const congas_2 = s("conga:33").struct("<~@31 [~@3 x]!9 [x!2 ~ x]!37 [x ~@4 x ~@8 x ~] [~ x!2 ~] [x!3 ~]!3 x ~>")
  .gain(1.92)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@31 [~@8 x!3 ~@5]!46 [~@9 x ~ x!2 ~@3] [~@12 x!3 ~]!4 ~@2>").gain(3.04)

// drums · cabasa · soft notes
const cabasa_soft = s("cabasa:4").struct("<~@31 [~@11 x ~@4]!46 [~@13 x ~@2] [~@15 x]!4 ~@2>").gain(1.52)

stack(
  music_box, music_box_2, music_box_3, bass, synth_strings_1, string_ensemble_2, string_ensemble_1, kick, congas,
  congas_2, cabasa, cabasa_soft
)