// The New 23rd — Ralph Carmichael
// 80 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 6/4 at bar 41, 4/4 at bar 42) are rendered on a constant 4/4 grid of one bar per cycle
// note: Transcription provider: pdmx. https://musescore.com/score/3434116; license: https://creativecommons.org/publicdomain/zero/1.0/
// note: Full arrangement: all 48 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(80/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 · "Grand Piano"
const piano = note(`<
  ~ A B C D E F G H I F G J K L M N O P Q R S ~@4 T G U V W X Y Z AA AB AC AD AE AF@2 AG@4 ~@3
>`.pickRestart({
  A: "~@7 [c3,g3,c4,e4]", B: "[c3,g3,c4,e4]@3 [c3,g3,c4,e4]!3 [c3,g3,c4,e4]@2",
  C: "[c3,a3,c4,f4]@2 [c3,a3,c4,f4]@4 [c3,a3,c4,f4]!2", // F
  D: "[b2,g3,d4,g4]@2 [b2,g3,d4,g4] [b2,g3,d4,g4]@2 [b2,g3,d4] [b2,g3,d4,f4]@2", // G G7
  E: "[g3,e4]@3 [f3,d4] [e3,c4]@8 [c3,c4]@4, c3@3 ~", F: "[a3,c4]!2 [a3,c4,f4] [g3,c4,e4,g4]",
  G: "[f3,c4,f4,a4]!2 [f3,c4,f4,a4]@4 [g4,b4] [a4,c5], ~@3 [f3,c4]", // F G Am F5
  H: "[g4,c5] g4 [e3,c4]@2 [d3,b3,f4] [d3,b3,f4,g4]!2 [d3,b3,f4,a4], [e3,c4]@2 g4@3 ~@3", // C5 C Bdim G7 Bm7b5 C
  I: "[c3,c4,e4,g4] [c3,g3,d4,f4] [c3,g3,c4,e4]@4 [c3,c4]@2", // C Csus4 C
  J: "[g4,c5]@2 g4@2 [e3,c4,g4]@3 [e3,c4,g4] [d3,b3,f4,g4]@2 [d3,b3,f4,g4]@2 [d3,b3,f4,g4]@2 [d3,b3,f4,a4]@2, [e3,c4] ~@3", // C5 C G7 Bm7b5 C
  K: "[c3,c4,e4,g4]@3 [c3,g3,d4,f4] [c3,g3,c4,e4]@11 ~", L: "[a3,c4,e4]!2 [a3,c4,e4]@2 [a3,c4,e4] [a3,c4,e4]@3",
  M: "[g3,a3,c4,e4]@2 [g3,a3,c4,e4]@2 [g3,a3,c4,e4]@4 [c4,e4] [b3,d4] [g3,a3,c4]@4 [g3,b3,d4]@2, ~@4 g3 ~@3", // Am7 C Bm Am7 G
  N: "[f3,a3,c4,e4]@4 [a3,a4] [g3,g4] [a3,a4]@2", O: "[g3,b4]@3 [a3,a4] [b3,g4]@11 ~, [e3,e4]@15 ~",
  P: "[c3,a3,e4,a4]!2 [c3,a3,e4,a4]@4 [b2,g#3,e4,b4]@2", Q: "[a2,a3,e4,c5]!2 [a2,a3,e4,c5]@4 [d3,a3,f#4,d5]@2",
  R: "b4 [a3,a4] [g3,b3,d4,g4]@2 a3 g3 [g2,f3,c4,a4]@2, [g3,g4] ~ [g2,c4,f4] ~", // A G F G Csus4
  S: "g4@2 d4@2 [g2,g3,b3,d4]@11 ~, [g2,g3,b3] ~@3", T: "~ [a3,c4] [a3,c4,f4] [g3,c4,e4,g4]",
  U: "[e3,c4,c5] [e3,c4,g4] [e3,c4,g4]@4 [d3,b3,f4,g4] [d3,b3,f4,a4]", // C G7 Bm7b5
  V: "[c3,c4,e4,g4] [c3,g3,d4,f4] [c3,g3,c4,e4]@4 [c3,g3,c4,e4]@2", W: "[c3,c4,e4]!2 [a#3,c4,e4,g4]!2",
  X: "[e4,a4] e4 a3@2 g3@2 [g3,c#4,e4,a4]@2, [a3,c#4] [c#4,e4]@2 ~", // A5 A7 A C#m
  Y: "d4 a3 [f#3,a3,e4,a4]@2 [f3,a3,d4,a4]!4, [f#3,e4,a4] ~@3", // F#m7 Dm F#m7
  Z: "[g#3,b4]@2 [b3,g#4]@2 e3@4 ~@4 [b3,g#4] [a3,a4] [e3,g#3,e4,b4]@2, [e3,e4]@2 [b3,e4,g#4]@4 e4 ~, ~@4 d3@3 ~", // G#m E A E
  AA: "[c3,a3,e4,b4]@2 [c3,a3,e4,a4]@2 [b2,g#3,e4,b4] [b2,f#3,e4,a4] [b2,g#3,e4,b4]@2", // Am E Bsus4 E
  AB: "[a3,c5] [b3,b4] a3@2 g3@2 [g3,c4,e4,a4]@2, [a2,e4] [c4,e4,a4]@2 ~", // Am B Am7 A5 Am
  AC: "[f#3,a3,d4,d5]@3 [f#3,a3,d4,a4] f#3@4 ~@4 g3 a3 [f3,b3,d4,a4]@2, ~@2 [b3,d4,a4]@4 [d4,b4] ~, ~@4 f3@3 ~", // D Bm7b5 Bm7 G
  AD: "[e3,c4,g4,c5] [e3,c4,g4] [d3,f4]!2 [c3,e4]@2 [a#2,c4,e4,g4]@2, ~ [c4,g4]@2 ~", // C Dm C C7 C5
  AE: "[g#2,c4,d#4,g4,c5] [g#2,c4,d#4,g4,c5]@2 [g#3,c4,d#4,g4]", AF: "[[g3,c4,d4,g4,c5]@4 [g3,c4,d4,g4,c5]@23 ~@5]/2",
  AG: "[[c4,c5]@2 [a3,a4]@2 [g3,g4]@4 e4 [f3,d4] [e3,c4]@9 ~ [c3,e3,g3,c4]@4 [f3,d4]@2 [g3,e4]@2 [c3,a3,c4,f4]@11 ~ a3@2 [b3,g4]@2 [c3,c4,f4,a4]@11 ~@9, ~@2 [c3,g3]@3 ~ [c3,c4] ~@3 [c3,f4] ~@5]/4", // C A G Dm C Dm C F …
})).s("gm_piano").gain(0.4)

