// Una ciocca di capelli — Adamo
// 115 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 86 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(115/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 · electric bass finger
const bass = note(`<
  ~@5 A B A C ~@2 A B A C ~@2 D E F G ~@2 D E F G ~@2 H@2 I J K L M N O P Q R S T U V ~@3 A B A C ~@2 A B A C ~@2 H@2 I
  J K L M N O W Q R S T U V U V U V U V U V X ~
>`.pickRestart({
  A: "d1", B: "g1", C: "g1 ~", D: "c2@3 g2 e2@2 c2@2", E: "g1@3 d2 b1@2 g1@2", F: "d2@3 a2 f#2@2 d2@2", G: "g1@13 ~@3",
  H: "c2@4 ~@2 c2 ~ c2 ~ c2@2 g1@3 ~", I: "g1@4 ~@2 g1 ~ g1 ~ g1@2 d2@4", J: "g1@4 ~@2 g1 ~ g1 ~ g1@2 d2@3 ~",
  K: "d2@4 ~@2 d2 ~ d2 ~ d2@2 a1@3 ~", L: "d2@4 ~@2 d2 ~ d2 ~ d2@6", M: "g1@5 ~ g1 ~ g1 ~ g1@2 d2@4",
  N: "g1@4 ~@2 g1 ~ g1@4 d2@2 g1 ~", O: "c2@4 ~@2 c2 ~ c2@4 g2@4", P: "c2@4 ~@2 c2 ~ c2@4 g2@2 c2@2",
  Q: "b1@4 ~@2 b1 ~ b1@4 f#2@4", R: "b1@4 ~@2 b1 ~ b1@4 f#2 ~ b1@2", S: "a1@6 e2 ~ a1@3 ~ a1@4",
  T: "d2@6 d1 ~ d1@4 d2@2 d1@2", U: "g1@6 d2@5 ~ g2@4", V: "d2@4 ~@2 d2 ~ d2@4 a1@2 d2 ~",
  W: "c2@4 ~@2 c2 ~ c2@3 ~ g2@2 c2@2", X: "g1@15 ~",
})).s("gm_electric_bass_finger").gain(0.45)

// chords · string ensemble 2
const string_ensemble_2 = note(`<
  ~@5 A B C D ~@2 E@2 F G ~@2 H@2 I G ~@2 J K L M ~@2 N@4 O@2 P Q R@2 S@2 T U V ~@4 A B C D ~@2 E@2 F G ~@2 N@4 O@2 P Q
  R@2 S@2 T W@3 V ~ V ~ V ~ V ~ V ~
>`.pickRestart({
  A: "[d3,f#4,a4]", B: "[g3,b4]", C: "[d3,c4,f#4,a4]", D: "[b3,d4,g4] ~", E: "[~ c6 ~ g5, [d5,d6], f#5 b5]/2",
  F: "~ c6, [d5,f#5,d6]", G: "[d5,g5,b5]@3 ~", H: "[[e5,c6] [d5,b5], g5]/2", I: "f#5",
  J: "c6@3 e6 ~@2 g6@2, g6@10 e6@5 ~, ~ c6", K: "~@6 g6@2 ~@4 g6@3 ~, d6@3 ~ d6@4, g6 ~@3, ~ b6@15",
  L: "c6@3 f#6 ~@2 f#6@2, ~ c6", M: "[d6,g6] ~", N: "[[c5,e5] [b4,d5], g4@31 ~]/4", O: "[d4,f#4,a4,c5]/2",
  P: "[g4,b4,d5]@3 ~@5", Q: "[b3,g4]", R: "[e4,g4]/2", S: "[d4,f#4]/2", T: "[c4,e4]", U: "[a3,d4]", V: "b3",
  W: "[a3@16 b3@17 ~@15, d4@11 ~@5]/3",
})).s("gm_string_ensemble_2").gain(0.19)

// chords · string ensemble 2 · soft notes
const string_ensemble_2_soft = note("<~@5 A B ~@12 C ~@5 D ~@22 A B ~@36>".pickRestart({
  A: "c4", B: "[d4,g4]", C: "[c5,a5]", D: "a6",
})).s("gm_string_ensemble_2").gain(0.14)

