// Summertime — Gershwin
// 120 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 78 bars on a 16-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.

// bass · acoustic bass · "ACOU BASS"
const bass = note(`<
  ~ A ~@2 B ~ B C B C ~ C B C B C@2 D E@2 F C G H B C B C B C B I J K I L M@2 B C B C B C B C B N O P Q@2 R@2 S H B C B
  C B C B I T U C V W@2 B X B Y@5
>`.pickRestart({
  A: "g#2", B: "a1", C: "b1", D: "c3@2 g2 g#2", E: "[a2 a1@2 f#2]/2", F: "e2", G: "e2 d2", H: "c2 b1", I: "d2", J: "g1",
  K: "c2 a1", L: "g2 g1", M: "[a1@31 ~]/2", N: "b1@7 ~", O: "d2@2 e2 f2", P: "f#2@5 g2@4 ~@2 g#2@5", Q: "a2/2",
  R: "[e2@31 ~]/2", S: "~ d2", T: "c3 b2 a2 g2", U: "f#2 e2 d2 c2", V: "e2 e1", W: "[a1@15 ~]/2", X: "g#2@7 ~ e2@8",
  Y: "[f2@8 e2@9 a1@48 ~@15]/5",
})).s("gm_acoustic_bass").gain(0.3)

// bass · acoustic bass · "ACOU BASS" · soft notes
const bass_soft = note("<A ~ A B ~ C ~@4 D ~@43 E ~@23>".pickRestart({
  A: "a2", B: "f2 e2", C: "b1", D: "a1", E: "e2 ~",
})).s("gm_acoustic_bass").gain(0.15)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  A B C D E F G F G F H F G F G F I J K@2 L M N@2 G F G F G F O P Q R P S T@2 U V U V U V U V U W X Y Z AA B AB AC AD G
  F G F G F AE P AF AG AH AI AJ@2 AK B C D AL@4
>`.pickRestart({
  A: "[a3,f#4]", B: "[g#3,d4]", C: "e4@2 d4 e4, a3", D: "[f3,d#4] [e3,d4]", E: "~@3 e3, a2, ~ e3@2 ~, ~ c4",
  F: "~@3 g#3, b2, ~ g#3@2 ~, ~ d4", G: "~@3 f#3, a2, ~ f#3@2 ~, ~ c4", H: "~@3 f#3, a2, ~ f#3@2 ~, ~@8 c4@7 ~",
  I: "~ a3 a#3 b3, b2 ~", J: "c4@2 g3 g#3", K: "[a3 e3 f3 f#3, ~ a2@3]/2", L: "~ g#3, g#2", M: "~ a3, b2",
  N: "[e3 d3 c3 b2, g#3]/2", O: "~ f#3@3, a2", P: "[d3,f#3]", Q: "[g2,e3]", R: "c3 a2", S: "g2!2, f3",
  T: "[e3@2 d3 c3 d3 e3 c3@2, a2@15 ~]/2", U: "~ e3 f#3@2, a2", V: "~ f#3 g#3@2, b2", W: "~ f#3 g#3 a3, b2 ~",
  X: "[d3,a3]@2 e3 f3", Y: "f#3@5 g3@5 ~ g#3@5", Z: "~ e4, a3", AA: "f4 d#4, a3", AB: "[a3,d#4]",
  AC: "[g#3,d4] [d3,d4]", AD: "[c3,c4] [b2,b3]", AE: "~@3 a3, a2, ~ f#3@3, ~ c4", AF: "c3 b2 a2 g2", AG: "f#2 e2 d2 c2",
  AH: "~ b2, b1", AI: "~ [e3,g#3], e1", AJ: "[e3@2 d3 c3 d3 e3 c3@2, a2]/2", AK: "~@3 a3, a2, ~ e3@3, ~ b3",
  AL: "[~ [a3,f#4]@48 ~@15]/4", // D
})).s("gm_piano").gain(0.25)

// chords · piano · "A.PIANO 1"
const piano_2 = note(`<
  A B C D E ~ F G H@3 I E J@3 K@2 L M N@2 O@2 P Q@2 R E S@2 T U V W X Y@2 ~ Z AA@3 AB AC AD@3 AE@2 AF AG AH AI AJ@2 AK@3
  AL AM AN AO AP AQ AR AS@2 AT@3 AU C AV AW@4
