// Con il nastro rosa — Battisti
// 119 bpm, 4/4, key C# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: Full arrangement: all 163 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(119/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 · epiano1
const epiano1 = note(`<
  A@2 B@2 C@2 D@2 E F G@2 H@2 I@2 J@2 K@2 L@2 M@2 N@2 K@2 L@2 O@2 P@2 Q@2 R@2 S@2 T@2 Q@2 R@2 S@2 A@2 B@2 C@2 D@2 E F
  G@2 H@2 I@2 U@2 B@2 C@2 V@2 U@2 B@2 C@2 V@2 T@2 Q@2 R@2 S@2 T@2 Q@2 R@2 S@2 W@2 X@2 Y@2 Z AA AB@2 AC@2 AD AE AF@2 AG@2
  AH@2 AI@2 AJ@2 AK@2 AL@2 AM AN AO@2 AG@2 AH@2 AI@2 AJ@2 AK@2 AL@2 AM AN AO@2 AG@2 AH@2 AI@2 AJ@2 AK@2 AL@2 AM AN AP@4
  ~
>`.pickRestart({
  A: "[[c#3,g#3,c#4,e4]@13 [b2,f#3,b3,d#4]@3]/2", B: "[[a2,g#3,c#4,e4]@13 [a2,g#3,c#4,e4]@3]/2",
  C: "[[b2,f#3,b3,d#4]@13 [b2,f#3,b3,d#4]@3]/2", D: "[[c#3,g#3,c#4,e4]@12 ~ [f#3,b3,d#4] ~ [f#3,b3,d#4]]/2",
  E: "[g#3,c#4,e4]@7 ~, d#4 ~@3", F: "~@3 g#4@2 [b3,d#4]@3, g#3, ~@2 c#4@7 ~@7, ~@2 e4@3 ~@3",
  G: "[[a2,b3,c#4,e4,g#4]@13 [a2,b3,c#4,e4,g#4]@3]/2", H: "[[b2,b3,d#4,f#4]@13 [b2,f#3,b3,d#4]@3]/2",
  I: "[c#3,g#3,c#4,e4]/2", J: "[c#4@9 ~@2 e4@2 [b2,b3,d#4,f#4]@3, [c#3,g#4]@13 ~@3, e4@10 c#4@3 ~@3, ~@9 g#3@4 ~@3]/2",
  K: "[[a2,b3,c#4,e4,g#4]@25 ~ [a2,b3,c#4,e4,g#4]@6]/2", // Amaj7
  L: "[[d#4,f#4]@9 ~@4 d#4@3, b2, b3@8 ~ b3@7, ~@5 b4@3, ~@20 d#4@2 f#4@9 ~]/2", // D#m
  M: "[[g#3,c#4,e4]@8 ~@3 [e4,g#4] ~ [a3,d#4,f#4]@3, c#3, ~@9 g#3@3 ~@4, ~@5 c#4 ~@2]/2", // C#m E D#dim
  N: "[c#4@9 ~@2 e4@2 [b2,b3,d#4,f#4]@3, g#4@13 ~@3, e4@10 c#4@3 ~@3, c#3 ~@17 g#3@8 ~@6]/2", // B
  O: "[[g#3,c#4,e4]@8 ~@3 [e4,g#4] ~ [b3,d#4,f#4]@3, c#3, ~@9 g#3@3 ~@4, ~@5 c#4 ~@2]/2", // C#m E B
  P: "[[c#4,e4,g#4]@8 [b3,d#4,f#4]@6 [g#3,c#4,e4]@11 ~ [b2,f#3,b3,d#4]@6, c#3 ~@31]/2", // C#m B C#m B
  Q: "[[b3,c#4,e4,g#4]@7 ~ [a3,b3,d#4,f#4]@6 [a2,g#3,a3,c#4,e4]@11 ~ [a2,g#3,a3,c#4,e4]@6, a2@13 ~@19]/2", // C#m7 B7 Amaj7
  R: "[[f#3,b3]@10 ~@12 f#3@5 ~ [b2,f#3,b3,d#4]@4, b2@27 ~@5, d#4@12 b3@15 ~@5, ~@10 f#3@11 ~@11, ~@14 d#4@13 ~@5]/2", // B5 B
  S: "[[g#3,c#4,e4]@4 [f#3,b3,d#4] ~@21 [b3,d#4,f#4]@6, c#3@2 c#3!2, ~@3 [e3,g#3,c#4]@6 [c#4,e4,g#4]@4 ~@3]/2", // C#m B C#m
  T: "[[c#4,e4,g#4]@8 [b3,d#4,f#4]@6 [g#3,c#4,e4]@11 ~ [b2,f#3,b3,d#4]@6, c#3@25 ~@7]/2", // C#m B C#m B
  U: "[[c#3,g#3,c#4,e4]@11 [c#3,g#3,c#4,e4]@2 [b2,f#3,b3,d#4]@3]/2", // C#m B
  V: "[[g#3,c#4,e4]@17 ~ [a3,c#4,f#4]@2 ~@2 [a3,c#4,f#4]@2 ~@2 [a3,c#4,f#4]@2 ~@2 [a3,c#4,f#4]@2, c#3]/2", // C#m F#m
  W: "[e3@4 ~@2 e3 [d#3,b3,d#4,f#4], [e4,g#4]@20 e4@7 ~@5, b3@18 b3@9 ~@5, ~@2 e3 ~, ~@22 g#4@5 ~@5]/2", // B E
  X: "[e4@3 ~@8 e4 g#3 ~ g#3@2, g#3@17 ~ g#3@5 ~@4 f#4@5, c#3@15 ~ c#3@16, c#4@5 ~ c#4@12 ~@2 c#4@11 ~, ~@5 e4@4 ~@4 e4@3]/2",
  Y: "[a2@15 ~@13 e4@4, g#4@20 e4@7 ~@5, [c#4,e4]@18 c#4@7 ~ c#4@5 ~, ~ a2, ~@11 g#4@5]/2", Z: "[g#2,b3,d#4,g#4]",
  AA: "~ [g#4,b4,d#5] ~ [d#4,g#4,b4] ~ [b3,d#4,f#4]@3, g#2@7 ~", // G#m B
  AB: "[[c#3,g#3,c#4,e4]@11 [c#3,g#3,c#4,e4]@2 [c#3,g#3,c#4,e4]@3]/2", AC: "[[b2,g#3,b3,e4]@3 [b2,b3,e4,g#4]]/2",
  AD: "[f#2,a#3,c#4,f#4]@3 [g#2,d#3,f#3,b3]", AE: "[a2,e3,a3,c#4]@3 [b2,f#3,b3,d#4]",
  AF: "[g#3@7 ~@4 g#4@3 [b3,d#4,f#4]@2, c#3, e4@9 c#4 e4@4 ~@2, c#4@4 b3@3 ~, ~@7 g#3@7 ~@2]/2", // B
  AG: "[[b3,e4,g#4]@25 ~ [g#3,b3,d#4]@6, e2]/2", AH: "[[f#2,a#3,c#4,f#4]@7 [f#2,c#4,f#4,a#4]]/2",
  AI: "[[a2,c#4,e4,g#4]@7 [a2,c#4,e4,g#4]]/2", // Amaj7
  AJ: "[g#2@7 ~@4 d#4@3 [g#2,b3,d#4,f#4]@2, f#4@13 ~@3, d#4@11 ~@5, b3@5 b3@2 ~, ~@18 g#2@9 ~@5]/2", // G#m7
  AK: "[[c#3,c#4,e4,g#4]@7 [c#3,c#4,e4,g#4]]/2", AL: "[[b2,b3,e4,g#4]@7 [b2,b3,e4,g#4]]/2",
  AM: "[f#2,a#3,c#4,f#4,g#4]@3 [g#2,b3,e4,g#4]", AN: "[a2,a3,c#4,e4,g#4]@3 [b2,b3,d#4,f#4]",
  AO: "[[c#3,g#3,c#4,e4]@23 ~ [c#3,g#3,c#4,e4]@4 [c#3,b3,d#4,f#4]@4]/2", // C#m B
  AP: "[[c#3,g#3,c#4,e4]@23 ~ [c#3,g#3,c#4,e4]@5 [c#3,b3,d#4,f#4]@6 [c#3,g#3,e4,c#5]@24 ~@5]/4", // C#m B C#m
})).s("gm_epiano1").gain(0.56)

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