// chords · string ensemble 1
const string_ensemble_1 = note(`<
  ~@29 A B C B D@2 E F G@2 H@2 I J K L ~@15 A B C B D@2 E F G@2 H@2 I M@2 L K L N O N L N O P ~
>`.pickRestart({
  A: "~@3 c6 e6@2 c6@2", B: "g6", C: "~@3 b5 d6@2 b5@2", D: "[~@3 g5 [f#5,d6]@2 [e5,c6]@2, d3, ~@12 e6@3 ~@17]/2",
  E: "[b4,g5,b5]@3 [c5,a5,c6]", F: "[d5,b5] ~@3 [d4,g4,d5]@11 ~", G: "[~@8 c5@8 c6@15 ~, ~@8 [e5,g5]@23 ~]/2",
  H: "[[d5,f#5]@31 ~]/2", I: "[e4,a4]", J: "[d4,f#4]", K: "~@3 [d3,d4] [b3,b4]@2 [g3,g4]@2", L: "[a3,a4]@7 ~",
  M: "[d4@21 ~ [d3,d4]@2 [b3,b4]@4 [g3,g4]@4, f#4@15 ~@17]/2", N: "g4@2 b4 g4", O: "a4@2 c5 f#4", P: "[d4,g4]",
})).s("gm_string_ensemble_1").gain(0.35)

// chords · harpsichord
const harpsichord = note(`<
  ~@17 A B C D ~@2 A B C D ~@2 E F G@2 H@2 I ~ J@2 K@2 L@2 I M ~@15 E F G@2 H@2 I ~ J@2 K@2 L@2 I M I M I M I M I M N ~
>`.pickRestart({
  A: "[e6,g6,c7] ~ [e6,g6,c7] ~ [e6,g6,c7] ~ [e6,g6,c7] ~ [e6,g6,c7] ~ [e6,g6,c7] ~ [e6,g6,c7] ~ [e6,g6,c7] ~", // C
  B: "[d6,g6,b6] ~ [d6,g6,b6] ~ [d6,g6,b6] ~ [d6,g6,b6] ~ [d6,g6,b6] ~ [d6,g6,b6] ~ [d6,g6,b6] ~ [d6,g6,b6] ~", // G
  C: "[c6,f#6,a6] ~ [c6,f#6,a6] ~ [c6,f#6,a6] ~ [c6,f#6,a6] ~ [c6,f#6,a6] ~ [c6,f#6,a6] ~ [c6,f#6,a6] ~ [c6,f#6,a6] ~", // F#dim
  D: "[d6,g6,b6] ~@15", // G
  E: "[g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [c5,e5] g4 [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~", // C
  F: "[g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~", // C
  G: "[g4,b4,d5] ~ [g4,b4,d5] ~ [g4,b4,d5] ~ [g4,b4,d5] ~ [g4,b4,d5] ~ [g4,b4,d5] ~ [g4,b4,d5] ~ [g4,b4,d5] ~", // G
  H: "[f#4,a4,c5] ~ [f#4,a4,c5] ~ [f#4,a4,c5] ~ [f#4,a4,c5] ~ [f#4,a4,c5] ~ [f#4,a4,c5] ~ [f#4,a4,c5] ~ [f#4,a4,c5] ~", // F#dim
  I: "[g4,b4] ~ [g4,b4] ~ [g4,b4] ~ [g4,b4] ~ [g4,b4] ~ [g4,b4] ~ [g4,b4] ~ [g4,b4] ~", // G
  J: "[c5,e5] ~ [c5,e5] ~ [c5,e5] ~ [c5,e5] ~ [c5,e5] ~ [c5,e5] ~ [c5,e5] ~ [c5,e5] ~", // C
  K: "[b4,d5] ~ [b4,d5] ~ [b4,d5] ~ [b4,d5] ~ [b4,d5] ~ [b4,d5] ~ [b4,d5] ~ [b4,d5] ~", // Bm
  L: "[a4,c5] ~ [a4,c5] ~ [a4,c5] ~ [a4,c5] ~ [a4,c5] ~ [a4,c5] ~ [a4,c5] ~ [a4,c5] ~", // Am
  M: "[c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~", // F#dim
  N: "[d4,b4]@15 ~", // G
})).s("gm_harpsichord").gain(0.3)

