// Cantare e d'amore — Amedeo Minghi
// 90 bpm, 4/4, key B major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 90 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(90/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, A@4 for four bars: edit a riff to change every repeat.

// bass · electric bass finger · "CANTAREEDA"
const bass = note(`<
  ~ A B A B C D E C@2 D E F G H I J H C K J H L M N O L M P Q R L K Q S C D E C@2 D E F G H I Q R L K Q S T U Q V T U W
  X Y M Z AA AB AC AD AE AC@2 AD AF Q R L K Q R L K Q S L M L AG L@2 AH@2
>`.pickRestart({
  A: "b1@3 b1@2 b1@2 b1", B: "d#2@5 ~ d#2@9 ~", C: "b1@3 b1@2 b1@3", D: "d#2@3 d#2@2 d#2@2 d#2", E: "e2@6 e2@4 e2@5 ~",
  F: "b1@3 b1@2 b1@2 a#2", G: "g#2@3 g#2@2 g#2@3", H: "f#2@3 f#2@2 f#2@3", I: "e2@3 e2 d#2@3 d#2",
  J: "c#2@3 c#2@2 c#2@2 c#2", K: "e2@6 e2 b1 e2@4 d#2@4", L: "b1@3 b1 ~@2 b1@4 b1@4 b1@2",
  M: "d#2@3 d#2 ~@2 d#2@4 d#2@4 d#2@2", N: "e2@3 e2 ~@2 e2@4 e2@4 e2@2", O: "b1@3 b1 ~@2 b1@4 b1@6",
  P: "e2@3 e2 ~@2 e2@4 e2@5 ~", Q: "c#2@3 c#2 ~@2 c#2@4 c#2@4 c#2@2", R: "f#2@3 f#2 ~@2 f#2@4 f#2@4 f#2@2",
  S: "f#2@3 f#2 ~@2 f#2@4 f#2 ~ f#2@2 f#2@2", T: "g#2@3 g#2 ~@2 g#2@4 g#2@4 g#2@2", U: "c2@3 c2 ~@2 c2@4 c2@4 c2@2",
  V: "g#2@3 g#2 ~@2 g#2@4 g#2@2 d#2 f2 g#2 a#2", W: "c#2@3 c#2 ~@2 c#2@4 c#2@6", X: "g#2@6 g#2 d#2 g#2@4 g2@4",
  Y: "f2@3 f2 ~@2 f2@4 f2@4 f2@2", Z: "c#2@3 c#2@3 c#2@2 c2@4 c2@4", AA: "a#1@3 a#1 ~@2 a#1@4 a#1@2 a#1@4",
  AB: "d#2@3 d#2 ~@2 d#2@2 d#2@4 d#2@4", AC: "b1@3 b1 ~@2 b1@4 b1@2 b1@4", AD: "d#2@3 d#2 ~@2 d#2@4 d#2@2 d#2@4",
  AE: "e2@2 ~ e2 ~@2 e2@4 e2@2 e2@2 f#2@2", AF: "e2@3 e2 ~@2 e2@4 e2@2 e2@2 d#2@2", AG: "d#2@3 d#2 ~@2 d#2@4 d#2@6",
  AH: "b1/2",
})).s("gm_electric_bass_finger").gain(0.53)

