// Fugue 16 G Minor — Bach Johann Sebastian
// 120 bpm, 4/4, key A# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 80 bars on a 32-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: edit a riff to change every repeat.

// chords · piano · "A.PIANO 1"
const piano = note("<A B C@5 D@7 E@7 F@4 G H I@8 J@8 K@4 L@8 M@2 N@2 O P@8 Q@3 R@8 ~>".pickRestart({
  A: "bb4@3 ~", B: "~@19 gb5@9 f5@4",
  C: "[~@4 eb5@9 ~@8 c5@9 db5@8 ~@8 f5@8 e5@4 f5@4 ~@16 ab4@8 ab5@4 g5@4 ~@7 bb4@9 ~@13 db5@5 ~@7 bb4@4 a4@4 bb4@8 c5@9, ~@13 f4@19 ~@6 eb5@11 ~@5 db5@8 c5@11 ~@37 c5@27 ~@23, ~@13 db5@11 ~@6 bb3@18 ~@14 g5@25 ~@7 f5@35 ~@6 f5@10 ~@15, ~@70 bb4@11 ~@13 ab4@10 ~@24 eb5@10 ~@5 gb5@17]/5",
  D: "[~@10 eb5@4 ~@8 c5@4 bb4@4 ~@7 d5@11 ~@9 f5@4 ~@16 db5@8 ~@67 [eb5,a5]@5 bb3@4 ~@11 [eb4,gb5]@8 f4@4 ~@4 c4@8 a4@3 ~ bb4@4 ~@11 gb5@4 ~ g3@4, ~@7 f5@7 f5@10 ~@6 ab5@26 ~@13 a5@8 bb3@17 f3@19 ~@4 gb4@8 eb5@21 ~@2 [c4,bb5] f5@8 [bb2,db5,bb5]@19 ~@28 [a3,f4,c5]@17 ~@3, ~@21 g5@9 c5@10 ~@13 g5@8 g5@25 ~@7 f5@28 db5@7 ~@4 eb4@9 f3@18 ~@9 db4@4 bb4@19 ~@28 [bb4,f5]@5, ~@69 db5@8 bb5@32 a5@15 f4@16 db4@18 ~@6 [c4,ab5]@11 ~@5 [db4,f5]@11 ~@5 bb3@9 ~@7 [f3,eb4,f5]@9 ~@3, ~@73 c5@12 eb5@12 ~@4 a5@4 g5@8 ~@3 bb5@9 c6@34 ~@6 c5@11 ~@12 eb5@33 ~@3]/7", // Ebdim Ebm C7 Bbm F Bb5 Fm Db …
  E: "[~@29 [db3,f4]@8 ~@8 f3@8 gb3@8 ~@8 eb3@8 ~@16 [c3,eb4]@9 ~@20 d4@5 ~@26 [ab2,c3]@7 ~@8 [c3,eb3]@8 ~ f3@7 eb3@8 ~@28 c4@4, ~@3 [c5,eb5]@26 bb4@32 ab3@16 bb4@64 ~@4 ab4@48 f4@10 ~@6 f3@15, ~@13 db5@32 c5@33 d3@7 [bb2,d4]@11 ~@14 gb4@52 ~@14 db4@21 ~@3 gb3@11 ~@5 bb3@8, ~@13 [bb2,bb3]@16 f2@8 eb3@12 ~@12 ab4@50 ~@7 eb4@9 ~@33 [bb2,db3]@17 f4@15 [bb2,bb4,db5]@19 ~@13, ~@21 [c3,bb4]@4 a4@12 gb4@24 f3 f4@26 ~@14 f4@26 ~@8 eb5@26 ~@14 db3@16 f3@16 [ab3,c5]@16]/7", // Db Cm Ab Cm Bb Bbm C7 Ab
  F: "[~@8 ab3@8 ~@40 f3@7 ~@8 db3@9 ~@6 bb4@8 c5@17 ~ db5@16, [db5,f5]@32 [bb3,eb5]@9 ~@2 db4@5 ab3@16 f4@15 ~@49, bb3@7 ~@9 [gb3,bb4]@9 f3@8 gb3@22 ~@8 db5@35 ~@30, ~ db3@16 eb3@24 ~@7 ab4@40 ~@40, ~@24 [ab3,ab4,c5]@16 [c4,f4,db5]@8 c5@15 eb3@16 ~@49]/4", // Db Eb5 Gb Ab Dbmaj7
  G: "~@2 ab4@16 ~@9 b5@5", H: "~@5 ab5@4 ~@4 f5@3, ~@3 bb5@16 gb5@13, ~@9 bb4@7",
  I: "[~@2 gb5@8 [f4,ab5]@7 bb5@8 a5@4 bb5@5 ~@40 a5@8 ~@79 gb3@8 ~@8 bb3@8 ~@16 ab3@8 [g3,eb5]@8 ~@15 [g3,bb3,db5]@8 ~@8 [gb3,bb3,bb4]@8, ~@2 eb4@18 ~@5 gb5@12 ~@5 eb5@12 ~@4 [f5,bb5]@24 bb4@155 ~@19, ~@34 [a4,f5,c6]@21 ~@11 f3@20 ~@3 gb4@8 f4@7 eb4@8 f5@37 ~@3 f3 eb5@4 d5@4 bb2@8 ab3@8 f5@16 db5@24 eb5 g3@3 e5@3 eb5@32, ~@50 [bb3,bb4,db5]@32 bb5@46 [c4,ab5]@16 gb5@41 b3@8 e5@17 ~@7 eb3@7 f3@10 ~@22, ~@66 [c5,eb5]@16 d5@15 eb5@15 d4@8 bb3@12 ~@4 d4@8 eb3@17 eb5@32 bb3@11 ~@5 eb4@16 ab3@10 ~@5 [ab3,ab4,b4]@16]/8", // Fm Cm Gdim Gb Bb5 F Bbm Fm …
  J: "[~@19 eb5@4 db5@8 ~@12 db5@5 ~@18 bb2@9 ~@7 eb3@9 ~@16 db5@8 ~@8 [gb4,ab4]@8 [gb3,f4,bb4]@8 [ab3,eb4,c5]@8 ~@39 bb3@8 c5@16 ~@13 bb4@4 ab4@7 gb4@4 [db3,f4]@4 ~ eb3@7 bb4@4 ab4@2, ab5@31 eb3@23 ~@4 ab3@11 ~@31 bb3@16 ~@31 bb3@17 ~@6 f4@12 ~@37 b4@8 b4@23 ~@6, [ab3,b4,e5]@15 e3@16 g5@4 e5@4 [eb2,eb5]@9 ab4@20 ~@31 eb5@10 ~@6 c5@17 ~@15 db5@50 ~@13 db5@18 ~@28, e3@15 bb4@34 [c5,ab5]@20 ~@22 f5@12 ~@51 gb4@19 ~@5 eb4@34 ~@30 gb4@9 ~@5, ~@7 [eb3,gb3]@8 db3@8 bb2@26 ~@17 db4@25 ~@56 db4@11 ~@4 gb3@20 ~@74]/8", // Gbsus2 Gbmaj7 Ab Db E Eb Fm Ebm
  K: "[~@2 bb4@8 ~@17 ab4@3 [eb3,gb4]@4 ~ f3@7 c5@4 bb4@4 c5@8 ~@19 f3@4 g3@8 ~@4 c5@4 ~@4 [c4,eb5]@4 ~@4 c4@3 ~@5 c4@3 bb3@3 ~ ab3@4, ~@10 [eb4,c5]@9 ab3@15 ab4@8 eb4@16 [f4,d5]@12 ~@19 f4@18 ~@5 f5@16, ~@18 db5@25 ~@7 ab3@23 g3@8 ~@8 db5@4 ~@15 eb5@5 ~@7 db5@8, ~@65 eb5@25 a3@8 ~@14 db4@8 ~@8, ~@66 bb3@25 ~@6 [bb3,db5]@7 ~ [bb3,db5]@8 ~@15]/4", // Ebm Cm Dm Bbm
  L: "[gb3@3 f3@4 gb3@4 eb3@4 ~@4 bb4@4 c5@3 ~ a4@4 [f4,db5]@7 [ab4,c5]@8 ~@3 c5@4 ~@8 ab4@2 gb4@2 ~ gb4@2 ~@3 gb4@2 ~ gb4@3 ~@33 gb3@7 ~@24 [eb4,eb5]@9 ~@63 b3@9 bb3@8 ab3@11 ~@9 f3@6, eb5@23 eb5@9 ~@14 [gb4,bb4]@8 f4@6 eb4@34 bb4@20 ~@3 b5@12 ~@5 [f5,ab5]@16 [bb4,db5]@13 ~@11 bb4@64 ~@3 eb5@15, c5@7 bb4@8 f3@19 ~@19 db4@7 c4@13 f4@4 [a3,f5]@18 d4@20 ~@11 [bb3,d4,bb5]@24 ~@8 [ab2,ab4,b4,e5]@31 gb4@16 bb2@37 ~@14, ~@15 a4@8 ~@8 bb2@16 ~@6 db5@4 bb4@5 ~@3 ab4@3 bb3@10 ~@7 ab3@17 gb3@8 eb4@20 ~@36 [gb4,eb5]@15 gb2@8 eb5@33 d5@22 ~@12, ~@68 ab4 gb4 ab4@8 ~@8 d4@4 c4@10 ~@6 f3@8 ~@4 ab3@12 ~@11 [eb3,gb5]@21 ~@12 [f3,f4,d5]@15 [f2,bb2]@8 eb2@8 f4@28 ~@23]/8", // Db Ab Eb Gb Fm Bbm Dm Bb …
  M: "[~@18 bb3@8 ~@4 db4@4 ~ c5@7 [bb4,db5]@8 [a4,c5]@7 [db4,bb4]@7, ~@2 eb4@24 [db5,f5]@9 eb4@24 ~@5, ~@10 ab3@17 ~@7 eb5@8 ~@22]/2", // Bbm Am Gb Db
  N: "[~ [eb3,c4,a4]@7 ~@8 c5@7 [eb5,gb5]@7 ~ [db5,f5]@7 ~ b4@7 ~ bb4@7 [db5,f5]@7 ~ gb3@2, c5@8 [bb3,bb4,db5]@8 a3@15 ~@7 eb5@8 d5@10 ~@5 eb5@3, ~@15 eb5@8 ~@7 ab3@33 ~, ~@47 bb2@17]/2", // Adim Ebm Db Bbm
  O: "~@23 f3@7 [eb3,bb4,db5]@2, ~@6 [bb4,db5]@9 a4@17, ~@7 c5@9", // Eb7 Bbm
  P: "[~@39 c4@8 a4@9 ~@108 eb2@8 ~@59 db3@9 ~@8 [a3,c4]@8, ~@6 [bb2,db3]@11 ~@5 c5@25 f3@59 a4@9 [gb2,bb4]@58 ~@7 [eb2,gb4]@41 [db3,eb4]@4 c3@6 [bb3,bb4]@25, ~@14 bb3@33 f4@17 [db4,bb4,f5]@12 ~@5 f4@52 eb4@8 db4@8 eb4@7 [f2,d4]@4 eb4@4 f4@16 bb3@17 eb3@42 ~ [eb3,db4]@16, ~@14 [gb3,eb4]@20 ~@4 bb4@9 db4@10 [c4,a4]@12 ~@3 [eb4,eb5]@9 db5@46 ~@6 gb4@39 d2@16 f4@9 c4@8 db4@34 ~@17, ~@31 [g3,e4]@18 ~@7 gb5@12 ~@4 c5@18 bb4@8 [f2,c5]@26 ab4@17 f4@8 [b3,ab4]@39 db4@9 eb4@8 bb3@8 [a3,c4,f4]@26 ~@8 [f3,f4]@9]/8", // Am Bbm Gb Ebm Dbsus2 Bb Bbm Dm …
  Q: "[~@9 db3@8 ~@34 a4@9 ~@24 [gb3,a3,c4,c5]@8 [f3,bb3,db4,bb4,db5]@3 eb4, eb3@17 gb5@9 f3@35 ~@7 [eb4,a4]@24 ~@4, ~@9 bb3@17 db3@7 eb5@12 ~@5 [gb4,c5]@10 bb4@16 [bb3,db4,bb4,f5]@16 ~@4, ~@9 c3@8 [a2,c5]@6 ~@7 [f2,f4,db5]@16 ~@2, ~@25 f5@11 ~@6 [bb2,bb4,db5]@19 ~@7 [c4,eb5]@15 [gb4,eb5]@9 f4@2 ~@2]/3", // Gbdim Bbm Ebdim Gbdim Bbm Am Db Bbm …
  R: "[~@51 e3@5 ~@38 bb4@9 f4@11 ~@45 bb2@97, ~@3 [eb3,c4,f4,a4,c5]@16 [eb4,gb4]@7 [d3,f4,ab4]@8 [eb3,eb4,gb4,c5]@8 f3 f4@4 gb3@7 ~@2 f3@6 [e2,g4]@52 gb4@10 f4@15 eb4@28 ~@89, ~@11 bb4@26 ~@5 db4@43 c4@18 [f2,c4]@55 [bb3,d4,bb4]@98, ~@11 [db3,db4]@12 ~@3 bb3@40 ~@18 c5@31 ~@9 a4@42 ~@90, ~@19 c3@18 ~@5 db5@32 db5@13 ~@16 bb4@22 f3@131]/8", // F7 Ebm Ddim Cdim Em F5 Bb Db
})).s("gm_piano").gain(0.4)

