// Tom's Diner (reprise) — Suzanne Vega
// 94 bpm, 8/8, key C minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 89 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(94/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 · synth bass 2 · "Synth Bass"
const bass = note(`<
  A B C B D B C B A E A F G H I J K D L C F M N O P J C Q C F R S T J U V@2 W X M N Y Z K C AA C AB C AC C AC C AD A AE
  ~@10 A AC D AF AG N T J U A AH C AC AI AC C AC A AC C AC AJ ~
>`.pickRestart({
  A: "bb1@2 c2@2 ~@7 c1@3 ~@6 c1@4", B: "ab1@10 ~ ab1@4 bb1@2 ~ c2@2 ~@4", C: "bb1@2 c2@2 ~@7 c1@2 ~@7 c1@4",
  D: "bb1@2 c2@2 ~@7 c1@4 ~@5 c1@4", E: "ab1@10 ~ ab1@4 bb1@2 ~ c2@3 ~@3", F: "ab1@10 ~ ab1@4 bb1@3 c2@3 d2 ~@2",
  G: "eb2@10 ~ eb1@9 ~ eb1@2 ~, ~@10 eb2 ~", H: "db1@5 ~@5 db1@2, ~@11 db2@13", I: "c1@11 c2@9 c2@4",
  J: "g1@10 ~ g1@2 ~@11", K: "g1@10 ~ g1@2 ~@7 g1@2 ~ g1", L: "ab1@10 ~ ab1@4 bb1@2 ~ c2@2 ~ d2@3",
  M: "eb2@11 eb1@9 ~ eb1@2 ~, ~@10 eb2 ~", N: "db1@10 ~ db2@9 db1@4", O: "c1@11 c2@13", P: "g1@10 ~ g1@3 ~@10",
  Q: "ab1@10 ~ ab1@4 bb1@3 c2@3 d2@3, ~@18 bb1 ~@5", R: "eb2@10 eb1@9 ~ eb2 eb1@2 ~", S: "db1@11 db2@9 db1@4",
  T: "c1@11 c2@8 ~ c2@4", U: "g1@10 ~ g1@2 ~@7 g1 ~@2 g1",
  V: "[bb1@2 c2@2 ~@7 c1@2 ~@7 c1 ~@3 ab1@10 ~ ab1@4 bb1@2 ~ c2@2 ~ d2@2 ~, ~@23 c1@2 ~@23]/2",
  W: "bb1@2 c2@2 ~@7 c1@5 ~@4 c1@4", X: "ab1@10 ~ ab1@4 bb1@3 ~ bb1 ~ d2 ~@2, ~@9 c2 ~@2", Y: "c1@11 c2@8 c2@5",
  Z: "g1@10 ~ g1 ~@12", AA: "ab1@10 ~ ab1@4 ~@3 c2@2 ~ d2@3, ~@4 bb1 ~", AB: "ab1@10 ~ ab1@4 bb1@3 c2@2 ~ d2@2 ~",
  AC: "ab1@10 ~ ab1@4 bb1@2 ~ c2@2 ~ d2@2 ~", AD: "ab1@10 ~ ab1@4 bb1@3 c2@3 d2@2 ~",
  AE: "ab1@10 ~ ab1@4 bb1@3 c2@2 ~@4", AF: "ab1@9 ~@2 ab1@4 bb1@3 c2@3 d2 ~@2", AG: "eb2@11 eb1@5 ~@4 eb2 eb1@2 ~",
  AH: "~ bb1 ~@9 ab1@4 bb1@2 ~ c2@2 ~ d2@2 ~, ab1@5 ~@7", AI: "bb1 ~ c2@2 ~@7 c1@2 ~@7 c1@4", AJ: "bb1 c2 ~@10",
})).s("gm_synth_bass_2").gain(0.64)