// chords · piano
const piano = note(`<
  ~ A B A B A B C A@2 B D E F B G H I A J H K A B C A@2 B L H I A J H K A B C A@2 B D E F B G H I A J H K M N O M@2 N O
  P Q N R S T A B D E A B L H I A J H I A J H K A B A B A@2 U ~
>`.pickRestart({
  A: "[d#3,f#3,b3]@6 [d#3,f#3,b3]@6 [d#3,f#3,b3]@3 ~, b2@15 ~", // B
  B: "[d#3,f#3,a#3]@3 [d#3,f#3,a#3]@3 [d#3,f#3,a#3]@2, d#2", C: "[e3,g#3,b3]@6 [e3,g#3,b3]@6 [e3,g#3,b3]@3 ~, e2@15 ~",
  D: "[e3,g#3]@3 [e3,g#3]@3 [e3,g#3,b3]@2, [e2,d#4], ~@3 c#4@5", // E Emaj7
  E: "[d#3,f#3,b3]@6 [d#3,f#3,b3]@6 ~ [d#3,f#3,b3]@3, b2@3 b2", F: "[d#3,g#3,b3]@3 [d#3,g#3,b3]@3 [d#3,g#3,b3]@2, g#2",
  G: "[e2,e3,g#3,b3]@6 [e3,g#3,b3] ~ [d#3,g#3,b3]@4 [d#3,g#3,b3]@4, ~ d#2", // E G#m
  H: "[e3,g#3,c#4]@3 [e3,g#3,c#4]@3 [e3,g#3,c#4]@2, c#3", // C#m
  I: "[f#3,a#3,c#4]@6 [f#3,a#3,c#4]@6 [f#3,a#3,c#4]@3 ~, f#2@15 ~", // F#
  J: "[g#3,b3]@2 [g#3,b3] [g#3,b3,d#4], [e2,e3], ~ e4", K: "[f#3,a#3,c#4]@3 [f#3,a#3,c#4]@5, f#2",
  L: "[e3,g#3,b3]@3 [e3,g#3]@3 [e3,g#3,c#4]@2, e2, ~@3 b3@5", // E C#m
  M: "[d#3,g#3,c4]@3 [d#3,g#3,c4]@3 [d#3,g#3,c4]@2, g#2@15 ~", N: "[d#3,g3,c4]@3 [d#3,g3,c4]@3 [d#3,g3,c4]@2, c3",
  O: "[f3,g#3,c#4]@6 [f3,g#3,c#4]@6 [f3,g#3,c#4]@3 ~, c#3@15 ~", // C#
  P: "[d#3,g#3,c4]@6 [d#3,g#3,c4]@6 ~ [d#3,g#3,c4]@3, g#2@3 g#2", Q: "[f3,g#3,c4]@3 [f3,g#3,c4]@3 [f3,g#3,c4]@2, f2",
  R: "[c#3,f3,g#3,c#4]@6 [f3,g#3,c#4] ~ [f3,g#3,c4]@4 [f3,g#3,c4]@4, ~ c3", // C# Fm
  S: "[f3,a#3,c#4]@3 [f3,a#3,c#4]@3 [f3,a#3,c#4]@2, a#2@15 ~", // A#m
  T: "[g3,a#3,d#4]@6 [g3,a#3,d#4]@6 [g3,a#3,d#4]@3 ~, d#3@15 ~", U: "[b2,d#3,f#3,b3]@15 ~",
})).s("gm_piano").gain(0.17)

// other · pad new age · "FANTASY"
const pad_new_age = note(`<
  ~@13 A B C D@2 E@2 F@2 ~@7 D@2 E@2 F@2 ~@8 A B C D@2 E@2 F@2 ~@8 G H I ~@9 D@2 E@2 D@2 E@2 F@2 ~@8
>`.pickRestart({
  A: "b5", B: "a#5 f#5", C: "g#5", D: "[e6!3 e6@2 g#5@2 a#5@9]/2", E: "[d#6!3 d#6@2 f#5@2 g#5@9]/2",
  F: "[e6!3 e6@2 g#5@2 a#5@5 b5 c#6@3]/2", G: "g#6", H: "g6 d#6", I: "f6",
})).s("gm_pad_new_age").gain(0.17).pan(0.3)

// other · acoustic guitar steel · "A.GUITAR"
const acoustic_guitar_steel = note("<A B A B A B ~@15 A B ~@11 A B ~@45 A B A B A B ~@3>".pickRestart({
  A: "~@12 f#3 g#3 b3 c#4", B: "b3",
})).s("gm_acoustic_guitar_steel").gain(0.32).pan(0.6)

// other · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  ~@8 A B@2 C D E@2 F G@2 H@2 I@2 J@3 K L M N G@2 H@2 I@2 O P Q R B@2 C D E@2 F G@2 H@2 I@2 S@3 T U V W K X@2 Y M K J@3
  K L M N G@2 H@2 G@2 H@2 I@2 Z@6 AA@2
