// Its Not Right But Its OK — Whitney Houston
// 134 bpm, 4/4, key C minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 116 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(134/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · string ensemble 1 · "Staff-2"
const string_ensemble_1 = note(`<
  ~@19 A B C D E@2 F D G B C D E@2 F D H ~@23 I J@2 K@2 L@2 M N O ~@14 A B C D E@2 F D G B C D E@2 F D G B C D E@2 F D G
  B C D E@2 F D H
>`.pickRestart({
  A: "~@10 eb5@2 eb5@3 ~", B: "eb5@7 ~ f5@2 eb5@2 eb5@3 ~", C: "eb5@7 ~ g5@3 ~ g5@2 g5@2",
  D: "f5@3 ~ eb5@3 ~ eb5@3 ~ eb5@3 ~", E: "eb5@7 ~ f5@3 ~ eb5@3 ~", F: "eb5@7 ~ g5@2 g5@2 g5@2 g5@2",
  G: "eb5@7 ~@3 eb5@2 eb5@3 ~", H: "eb5@7 ~@9", I: "~@3 eb5 g5 bb5!2 c6",
  J: "[d6@2 c6@2 bb5@2 g5@2 f5@2 eb5@2 eb5@7 ~@3 g5@2 g5@2 ab5@2 bb5@2 c6@2]/2",
  K: "[d6@2 c6@2 bb5@17 ~ eb5@2 g5@2 bb5@2 bb5@2 c6@2]/2",
  L: "[d6@2 c6@2 bb5@2 g5@2 f5@2 eb5@2 eb5@7 ~@9 [g5,c6]@3 ~]/2", M: "[g5,c6]@3 ~ [g5,c6]@3 ~ [eb5,g5]@3 ~ [g5,c6]@3 ~",
  N: "[bb5,d6]@3 ~ [bb5,d6]@3 ~ [g5,bb5]@3 ~ [g5,bb5]@3 ~", O: "[f5,ab5]@3 ~@13",
})).s("gm_string_ensemble_1").gain(0.34)

// other · koto · "Staff-3"
const koto = note(`<
  ~@20 A@2 B@2 A@2 B@2 A@2 B@2 A@2 B@2 ~@32 A@2 B@2 A@2 B@2 A@2 B@2 A@2 B@2 A@2 B@2 A@2 B@2 ~ A B@2 A@2 B@2 A@2 B@2 A@2
  B@2 A@2 B@2 A@2 B@2
>`.pickRestart({
  A: "~@2 f3 eb3 f3 f4 g4 ab4 ~@8", B: "~@2 g2 f2 g2 c4 d4 eb4 ~@8",
})).s("gm_koto").gain(0.72)

// bass · electric bass finger · "Staff-4"
const bass = note(`<
  ~@20 A B C D A B C D A B C D A B C D E B C D A B C D F B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A
  B C D A B C D A B C D A B C D G B C D A B C D A B C D A B C D A B C D A B C D
>`.pickRestart({
  A: "f2@3 ~ g2@3 ~ ab2@3 ~ c2@3 ~", B: "f2@3 ~@3 bb1@2 b1@3 ~ c2@2 b1@2", C: "c2@3 ~ c2@3 ~ eb2@3 ~ g2@3 ~",
  D: "c2@3 ~ c2@3 ~ eb2@3 ~ g2@2 gb2@2", E: "~@12 c2@3 ~", F: "~@4 g2@3 ~ ab2@3 ~ c2@3 ~", G: "~@8 ab2@3 ~ c2@3 ~",
})).s("gm_electric_bass_finger").gain(0.72)

// chords · string ensemble 2 · "Staff-6"
const string_ensemble_2 = note("<~@52 A@2 B@2 A@2 B@2 A@2 B@2 A@2 B@2 ~@48>".pickRestart({
  A: "[[f4,ab4,c5]@31 ~]/2", B: "[[eb4,g4,c5]@31 ~]/2",
})).s("gm_string_ensemble_2").gain(0.72)

// chords · piano · "Staff-7"
const piano = note(`<
  ~@70 A B C ~ A B C ~ A B C ~ A B C ~@7 D E@2 F D E@2 F D E@2 F D E@2 F D E@2 F D E@2 F
>`.pickRestart({
  A: "~@14 bb4 c5", B: "eb5 ~ bb4 c5 eb5 ~ bb4 c5 eb5 ~ bb4 c5 eb5 ~ bb4 c5", C: "eb5 ~@7",
  D: "[f4,ab4,c5]@2 ~ [g4,bb4,d5]@2 ~ [ab4,c5,eb5]@5 ~ [f4,ab4,c5]@2 ~ [f4,ab4,c5]", // Fm Gm Ab Fm
  E: "~@12 [eb4,g4,c5]@2 ~ [eb4,g4,c5]", F: "~@12 [eb4,g4,c5]@3 ~",
})).s("gm_piano").gain(0.35)

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

// drums · snare
const snare = s("sd").struct(`<
  ~@20 A@3 B A@3 B ~@8 C A@2 B ~@12 A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@4 B A@3 B A@3 B A@3 B
  A@3 B A@3
>`.pickRestart({
  A: "~@2 x!2", B: "~ x!2 ~ x ~ x ~", C: "~@3 x",
})).gain(0.72)

// drums · clap
const clap = s("cp").struct(`<
  ~@20 A@3 B A@3 B A@3 B A@3 B ~ A@2 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B ~
  A@3 B A@3 B A@3 B A@3 B A@3 B A@3
>`.pickRestart({
  A: "~ x!3", B: "~ x!2 ~ x ~ x ~",
})).gain(0.72)

stack(string_ensemble_1, koto, bass, string_ensemble_2, piano, kick, snare, clap)