>`.pickRestart({
  A: "[e5,b5] ~@2 c5, c5@3 ~, ~ a5@3, ~ e5", B: "g5 f5 e5 d5, b4", C: "b4 a4 b4 c5, e5",
  D: "[b4,d5] c5 [a#4,d5] e5, g4 g#4", E: "a4", F: "[f#4,f#5]", G: "[g#4,g#5]@2 e5 c5", H: "[e5@10 ~ c5, ~@5 d5]/3",
  I: "d5 e5 c5@2", J: "[e4@10 e5 c5]/3", K: "[d5 f4 g4 g#4 a4@2 a#4 b4, ~@4 d5@25 ~@3]/2", L: "c5@2 ~ a4, ~ [e4,c5]",
  M: "~ a4 [d#4,c5]@2, [e4,c5] ~", N: "[~ b3 e4 d#4 d4 b3 f#4 f4, b4@7 ~]/2", O: "[~@7 c5, [d4,e4], ~@3 e5]/2",
  P: "e5!2", Q: "[e5@9 ~@3 d5 e5 d5 c5]/2", R: "d5@3 ~ e5@4 c5@8", S: "[e4@6 c4 d4]/2", T: "e4 f#4 g#4 e4, c4@3 ~",
  U: "g4@2 e4 g4, c4@7 ~", V: "[c4,e4,a4] [e4,a4,c5]", W: "e5 d5@3, a4", X: "[d4,f4,a4,c5]", Y: "[c4,e4,a4]/2",
  Z: "~@4 e5@3 ~ e5@4 c5@4", AA: "[e5@3 ~ e5@36 d5@4 c5@4]/3", AB: "d5 e5 d5 c5", AC: "[c4,a4]",
  AD: "[d4@4 c4@4 d4@2 e5 c5, e4@35 ~@13]/3", AE: "[f4@8 g4@4 g#4@4 a4@5 a#4@6 b4@5, d5]/2", AF: "c5@2 c5 a4",
  AG: "~ a4 c5@2, c5 ~", AH: "b4@2 e5 d#5", AI: "d5 b4 f#5 f5", AJ: "[[b4,e5]@5 [e5,e6] ~ [c5,c6], ~@3 [e5,e6]]/2",
  AK: "[~@2 f#5@2 g#5@4 f#5@2 [d5,d6] [c5,c6], [e5,e6]@3 ~]/3", AL: "d#5 d5 c5@2, a5", AM: "[a4,a5]", AN: "[e4,e5]",
  AO: "c4 d4 e4 f#4", AP: "[c4,e4,g#4] [c4,e4]", AQ: "[c4,e4,g4]@2 [c4,e4] [c4,e4,g4]", AR: "[c4,e4,a4] [f#4,a4,c5]",
  AS: "[[f4,a4,e5] [f4,a4,d5]@2 [d4,f4,c5]]/2", AT: "[[c4,e4,a4]@11 ~]/3", AU: "g5 f5 e5 d5, b4@13 ~@3",
  AV: "[b4,d5] c5 ~ e5, g4 [g#4,a#4,d5]", AW: "[~ [c5,e5,a5]@21 [c6,a6]@27 ~@15]/4",
})).s("gm_piano").gain(0.35)

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

// drums · rim
const rim = s("rim").struct("<~@4 A@45 ~ A@4 ~ A ~@12 A@4 ~ A ~@4>".pickRestart({
  A: "~ x",
})).gain(0.2)

// drums · snare
const snare = s("sd").struct("<~@56 [~ x]!8 ~ [~ x!2 ~] ~@12>").gain(0.25)

// drums · hihat
const hihat = s("hh").struct("<~@74 [~@3 x ~@2 x ~] x ~@2>").gain(0.3)

// drums · open hat
const open_hat = s("oh").struct("<~@70 [~@3 x] ~@4 [~ x ~@4 x ~@9] ~@2>").gain(0.3)

// drums · crash
const crash = s("cr").struct("<~@36 A ~@27 A B A@2 ~@3 C A C D ~@3>".pickRestart({
  A: "x", B: "x!2", C: "~ x", D: "~ x ~@14",
})).gain(0.25)

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

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

stack(bass, bass_soft, piano, piano_2, kick, rim, snare, hihat, open_hat, crash, ride, ride_soft)