// chords · piano · "A.PIANO 1" · soft notes
const piano_soft = note(`<
  A@2 ~@2 B C D@2 E@2 F ~ G@4 H@4 I@2 J K@4 L@3 ~ M@2 N O ~ P@4 Q R@3 S ~@4 T@2 ~@3 U@3 V W@3 ~@6 X ~@12
>`.pickRestart({
  A: "[~@21 f4@25 ~@18]/2", B: "~@22 g4@9 ~", C: "~@3 eb5", D: "[~@31 db5@26 ~@7]/2", E: "[~@14 eb5@39 ~@11]/2",
  F: "~@21 eb5@8 ~@3",
  G: "[~@28 gb4@17 ~@7 a4@8 db4@7 ~@19 eb4@15 ~@9 c4@17 ~, ~@67 c4@33 ~@28, ~@68 a3@33 ~@27, ~@77 db4@24 ~@27]/4",
  H: "[~@38 d3@9 ~@7 f3@9 ~@18 c4@17 ~@30, ~@14 bb3@64 ~@3 c3@8 ~@39, ~@47 eb3@16 eb4@51 ~@14, ~@63 eb3@35 ~@30, ~@9 db3@3 ~@4]/4",
  I: "[~@17 ab4@18 ~@29, ~@11 f4@38 ~@15]/2", J: "~ [gb4,bb4]@8 ~@7 eb4@16",
  K: "[~@39 gb4@9 ~ f4@3 ~@6 [c4,eb4]@9 f4@7 ~@9 f4@16 [d4,f4]@16 eb4@13, ~@15 ab3@53 ~@7 eb4@12 ~@41, ~@15 eb4@19 ~@33 db4@4 ~@3 gb4@12 ~@42, ~@31 [ab2,ab4]@17 ~ [db3,db4]@19 ~@14 ab4@19 ~@27]/4", // Cm Dm Ab Db
  L: "[~@18 gb4@8 eb4@11 ~@9 f4@37 ~@13, ~@43 g4@11 ~@42]/3", M: "[~@16 eb4@25 ~@23]/2", N: "~ db4@16 ~@15", O: "~ b3",
  P: "[~@34 gb3@8 [ab2,f3]@7 ~@9 db3@10 ~@24 f3@8 ~@28, ~@17 ab2@20 ~@13 gb2@11 ~@7 gb3@31 ~@29, ~@83 ab3@17 ~@28]/4", // Db
  Q: "~@19 ab3@7 ~@6", R: "[~@3 ab3@7 gb3@8 ~ f3@24 eb3@4 ~@12 f3@8 gb3@24 f3@4 ~, ~@18 ab3@24 ~@16 db4@17 ~@21]/3",
  S: "~@11 g3@9 ~@12", T: "[~@15 f4@21 ~@28]/2",
  U: "[~@17 [eb4,bb4]@17 [gb3,bb3]@9 ~@15 c4@3 ~@29 f3@6, ~@16 gb3@18 ~@9 f3@17 ~@29 g4@7, ~@17 eb3@21 ~@12 gb3@41 ~@5]/3", // Eb5 Gb
  V: "~@8 db3@9 c3@15", W: "[f3@16 ~@14 eb3@25 db3@8 c3@8 ~@25, ~@10 c5@3 ~@19]/3", X: "~@13 f4@2 ~@17",
})).s("gm_piano").gain(0.24)

stack(piano, piano_soft)