// So Pro Meu Prazer — Bruno
// 75 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 73 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(75/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 · piano
const piano = note(`<
  A B C D C B C E F G C D C G C G H I J K L M N O@5 P@4 Q@8 R@5 C B C D C B C G H I J K L M N S@2 T@8 U@2 ~
>`.pickRestart({
  A: "c4", B: "[f4,g4]@11 ~ g4@2 ~ g4, [f3,c4], ~@11 f4@3 f4@2", C: "[c3,c4,e4,g4]",
  D: "[f4,g4]@11 ~ g4@2 f4 g4, [f3,c4], ~@11 f4@3 ~@2", // Fsus2 F5
  E: "[f4,g4]@11 f5 [g4,g5]@2 [f4,f5] [g4,g5], [f3,c4], ~@11 f4@3 ~@2", F: "[c3,c4,e4,g4], c5@7 ~", G: "[f3,c4,f4,g4]",
  H: "e4@3 ~ a4 [e4,a4,c5]@3 e4@3 ~ a4 [e4,a4,c5]@2 ~, a3@15 ~, [a4,c5]@5 ~@3 [a4,c5]@5 ~@3, b4 ~@2 e4@2 ~@6 e4@2 ~@3", // Am
  I: "d4@3 ~ g4 [g4,b4]@3 d4@3 ~ g4 [d4,g4,b4]@2 ~, g3@15 ~, [g4,b4]@5 ~@3 [g4,b4]@5 ~@3, ~@3 d4@5 ~@3 d4@2 ~@3", // G
  J: "e4@3 ~ a4 [a4,c5]@3 e4@3 ~ a4 [e4,a4,c5]@2 ~, a3@15 ~, [a4,c5]@5 ~@3 [a4,c5]@5 ~@3, ~@3 e4@5 ~@3 e4@2 ~@3", // Am
  K: "d4@3 ~ g4 [g4,b4]@3 d4@3 ~ g4 [g4,b4]@2 ~, g3@15 ~, [g4,b4]@5 ~@3 [g4,b4]@5 ~@3, ~@3 d4@5 ~@3 d4@4 ~", // G
  L: "a4@6 ~ d5 ~@3 d5@2 a4@3, [d3,d4,c5], f5!2, ~@6 a4@7 ~@3", // D7
  M: "g4@6 ~@2 a4@3 ~@2 e4@2 ~, [c3,c4,b4,e5], b3 ~@5 e4@2 ~@8, ~@7 g4@4 g4@5", N: "[d3,d4,a4,c5,f5]",
  O: "[[d#3,d#4,g4,a#4,d#5]@3 [d3,d4,a4,d5,f5]@3 ~ [f3,c4,f4,g4]@17 [c3,c4,e4,g4]@16 [f4,g4]@11 ~ g4@2 ~ g4 [c3,c4,e4,g4]@16 [f3,c4,f4,g4]@8, ~@5 [f3,c4]@2 ~@3, ~@51 f4@3 f4@2 ~@24]/5", // D# Dm Fsus2 C Fsus2 C Fsus2 F5
  P: "[~@4 g4@2 f4 g4 [c3,c4,e4,g4]@16 [f3,c4,f4,g4]@16 [c3,c4,e4,g4]@16 [f3,c4,f4,g4]@8, ~@3 f4@3 ~@58]/4", // C Fsus2 C Fsus2
  Q: "[~@4 g4@2 ~ g4 [c3,c4,e4,g4]@16 [f3,c4,f4,g4]@16 [c3,c4,e4,g4]@16 [f3,c4,f4,g4]@15 ~ e4@3 ~@2 c5@3 e4@3 ~@2 c5@2 ~ d4@3 ~@2 b4@3 d4@3 ~ g4 [d4,g4,b4]@2 ~ e4@3 ~ a4 [a4,c5]@3 e4@3 ~ a4 [a4,c5]@3 [f4,a4] ~@4 b4@3, ~@3 f4@3 f4@2 ~@64 a3@15 ~ g3@15 ~ a3@15 ~ g3@8, ~@72 [a4,c5]@4 a4@4 [a4,c5]@4 a4@3 ~ [g4,b4]@4 g4@4 [g4,b4]@5 ~@3 [a4,c5]@5 ~@3 [a4,c5]@5 ~@3 [g4,b4]@4 g4@4, ~@75 e4@5 ~@3 e4@4 ~@4 d4@5 ~@3 d4@2 ~@6 e4@5 ~@3 e4@5 d4@3 d4@5]/8", // C Fsus2 C Fsus2 G Am F Am …
  R: "[d4@3 ~ g4 [g4,b4]@2 ~ a4@3 ~ c5 [a4,c5,f5]@3 ~@4 c5 [c5,f5]@2 ~ g4@3 ~ b4 [g4,b4,e5]@3 ~@4 b4 [b4,e5]@2 ~ [a4,d5]@3 ~ d5 [d5,f5]@3 [a4,d5,f5]@8 [d#3,d#4,g4,a#4,d#5]@3 [d3,d4,a4,d5,f5]@3 ~ [f3,c4,f4,g4]@17, [g4,b4]@5 ~@3 d4@10 ~ d4@4 ~ c4@10 ~ c4@4 ~ [c4,e5] ~@39, ~@3 d4@4 ~ d3@15 ~ c3@15 ~ [d3,d4,c5]@16 ~@24, ~@8 [c5,f5]@5 ~@7 a4@3 ~ [b4,e5]@5 ~@7 g4@3 ~ f5@5 ~@35, ~@11 a4@2 ~@3 [a4,c5,f5]@5 ~@3 b3 ~@2 g4@2 ~@3 [g4,b4,e5]@5 ~@6 a4@5 ~@32]/5", // G F F5 Em E5 D5 Dm D# …
  S: "[[d#3,d#4,g4,a#4,d#5]@3 [d3,d4,a4,d5,f5]@3 ~ [f3,c4,f4,g4]@25]/2", // D# Dm Fsus2
  T: "[~@8 [c3,c4,e4,g4]@15 ~ [f4,g4]@11 ~ g4@2 ~ g4 [c3,c4,e4,g4]@16 [f4,g4]@11 ~ g4@2 f4 g4 [c3,c4,e4,g4]@16 [f4,g4]@11 ~ g4@2 ~ g4 [c3,c4,e4,g4]@16 [f3,c4,f4,g4]@8, ~@24 [f3,c4]@16 ~@16 [f3,c4]@15 ~@17 [f3,c4]@16 ~@24, ~@35 f4@3 f4@2 ~@27 f4@3 ~@29 f4@3 f4@2 ~@24]/8", // C Fsus2 C Fsus2 C Fsus2 C Fsus2 …
  U: "[~@4 g4@2 f4 g4 [c3,c4,e4,g4]@24, ~@3 f4@3 ~@26]/2", // C
})).s("gm_piano").gain(0.17)

