// Piece of Pie — Stone Temple Pilots
// 72 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 98 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(72/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 · overdriven guitar · "Dean (heavy/clean)"
const overdriven_guitar = note(`<
  A B C A D@4 E@6 D E F G H I H I H I H I B C E@6 D E F G H I H I H I H I ~@52
>`.pickRestart({
  A: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3]!2 ~@3 [b3,e4]@6, ~@7 [e2,b2,e3]@9", // A5 G5 E5 F#5 G5 E5
  B: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3]!2 ~@3 [b3,e4]@2 [b3,e4]@4, ~@7 [e2,b2,e3]@9, ~@5 a#3@3", // A5 G5 E5 F#5 G5 E5
  C: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3]!2 ~@3 [b3,e4] ~ a#3@4, ~@7 [e2,b2,e3]@9, ~@11 [a3,b3,e4]@5", // A5 G5 E5 F#5 G5 E5 Asus2
  D: "[a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [g2,d3,g3] [e2,b2,e3]!2 [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [g2,d3,g3] [e2,b2,e3]!2 [e2,b2,e3,a#3]@2 [e2,b2,e3,b3]@2", // A5 G5 E5 G5 E5 A5 G5 E5 …
  E: "[a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [g2,d3,g3] [e2,b2,e3]!2 [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [g2,d3,g3] [e2,b2,e3]!2 [a#3,b3,e4]@2 [b3,e4]@2", // A5 G5 E5 G5 E5 A5 G5 E5 …
  F: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3] ~@3 [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3] ~@2", // A5 G5 E5 F#5 G5 A5 G5 E5 …
  G: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3]!2 [e2,b2,e3]@2 ~ [b3,e4]@6, ~@9 [e2,b2,e3]@7", // A5 G5 E5 F#5 G5 E5
  H: "[g2,d3,g3] [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3]@2 [e2,b2,e3] ~ [e2,b2,e3] b2 c#3 [d3,a3]@2 [c#3,a3]@2", // G5 G#5 E5 Adim E5 D5 F#m
  I: "[g2,d3,g3] [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3]@2 [g2,d3,g3] ~ [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3] [b2,e3,b3]@2", // G5 G#5 E5 Adim E5 G5 G#5 E5 …
})).s("gm_overdriven_guitar").gain(0.15)

// chords · electric guitar clean · "Dean (heavy/clean)"
const electric_guitar_clean = note("<~@46 A@8 ~@26 B C D@7 E@8 ~>".pickRestart({
  A: "[~@27 e2@2 ~@27 [d2,f#2,c3,e3]!8, f2@3 f2@4 f#2@7 d3 e2 c2 e2@2 a#2@2 c2 a#2@5 [b2,e3]@2 e2 e3@12 d3 f2@8 a#2@2 c2 a#2@10, ~ b2@7 f2@2 d3 f2@12 c2@8 e2@9 f2 b2@9 d3@14, ~@2 d3@3 a#2@7 e2 g#2@11 d2@8 f2 b2 d3 f2 f#2 a#2@7 e2 g#2@10 c2@9, ~@4 f#2@2 d3@3 b2@9 d3@7 c3@13 d3 f#2@7 d3 e2 c2 e2@15]/8", // D7 E5
  B: "~@7 f#2, f2@3 f2@5, ~ b2@7, ~@2 d3@3 a#2@3, ~@2 f#2 d3",
  C: "~@7 e2, f2@3 f2@5, ~ b2@7, ~@2 d3@3 g#2@3, ~@2 e2 d3",
  D: "[~@11 e2@2 ~@30 e2@2 ~@10 f#2, c2@5 c2@2 c2@8 e2@9 f2 b2@9 d3@7 c3@7 f2 b2 d3 f2 f#2 a#2 d3@2, ~ e2@7 d2@8 f2 b2 d3 f2 f#2 a#2@7 e2 g#2@11 d2@16, ~@2 d3@7 c3@13 d3 f#2@7 d3 e2 c2 e2@2 a#2@2 c2 a#2@5 [b2,e3]@2 e2 e3@10, ~@3 a#2@3 a#2@5 [b2,e3]@2 e2 e3@12 d3 f2@12 c2@8 e2@9]/7", // E5
  E: "[~@19 e2@2 ~@30 [e2,b2,e3]@13, f2@3 f2@8 a#2@2 c2 a#2@5 [b2,e3]@2 e2 e3@12 d3 f2@8 a#2@2 c2 a#2@16 ~@2, ~ b2@9 d3@7 c3@9 d3 f2 f#2 a#2@7 e2 g#2@11 d2@16, ~@2 d3@3 g#2@11 d2@8 f2 b2@5 d3 f#2@7 d3 e2 c2 e2@6 c2@16 ~, ~@4 e2@2 d3 e2 c2 e2@6 c2@8 e2@9 f2 b2@9 d3@7 c3@15]/8", // E5
})).s("gm_electric_guitar_clean").gain(0.26)