// chords · epiano2 · "Elec Piano"
const epiano2 = note(`<
  ~@4 A B A B C D E F G H I J K C L M N O P Q R@2 S T U@3 V W X Y Z@2 AA AB AC@2 AD@3 ~@23 AE AF@2 AG AH AI AJ@2 AK AL
  AM AN AO AP AQ AR AS AT AU AV AW ~
>`.pickRestart({
  A: "[bb3,d4,eb4,g4]@23 ~", B: "[c4,eb4,g4,bb4]@11 ~", C: "[bb3,d4,eb4,g4]",
  D: "[c4,eb4,g4,bb4]@14 d4 ~@3 d4@2 eb4 c4 ~@2", E: "~ [bb3,d4,eb4,g4]@3",
  F: "~@14 d4@4 d4@2 eb4 [b3,c4] ~@2, [c4,eb4,g4,bb4]@19 ~@5", G: "[bb3,d4,g4]@11 ~", H: "c4@11 db4@13, [ab3,f4]",
  I: "~@3 d4 c4@4, g4@8 g4@15 ~, ~@5 eb4@7 ~@12", J: "~@11 b3@13, [d4,f4]",
  K: "[g3,b3,f4]@11 g4@2 ~@6 g3@4 ~, d4@5 ~@7", L: "~@14 d4@4 d4@2 ~ c4 ~@2, [c4,eb4,g4,bb4]@10 eb4 ~",
  M: "~@6 [bb3,d4,eb4,g4]@17 ~", N: "~@14 d4@4 ~@3 eb4@3, [c4,g4,bb4], eb4@7 ~, ~@3 d4",
  O: "bb3@11 bb3@9 ~ bb3@3, [d4,g4]@5 [d4,g4]", P: "c4@11 ~@8 ab3@4 ~, f4, ab3 ~@10 db4@13",
  Q: "eb4 ~@8 d4@3 c4@12, g4@3 g4@5, ~@5 eb4@6 ~@13",
  R: "[~@11 b3@9 g3 ~@3 f4@11 g4@8 ~@5, [d4,f4]@20 ~@3 g3@19 ~@6, ~@24 b3@17 ~@7, ~@12 d4@5 ~@7]/2", // Dm
  S: "~@9 eb4 ~@2 eb4@3 d4 ~@2 d4@2 eb4 [c4,d4] ~@2", // Csus2
  T: "~@6 c4@2 d4 eb4@2 ~ g4@3 eb4 ~@2 d4@3 c4 ~ d4, ~@11 f4@2 ~@11",
  U: "[~@6 f4@6 ~@8 g4@3 ~ bb4@2 c5@2 ~@11 bb4@2 ab4 ~@2 eb5 d5@2 ~@10 bb4@6 g4@9, ~@12 g4@8 ~@3 f4@3 ~@22 f5@10 ~@14, ~@17 bb4@6 ~@15 c5@2 ~@7 c5@2 ~@4 d5@19]/3",
  V: "~@5 c5@10 ~@4 ab4@4 bb4, ~ bb4@14 db5@6 ~@3",
  W: "g4@5 bb4@3 ~ f4@6 f4@5 ~ c4@3, ~@2 c5 ~@3, ~@9 gb4 ~@10 eb4@2 ~@2",
  X: "~@15 g3@8 ~, d4@23 ~, ~@5 b3@19, ~@9 f3@8 ~@7", Y: "~@15 [g3,b3,d4]@5 eb4 ~@3",
  Z: "[~@6 [f3,bb3,d4]@4 ~@2 [f3,d4] ~@2 [f3,bb3,d4] ~@2 [f3,bb3,d4] ~ [g3,eb4] ~@2 [ab3,c4]@2 ~@10 [ab3,gb4] f4@3 eb4 ~@2 [eb3,c4]@3 f3@2 ~, ~@12 bb3@2 ~@31 d4 ~@2]/2", // Bb Dm Bb Cm Ab Ab7 Cm
  AA: "[g3,eb4]@3 [bb3,g4] ~@2 [eb3,c4]@3 [f3,d4] ~ [g3,eb4]@4 [bb3,g4]@3 [eb3,c4]@3 [g3,d4]@2 ~", // Cm Eb Cm Dm Cm Eb Cm G5
  AB: "[ab3,eb4]@3 [c4,g4]@2 ~ [eb3,c4]@3 [g3,d4] ~ eb4@4 g4@3 f4@2 eb4 c4@3, ~@10 ab3@4 ~ c4 ~@2 gb4 ~@5", // Ab5 C5 Cm G5
  AC: "[bb3@2 ~ [bb3,bb4]@7 ~ [bb3,bb4]@3 ~ [bb3,bb4] ~@2 [bb3,bb4] ~ [c4,c5] ~@6 gb4@7 ~ f4@7 [f4,ab4]@2 bb4 ~@3, ~@23 [db4,db5]@13 ~@12, ~@27 ab4@14 ~@7]/2", // Bb C Fm Db
  AD: "[g4@2 eb4 c4 ~ c5 bb4 ~ g4 eb5 ~@2 c5@2 bb4 g4 ~ f4@3 eb4 c4 ~ [b3,d4]@30 ~@19, ~@11 d5@2 ~@4 gb4 ~@5 db4 ~@48]/3", // Bm
  AE: "~@21 eb4@2 ~, ~@3 bb4, ~@5 g4", AF: "[bb3,d4,g4]/2", AG: "~@11 [bb3,eb4]@13", AH: "[ab3,c4,f4]",
  AI: "~@9 d4@3 ~ g4@11, g4@3 ~ c4@4, ~@5 eb4@8 ~@11", AJ: "[~@11 b3@36 ~, [d4,f4]@47 ~]/2", AK: "[d4,g4]",
  AL: "[c4,bb4]@18 ~@2 g4@3 ~, eb4@7 ~, ~@18 [c4,bb4]@5 ~", AM: "[d4,eb4]", AN: "[c4,eb4,g4]@23 ~",
  AO: "~@20 eb4@3 ~, d4@23 ~, ~@18 [bb3,g4]@5 ~", AP: "~@14 g4@4 ~@3 d4@3, eb4@5 eb4, ~@3 g4",
  AQ: "~@11 bb3@9 ~@4, d4@5 ~", AR: "~@11 eb4@9 [ab3,eb4]@4, c4",
  AS: "bb3@4 ~ g4@5 [bb3,eb4,g4]@2, eb4@3 ~, d4@11 ~@13, ~@9 bb3@11 ~@4", AT: "~@21 c4@2 ~, c4@5 eb4, ~@3 g4", AU: "d4",
  AV: "~@7 g4@2 g4@2 ~, c4@11 ~", AW: "g4@5 ~@7",
})).s("gm_epiano2").gain(0.56).pan(0.4)

