// Laughter in the Rain — Neil Sedaka
// 100 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 87 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(100/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 · piano
const piano = note(`<
  A B A C D@2 E@2 F@4 G@3 H@4 I@2 J@2 K D@2 E@2 F@4 G@3 H@4 I@2 J@2 L D@2 E@2 F@4 G@3 H@4 I@2 J@2 H@4 I@2 J@2 M@4 I@2
  J@2 H@4 I@2 N@2
>`.pickRestart({
  A: "a3@4 c4 d4 f4@2 [c4,f4]@2 d4@2 f4@2 c5@2, [f2,c3]", // F5
  B: "[bb2,f3,d4,f4,a4]@2 [bb2,f3,d4,f4,a4]@4 [bb2,f3]@6 c3 d3 f3@2, ~@3 [d4,f4,a4]@5", // Bbmaj7 Bb5 Dm
  C: "[bb2,f3,d4,f4,a4] [bb2,f3,d4,f4,a4]@2 [bb2,f3]@3 c3@2, ~@3 [d4,f4,a4]@5", // Bbmaj7 Bb5 Dm
  D: "[[f4,a4,c5] d5 f5 [c3,f4,a4,d5]@2 c5 a4 c3 ~ g4 c5 [c3,a4]@2 f3@2 c3, f2@3 ~@2 f3@2 [bb3,d4,a4]@2 ~@4 g4@3, ~@8 f2@3 ~@5]/2", // F Dm7 F Bbmaj7
  E: "[[c4,e4,a4] g4 c5 [g2,c4,e4,a4]@2 g4 c4 g2 ~ a4 ~ c3@2 f3@2 [c3,c5], c2@3 ~@2 c3@2 [a3,d4]@2 ~ [c4,f4,a4]@5 ~, ~@8 f2@3 ~@5]/2", // Am Am7 C D5 F
  F: "[[f4,a4,c5] d5 f5 [c3,f4,a4,d5]@2 c5 a4 c3 ~ g4 c5 c3@2 f3@2 c3 ~ g4 c5 [g2,c4,e4,a4]@2 g4 c4 g2 ~ f4 ~ f2@3 f2 e2, f2@3 ~@2 f3@2 [bb3,d4,a4]@2 ~@2 [bb3,d4]@4 [c4,e4,a4]@2 ~@4 d3@2 [a3,d4]@2 ~ [a3,c4,f4]@6, ~@8 f2@3 a4@3 ~@2 c2@3 ~@5 f2@3 ~@5]/4", // F Dm7 Am7 Bbmaj7 Bb Am D5 F
  G: "[~ [a3,c4,f4]!2 [d2,a3,c4,f4] [a3,c4,f4] f4!2 d2 g2@3 g2 ~@2 d5 g2 ~@3 c2 [c2,e4,bb4]@4, d2@3 ~ d2@3 f5@7 ~ [f4,bb4]@5 ~@4, ~@7 [g4,c5]@5 [g2,g4,b4]@3 d5@2 c5@7, ~@16 c2@3 ~@5]/3", // F Dm7 F C7 Bb5 C5 G
  H: "[[bb1,bb4,db5,f5]@3 eb2@2 [eb2,g5] [c2,g5] bb1 ~ eb5!2 f2@2 c2 f2 c2 ~ ab4!4 [eb2,f4] [c2,f4] bb1 ~ eb4 ab2 g2 f2@2 ab1 a1, ab5@5 ~@2 g5@2 ~@6 c5@2 ~@6 f4@2 ~ eb4@6, ~@3 [bb4,db5,f5]@4 [g4,c5]@4 [f4,ab4,c5,eb5]@4 [db4,f4]@4 [bb3,db4]@4 [g3,c4]@5 [ab3,c4]@4, ~@8 ab1@3 ~@5 bb1@3 eb2@2 ~@3 ab1@2 ~@6]/4", // Bbm Eb C5 Ebsus2 F5 Bbm C5 Fm7 …
  I: "[[bb1,bb4,db5,f5]@3 eb2@2 [eb2,g5] [c2,g5] bb1 ~ eb5!4 [c2,c5] [f2,c5] [eb2,c5], ab5@5 ~@2 g5@2 ~@7, ~@3 [bb4,db5,f5]@3 ~ [g4,c5]@4 [f4,ab4]@5, ~@8 ab1@3 f2@2 ~@3]/2", // Bbm Eb C5 C F5 Cm Bbm C5 …
  J: "[ab4 ~@2 db2 ab4 bb4 ab4 db2 c2@3 c2 c2@3 c2, [c4,f4]@4 ~@3 [f4,bb4]@5 [f4,bb4]@4, db2@3 ~ [db2,c4,f4]@3 ~@9, ~ ab4@3 ~@3 c5@9]/2", // F5 Bb5 Dbmaj7
  K: "[e4,bb4,c5]@2 c5 g5 c6 g4 ~ c2, c2@7 ~, ~@3 c5", L: "[e4,bb4,c5]@2 c4 g4 [g4,c5] g4 ~ c2, c2@7 ~, ~@3 [c4,g4]",
  M: "[[bb1,bb4,db5,f5]@3 eb2@2 [eb2,g5] [c2,g5] bb1 ~ eb5!2 f2@2 c2 f2 c2 ~ ab4!4 [eb2,f4] [c2,f4] bb1 ~ ab4 [ab2,bb4] [g2,c5] db5 eb5 [ab1,eb5] [a1,g5], ab5@5 ~@2 g5@2 ~@6 c5@2 ~@6 f4@2 ~ eb4@6, ~@3 [bb4,db5,f5]@4 [g4,c5]@4 [f4,ab4,c5,eb5]@4 [db4,f4]@4 [bb3,db4]@4 [g3,c4]@5 [ab3,c4]@4, ~@8 ab1@3 ~@5 bb1@3 eb2@2 ~@3 ab1@2 ~@2 f2@2 ~@2]/4", // Bbm Eb C5 Ebsus2 F5 Absus2 C5 Ab5 …
  N: "[ab4 ~@2 db2 ab4 bb4 ab4 db2 c2@3 c2 [f4,bb4]@4, [c4,f4]@4 ~@3 [f4,bb4]@5 ~@4, db2@3 ~ [db2,c4,f4]@3 ~@5 c2@3 ~, ~ ab4@3 ~@3 c5@9]/2", // Bb5 F5 Bb5 Dbmaj7
})).s("gm_piano").gain(0.48)