>`.pickRestart({
  A: "~@6 b4 c#5", B: "d#5/2", C: "d#5@4 c#5@3 b4", D: "d#5", E: "[b5@2 a#5 f#5, d#4]/2", F: "e4 d#4, g#5",
  G: "[[e4,e6]@5 [g#3,g#5]@2 [a#3,a#5]@8 ~]/2", H: "[[d#4,d#6]@5 [f#3,f#5]@2 [g#3,g#5]@8 ~]/2",
  I: "[[e4,e6]@10 [g#3,g#5]@4 [a#3,a#5]@9 ~ [b3,b5]@2 [c#4,c#6]@6]/2", J: "[[d#4,d#6]@20 [c#4,c#6]@3 [b3,b5]]/3",
  K: "[d#4,d#6]", L: "[b3,b5]", M: "[a#3,a#5]", N: "[g#3,g#5]", O: "[b3,b5]@6 c#4 d#4", P: "a#3@6 g#3 f#3",
  Q: "g#3@6 a#3 b3", R: "f#3@6 b4 c#5", S: "[g#3@6 a#3 c4 g3@6 f3 d#3 f3@6 g3 g#3, [d#4,d#6]@11 [c#4,c#6]]/3",
  T: "[d#3,c4,c6]@15 ~", U: "[g#4,g#6]", V: "[g4,g6]", W: "[f4,f6]", X: "[g#5@2 g5 d#5, c4]/2", Y: "c#4 c4, f5",
  Z: "[f#4,d#6]/2", AA: "[[f#4,d#6]@31 ~]/2",
})).s("gm_string_ensemble_1").gain(0.15)

// chords · string ensemble 2 · "PAD"
const string_ensemble_2 = note(`<
  ~ A@6 B@2 C@3 D E@2 F G@6 H@3 D I@3 G@6 A@2 B@2 C@3 D E@2 F G@6 J@2 K@2 J@2 K@2 L@2 M N@2 C@3 D I@3 O@8 P@2 A@4 Q@4
>`.pickRestart({
  A: "[b3 a#3, [f#3,d#4]]/2", B: "[[g#3,e4] [f#3,d#4], b3]/2",
  C: "[b3@8 a#3@8 b3@3 [e3,c#4]@5, d#4@19 ~@5, f#3@2 g#3]/3", D: "[f#3,b3,d#4]", E: "[[g#3,b3] [f#3,a#3], d#4]/2",
  F: "e4 d#4, [g#3,b3]", G: "[[g#3,e4]@4 a#3@4 d#4@4 e4@3 d#4 e4@4 [a#3,f#4]@4, c#4 b3 c#4, ~ f#3@2 g#3@2 ~]/6",
  H: "[b3@8 a#3@8 b3@3 [c#4,e4]@5, d#4@19 ~@5, f#3@2 g#3]/3", I: "[b3@2 a#3@2 ~ e4, d#4@5 ~, f#3@2 [g#3,b3]]/3",
  J: "[g#3 g3, [c4,d#4]]/2", K: "[[c#4,f4] [c4,d#4], g#3]/2", L: "[[g#3,f4] [g3,d#4], c4]/2", M: "c#4 c4, [g#3,f4]",
  N: "[[c#4,f4] [d#4,g4], a#3]/2", // C# D#
  O: "[[g#3,e4]@4 a#3@4 d#4@4 e4@3 d#4 [g#3,e4]@4 a#3@4 d#4@4 e4@3 d#4, c#4 b3 c#4 b3, ~ f#3@2 g#3@2 f#3@2 g#3]/8", // C#m
  P: "[e4 [f#3,a#3], c#4]/2", Q: "[f#3,b3,d#4]/2",
})).s("gm_string_ensemble_2").gain(0.15)

// other · melodic tom · "TOMS"
const melodic_tom = note("<~@15 A ~@16 A ~@12 A ~@5 B ~@10 A ~ B ~@6 C ~@3 A ~@3 A ~@10>".pickRestart({
  A: "~@6 c4!2 a3 ~ a3!2 f3 ~@3", B: "~@10 c4!2 a3 ~ a3!2", C: "~@8 a3 ~ a3!2 f3 ~@3",
})).s("gm_melodic_tom").gain(0.54).pan(0.4)

// other · pad poly · "SYNTH 1"
const pad_poly = note(`<
  ~ A B A B A C D A@2 C D A D B D@2 B A D@2 B A C D A@2 C D@2 B A D@2 B A C D A@2 C D A D B D@2 B A D@2 B E F G E@2 F G
  E G H G I J A C D A@2 C D@2 B A D@2 B A D@2 B A B A B A@2 ~@2