// chords · epiano2 · "Elec Piano" · soft notes
const epiano2_soft = note(`<
  ~@16 A ~@5 B ~@2 C ~@12 D ~@2 E ~@26 F@2 ~@2 G ~@2 H I J ~ K L M N O P H Q@2 ~
>`.pickRestart({
  A: "~@11 d4@2 ~@11", B: "~@11 ab3@2 ~@11", C: "~@10 d4@7 ~@7", D: "~@19 gb4 ~@4", E: "~@23 bb3", F: "eb4/2",
  G: "~@10 g4@3 ~@11", H: "[bb3,eb4]", I: "~@21 eb4@2 ~", J: "[bb3,g4]", K: "eb4@5 ~, bb3@3 ~", L: "c4@14 c4@2 ~ c4@7",
  M: "eb4@5 [bb3,d4,eb4], g4", N: "ab3@5 ~", O: "~@19 eb4 ~@4, ~@11 d4@12 ~", P: "~@14 g4@3 ab3@7, eb4@5 ~, ab3@17 ~@7",
  Q: "[ab3@17 ~@7 [bb3,eb4]@19 ~@5, eb4@20 eb4@3 ~@25, ~@17 ab3@4 d4@21 ~@6]/2", // Eb5
})).s("gm_epiano2").gain(0.32).pan(0.4)