// bass · fretless bass
const bass = note(`<
  A B A B C D E C@2 D E C F G E H I J I J I K E L C D E C@2 D E M F G E H I J I J I K E N A@2 O A@3 O A F G E H I J I J
  I K E H I J I J I K E H I J I J I K E H I J I J I K E
>`.pickRestart({
  A: "f2@3 f2 f2@3 ~", B: "bb2@3 bb2 g2@3 ~", C: "f2@3 f2!2 f2@2 c3", D: "f2@3 f2!2 f2@2 d3", E: "c2@3 c2!2 c2@2 g2",
  F: "d2@3 d2!2 d2@2 a2", G: "g2@3 g2!2 g2@2 d3", H: "bb1@6 bb1@2 eb2@2 f3 ab3 f3@2 f2@2", I: "ab2@3 ab2 f2 f2@2 c3",
  J: "bb1@3 bb1 eb2 eb2@2 f3", K: "db2@3 db2!2 db2@2 ab2", L: "c2@6 c2@2 c2@2 g2 a2 g2@2 g1@2",
  M: "f2@5 ~ f2@2 f2@6 c3@2", N: "c2@5 ~ c2@2 c2@6 g2@2", O: "c2@3 c2 c2@3 ~",
})).s("gm_fretless_bass").gain(0.32)

