// Il ragazzo della via Gluck — Celentano
// 113 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: metre changes (4/4 at bar 1, 2/4 at bar 51, 4/4 at bar 52) are rendered on a constant 4/4 grid of one bar per cycle
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 119 bars on a 24-step grid, each part at one level. Source detail keeps the original performance.
setcpm(113/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
const bass = note(`<
  ~@72 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z AA AB Z AC AD AE AF AG Y AF AG Y AF AG Y AF AG Y AF AG AH
>`.pickRestart({
  A: "d2@7 ~@3 a1@2 d2@8 ~@4", B: "a1@9 ~@3 a1@8 ~@2 e1 ~", C: "a1@5 ~ e1@3 a1@2 ~", D: "d2@8 ~@2 a1 ~ d2@9 ~ a1 ~",
  E: "d2@9 ~@3 a1@5 ~ d2@5 ~", F: "a1@3 ~ e1@3 ~", G: "a1@9 ~ e1 ~ a1@9 ~@3", H: "d2@5 ~ d2@3 a1@2 ~",
  I: "d2@9 ~@3 d2@8 ~@4", J: "a1@8 ~@2 a1 ~ a1@11 ~", K: "a1@3 ~ a1@3 ~", L: "d2@11 ~ d2@8 ~@4",
  M: "b1@8 ~@2 f#1 ~ f#1@8 ~@2 f#1 ~", N: "b1@9 ~ b1@2 f#1@8 ~@2 f#1 ~", O: "b1@8 ~@4 d2@8 ~@2 d2 ~",
  P: "a1@8 ~@2 a1 ~ d2@8 ~@2 d2 ~", Q: "a1@3 ~@3 a1@3 ~@3 d2@8 ~@4", R: "a1@6 ~@4 d2 ~ b1@6 ~@4 b1 ~",
  S: "f#1@7 ~@3 f#1 ~ b1@8 ~@2 b1 ~", T: "f#1@8 ~@2 f#1 ~ b1@9 ~ b1 ~", U: "f#1@8 ~@2 f#1 ~ d2@8 ~@2 d2 ~",
  V: "a1@7 ~@3 a1 ~ d2@9 ~ d2@2", W: "a1@8 ~@2 a1@2 d2@5 ~ a1@5 ~", X: "d2@6 ~@4 d2 ~ a1@8 ~@2 a1 ~",
  Y: "b1@7 ~@3 b1 ~ f#1@7 ~@3 f#1 ~", Z: "b1@8 ~@2 b1 ~ f#1@8 ~@2 f#1 ~", AA: "d2@8 ~@2 d2 ~ a1@7 ~@3 a1 ~",
  AB: "d2@7 ~@3 d2@2 f#1@8 ~@2 f#1 ~", AC: "b1@8 ~@2 b1@2 a1@8 ~@2 a1 ~", AD: "d2@7 ~@3 d2 ~ f#1@7 ~@3 f#1@2",
  AE: "b1@8 ~@2 b1 ~ f#1@8 ~@2 f#1@2", AF: "d2@8 ~@2 d2 ~ a1@8 ~@2 a1 ~", AG: "d2@8 ~@2 d2@2 f#1@7 ~@3 f#1 ~",
  AH: "b1@7 ~@17",
})).s("gm_acoustic_bass").gain(0.3)

// chords · string ensemble 2
const string_ensemble_2 = note(`<
  ~@49 A B@2 C@2 B@2 C@2 B@2 A D@8 E@3 A F@2 C@2 F@2 C@2 F@2 A D@8 G@3 H@8 ~ I@12 J@3
>`.pickRestart({
  A: "[a3,d4,f#4]", B: "[c#4,e4,g4]/2", C: "[a3,d4,f#4]/2", D: "[b4@59 a4@72 b4@61, [d4,f#4]]/8", E: "[~ a4@5]/3",
  F: "[g3,c#4,e4]/2", G: "[~@11 a4@60 ~]/3", H: "[a3@2 b3@4 a3@3 b3@4 a3@2 b3, [d4,f#4]]/8", I: "[a3 b3]/3",
  J: "[a3@6 b3@5 ~]/3",
})).s("gm_string_ensemble_2").gain(0.17).pan(0.6)

// other · string ensemble 1
const string_ensemble_1 = note("<~@49 A B@2 C D@3 E F G@2 A ~@4 H@4 I J K ~@16 H@4 I J K ~@24>".pickRestart({
  A: "f#3", B: "g3/2", C: "f#3 a2 b2 c#3", D: "[d3@6 c#3@4 b2 c#3]/3", E: "d3@3 e3", F: "f#3@2 a3 f#3",
  G: "[g3@6 a3 g3]/2", H: "[d5@2 c#5 d5@5 b4@8]/4", I: "f#4@3 c#4", J: "d4@4 g4 ~ e4 ~", K: "f#4@4 g4 ~ e4 ~",
})).s("gm_string_ensemble_1").gain(0.24).pan(0.4)

// chords · brass section
const brass_section = note("<~@95 A B ~ C ~ D E ~@2 F ~ G H I J K L M N O P Q O ~>".pickRestart({
  A: "~@2 [d4,f#4,a4] ~@5", B: "~@6 [d4,f#4,b4] ~ [d4,f#4,b4] ~@3", C: "~@4 [d4,f#4,a4] ~@3",
  D: "[d4,f#4,b4]@3 ~ [d4,f#4,b4]@2 ~@18", E: "~@9 [d4,f#4,a4] ~ [d4,f#4,a4]",
  F: "~@5 [a3,f#4,a4] [d4,a4,d5] ~ [d4,a4,d5] ~@3", G: "[d4,f#4,b4] ~ [d4,f#4,b4] ~@9",
  H: "[d4,f#4,a4]@2 ~@2 [d4,f#4,a4]@2 ~@10 [a3,f#4,a4] ~ [d4,a4,d5]@2 ~@2 [a3,f#4,a4] ~", // D D5 D
  I: "[d4,a4,d5]@2 ~@2 [d4,a4,d5]@2 ~@10 [f#3,d4,f#4] ~ [f#3,d4,f#4] ~ [f#3,d4,f#4] ~ [a3,e4,a4] ~", // D5 D A5
  J: "[b3,f#4,b4] ~@9 [f#3,d4,f#4] [e3,b3,e4]", K: "[d3,a3,d4] ~@8 [b3,f#4,b4] ~ [b3,f#4,b4]",
  L: "~@9 [b3,f#4,b4] ~ [b3,f#4,b4]", M: "~@16 [e3,c#4,e4]@2 [f#3,d4,f#4]@2 [e3,c#4,e4]@2 [d3,b3,d4] ~",
  N: "[d3,a3,d4] ~@17 [b3,f#4,b4]@3 ~ [b3,f#4,b4]@2", O: "~@18 [a3,f#4,a4]@3 ~ [b3,f#4,b4]@2",
  P: "~@16 [e3,c#4,e4] ~ [f#3,d4,f#4] ~ [e3,c#4,e4]@2 [d3,b3,d4] ~", // C#m D C#m G
  Q: "[d3,a3,d4]@3 ~@15 [b3,f#4,b4]@2 ~@2 [b3,f#4,b4]@2", // D5 B5
})).s("gm_brass_section").gain(0.32)

// chords · synth strings 1
const synth_strings_1 = note("<~@25 A@7 B@5 C@8 ~ D@4 ~@69>".pickRestart({
  A: "[~@11 [a3,d4,f#4]@25 [c#4,e4,g4]@48 [a3,d4,f#4]@48 [c#4,e4,g4]@36]/7", // D C#dim D C#dim
  B: "[~ [a3,d4,f#4]@4 [c#4,e4,g4]@4 [a3,d4,f#4]]/5", C: "[~@12 b4@59 a4@72 b4@49, ~ [d4,f#4]@15]/8",
  D: "[a4@5 [a3,d4,f#4]@2 ~]/4", // D
})).s("gm_synth_strings_1").gain(0.06).pan(0.6)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  A@4 ~ B@5 C@4 D@4 E@7 F G H I J K L M J K L M N O@2 P@3 Q@3 P@3 R L@2 S T H@2 S@2 H@2 S Q@2 U V@2 W O@2 X V@2 J L@2
  S@2 H@2 S@2 H@2 S Q@2 U V@2 W O@2 X V@2 P Q@2 P Y Q Z Y Q P Y Q P AA Q P Y Q P Y Q P Y AB
>`.pickRestart({
  A: "[~@3 [b3,b4]@2 [e4,e5] [c#4,c#5] [a3,a4]@2 [b3,b4]@2 [a3,a4]@2 [g3,g4]@2 [a3,a4]@2 [g3,g4]@2 [e3,e4]@2 [g3,g4]@2 [e3,e4]@2 [c#3,c#4]@2 [e3,e4]@2 [c#3,c#4]@2 [d3,d4]@14 ~@3]/4", // B E C# A B A G A …
  B: "[~@13 [a3,e5]@44 ~@6 [a2,d3,f#5]@30 ~@3 d3@24, ~@11 [a2,g4]@47 ~@3 [d2,a4]@32 [d2,a4]@27, ~@12 [e3,c#5]@45 ~@5 d5@31 ~ d5@26, ~@19 [a2,f#5]@5]/5", // A5 D A7 D5 C#m D
  C: "[~@5 [e3,a3,e5]@29 ~@2 [e3,a3,e5]@25 ~@6 [d5,f#5]@27 ~@2, ~@3 [a2,g4]@31 ~ [a2,c#5]@26 ~@3 d2@29 ~@3, ~@4 c#5@30 g4@27 ~@4 a2@29 ~@2, ~@33 [d3,a4]@14 ~]/4", // A5 D A7 A D5
  D: "[~@2 f#5@28 ~@2 f#5@29 ~@3 f#5@32, b4@30 [b4,d5]@31 ~ a2@34, ~ [b2,f#3,b3,d5]@29 ~ [b2,f#3,b3]@30 [d2,d3]@35, ~@21 [a4,d5]@11]/4", // Bm B5 D D5
  E: "[~@9 f#5@48 ~@12 f#5@48 ~@2 f#5@48 ~, ~@8 [b2,f#3,b3,b4,d5]@48 ~@11 a4@48 ~@2 a4@48 ~@3, ~@34 [d2,d3,d5]@24 ~ [d2,d3,d5]@24 ~]/7", // Bm D
  F: "~@8 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], ~@11 a2@13", // D
  G: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5], d3 a2", // D C#dim
  H: "~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5] ~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5], e3 a2", // C#dim
  I: "~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], e3 d3", // C#dim D
  J: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], a2 d3", // D
  K: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5], a2 e3", // D C#dim
  L: "~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5] ~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5], a2 e3", // C#dim
  M: "~@2 [g4,c#5,e5] [g4,c#5,e5]@2 [g4,c#5,e5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], a2 d3", // C#dim D
  N: "~@4 [a4,d5,f#5]@2 [a4,d5,f#5]@4 [a4,d5,f#5]@2 ~@4 [a4,d5,f#5]@2 [a4,d5,f#5]@4 [a4,d5,f#5] ~, a2@12 [b2,f#3,b3]@11 ~", // D B5
  O: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [f#2,b2,f#3] [b2,f#3,b3]", // D B5
  P: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [d3,a3,d4] [a2,d3,a3]", // D D5
  Q: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [b2,f#3,b3] [f#2,b2,f#3]", // D B5
  R: "~@4 [a4,d5,f#5]@2 [a4,d5,f#5]@4 [a4,d5,f#5] ~@5 [a4,d5,f#5]@2 [a4,d5,f#5]@4 [a4,d5,f#5]@2, a2@11 ~ d3@12", // D
  S: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], d3 a2", // D
  T: "~@4 [a4,d5,f#5]@2 [a4,d5,f#5]@4 [a4,d5,f#5] ~@5 [a4,d5,f#5]@2 [a4,d5,f#5]@4 [a4,d5,f#5]@2, d3 a2", // D
  U: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [b2,f#3,b3] [d3,a3,d4]", // D B5 D5
  V: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [a2,d3,a3] [d3,a3,d4]", // D D5
  W: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [a2,d3,a3] [b2,f#3,b3]", // D D5 B5
  X: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [f#2,b2,f#3] [d3,a3,d4]", // D B5 D5
  Y: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [d3,a3,d4] [f#2,b2,f#3]", // D D5 B5
  Z: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5] ~@2 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [b2,f#3,b3] [a2,d3,a3]", // D B5 D5
  AA: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 ~@3 [a4,d5,f#5] [a4,d5,f#5]@2 [a4,d5,f#5], [d3,a3,d4], ~@5 [a4,d5,f#5]@3 ~@4, ~ [f#2,b2,f#3]", // D D5 D B5
  AB: "~@2 [a4,d5,f#5] [a4,d5,f#5]@2 ~@7, [b2,f#3,b3] ~", // D B5
})).s("gm_acoustic_guitar_steel").gain(0.07).pan(0.6)

// drums · kick
const kick = s("bd").struct("<~@72 [x!2]!46 x>").gain(0.35)

// drums · snare
const snare = s("sd").struct("<~@25 [~@11 x ~@4 x ~ x ~@3 x ~] [x ~ x!2 ~ x!2 ~ x!2 ~ x]!92 [x ~ x!2 ~@8]>").gain(0.2)

// drums · clap
const clap = s("cp").struct("<~@72 [~ x ~ x]!11 [~@3 x ~@4 x!2 ~ x] [~ x ~ x]!34 [~ x ~@2]>").gain(0.45)

// drums · hihat
const hihat = s("hh").struct("<~@72 [x ~ x!2 ~ x!2 ~ x!2 ~ x]!46 [x ~ x!2 ~@8]>").gain(0.25)

// drums · tambourine
const tambourine = s("tb").struct("<~@72 [~ x ~ x]!46 [~ x ~@2]>").gain(0.4)

stack(
  bass, string_ensemble_2, string_ensemble_1, brass_section, synth_strings_1, acoustic_guitar_steel, kick, snare, clap,
  hihat, tambourine
)