// chords · acoustic guitar nylon
const acoustic_guitar_nylon = note(`<
  A@5 B C D E@3 B C D E@3 ~@3 F@3 ~@3 G@3 H I J@2 K@3 L M N O P Q R S T U@3 ~ C D E@3 B C D V@3 H I W@2 K@3 L M N O P Q
  R S T S T S T S T S T X ~
>`.pickRestart({
  A: "[~@16 a#3@2 b3@11 ~@3 a#3@2 b3@11 ~@3 a#3@2 b3@11 ~@3 a#3@2 b3@10 ~@4, ~@14 g2@15 ~ g2@15 ~ [g2,d3]@14 ~ g2@15 ~@4, ~@15 [d3,g3]@14 ~@2 [d3,g3]@14 ~@2 g3@13 ~@2 d3@14 ~@4, ~@63 g3@13 ~@4]/5", // G5
  B: "~@3 [c4,f#4]@11 ~@2, d3@7 ~, ~ a3@6 ~", C: "~@2 g4@13 ~, g2@15 ~, ~ [b3,d4]@14 ~",
  D: "~@2 f#4@13 g2, d3@15 ~, ~ [a3,c4]@13 ~@2", // Am
  E: "[a#3@2 b3@12 ~@2 a#3@2 b3@12 ~@2 a#3@2 b3@12 ~ d3, d3@13 ~@2 d3@14 ~@2 d3@14 ~@3, g2@7 ~@7 g2@14 ~@2 g2@15 ~ g2@2]/3",
  F: "[g3@7 ~@3 g3@3 ~@3 a#3@2 b3@12 ~@2 a#3@2 b3@12 ~ d3, [g2,b3]@13 ~ g2@15 ~ g2@15 ~ g2@2, ~@15 d3@15 ~ d3@14 ~@3]/3", // G
  G: "[g3@7 ~@3 g3@3 ~@3 a#3@2 b3@12 ~@2 a#3@2 b3@13 ~, [g2,b3]@13 ~ g2@15 ~ g2@15 ~@3, ~@15 d3@15 ~ d3@14 ~@3]/3", // G
  H: "~@5 g3 c4 g3, c3@6 e4@9 ~, ~@2 g3@2 c3@3 ~", I: "~@5 c4 ~ c4, c3 g4@3, ~@2 c4@4 c3@5 ~ c3@4, ~@2 e4 ~",
  J: "[~@3 d4@2 ~@8 g3 b3 g3, g2@7 b3@3 g3@2 ~@4, ~@4 g3@4 ~@2 g3@6 g2@6 ~@2 g2@7 ~, ~@12 d4@8 ~@2 d4@9 ~]/2",
  K: "[~@12 a3@2 ~@14 a3@2 ~@3 g4@3 ~@8 [b3,d4]@2 g2 ~, d3@3 f#4@7 ~ f#4@4 ~@4 [b3,g4]@2 ~@3, ~@4 a3@5 ~ d3@4 c4@6 a3@6 ~@4 c4@6 g3@4 ~@2 g3@4 ~@2, ~@16 d3@9 ~ d3@6 g2@6 ~@2 g2@5 ~@3]/3", // Bm Em
  L: "[d4,g4]@4 g3@2 b3@2 ~@2 b3@2 d4@2 b3 ~, g2@15 ~, b3 ~@5 g4@9 ~, ~@4 g3@3 ~", // G5
  M: "[c4,e4]@4 g3 ~@5 g3@2 c4@2 g3 ~, c3@3 [g3,c4]@2 ~@3, g3 ~@2 e4@4 ~, ~@4 c3@3 ~", // C C5
  N: "[c3,c4,e4]@2 ~ [g3,c4,e4]@2 c3 [g3,c4,e4] c3, g3@2 ~@2 c3@5 ~@7", // C
  O: "[d4,f#4]@2 a3 a3@2 ~ a3 d4, b2@9 ~ b2@5 ~, a3@3 ~@3 f#4@8 ~@2, ~@3 d4@3 ~@2", // D
  P: "[b3,d4,f#4]@4 b3 ~ b3@2 ~@4 [d4,f#4]@2 b2@2, b2@6 [d4,f#4]@4 b3@5 ~, ~@2 b2 ~", // Bm D
  Q: "[g3,c4,e4]@2 g3 [g3,c4,e4]@2 a2 [g3,c4,e4] a2, a2@7 ~@9", // C
  R: "~ a3 d4 a3 ~@3 d3, d3@3 f#4@5, ~@6 d4@4 a3@5 ~, ~@4 d3@3 ~, ~@3 d4",
  S: "[d4,g4]@4 b3@2 b3@4 ~@2 g3@2 b3 ~, g2@8 ~@2 g2@5 ~, b3@2 ~@4 g4@9 ~, ~@6 d4@7 ~@3", // G5
  T: "[d3,c4,f#4]@4 a3 ~@7 [c4,f#4]@2 d3 ~, a3 ~@2 [a3,c4,f#4]@2 a3@2 ~, ~@8 d3@5 ~@3", // D7 Cdim F#dim
  U: "[a#3@2 b3@12 ~ a#3@2 ~ b3@12 ~@2 a#3@2 b3@11 ~@3, g3@14 ~ g3@15 ~ [d3,g3]@14 ~@3, d3@12 ~@2 [g2,d3]@15 ~ g2@15 ~@3]/3", // G5
  V: "[a#3@2 b3@12 ~@2 a#3@2 b3@12 ~@2 a#3@2 b3@13 ~, d3@13 ~@2 d3@14 ~@2 d3@14 ~@3, g2@7 ~@7 g2@14 ~@2 g2@15 ~@3]/3",
  W: "[~@3 e4@2 ~@8 g3 b3 g3, g2@7 b3@3 g3@2 ~@4, ~@4 g3@4 ~@2 g3@6 g2@6 ~@2 g2@7 ~, ~@12 d4@8 ~@2 d4@9 ~]/2",
  X: "~@2 [d4,g4]@13 ~, g2@15 ~, ~ [g3,b3]@14 ~", // G5 G
})).s("gm_acoustic_guitar_nylon").gain(0.31).pan(0.3)