// chords · piano · "Dean (heavy/clean)"
const piano = note("<~@54 A@8 B C D E D E D E D F D E D E D E D E ~@18>".pickRestart({
  A: "[a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [g2,d3,g3] [e2,b2,e3]!2 [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [g2,d3,g3] [e2,b2,e3]!2 [e2,b2,e3,a#3]@2 [e2,b2,e3,b3]@2", // A5 G5 E5 G5 E5 A5 G5 E5 …
  B: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3] ~@3 [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3] ~@2", // A5 G5 E5 F#5 G5 A5 G5 E5 …
  C: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [f#2,c#3,f#3] [g2,d3,g3]!2 [e2,b2,e3]@2 ~ [b3,e4]@6, ~@9 [e2,b2,e3]@7", // A5 G5 E5 F#5 G5 E5
  D: "[g2,d3,g3] [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3]@2 [e2,b2,e3] ~ [e2,b2,e3] b2 c#3 [d3,a3]@2 [c#3,a3]@2", // G5 G#5 E5 Adim E5 D5 F#m
  E: "[g2,d3,g3] [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3]@2 [g2,d3,g3] ~ [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3] [b2,e3,b3]@2", // G5 G#5 E5 Adim E5 G5 G#5 E5 …
  F: "~ [a2,e3,a3] [g2,d3,g3] [e2,b2,e3] [a2,d3,a3] [b2,e3,b3]@2 [g2,d3,g3] ~ [g#2,d#3,g#3] [e2,b2,e3]!2 [a2,d#3,a3] [b2,e3,b3] [b2,e3,b3]@2", // A5 G5 E5 D5 E5 G5 G#5 E5 …
})).s("gm_piano").gain(0.15)

// bass · electric bass pick · "Robert (bass)"
const bass = note(`<
  A@3 B C@12 D E F G F G F G F G A@2 C@8 D E F G F G F G F G H I J K H I J L C@8 D A F G F G F G F M F G F G F G F G
  ~@18
>`.pickRestart({
  A: "~ a1 g1 e1 f#1 g1!2 e1@9", B: "~ a1 g1 e1 f#1 g1!2 e1@8 ~", C: "a1 g1 e1 g1 e1!2 a1 g1 e1 g1 e1!2 e1@2 e1@2",
  D: "~ a1 g1 e1 f#1 g1 ~@3 a1 g1 e1 f#1 g1 ~@2", E: "~ a1 g1 e1 f#1 g1!2 e1@3 e2@5 ~",
  F: "g1 g#1 e1!2 a1 b1@2 e1 ~ e1 b1 c#2 d2@2 c#2@2", G: "g1 g#1 e1!2 a1 b1@2 g1 ~ g#1 e1!2 a1 b1 b1@2",
  H: "d2!8 c#2!8", I: "c2!8 b1!8", J: "a#1@7 ~ a#1 ~ g1 a#1 ~ g1 a#1 c2", K: "d2!2 ~ e2@5",
  L: "a1 g1!2 a1 g1!2 a1 g1!2 a1 g1!2 a1 g1 a1 d2", M: "~ a1 g1 e1 a1 b1@2 g1 ~ g#1 e1!2 a1 b1 b1@2",
})).s("gm_electric_bass_pick").gain(0.23)

