// They All Laughed — Gershwin
// 120 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 57 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(120/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, A@4 for four bars: edit a riff to change every repeat.

// bass · acoustic bass · "ACOU BASS"
const bass = note(`<
  A B C D E F G H E I J@2 K L M N O P Q R S T U V W X Y Z AA L AB AC AD L AE AF AG AH AI AJ AK AL AI AJ AM AK AN AO AP
  AO AP AQ AR AS AT AU@2
>`.pickRestart({
  A: "c2, b1 ~@23", B: "b1 bb1", C: "a1@12 ab1@11 ~", D: "g1@2 c2 gb1", E: "f1@6 ~@4 f1@2 a1@7 ~@3 a1@2",
  F: "bb1@7 ~@3 bb1@2 c2@6 ~@4 c2@2", G: "b1@6 ~@4 b1@2 bb1@7 ~@3 bb1@2", H: "a1@5 ~ ab1@5 ~ g1@5 ~ gb1@5 ~",
  I: "bb1@3 ~@2 bb1 c2@4 ~@2", J: "[~@6 a1@2 ~@4 ab1@2 ~@4 ab1@3 ~ g1@5 ~@3 gb1@3 ~ f1@4 ~@2 c2@7 ~, ~@40 b1 ~@7]/2",
  K: "f1@9 ~ f1 ~ d2@7 ~@3 d2@2", L: "g1@7 ~@3 g1@2 c2@6 ~@4 c2@2", M: "b1@3 ~@2 b1 e2@4 ~ e2",
  N: "a1@7 ~@3 a1@2 e2@6 a1@5 ~", O: "d2 db2", P: "c2@4 b1@3 ~", Q: "c2@2 ~@4 d2 ~@5 eb2 ~@5 d2 ~@5",
  R: "c2 ~@5 c2@16 ~@2", S: "c2@4 ~ c2 f2@3 c2@3", T: "f2@7 ~@3 f2@2 c2@11 ~", U: "c2@7 ~@3 c2@2 f2@11 ~", V: "eb2 d2",
  W: "g2 g1", X: "d2@11 ~", Y: "g2@5 ~ bb2@5 ~ f2@4 ~@2 d2@4 ~@2", Z: "db2@11 ~ c2@11 ~", AA: "f1@3 ~@2 f1 d2@3 ~@2 d2",
  AB: "eb2@7 ~@3 eb2@2 d2@6 ~@4 d2@2", AC: "g1@7 ~@3 g1@2 c2@2 ~@2 bb1@2 a1@3 ~ g1@2",
  AD: "f1@7 ~@3 f1@2 gb1@7 ~@3 gb1@2", AE: "f2@3 ~ c2@2 d2@3 ~@3 f2@2 ~@4 g2@2 ~@4", AF: "db2", AG: "e2@7 ~",
  AH: "gb2@9 ~ f2@8 b1@5 ~", AI: "bb1@3 ~@2 bb1 c2@4 ~ c2", AJ: "d2@3 ~@2 d2 eb2@3 ~@2 eb2",
  AK: "e2@7 ~@3 e2@2 eb2@7 ~@3 eb2@2", AL: "d2@7 ~@3 d2@2 c2@6 f2@6", AM: "gb2@7 ~@3 gb2@2 f2@7 ~@3 f2@2",
  AN: "d2@2 ~@4 d2@2 ~@4 db2@9 ~ c2@2", AO: "~@4 c2@2 ~@4 c2@2 eb2@11 ~", AP: "d2@2 ~@4 d2 ~@5 db2@9 ~ c2@2",
  AQ: "~@4 c2@2 ~@4 c2@2 b1@11 ~", AR: "bb1@8 ~@2 bb1 ~ d2@7 ~@3 d2@2", AS: "eb2@7 ~@3 eb2@2 e2@7 ~@3 e2@2",
  AT: "f2@3 ~@9 c3@5 ~ b2@4 bb2@2", AU: "[~@3 bb1@4 ~, ~@2 bb2@5 ~]/2",
})).s("gm_acoustic_bass").gain(0.3)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  A B C D E F B G E H I@2 J K L M N O P Q R S T U V W X Y J K Z AA AB K AC AD AE AF@2 AG AH AI AJ AG AK AL AM AN AO AP
  AO AQ AR AS AT AU@2