// chords · piano · "Grand Piano" · soft notes
const piano_soft = note("<~@22 A B C D E ~@17 F@4>".pickRestart({
  A: "[c3,g3,c4,e4] [c3,g3,c4,e4]@3 [c3,g3,c4,e4]!4", B: "[c3,a3,c4,f4]@11 ~ [c3,a3,c4,f4]@4",
  C: "[b2,g3,d4,g4]@3 [b2,g3,d4,g4] [b2,g3,d4]@2 [b2,g3,d4,f4]@2", // G G7
  D: "[g3,e4] [f3,d4] [e3,c4]@2 [e3,c4]@8 [c3,c4]@2 [c3,c4]@2, c3 ~@3, c4 ~@7", E: "[a3,c4] ~@3",
  F: "[~@4 [c3,c4,e4,g4]@23 ~@5]/4", // C
})).s("gm_piano").gain(0.27)

// chords · piano · "Grand Piano"
const piano_2 = note(`<
  A@4 B C D E F G H I J K L M N O P Q R S ~@4 T U V W X Y Z AA AB AC AD AE AF AG@2 AH@4 AI@3
>`.pickRestart({
  A: "[e5 c5 e5 g5 c6 e5 g5 c6 d6 g5 c6 e6 d6 g5 c6 g5, c2@15 ~, c4@15 ~ c4@15 ~]/2",
  B: "g5 d5 g5 b5 d6 d5 g5 d6, [b1,b3]@15 ~", C: "c6 c5 e5 g5 c6 e5 g5 c6, [c2,c4]@15 ~",
  D: "f5 c5 f5 a5 c6 c5 e5 g5, [a1,a3]@11 ~ [g1,g3]@4", E: "a5 c5 f5 a5 c6 c5 f5 a5, [f1,f3]@15 ~",
  F: "g5 c5 g5 c6 b5 d5 f5 b5, [e1,e3] [d1,d3]", G: "c6 c5 e5 g5 c6 e5 g5 c6, [c2,c3]@15 ~",
  H: "~@2 f5 a5 c6 c5 e5 g5, ~@3 [g2,g3]", I: "a5 c5 f5 a5 c6 c5 f5 a5, [f2,f3]@15 ~",
  J: "g5 c5 g5 c6 b5 d5 f5 b5, [e2,e3] [d2,d3]", K: "c6@2 g5@2 e5@2 g5@2 c5@2 g4 f4 e4@2 g4@2, [c2,c3]@15 ~",
  L: "[a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [a1,a2] ~ [a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [a1,a2] ~, [a1,a2]@3 ~ [a1,a2]@3 ~", // Am A Am A
  M: "[a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [g1,g2] ~ [a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [g1,g2] ~, [g1,g2]@3 ~ [g1,g2]@3 ~", // Am G Am G
  N: "[a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [f1,f2] ~ [a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [f1,f2] ~, [f1,f2]@3 ~ [f1,f2]@3 ~", // Am F Am F
  O: "[g3,b3,e4]@2 ~@2 [g3,b3,e4]@2 [e1,e2] ~ [a3,c4,e4] ~ [a3,c4,e4]@2 ~@2 [e1,e2,a3,c4,e4] ~, [e1,e2]@3 ~ [e1,e2]@3 ~", // Em E Am E
  P: "[a3,e4] ~ [a3,e4] c2 [c2,c3,a3,e4]@2 [b1,b2,g#3,b3,e4]@2, [c2,c3]@6 c3 ~@9", // A5 Am E C
  Q: "[a3,c4,e4]@2 ~@2 [a3,c4,e4]@2 [a1,a2] ~ [a1,a2,a3,c4,e4]@4 [d2,d3,a3,d4,f#4]@4, [a1,a2]@3 ~@5", // Am A Am D A
  R: "[b3,d4,g4]@2 ~@2 [b3,d4,g4]@2 [g1,g2] ~ [c4,f4]@2 a3 [c4,f4]@3 a3 [c4,f4], [g1,g2]@3 ~ [g1,g2]@4", // G F5 G
  S: "[b3,d4,g4]@2 ~@2 [b3,d4,g4]@2 [g1,g2] ~ b3 c4 d4@2 [b3,d4] [c4,e4] [d4,f4]@2, [g1,g2]@3 ~ [g1,g2]@4", // G Bm C Dm G
  T: "~@3 [g1,g2,g3,c4,e4,g4]", U: "[a3,c4,f4,a4]@7 [f1,f2], [f1,f2]@13 ~@3",
  V: "[e1,e2,g3,c4,g4]@11 ~ [d1,d2,b3,f4,g4]@4", // C G7
  W: "[c1,c2,g3,c4,e4,g4]@8 [e4,g4] [d4,f4] [c4,e4]@2 [c4,e4]@2 [e4,g4]@2, ~ [c1,c2]", // C Em Dm C Em C
  X: "[c1,c2,g3,c4,e4]@4 [c1,c2,g3,c4,e4]@3 g3 [g3,c4,e4]@2 [g3,c4,e4]@2 [a#1,a#2,g3,c4,e4]@4, ~@2 [a#1,a#2] ~", // C C7 A#
  Y: "[a1,a2,a3,c#4,e4]@4 [a1,a2,a3,c#4,e4]@3 a3 [a3,c#4,e4]@2 [a3,c#4,e4]@2 [g1,g2,a3,c#4,e4]@4, ~@2 [g1,g2] ~", // A A7 G
  Z: "[f#1,f#2,a3,d4]@4 [f#1,f#2,a3,d4]@3 a3 [a3,d4]@2 [a3,d4]@2 [f1,f2,a3,d4]@4, ~@2 [f1,f2] ~", // D D5 Dm F
  AA: "[e1,e2,g#3,b3,e4]@4 [e1,e2,g#3,b3,e4]@3 b3 [g#3,b3,e4]@2 [g#3,b3,e4]@2 [d1,d2,g#3,b3,e4]@4, ~@2 [d1,d2] ~", // E E7 D
  AB: "[c1,c2,a3,e4]@4 [c1,c2,a3,e4]@3 a3 [g#3,b3,e4]@2 [a3,b3,e4]@2 [b0,b1,g#3,b3,e4]@4, ~@2 [b0,b1] ~", // Am E Asus2 E B
  AC: "[a0,a1,a3,c4,e4]@4 [a1,a2,a3,c4,e4]@3 a3 [a3,c4,e4]@2 [a3,c4,e4]@2 [g1,g2,a3,c4,e4]@4, ~@2 [g1,g2] ~", // Am Am7 G
  AD: "[f#1,f#2,a3,d4]@4 [f#1,f#2,a3,d4]@3 a3 [a3,d4]@2 [a3,d4]@2 [f1,f2,g3,b3,d4]@4, ~@2 [f1,f2] ~", // D D5 G7 F
  AE: "[e1,e2,g3,c4,g4] [d1,d2,a3,c4,f4,g4] [c1,c2,g3,c4,e4,g4] [a#0,a#1,g3,c4,e4,g4]", // C Dm7 C C7
  AF: "[g#1,g3,c4,d#4,g4]@4 [g#1,g3,c4,d#4,g4]!8 [g#1,g#2,g3,c4,d#4,g4]@4", // G#maj7
  AG: "[[g1,g2,g3,c4,d4,g4]@4 [g1,g2]@3 [g1,g2] [g1,g2]@2 [g1,g2]@2 [g1,g2]@2 [g1,g2]@2 [g1,g2,f4,c5]@11 ~@5, ~@4 [c4,d4,g4]@23 ~@5, ~@4 g3@11 ~@17]/2", // Gsus4 G Csus4 Csus2
  AH: "[[g2,g3,c4,f4,g4,a4,c5]@2 [g2,g3,c4,f4,g4,a4,c5]@2 e5 c5 e5 g5 c6 e5 g5 c6 f5 c5 f5 a5 c6 f5 a5 c6 a5 f5 a5 c6 b4 a5 c6 b4 ~@4, ~@8 [c2,c4]@15 ~ [c2,c4]@15 ~ [c2,c4]@15 ~@9]/4", // F C
  AI: "[~@8 e6@2 e5@2 g5@2 c6@2 e6@2 g5@2 c6@2 g5@2 [c2,c3,c4,g4,c5,e5,g5,c6,e6]@15 ~@9, ~@8 [c2,c4]@4 [g1,g3]@11 ~@25]/3", // C G
})).s("gm_piano").gain(0.3)

// chords · piano · "Grand Piano" · soft notes
const piano_soft_2 = note("<~@10 A ~@11 B C D E F ~@17 G@2 ~@2>".pickRestart({
  A: "f5 c5 ~@6, [a2,a3]@11 ~@5", B: "[g3,c4,e4]@7 [c2,c3], [c2,c3]@13 ~@3", C: "[a3,c4,f4]@7 [c2,c3], [c2,c3]@13 ~@3",
  D: "[g3,d4,g4]@7 [b1,b2], [b1,b2]@13 ~@3", E: "~@4 [c5,e5] [g4,d5] ~ [c2,c3], [g3,c4]@15 ~, [c2,c3,e4]@3 [e4,c5]",
  F: "[a1,a2,f3,c4,f4]@11 ~@5", G: "[~@4 e6 e5 g5 c6 e6 g5 c6 g5 ~@4, ~@8 [c2,c4]@4 [g1,g3]@11 ~@9]/2",
})).s("gm_piano").gain(0.2)

stack(piano, piano_soft, piano_2, piano_soft_2)