// chords · pad poly · F Gm7 F Gm7 G5
const pad_poly = note(`<
  [~ [c4,f4,a4] ~ [c4,f4,a4]]
  [~ [d4,g4,bb4,f5] ~ [d4,g4,bb4,f5]]
  [~ [c4,f4,a4] ~ [c4,f4,a4]]
  [~ [d4,g4,bb4,f5] ~ [d4,g4], ~@12 f5 ~@3]
  ~@83
>`).s("gm_pad_poly").gain(0.3)

// other · alto sax
const alto_sax = note("<~@44 A B C D E F G H ~@35>".pickRestart({
  A: "a4@2 c5@8 d5@3 a4 a4@2", B: "g4@5 ~@3", C: "~@4 a4@2 c5@2 c5@3 d5@3 c5@2", D: "f5 c5 d5 c5@2 bb4 a4 bb4",
  E: "a4 c5@4 d5@2 c5", F: "a4 g4@6 ~", G: "~@4 a4@2 bb4@2 a4@2 bb4@3 c5@3", H: "~ e5 f5@12 ~@2",
})).s("gm_alto_sax").gain(0.48).pan(0.3)

// chords · epiano1
const epiano1 = note("<~@4 A B C A@2 B C A D E F ~@9 A B C A@2 B C ~ D E F ~@17 D E F ~@32>".pickRestart({
  A: "~@3 f4 ~@3 a3, f3, ~ a3@3 ~ f4@3, ~@2 c4@2 a4@3 ~, ~@3 c4",
  B: "~@3 g4 ~@3 bb3, g3, ~ bb3@3 ~ g4@3, ~@2 d4@2 bb4@3 ~, ~@3 d4",
  C: "~@3 c4 ~@3 e3, c3, ~ e3@3 ~ c4@3, ~@2 g3@2 e4@3 ~, ~@3 g3",
  D: "~@3 d4 ~@3 f3, d3, ~ f3@3 ~ d4@3, ~@2 a3@2 f4@3 ~, ~@3 a3",
  E: "~@3 g4 ~@3 b3, g3!2, ~ c4@3 ~ g4@3, ~@2 f4@2 b4@3 ~, ~@3 f4",
  F: "~@3 c4 ~@3 e3, c3!2, ~ f3@3 ~ c4@3, ~@2 bb3@2 e4@3 ~, ~@3 bb3",
})).s("gm_epiano1").gain(0.35)

// other · pad new age
const pad_new_age = note("<~@15 A ~@7 B ~@11 A ~@19 A ~@7 A ~@7 A ~@7 A ~@7>".pickRestart({
  A: "bb4!9 db4 f4 bb4 db5 f5 bb5 bb4", B: "c4!9 e3 g3 c4 e4 g4 c5 c4",
})).s("gm_pad_new_age").gain(0.2)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@15 A B C B C D E F G ~@11 A B C D C B H I ~@12 A D C D C D H I A D C D C D E I A D J D C B E I A B C D J B E I
>`.pickRestart({
  A: "~@3 f4 ~@3 db5, db4!2, ~ f4@2 ~@2 f4@3, ~ bb4 ~ bb4", B: "[eb4,ab4,c5,g5]!4 [c4,f4,ab4,eb5]!3 [c4,ab4]",
  C: "[f4,bb4,db5,ab5]!7 [f4,db5,ab5]", D: "[eb4,ab4,c5,g5]!4 [c4,f4,ab4,eb5]!3 [c4,ab4,eb5]",
  E: "[ab3,c4,db4,f4]!7 [ab3,c4,f4]", F: "[g3,bb3,c4,f4]!7 [g3,f4]",
  G: "~@3 bb3 ~@3 e4, e3!2, ~ bb3@2 ~@2 bb3@3, ~ c4 ~ c4", H: "[ab3,c4,db4,f4]!7 [ab3,f4]",
  I: "[g3,bb3,c4,f4]!7 [g3,bb3,f4]", J: "[f4,bb4,db5,ab5]!7 [f4,db5]",
})).s("gm_electric_guitar_clean").gain(0.18)

// chords · electric guitar muted · F Bbdim C7
const electric_guitar_muted = note(`<
  ~@31
  [[f3,a4]@2 ~@2 [f3,a4,c5]@5 ~@7]
  ~@11
  [[bb3,e4]@2 ~@2 [bb3,c4,e4]@5 ~@7]
  ~@43