// other · french horn
const french_horn = note(`<
  ~@5 A B C D ~@2 A B C D ~@2 E F G ~@3 E F G ~@3 H@2 I@2 J@2 K ~ L M N O ~@2 P Q ~@3 A B C D ~@2 A B C D ~@2 H@2 I@2
  J@2 K ~ L M N O ~@2 P Q P R S T U V@2 ~@3
>`.pickRestart({
  A: "d4 f#4", B: "g4@2 a4 g4 f#4@2 e4@2", C: "d4@8 f#4@7 ~", D: "g4@7 ~@9", E: "e5@6 d5@2 c5@4 g4@3 ~",
  F: "d5@8 b4@4 g4@3 ~", G: "d4", H: "[g3,e4]/2", I: "[g3,d4]/2", J: "[f#3,d4]/2", K: "[g3,d4]@13 ~@3",
  L: "~@4 g4 a4 g4 e4", M: "c5 g4", N: "f#4@4 d4 e4 f#4 d4", O: "b4@2 f#4@5 ~", P: "~@3 d3 b3@2 g3@2", Q: "a3",
  R: "~@14 d4 e4", S: "d4@8 g4@3 f#4@3 e4@2", T: "d4@7 ~ c4@8", U: "b3@12 ~@2 d4 e4",
  V: "[[d4,f#4] ~@2 f#4@3 e4@2 ~ d4@22 ~, g4 ~@15]/2", // D
})).s("gm_french_horn").gain(0.41).pan(0.7)

// drums · kick
const kick = s("bd").struct("<~@17 A@3 ~@3 A@3 ~@3 A@16 ~@15 A@24 B ~>".pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x",
})).gain(0.53)

// drums · rim
const rim = s("rim").struct("<~@17 A@3 ~@3 A@3 ~@3 A@16 ~@15 A@24 ~@2>".pickRestart({
  A: "~ x ~ x",
})).gain(0.53)

// drums · hihat
const hihat = s("hh").struct("<~@17 A@3 ~@3 A@3 ~@3 A@16 ~@15 A@24 ~@2>".pickRestart({
  A: "x!8",
})).gain(0.38)

// drums · open hat
const open_hat = s("oh").struct("<~@84 x ~>").gain(0.53)

// drums · ride
const ride = s("rd").struct("<~@5 A@3 ~@3 A@3 ~@34 A@3 ~@3 A@3 ~@27 B ~>".pickRestart({
  A: "~ x ~ x", B: "x",
})).gain(0.45)

// drums · shaker
const shaker = s("sh").struct("<~ A@4 B A@5 B A@36 B A@5 B A@29 ~@2>".pickRestart({
  A: "x!8", B: "x!4 ~ x!3",
})).gain(0.23)

// drums · claves
const claves = s("clave:2").struct("<~ A@4 ~@3 A@3 ~@3 A@34 ~@3 A@3 ~@3 A@27 ~@2>".pickRestart({
  A: "~@3 x ~@2 x ~",
})).gain(2.94)

stack(
  bass, string_ensemble_2, string_ensemble_2_soft, string_ensemble_1, harpsichord, acoustic_guitar_nylon, french_horn,
  kick, rim, hihat, open_hat, ride, shaker, claves
)