// chords · percussive organ
const percussive_organ = note(`<
  ~ A B@2 C@2 D@2 ~ E ~ F@2 G@3 ~@32 H@4 I@2 J@2 H@4 I@2 J@2 K@2 L@2 M@2 N@2 O@2 P@2 Q@2 R@2 K@2 L@2 M@2 N@2 K@2 L@2 M@2
  N@2 S@2 J@4 T@2 J@2 S@2 U V W@2 S@2 X@2 Y@2 Z@2 J@2 S@2 AA AB J@2 S@2 X@2 Y@2 Z@2 J@2 S@2 AA AB J@2 S@2 X@2 Y@2 Z@2
  J@2 S@2 AA AB AC@3 ~@2
>`.pickRestart({
  A: "~@4 g#6@6 e6@5 ~", B: "[f#6@6 e6@6 c#6@12 ~@2 [g#5,c#6] ~@5]/2",
  C: "[[f#5,b5] ~ [f#5,b5]@2 [e5,g#5]@3 ~ [d#5,f#5]@13 ~ [e5,g#5]@2 [d#5,f#5]@2 [c#5,e5]@2 [b4,d#5]@2 [c#5,e5]@2]/2", // B5 E D#m E D#m C#m B C#m
  D: "[~@2 [c#5,e5]@2 [b4,d#5]@4 [g#4,c#5]@10 [b4,d#5] ~@5 [b4,d#5]@2 [c#5,e5]@6]/2", E: "d#7@2 c#7@6 b6@2 c#7@5 ~",
  F: "[[g#5,e6]@2 [f#5,d#6]@4 [e5,c#6]@4 [f#5,d#6]@4 [d#5,b5]@10 [e5,c#6]@2 [d#5,b5] ~@5]/2", // C#m D#m C#m D#m G#m C#m G#m
  G: "[~@4 [b5,d#6,f#6] [g#5,c#6,e6] [f#5,b5,d#6] [g#5,c#6,e6]@2 [g#5,c#6,e6] [f#5,b5,d#6] [e5,g#5,c#6]@2 [d#5,f#5,b5]@2 [c#5,e5,g#5]@4 [b4,d#5,f#5]@5]/3", // B C#m B C#m B C#m B C#m …
  H: "[g#5,c#6,e6]/4", I: "[f#5,b5,d#6]/2", J: "[g#5,c#6,e6]/2", K: "[c#4,c#5,e5,g#5]/2",
  L: "[e5@10 e5@3 c#5@3, [a3,g#4], c#5@13 ~@3]/2", M: "[d#5@19 ~ d#5@6 b4@6, f#4, b4@13 ~@3]/2",
  N: "[c#4,g#4,c#5,e5]/2", O: "[[c#6,g#6,c#7,e7]@13 [b5,f#6,b6,d#7]@3]/2", P: "[a5,e6,g#6,c#7]/2",
  Q: "[b6@5 e7 d#7 b6, [b5,d#6,f#6]]/2", R: "[[e6,g#6,c#7]@13 ~@3]/2", S: "[g#5,b5,e6]/2", T: "[g#5,b5,d#6]/2",
  U: "[a#5,c#6,f#6]", V: "[g#5,c#6,e6]", W: "[[g#5,c#6,e6]@29 ~@3]/2", X: "[a#5,c#6,f#6]/2", Y: "[a5,c#6,e6,g#6]/2",
  Z: "[g#5,b5,d#6,f#6]/2", AA: "[f#5,a#5,c#6]", AB: "[a5,c#6,e6]", AC: "[[g#5,c#6,e6]@35 ~@13]/3",
})).s("gm_percussive_organ").gain(0.33)