// bass · fretless bass · "Robert (bass)"
const bass_2 = note("<~@80 A B C D A B C D A B C D A B C E@2 ~>".pickRestart({
  A: "d2!8 c#2!8", B: "c2!8 b1!8", C: "a#1@7 ~ a#1 ~ g1 a#1 ~ g1 a#1 c2", D: "d2!2 ~ e2@5",
  E: "[d2@2 d2@2 ~@2 e2@25 ~]/2",
})).s("gm_fretless_bass").gain(0.3)

// chords · overdriven guitar · "Background Guitar"
const overdriven_guitar_2 = note("<~@46 A B C D A B C ~@27 A B C D A B C D A B C D A B C E@2 ~>".pickRestart({
  A: "[d4,a4,d5] [c#4,g#4,c#5]", B: "[c4,g4,c5] [b3,f4,b4]", C: "[a#3,f4,a#4]@15 ~",
  D: "[d4,a4,d5] [d4,a4,d5]@2 [e4,b4,e5]@5", E: "[[d4,a4,d5]@2 [d4,a4,d5]@4 [e4,b4,e5]@25 ~]/2",
})).s("gm_overdriven_guitar").gain(0.17)

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

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

// drums · hihat
const hihat = s("hh").struct("<A@3 B ~@12 C ~@9 A B ~@8 C ~@25 C ~@35>".pickRestart({
  A: "x ~@6 x", B: "x", C: "~@3 x ~@3 x",
})).gain(0.56)

// drums · mid tom
const mid_tom = s("mt").struct("<A@4 ~@12 B C ~@8 A@2 ~@8 B C ~@15 D ~@8 B C ~@27 E ~@6>".pickRestart({
  A: "~@4 x!4 ~@8", B: "~ x ~ x", C: "~ x ~@2", D: "~ x!5 ~ x ~@8", E: "~@10 x ~ x!2 ~@2",
})).gain(0.56)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@4 A B@11 C D A B@7 ~@2 B@8 C D A B@7 ~@8 A B@7 C D A B@7 A B@3 A B@3 ~@12 E@3 ~@3
>`.pickRestart({
  A: "~ x!7", B: "x!8", C: "~ x!2 ~@2 x ~@3 x!2 ~@2 x ~@2", D: "~ x!2 ~@13", E: "~ x ~ x ~ x ~ x",
})).gain(0.8)

// drums · high tom
const high_tom = s("ht").struct("<A@4 ~@12 B A ~@8 A@2 ~@8 B A ~@15 C ~@8 B A ~@27 D ~@6>".pickRestart({
  A: "~ x!4 ~@11", B: "~ x!4 ~@4 x!4 ~@3", C: "x ~@2 x ~@2 x ~@9", D: "~@8 x!4 ~@4",
})).gain(0.8)

// drums · splash
const splash = s("cr").struct(`<
  A@4 B ~@3 B ~@3 B ~@3 B A B ~@2 C B ~@2 C A@2 B ~@3 B ~@3 B A B ~@2 C B ~@2 C B@3 D B@3 ~ B ~@7 B A B ~@2 C B ~@3 B
  ~@2 C B ~@2 C B@3 D B E B D B@3 F G@3 D ~@2
>`.pickRestart({
  A: "~@7 x ~@4 x ~@3", B: "x", C: "~@3 x", D: "x!2 ~ x ~@4", E: "x ~@12 x ~ x", F: "x ~ x ~@3 x ~@7 x!2", G: "x!4",
})).gain(0.8)

// drums · ride
const ride = s("rd").struct("<~@46 A@3 ~ A@3 ~@27 A@3 ~ A B A ~ A@3 ~@7>".pickRestart({
  A: "x!8", B: "x!7 ~",
})).gain(0.8)

stack(
  overdriven_guitar, electric_guitar_clean, piano, bass, bass_2, overdriven_guitar_2, kick, snare, hihat, mid_tom,
  open_hat, high_tom, splash, ride
)