>`).s("gm_electric_guitar_muted").gain(0.35)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note("<~@31 [~@11 a3@2 a4 ~ c5] ~@11 [~@13 e4 ~ c4, ~@11 e3@2 ~ e4@2, ~@3 bb3] ~@43>")
  .s("gm_acoustic_guitar_steel").gain(0.35)

// chords · epiano1
const epiano1_2 = note("<~@44 A B C A@2 B C A ~@35>".pickRestart({
  A: "~@7 f4, a3, ~ c4@2 c4@3 c4@2, ~@2 f4@3 f4@2 ~, ~@8 a4@7 ~",
  B: "~@7 g4, bb3, ~ d4@2 d4@3 d4@2, ~@2 g4@3 g4@2 ~, ~@8 bb4@7 ~",
  C: "~@7 c4, e3, ~ g3@2 g3@3 g3@2, ~@2 c4@3 c4@2 ~, ~@8 e4@7 ~",
})).s("gm_epiano1").gain(0.31)

// drums · kick
const kick = s("bd").struct("<A@15 B A@7 B A@7 C A@3 B A@7 C A@11 B A@7 B A@7 B A@7 B A@7>".pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "x!2", C: "x ~@5 x ~ x ~@5 x!2",
})).gain(0.29)

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

// drums · snare
const snare = s("sd").struct("<~@4 A@11 ~ A@7 ~ A@7 ~ A@3 ~ A@7 ~@9 A@3 ~ A@7 ~ A@7 ~ A@7 ~ A@7>".pickRestart({
  A: "~ x ~ x",
})).gain(0.32)

// drums · low tom
const low_tom = s("lt").struct("<~@15 A ~@7 A ~@7 B ~@3 A ~@7 B ~@11 A ~@7 A ~@7 A ~@7 A ~@7>".pickRestart({
  A: "~@12 x!4", B: "~@12 x!3 ~",
})).gain(0.18)

// drums · hihat
const hihat = s("hh").struct("<A@4 ~@11 B ~@7 B ~@7 C ~@3 B ~@7 C A@8 ~@3 B ~@7 B ~@7 B ~@7 B ~@7>".pickRestart({
  A: "x!8", B: "x!3 ~ x ~@3", C: "~@3 x ~@12",
})).gain(0.25)

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

// drums · open hat
const open_hat = s("oh").struct("<~@15 A ~@7 A ~@7 B ~@3 A ~@7 B ~@11 A ~@7 A ~@7 A ~@7 A ~@7>".pickRestart({
  A: "~@3 x ~@4", B: "x!2 ~@2",
})).gain(0.29)

// drums · high tom
const high_tom = s("ht").struct("<~@31 [~@6 x ~ x!2 ~@6] ~@11 [~@6 x ~ x!2 ~@6] ~@43>").gain(0.32)

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

// drums · ride
const ride = s("rd").struct("<~@4 A@11 ~ A@7 ~ A@7 ~ A@3 ~ A@7 ~@9 A@3 ~ A@7 ~ A@7 ~ A@7 ~ A@7>".pickRestart({
  A: "x!8",
})).gain(0.25)

// drums · tambourine
const tambourine = s("tb").struct("<~@4 A@11 ~ A@7 ~ A@7 ~ A@3 ~ A@7 ~@9 A@3 ~ A@7 ~ A@7 ~ A@7 ~ A@7>".pickRestart({
  A: "~@3 x",
})).gain(0.36)

stack(
  piano, bass, pad_poly, alto_sax, epiano1, pad_new_age, electric_guitar_clean, electric_guitar_muted,
  acoustic_guitar_steel, epiano1_2, kick, rim, snare, low_tom, hihat, mid_tom, open_hat, high_tom, crash, ride,
  tambourine
)