// Keep on Rockin' Me Baby — Miller
// 122 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 105 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): OVERDRIVE.
setcpm(122/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once.
// A part's distinct bars are riffs (A, B, C...) played in order: edit a riff to change every repeat.

// bass · electric bass finger · "FINGERDBAS"
const bass = note(`<
  ~@4 A B C D E B C F G H I J K L M N O P Q@2 K L R S Q T U V W X R Y Q@4 K L R S Q T U V W X R Y Q@2 ~@3 A B C D G H I
  J K L M N O P Q@2 K L R S Q T U V W X R Y Q@4 K L R S Q T ~@3 A B C D G H Z
>`.pickRestart({
  A: "~@10 bb1 ~ bb1 bb1@3", B: "c2@4 ~@6 c2@2 f2 f2@3", C: "c2@3 ~@5", D: "e2 f2@2 e2 f2@2 e2 f2@2 e2 f2@2 e2 f2@2 ~",
  E: "c2@4 ~@6 bb1 ~ bb1 bb1@3", F: "f2@2 ~ f2@2 ~ f2@3 e2 f2@2 e2@2 f2@2", G: "g1@2 bb1@2 c2@2 eb2@3 ~ bb1@2 c2@4",
  H: "g1@2 bb1@2 c2@2 eb2@4 bb1@2 c2@3 ~", I: "c2@2 c2 ~ c2@2 c2 ~ c2@2 c2 ~ c2 ~ c2 ~",
  J: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2@2", K: "bb1@2 bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~",
  L: "bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1@2", M: "f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1@2 f2@2 f1@2",
  N: "f2@2 f1@2 f1 ~ f1 ~ f1 ~ f1 ~ f1@2 bb1@2", O: "c2@2 c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~",
  P: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2@2 bb1@2", Q: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~",
  R: "f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1@2 f2@2 f1 ~", S: "f1 ~ f1 ~ f2@2 f1 ~ f1 ~ f1 ~ f1 ~ f1 ~",
  T: "c2 ~ c2 ~ c2 ~ c2 ~ c2@2 bb1 ~ bb1@2 b1@2", U: "c2 ~ c2 ~ c2 ~ c2@2 c2 ~ c2 ~ c2 ~ c2 ~",
  V: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ g2@2 c2 ~ c2 ~", W: "bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~",
  X: "bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1 ~ bb1@2 a1@2 g1 ~", Y: "f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1@2 bb1@2 b1@2", Z: "c2 ~@7",
})).s("gm_electric_bass_finger").gain(0.56)

// chords · electric guitar muted · "MUTED GTR"
const electric_guitar_muted = note(`<
  A B C D E B C D E B C D F G H@2 I@2 J K H L H M I N K O H P Q R S T U V W X H M I N K O H P Q R S T U V W Y B C D E B
  C D F G H@2 I@2 J K H L H M I N K O H P Q R S T U V W X H M I N K O H Z B C D E B C D F G AA
>`.pickRestart({
  A: "~@12 f3 ~@2 f3, ~@13 [bb2,f3]@2 ~, ~@7 bb2", B: "[c3,g3]@4 ~@8 f3 ~ f3@2, ~@13 c4@3", C: "[c3,g3] ~@3",
  D: "[f3,g3] [g3,a3] [c4,f4] [f3,g3] [g3,a3] [c4,f4] [f3,g3] [g3,a3] ~ [f3,g3] [g3,a3] ~ [f3,g3] [g3,a3] [c4,f4]@2, ~@8 [c4,f4]@2 ~ [c4,f4]@2 ~@3", // Fsus2 Gsus2 F5 Fsus2 Gsus2 F5 Fsus2 Gsus2 …
  E: "[c3,g3]@5 ~@5 [bb2,f3] ~ [bb2,f3] [bb2,f3]@2 ~", F: "g2@2 bb2@2 c3 ~ eb3@2 ~@2 bb2@2 c3@4",
  G: "g2@2 bb2@2 c3 ~ eb3@2 ~@2 bb2@2 c3@3 ~",
  H: "[c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~", // C5
  I: "[bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~", // Bb5
  J: "[f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ d3@2 [f2,c3] ~", // F5
  K: "[f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~ [f2,c3] ~", // F5
  L: "[c3,g3] ~ [c3,g3] ~ a3@2 [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,a3]@2 [c3,g3] ~", // C5 F C5
  M: "[c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3]@2 [c3,g3] ~ [c3,g3]@2 [c3,g3] ~", // C5
  N: "[bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3] ~ [bb2,f3]@2", // Bb5
  O: "[f2,c3] ~ [f2,c3] ~ [f2,d3]@2 c3 ~ [f2,c3] ~ [f2,c3] ~ f2@2 c3 ~, ~@12 d3 ~@3", // F5 Dm F5
  P: "[c3,g3] ~ [c3,g3] ~ [c3,a3]@2 g3 ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~", // C5 F C5
  Q: "[e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~", // C
  R: "[e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4]@2 [e3,g3,c4]@2", // C
  S: "[d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~", // Bb
  T: "[d3,f3,bb3]@2 [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~ [d3,f3,bb3] ~", // Bb
  U: "[c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3]@2", // F
  V: "[c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3]@2 [c3,f3,a3] ~ [c3,f3,a3] ~ [c3,f3,a3]@2 [c3,f3,a3] ~", // F
  W: "[e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4] ~ [e3,g3,c4]@2 [g3,c4]@2 [g3,c4] ~ [g3,c4]@2", // C C5
  X: "[g3,c4]@2 [g3,c4]@2 [a3,c4] ~ [bb3,c4]@4 [bb3,c4]@2 [a3,c4] ~ [g3,c4] ~", // C5 Am Bbsus2 Am C5
  Y: "[g3,c4]@2 [g3,c4]@2 [a3,c4] ~ [bb3,c4]@4 [bb3,c4]@2 [f3,a3,c4] [bb2,f3] [bb2,g3,c4] f3", // C5 Am Bbsus2 F Bb5 C7
  Z: "[c3,g3] ~ [c3,g3] ~ [c3,a3]@2 g3 ~ [c3,g3] ~ [c3,g3] ~@4 f3, ~@6 [c3,f3,g3] [bb2,c3,g3], ~@13 [bb2,f3]@2 ~", // C5 F C5 Csus4 C7 Bb5
  AA: "[c3,g3,c4]@3 ~@13", // C5
})).s("gm_electric_guitar_muted").gain(0.48)

// chords · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note("<~@30 A ~ B ~ C ~ A D ~@8 A ~ B ~ C ~ A E ~@25 A ~ B ~ C ~ A D ~@18>".pickRestart({
  A: "~@6 a4 ~", B: "~@6 g4 ~", C: "~@6 d4 ~", D: "~@6 g4 ~ [c4,g4] ~ g4 ~ g4 ~@3",
  E: "~@6 g4 ~ [c4,g4] ~ g4 ~ g4@2 ~@2", // C5
})).s("gm_overdriven_guitar").gain(0.56)