>`.pickRestart({
  A: "c3@23 ~, b2 ~@23", B: "b2 bb2", C: "a2 ab2", D: "g2@12 c3@6 gb2@5 ~", E: "f2@11 ~ a2@12", F: "bb2 c3",
  G: "a2 ab2 g2 gb2", H: "bb2@4 [c3,bb3]@3 ~", I: "[~@6 a2@6 ab2@4 ~@2 ab2@3 ~ g2@8 gb2@3 ~ f2@6 b2 ~ c3@3 ~@3]/2",
  J: "f2@12 d3@11 ~", K: "g2 [c3,bb3]", L: "[b2,a3] [e3,ab3]", M: "g3 gb3, a2", N: "d3 db3", O: "c3@12 b2@11 ~",
  P: "c3@2 ~@4 d3 ~@5 eb3 ~@5 d3@2 ~@4", Q: "c3 ~@5 [c3,bb3]@18", R: "c3, bb3@3 ~", S: "[f3,a3]", T: "[c3,bb3] [f3,a3]",
  U: "[eb3,db4] [d3,c4]", V: "[g3,b3]", W: "c4 b3, d3", X: "g3 bb3 f3 d3", Y: "[db3,f3] e3, ~@2 c3 ~",
  Z: "[eb3,g3]@12 [d3,gb3]@11 ~", AA: "[g2,f3] [c3,e3]", AB: "f2 gb2", AC: "[f3,a3]@2 c3 d3 ~@2 f3@3 g3@3",
  AD: "[db3,b3]", AE: "[e3,ab3]", AF: "[[gb3,bb3]@9 ~ [f3,a3]@7 ~ b2@6 bb2@12 [c3,g3]@12, ~@3 a3@3 ~@2]/2",
  AG: "[d3,a3] [eb3,bb3]", AH: "[e3,bb3]@12 [eb3,bb3]@7 ~@5", AI: "[d3,bb3]@11 ~ [c3,bb3]@12", AJ: "[bb2,a3] [c3,g3]",
  AK: "[gb3,c4]@11 ~ [f3,b3]@12", AL: "[e3,bb3]@11 ~ [eb3,a3]@10 ~@2",
  AM: "[d3,c4] ~@5 [d3,c4] ~@5 [db3,b3]@6 ~@4 [c3,bb3]@2", AN: "~@4 [c3,bb3]@3 ~@3 [c3,bb3] ~ [eb3,a3]@9 ~@3",
  AO: "[d3,c4] ~@2 d3 ~@2 [db3,b3]@4 ~ [c3,bb3], ~@6 c4 ~@17", // D7 Db7 C7
  AP: "~@4 [c3,bb3]@3 ~@3 c3@2 [eb3,a3]@8 ~@4, ~@10 bb3 ~@13", AQ: "~@4 [c3,bb3]@3 ~@3 [c3,bb3] ~ [b2,a3]@11 ~",
  AR: "bb1 d2", AS: "eb2@12 e2@11 ~", AT: "f2@3 ~@9 [e3,bb3]@3 ~@3 [eb3,a3]@4 [d3,ab3]@2",
  AU: "[~@6 bb1@7 ~@3, ~@4 [bb2,ab3]@9 ~@3]/2", // Bb7
})).s("gm_piano").gain(0.3)

// chords · piano · "A.PIANO 1"
const piano_2 = note(`<
  A B C D E F G H I J K@2 L M N O P 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 AU AW AX AY AZ BA BB@2