// other · pad choir
const pad_choir = note(`<
  ~@15 A B C D E F G H I J K L M N O P Q R@2 S@2 T@2 U V@5 W@2 X@2 ~@15 I Y Z AA AB AC AD P I Y Z AA AB AC AD P AE R@2
  S@2 T@2 U V@5 W@2 X@2 ~@32 AF@4 ~@4 AF@4 ~@4 AF@4 ~@4 AF@4 ~@7
>`.pickRestart({
  A: "~@10 g#3 ~ g#3@2 e4@2", B: "~@2 e4@2 d#4 ~ d#4@2 c#4 ~ c#4@2 b3@2 b3@2", C: "c#4@2 e4 ~@7 g#3@2 g#3@2 g#3@2",
  D: "e4@2 e4 ~ d#4@2 d#4@2 c#4 ~ c#4@2 b3 ~ b3 ~", E: "e4@2 c#4@2 ~@6 g#3 ~ g#3 ~ e4@2",
  F: "~@2 e4@2 d#4 ~ d#4 ~ c#4 ~ c#4@2 b3 ~ b3@2", G: "c#4@2 e4 ~@7 c#4 ~ c#4 ~ e4 ~", H: "c#4 ~@7",
  I: "~@10 g#3 ~ g#3 ~ g#3 ~", J: "e4@2 e4@2 d#4 ~ d#4@2 c#4 ~ c#4@2 b3@2 b3@2", K: "c#4@2 e4 ~@7 g#3@2 g#3@2 e4@2",
  L: "~@2 e4 ~ d#4 ~ d#4@2 c#4 ~ c#4@2 b3 ~ b3 ~", M: "e4@2 c#4@2 ~@6 g#3@2 g#3 ~ g#3@2",
  N: "e4@2 e4@2 d#4 ~ d#4 ~ c#4 ~ c#4@2 b3 ~ b3@2", O: "c#4@2 e4 ~@7 c#4 ~ c#4 ~ c#4 ~", P: "e4 c#4 ~@6",
  Q: "~@10 g#4 ~ f#4@3 ~", R: "[g#4@7 ~ f#4@3 ~ e4 ~ e4@5 ~@7 c#4@2 e4@3 ~]/2",
  S: "[g#4@7 ~ a4@5 ~ f#4@7 ~@5 f#4 ~ f#4@3 ~]/2", T: "[b4@3 ~ b4@2 g#4@5 ~ g#4@2 f#4@6 ~@6 b4 ~ b4 ~ b4 ~]/2",
  U: "c#5@4 b4@2 g#4@3 ~ g#4@2 d#5@2 c#5@2",
  V: "[~@2 b4@4 ~@2 g#4@2 f#4 ~ e4@2 g#4@4 ~@2 g#4@3 ~ f#4@3 ~ f#4@2 e4@6 ~@6 c#4 ~ e4@2 g#4@5 ~ g#4 ~ g#4@2 ~@2 a4@3 ~ f#4@6 ~@6 f#4 ~ f#4@2 g#4@2]/5",
  W: "[b4 ~ b4 ~ b4@2 g#4@3 ~ g#4@4 f#4@11 ~ b4 ~ b4 ~ c#5@2]/2",
  X: "[~@2 c#5 ~ b4@2 g#4@3 ~ d#5@3 ~ c#5@4 b4@2 g#4@2 ~@10]/2", Y: "e4@2 e4 ~ d#4 ~ d#4 ~ c#4 ~ c#4 ~ b3 ~ b3 ~",
  Z: "c#4 ~ e4 ~@7 g#3 ~ g#3 ~ g#3 ~", AA: "e4 ~ e4@2 d#4 ~ d#4 ~ c#4 ~ c#4 ~ b3 ~ b3 ~",
  AB: "e4@2 c#4@2 ~@6 g#3 ~ g#3 ~ g#3 ~", AC: "e4 ~ e4 ~ d#4 ~ d#4 ~ c#4 ~ c#4 ~ b3 ~ b3 ~",
  AD: "c#4 ~ e4 ~@7 c#4 ~ c#4 ~ c#4 ~", AE: "~@5 c#4 e4 ~", AF: "[g#4@7 ~ f#4@3 ~ e4@2 e4@6 ~@12]/2",
})).s("gm_pad_choir").gain(0.19)