// bass · electric bass finger
const bass = note(`<
  ~@4 A B A B A B A B A B A B C D E F G H I J@8 K@6 L M L N O P Q@2 A B A B A B A R S T S U V W X Y@2 Z@7 AA@3 ~
>`.pickRestart({
  A: "c2@13 a2@3", B: "f2", C: "a1@5 g1 ~ g1 a1@5 c2 ~ c2", D: "g1@5 e1 ~ e1 g1@5 d1 ~ d1",
  E: "a1@5 g1 ~ g1 a1@5 d2 ~ d2", F: "g1@5 ~@2 e1 g1@6 b1 c2", G: "d2!2", H: "c2@8 c2 ~ c2@4 b1 c2",
  I: "d2@7 ~ d2 ~ d2@6", J: "[d#2@3 d2@4 f1@16 ~ c2@13 a2@3 f2@16 c2@13 a2@3 f2@16 c2@13 a2@3 f2@16 c2@8]/8",
  K: "[~@5 a2@3 f2@16 c2@13 a2@3 f2@16 c2@12 ~ a2@3 f2@16 a1@7 g1]/6", L: "a1 ~ a1@3 d2@3 g1@7 e1",
  M: "g1 ~ g1@3 e1 g1@2 a1@7 g1", N: "g1 ~ g1@4 c2@2 d2@7 c2", O: "d2 ~ d2@6 c2@7 a1", P: "c2 ~ c2@3 a1 c2@2 d2@7 c2",
  Q: "[d2 ~ d2@6 d#2@3 d2@4 f1@16 ~]/2", R: "f2@7 g1", S: "a1@7 g1 a1 ~ a1@3 d2@3", T: "g1@7 e1 [e1,g1] ~ g1@3 e1 g1@2",
  U: "g1@7 e1 g1 ~ g1@4 b1 c2", V: "d2@7 c2 d2 ~ d2@4 a1@2", W: "c2@7 a1 c2 ~ c2@6", X: "d2@7 c2 d2 ~ d2@6",
  Y: "[d#2@3 d2@4 f1@20 ~@5]/2", Z: "[~@8 c2@13 a2@3 f2@16 c2@13 a2@3 f2@16 c2@13 a2@3 f2@16 c2@8]/7",
  AA: "[~@5 a2@3 f2@16 c2@20 ~@4]/3",
})).s("gm_electric_bass_finger").gain(0.4)

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