>`.pickRestart({
  A: "~@4 c4@2 d4@4 ~@2 f4@5 ~ g4@4 ~@2", B: "a4@6 g4@4 f4@2 g4@4 a4@5 ~@3, d4@8 ~@4 db4@9 ~@3",
  C: "g4@3 f4@2 e4 f4@2 g4@4, c4@3 ~ b3@3 ~", D: "[bb3,d4]@11 ~ [bb3,db4]@9 ~@3, ~@12 a4@11 ~",
  E: "~@4 c4@2 d4@3 ~@3 [d4,f4]@6 g4@3 ~@3, ~@4 c4@3 ~", // Dm
  F: "a4@2 ~@2 a4@2 g4@3 ~ f4 ~ g4@3 ~ a4@6 ~@2, d4@9 ~@3 [d4,e4]@10 ~@2", // Dsus2
  G: "a4@2 ~@2 a4@2 g4@3 ~ f4@2 g4@4 a4@8, d4@5 ~ db4@5 ~", H: "~ bb3, c4",
  I: "~@4 c4@2 d4@3 ~@3 [d4,f4]@6 g4@4 ~@2, a3@8 ~@4 c4@9 ~@3", // Dm
  J: "a4@2 ~@2 a4@2 g4@3 ~ f4 ~ g4@4 a4@5 ~@3, d4@5 ~ [d4,e4]@5 ~", // Dsus2
  K: "[~@6 c4@4 ~@2 b3@3 ~@3 b3@4 bb3@2 ~@6 bb3@4 a3@12 ~@2, f4@23 ~]/2",
  L: "~@2 c4 d4 ~@2 f4@2 ~ g4 ~@2, ~@4 a3@4 ~@4 [a3,d4]@9 ~@3", // D5
  M: "a4@2 ~@2 a4@2 g4@3 ~ f4 ~ [e4,g4]@4 a4@3 ~@5, [bb3,d4]@10 ~@2 d4@9 ~@3", // Em Bb
  N: "c5 ~ c5 b4@2 a4 b4@2 c5@4, d4@11 ~ d4@9 ~@3, f4 ~@3", O: "c4@7 ~, e4@19 ~@5",
  P: "[f4,a4]@6 [e4,g4]@3 ~ d4@2 [e4,g4]@4 [f4,a4]@6 ~@2, ~@10 f4 ~@13", // F Em F
  Q: "[f4,a4]@2 ~@2 a4@2 [e4,g4]@4 [d4,f4] ~ g4@4 a4@5 ~@3, ~@4 f4 ~@7 [d4,f4]@9 ~@3", // F Em Dm
  R: "[bb3,d4] ~@5 [c4,gb4,a4] ~@5 [db4,g4] ~@5 [c4,gb4,a4] ~@5, g4 ~@5 bb4 ~@5", // Bb Gbdim Dbdim Gbdim
  S: "[bb3,d4,g4] ~@5 c5@4 ~@2 c5@4 ~@2 c5@3 ~@3, ~@2 [e4,ab4]@5 ~", T: "[eb4,g4,c5]@2 ~ f4, ~ a4",
  U: "[eb4,g4]@16 a4@2 bb4@3 ~ b4@2", V: "c5 d5 ~ a4, [eb4,g4]@11 ~ [eb4,c5]@12", W: "g4@2 ~ a4, bb4@3 ~, ~ gb4",
  X: "d5@2 b4 g4, f4@3 ~", Y: "a4@9 g4@2 a4, f4@7 ~", Z: "bb4 d5 ~ f4, f4 [bb3,d4]",
  AA: "[b3,eb4]@11 ~ [bb3,d4]@11 ~, g4@23 ~", AB: "~@4 c4@2 d4@3 ~@3 d4@6 g4@5 ~, ~@4 a3@5 ~@3 a3@11 ~, ~@3 f4 ~@2",
  AC: "[f4,a4]@2 ~@2 [f4,a4]@2 [e4,g4]@3 ~ [d4,f4] ~ g4@4 a4@3 ~@5, ~@12 e4@7 ~@5", // F Em Dm
  AD: "bb4@6 a4@3 ~ g4@2 a4@6 bb4@5 ~, db4@5 ~ c4@5 ~", AE: "e4@5 ~ eb4@5 ~ d4@6 g4@3 ~@3, a4@17 ~@7, b3@5 ~ bb3@4 ~@2",
  AF: "c5@3 ~@3 c5@6 [eb4,a4,c5]@11 ~, [e4,a4] ~", AG: "d5@2 ~@2 d5@6 d5 ~ a4@4 ~@2 a4@5 ~, [f4,bb4]@11 ~ [d4,e4]@11 ~",
  AH: "f4@4 c4@2 d4@5 ~ f4@5 ~ g4@4 ~@2, d4 ~@7", AI: "~@16 ab4@7 ~, eb4@23 ~, ab4@2 ~, ~@6 g4@6 g4@11 ~, ~@10 f4@13 ~",
  AJ: "bb4@6 ab4@3 ~ g4@2 ab4@4 bb4@7 ~, d4@23 ~", AK: "db5@4 ~@2 eb5@3 ~ [eb4,g4,c5]@8 db4@5 ~, [e4,ab4]@3 ~@5",
  AL: "~@4 f4@2 g4@3 ~@3 bb4@6 c5@6, d4@9 ~@3 eb4@10 ~@2", AM: "d5@3 c5@2 bb4 c5@2 d5@3 ~, f4@5 ~ g4@5 ~",
  AN: "d5@3 c5@2 bb4 c5@2 d5@4, g4@5 ~ gb4@6", AO: "~ eb4, f4", AP: "~@2 f4 g4@3 bb4@3 c5@3, d4@10 ~@2 eb4@9 ~@3",
  AQ: "d5@6 c5@4 bb4@2 c5@4 d5@5 ~@3, f4@3 ~ g4@4", AR: "eb5@6 d5@3 ~ c5@2 d5@6 eb5@6, bb4@5 ~ a4@5 ~",
  AS: "g4@6 ~@3 c5 ~@2, d5@3 ~, ~@3 gb4@2 ~", AT: "[f4,c5,f5] ~@5 [f4,c5,f5] ~@5 [f4,b4,f5]@7 ~@3 [bb4,eb5,g5]@2",
  AU: "~@4 [eb5,g5]@3 ~@3 [eb5,g5] ~ d5@6 c5@4 ~@2, ~@2 bb4@3 ~ g4@5 ~", // Eb
  AV: "[f4,c5,f5]@2 ~@4 [f4,c5,f5]@2 ~@4 [b4,f5]@9 ~ [bb4,eb5,g5]@2, ~@12 f4@5 ~@7", // F5 Bdim Eb
  AW: "[f4,c5,f5]@2 ~@4 [c5,f5]@2 ~@4 [f4,b4,f5]@9 ~ [bb4,eb5,g5]@2, ~@6 f4 ~@17", // F5 Fdim Eb
  AX: "~@4 [eb5,g5]@4 ~@2 [eb5,g5] ~ d5@4 ~@2 d5@6, ~@2 bb4@3 ~ gb4@6, ~@4 a4@3 ~", // Eb
  AY: "bb4@3 ~ f4@2 g4@3 ~@3 bb4@6 c5@4 ~@2, ~@6 f4@5 ~", AZ: "db5@6 c5@3 ~ bb4@2 c5@4 db5@6 ~@2, g4@3 ~ g4@3 ~",
  BA: "[f4,d5]@3 ~@3 g4@3 ~ bb4 ~ db5@3 ~ bb4@2 g4@4 bb4@2", BB: "[~@2 [c4,d4,g4]@5 ~]/2",
})).s("gm_piano").gain(0.35)

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

// drums · kick · soft notes
const kick_soft = s("bd").struct("<~@7 A ~@8 A ~@4 B ~ A ~@4 B ~@2 A ~@21 B ~@3>".pickRestart({
  A: "~@11 x", B: "~@5 x ~@6",
})).gain(0.2)

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

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@3 A ~@3 A ~@11 A ~@5 B ~ A ~@5 A ~ A B ~@20>".pickRestart({
  A: "~@2 x", B: "~@5 x",
})).gain(0.15)

// drums · hihat
const hihat = s("hh").struct("<~@3 A ~@14 B C ~@34 D E ~>".pickRestart({
  A: "~@9 x!2 ~", B: "x!4", C: "x", D: "~@6 x!3 ~@2 x", E: "~ x ~@2",
})).gain(0.4)

// drums · open hat
const open_hat = s("oh").struct("<[~ x ~ x]!3 [~@3 x ~@7 x] ~@22 [~ x ~@2] ~@27 [~@3 x] [~@5 x ~@18] ~>").gain(0.35)

// drums · crash
const crash = s("cr").struct(`<
  ~@4 A ~@5 B C A D ~@2 A ~@2 E A ~@5 A F A ~@3 A ~ A@3 G A ~@7 H ~ H ~ H ~ B@2 A I ~