// other · acoustic guitar steel
const acoustic_guitar_steel = note("<~@47 A@16 ~@32 A@64 B C@3>".pickRestart({
  A: "[~@4 g#4@2 e4 g#4@11 ~@2 g#4@2 e4 g#4@11 ~@2 g#4@2 e4 g#4@11 ~@2 g#4@2 e4 g#4@9]/8", B: "~@8 g#4@5 e4@3",
  C: "[c#5@11 ~@5]/3",
})).s("gm_acoustic_guitar_steel").gain(0.72).pan(0.8)

// other · guitar harmonics
const guitar_harmonics = note("<~@56 A ~ B C D ~@55 E F G ~@44>".pickRestart({
  A: "~@7 f#6", B: "~@2 e6@2 f#6 ~ e6@8 f#6@2", C: "e6 ~ e6 ~ e6@2 c#6@10", D: "~@2 f#4 ~ c#4 ~@3",
  E: "~@8 e6 ~ e6@2 c#6@2 e6 ~", F: "e6 ~ e6@2 f#6@4 b6@4 g#6@4", G: "~@2 g#6 ~@13",
})).s("gm_guitar_harmonics").gain(0.4).pan(0.4)

// drums · kick
const kick = s("bd").struct("<A@79 B A@15 C A@7 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 B A@8 D ~@2>".pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x ~@2 x ~ x ~ x", C: "x ~ x!2 ~@2 x ~ x ~@7", D: "~@3 x ~@12",
})).gain(0.72)