// drums · snare
const snare = s("sd").struct(`<
  ~@3 A ~@3 B ~@7 C D@6 E ~ F ~@3 G ~@7 H D@6 I J ~@7 K D@6 E ~@2 F ~@3 L ~@3 I ~@2
>`.pickRestart({
  A: "~@4 x ~@2 x", B: "~@7 x", C: "~@12 x!3 ~", D: "~ x ~ x", E: "~@4 x ~@4 x ~@2 x!2 ~@2", F: "x ~@4 x ~@10",
  G: "~ x ~@2", H: "~@4 x!3 ~@5 x ~@3", I: "~ x ~@2 x!2 ~@10", J: "~@2 x!2", K: "~@4 x ~@2 x ~@2 x ~ x!3 ~",
  L: "~ x ~@2 x!3 ~@9",
})).gain(0.39)

// drums · clap
const clap = s("cp").struct("<~@22 A ~ B ~@3 C ~@14 B D ~@14 A ~@2 B ~@7 B ~@2>".pickRestart({
  A: "~@7 x", B: "~@3 x ~@4", C: "~@5 x ~@10", D: "~@13 x ~@2",
})).gain(0.39)

// drums · low tom
const low_tom = s("lt").struct("<~@3 A ~@3 A ~@16 B ~@37 B ~@10>".pickRestart({
  A: "~@13 x ~@2", B: "~ x ~@2",
})).gain(0.39)

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

// drums · open hat
const open_hat = s("oh").struct("<~@4 A@3 B A@7 B ~@8 C A@3 C A@7 ~@9 A@7 ~@10 C A@3 C A@3 ~@3>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "~@3 x",
})).gain(0.39)

// drums · tambourine
const tambourine = s("tb").struct("<~@4 A@19 ~ B A@11 C A@6 D ~ A@15 ~@2 B A@7 E ~@2>".pickRestart({
  A: "x!16", B: "~@8 x!8", C: "x!6 ~@2 x!8", D: "x!7 ~@9", E: "x!8 ~@8",
})).gain(0.29)

// drums · bongos
const bongos = s("bongo:4").struct("<~@8 x ~@36 x ~@27>").gain(1.02)

// drums · bongos
const bongos_2 = s("bongo:18").struct("<~@16 A ~@6 B ~@19 C ~@9 A ~@6 B ~@9 D ~@2>".pickRestart({
  A: "x", B: "x ~@2 x ~@3 x ~@8", C: "~@8 x ~@2 x ~@3 x", D: "~ x",
})).gain(1.02)

stack(piano, bass, kick, snare, clap, low_tom, hihat, open_hat, tambourine, bongos, bongos_2)