>`.pickRestart({
  A: "x", B: "~ x ~ x", C: "~@3 x ~ x ~@6", D: "~@2 x", E: "~ x ~@2", F: "x!2", G: "x ~@4 x ~@3 x ~@2",
  H: "x ~@5 x ~@4 x", I: "~@2 x!2",
})).gain(0.35)

// drums · ride
const ride = s("rd").struct(`<
  ~@4 A B@2 C@2 D ~@2 E F B C G H ~@2 I C@4 J K ~ I H F L I H ~@4 E H C M C@2 H N O G O P Q R S@2 ~@3
>`.pickRestart({
  A: "~@3 x ~ x!2 ~@2 x ~@2", B: "x ~@2 x ~ x!2 ~ x!2 ~@2", C: "x!4", D: "x ~@2 x ~ x!2 ~ x ~@3",
  E: "~@3 x ~ x!2 ~@2 x ~ x", F: "x ~@2 x ~ x!2 ~@2 x ~@2", G: "~@3 x ~@2 x ~@2 x ~ x", H: "x ~@2 x ~@2 x ~@2 x ~ x",
  I: "~ x!3", J: "x ~@2 x ~ x!3 ~ x ~@2", K: "~@2 x!2", L: "x ~@2 x ~@2 x ~@2 x!3", M: "x ~@2 x ~@2 x!2 ~ x ~@2",
  N: "x ~@2 x ~@4 x!2 ~ x", O: "~ x ~@2", P: "~@2 x ~@3 x ~@2 x!3", Q: "~ x ~ x", R: "~@2 x ~@2 x!2 ~@2 x ~@2",
  S: "x!2",
})).gain(0.4)

// drums · ride · soft notes
const ride_soft = s("rd").struct(`<
  ~@4 A ~@3 B ~@6 A ~ C ~@2 A D@4 ~@3 D E A F D G ~@5 E@3 D@2 E@2 ~ G ~ E ~@7
>`.pickRestart({
  A: "~@11 x", B: "~@2 x ~@8 x", C: "~@5 x ~@2 x ~@3", D: "~@5 x ~@5 x", E: "~@5 x ~@6", F: "~@5 x ~ x!2 ~@3",
  G: "~@2 x",
})).gain(0.2)

stack(bass, piano, piano_2, kick, kick_soft, snare, snare_soft, hihat, open_hat, crash, ride, ride_soft)