// drums · snare
const snare = s("sd").struct("<A@15 B A@31 C A@31 D A@15 E A@63 F ~@3>".pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@4 x ~@2 x ~@3", C: "~@4 x ~@3 x!2 ~@6", D: "~ x ~@2", E: "~@4 x ~@3 x!2 ~@2 x ~ x!2",
  F: "~@2 x ~ x ~@3 x ~ x ~ x!2 ~@2",
})).gain(0.72)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@23 A ~@39 A ~@39 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@7 B ~@11>".pickRestart({
  A: "~@9 x!3 ~@4", B: "~@9 x!2 ~@5",
})).gain(0.4)

// drums · clap
const clap = s("cp").struct("<~@56 A@7 ~@33 A@7 ~ A@7 ~ A@7 ~ A@7 ~ A@7 ~ A@7 ~ A@7 ~ A@7 B ~@3>".pickRestart({
  A: "~@3 x", B: "~@13 x ~@2",
})).gain(0.56)

// drums · hihat
const hihat = s("hh").struct(`<
  A@15 B A@7 B A@7 B A@16 C A@14 B A@6 B A@8 D A@15 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 E F ~@2
>`.pickRestart({
  A: "x!8", B: "x!7 ~", C: "~ x!7", D: "x!3 ~ x!3 ~", E: "x ~ x ~ x ~ x ~ x ~@2 x ~ x ~@2", F: "x",
})).gain(0.48)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  A@15 B A@7 B A@7 B A@31 B A@6 B A@8 C A@15 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 B A@7 ~@4
>`.pickRestart({
  A: "~@3 x ~@3 x ~@3 x ~@3 x", B: "~@3 x ~@3 x ~@3 x ~@4", C: "~@3 x ~@7 x ~@4",
})).gain(0.32)

// drums · low tom
const low_tom = s("lt").struct("<~@160 x ~@2>").gain(0.8)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@15 A ~@7 A ~@7 A ~@31 A ~@6 A ~@8 B ~@15 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@11
>`.pickRestart({
  A: "~@7 x", B: "~@3 x ~@3 x",
})).gain(0.48)

// drums · crash
const crash = s("cr").struct("<~@48 x ~@110 [~@13 x ~@2] [~@3 x ~@12] ~@2>").gain(0.64)

// drums · congas
const congas = s("conga:18").struct("<~@47 [~@7 x] ~@47 [~@7 x] ~@67>").gain(2.56)

// drums · congas
const congas_2 = s("conga:33").struct("<~@47 [~@10 x!2 ~@4] ~@47 [~@10 x!2 ~@4] ~@67>").gain(2.56)

stack(
  epiano1, bass, percussive_organ, pad_choir, acoustic_guitar_steel, guitar_harmonics, kick, snare, snare_soft, clap,
  hihat, hihat_soft, low_tom, open_hat, crash, congas, congas_2
)