// drums · kick
const kick = s("bd").struct(`<
  A B A B A B A B A B A B A B A B A B A B A B A B A C A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B D@2 E
  D A B F B A B A B A B A B A B A B A B A B A B A B A B A B ~
>`.pickRestart({
  A: "x ~@8 x ~ x ~@8 x!2 ~@2", B: "x ~@8 x ~ x ~@8 x ~@3", C: "x ~@8 x ~ x ~@12", D: "x ~@10 x ~@12",
  E: "x ~@10 x ~@11 x", F: "x ~@8 x ~ x ~@8 x!2 ~ x",
})).gain(0.72)

// drums · snare
const snare = s("sd").struct("<A B@15 C B@8 D B@22 A B@7 ~@4 B@28 ~>".pickRestart({
  A: "~@6 x ~@11 x!2 ~@4", B: "~ x ~ x", C: "~@6 x ~@11 x ~@2 x!2 ~", D: "~ x!2 ~",
})).gain(0.8)

// drums · hihat
const hihat = s("hh").struct("<~@58 A ~ A ~ A ~ A ~ A ~ B ~@20>".pickRestart({
  A: "~ x ~@2", B: "~@2 x!2 ~@8",
})).gain(0.64)

// drums · low tom
const low_tom = s("lt").struct("<~@16 A ~@41 B ~ B ~@3 B ~@24>".pickRestart({
  A: "~@16 x ~@2 x ~@4", B: "x",
})).gain(0.72)

// drums · mid tom
const mid_tom = s("mt").struct("<~@16 A ~@40 B C D E@2 F G ~@25>".pickRestart({
  A: "~@4 x!3 ~", B: "~ x ~@18 x ~@2 x", C: "x ~@4 x", D: "~@6 x ~@3 x!2", E: "x ~@22 x", F: "~@23 x",
  G: "~@7 x ~@3 x ~@8 x ~@2 x",
})).gain(0.8)

// drums · open hat
const open_hat = s("oh").struct("<~@58 A ~ A ~ A ~ A ~ A ~ A ~@20>".pickRestart({
  A: "~ x ~@6",
})).gain(0.64)

// drums · high tom
const high_tom = s("ht").struct("<~@16 A ~@39 B C D E F G H I ~@25>".pickRestart({
  A: "~@13 x ~@10", B: "~@12 x ~@2 x ~ x ~ x ~ x ~ x", C: "~ x ~@9 x ~@2 x ~@2 x ~@6", D: "~@14 x ~@2 x!2 ~@5",
  E: "~@2 x ~@2 x!2 ~ x ~@3 x ~ x ~@2 x!2 ~ x ~@3", F: "~@14 x ~@2 x ~@2 x ~@3", G: "~@11 x ~@2 x ~@2 x ~@2 x ~@3",
  H: "~@14 x ~@2 x ~@5 x", I: "~@2 x ~@2 x ~@5 x ~@2 x ~@2 x ~@6",
})).gain(0.8)

// drums · crash
const crash = s("cr").struct("<~@4 A ~@3 A ~@8 A ~@7 A@2 ~@16 A@2 ~@15 A ~@3 A ~@3 A ~@20>".pickRestart({
  A: "x",
})).gain(0.8)

// drums · ride
const ride = s("rd").struct("<A@16 B C A@7 D A@30 ~@12 A@20 ~>".pickRestart({
  A: "x ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x", B: "x ~ x!2 ~ x!2 ~ x!2 ~@14",
  C: "~@2 x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x", D: "x ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~@11",
})).gain(0.48)

// drums · triangle
const triangle = s("triangles:35").struct("<~@56 [x ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x!2 ~ x]!32 ~>").gain(2.79)

stack(bass, epiano2, epiano2_soft, kick, snare, hihat, low_tom, mid_tom, open_hat, high_tom, crash, ride, triangle)