// drums · kick
const kick = s("bd").struct(`<
  A B C B C B C B C B C B D E F@40 B C B C B C B D E F@32 B C B C B C B D E G
>`.pickRestart({
  A: "~@7 x", B: "x ~@4 x ~@2", C: "x ~@4 x ~ x", D: "x ~@2 x ~ x ~ x", E: "x!2 ~ x ~ x ~ x", F: "x ~@3 x!2 ~ x",
  G: "x",
})).gain(0.71)

// drums · snare
const snare = s("sd").struct("<A B@5 C B@6 D B@15 D B@23 D B C B@6 D B@15 D B@15 D B C B@3 C B@2 D E>".pickRestart({
  A: "~@7 x", B: "~ x ~ x", C: "~@4 x ~@3 x ~ x ~@3 x!2", D: "~@4 x ~@9 x!2", E: "x",
})).gain(0.71)

// drums · snare · soft notes
const snare_soft = s("sd").struct(`<
  A ~@5 B ~@3 C ~@2 D ~@15 B ~@23 B ~ B ~@3 C ~@2 D ~@15 B ~@15 B ~ B ~ C ~ B ~@2 D ~
>`.pickRestart({
  A: "~@8 x!5 ~@3", B: "~@12 x!2 ~@2", C: "~@8 x!4 ~ x!2 ~", D: "~@10 x ~ x!2 ~@2",
})).gain(0.21)

// drums · low tom
const low_tom = s("lt").struct("<[~@6 x!2] ~@104>").gain(0.71)

// drums · hihat
const hihat = s("hh").struct("<~ [~ x ~ x]!13 [x!4]!40 [~ x ~ x]!9 [x!4]!32 [~ x ~ x]!9 ~>").gain(0.71)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@14 [~ x ~ x ~ x ~ x]!40 ~@9 [~ x ~ x ~ x ~ x]!32 ~@10>").gain(0.21)

// drums · mid tom
const mid_tom = s("mt").struct("<[~@8 x!2 ~ x ~@4] ~@104>").gain(0.71)

// drums · crash
const crash = s("cr").struct(`<
  ~ A B A B A B A B A B A C@2 B ~@15 B ~@7 B ~@7 B ~@7 A B A B A B A C@2 B ~@7 B ~@7 B ~@7 B ~@7 A B A B A B A C@2 B
>`.pickRestart({
  A: "x ~@9 x ~@2 x ~@2", B: "x", C: "x!2",
})).gain(0.71)

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

stack(
  bass, electric_guitar_muted, overdriven_guitar, kick, snare, snare_soft, low_tom, hihat, hihat_soft, mid_tom, crash,
  ride
)