>`.pickRestart({
  A: "f#3 b3 ~@2 f#3 b3 ~@2 f#3 b3 ~@2 f#3 b3 ~@2", B: "f#3 a#3 ~@2 f#3 a#3 ~@2 f#3 a#3 ~@2 f#3 a#3 ~@2",
  C: "a#3 c#4 ~@2 a#3 c#4 ~@2 a#3 c#4 ~@2 a#3 c#4 ~@2", D: "g#3 b3 ~@2 g#3 b3 ~@2 g#3 b3 ~@2 g#3 b3 ~@2",
  E: "d#4 g#4 ~@2 d#4 g#4 ~@2 d#4 g#4 ~@2 d#4 g#4 ~@2", F: "g4 a#4 ~@2 g4 a#4 ~@2 g4 a#4 ~@2 g4 a#4 ~@2",
  G: "f4 g#4 ~@2 f4 g#4 ~@2 f4 g#4 ~@2 f4 g#4 ~@2", H: "d#4 g4 ~@2 d#4 g4 ~@2 d#4 g4 ~@2 d#4 g4 ~@2",
  I: "f3 g#3 ~@2 f3 g#3 ~@2 f3 g#3 ~@2 f3 g#3 ~@2", J: "d#3 g3 ~@2 d#3 g3 ~@2 d#3 g3 ~@2 d#3 g3 ~@2",
})).s("gm_pad_poly").gain(0.16).pan(0.1)

// other · pad poly · "SYNTH 2"
const pad_poly_2 = note(`<
  ~ A B A B A C D A@2 C D A D B D@2 B A D@2 B A C D A@2 C D@2 B A D@2 B A C D A@2 C D A D B D@2 B A D@2 B E F G E@2 F G
  E G H G I J A C D A@2 C D@2 B A D@2 B A D@2 B A B A B A@2 ~@2
>`.pickRestart({
  A: "~@2 f#3 b3 ~@2 f#3 b3 ~@2 f#3 b3 ~@2 f#3 b3", B: "~@2 f#3 a#3 ~@2 f#3 a#3 ~@2 f#3 a#3 ~@2 f#3 a#3",
  C: "~@2 a#3 c#4 ~@2 a#3 c#4 ~@2 a#3 c#4 ~@2 a#3 c#4", D: "~@2 g#3 b3 ~@2 g#3 b3 ~@2 g#3 b3 ~@2 g#3 b3",
  E: "~@2 d#4 g#4 ~@2 d#4 g#4 ~@2 d#4 g#4 ~@2 d#4 g#4", F: "~@2 g4 a#4 ~@2 g4 a#4 ~@2 g4 a#4 ~@2 g4 a#4",
  G: "~@2 f4 g#4 ~@2 f4 g#4 ~@2 f4 g#4 ~@2 f4 g#4", H: "~@2 d#4 g4 ~@2 d#4 g4 ~@2 d#4 g4 ~@2 d#4 g4",
  I: "~@2 f3 g#3 ~@2 f3 g#3 ~@2 f3 g#3 ~@2 f3 g#3", J: "~@2 d#3 g3 ~@2 d#3 g3 ~@2 d#3 g3 ~@2 d#3 g3",
})).s("gm_pad_poly").gain(0.12).pan(0.9)

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

// drums · snare
const snare = s("sd").struct("<~ [~ x ~ x]!87 ~@2>").gain(0.53)

// drums · hihat
const hihat = s("hh").struct(`<
  ~ A B@11 A B@2 A B@3 A B A B@3 A B@2 A B A B A B A B@7 A B@2 A B@3 A B A B@3 A B@3 A B@2 A B A B@3 A B@2 A B A B A B A
  B A B A B A B A B ~@2
>`.pickRestart({
  A: "~ x!7", B: "x!8",
})).gain(0.33)

// drums · crash
const crash = s("cr").struct(`<
  ~ A ~@11 A ~@2 A ~@3 A ~ A ~@3 A ~@2 A ~ A ~ A ~ A ~@7 A ~@2 A ~@3 A ~ A ~@3 A ~@3 A ~@2 A ~ A ~@3 A ~@2 A ~ A ~ A ~ A
  ~ A ~ A ~ A ~ A ~ A ~
>`.pickRestart({
  A: "x",
})).gain(0.47)

// drums · tambourine
const tambourine = s("tb").struct("<~ [~@3 x]!87 ~@2>").gain(0.33)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~ [x!16]!87 x ~>").gain(0.68)

// drums · jingle bells
const jingle_bells = s("sleighbells:4").struct("<~@22 [~ x ~@2]!13 ~@17 [~ x ~@2]!30 ~@8>").gain(1.15)

// drums · bell tree
const bell_tree = s("marktrees:0").struct("<~@12 [~@11 x!3 ~@2] ~@29 [~@11 x!3 ~@2] ~@47>").gain(2.39)

stack(
  bass, piano, pad_new_age, acoustic_guitar_steel, string_ensemble_1, string_ensemble_2, melodic_tom, pad_poly,
  pad_poly_2, kick, snare, hihat, crash, tambourine, cabasa, jingle_bells, bell_tree
)