// Super Freak — Rick James
// 132 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 110 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(132/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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.

// bass · electric bass finger · "bass"
const bass = note(`<
  ~ A B A C A C A B A D A B E B A F A B A C A C A B A D A B E B A G H@2 I@5 A B A C A C A B A D A B E B A F A B A C A C
  A B A D A B E B A J H@2 I@5 A B A C A C A B A B A C A C A B A B K C A C A B A C A L M@3
>`.pickRestart({
  A: "d2@2 c2 b1 a1 ~@2 e1", B: "g1@2 ~@4 b1@2 a1@3 ~@5", C: "g1 ~@2 b1 a1 ~@3", D: "g1@3 ~@3 b1@2 a1@3 ~@5",
  E: "d2@4 c2@2 b1@2 a1@3 ~@3 e1@2", F: "g1@3 ~@3 b1@2 a1@2 ~@6", G: "g1@3 ~@3 b1@2 a1@2 g1@2 a1@2 ~@2",
  H: "f1@2 f2@2 g1@2 g2@2 a1@2 ~@5 f1", I: "[f1 f2 g1 g2 a1 ~@2 a1@14 ~@2 f1@8 e1@9]/5",
  J: "g1@3 ~@3 b1@2 a1@2 g1@2 a1@3 ~", K: "d2@4 c2@2 b1@2 a1 ~@5 e1@2", L: "g1@2 ~@4 b1@2 a1@7 ~", M: "[a0,a1]/3",
})).s("gm_electric_bass_finger").gain(0.64)

// chords · piano · "E Pno"
const piano = note("<~ A B@30 C ~@7 A B@6 C A B@22 C ~@7 A B@14 C A B@10 D ~@3>".pickRestart({
  A: "~@10 [a4,c5,e5] ~ [a4,c5,e5] ~@3", // Am
  B: "[~@2 [b4,d5,g5] ~ [b4,d5,g5] ~@5 [c5,e5,a5] ~ [c5,e5,a5]@8 ~@6 [a4,c5,e5] ~ [a4,c5,e5] ~@3]/2", // G Am
  C: "~@2 [b4,d5,g5] ~ [b4,d5,g5] ~@5 [c5,e5,a5] ~ [c5,e5,a5]@4", // G Am
  D: "~@2 [b4,d5,g5] ~ [b4,d5,g5] ~@5 [c5,e5,a5] ~ [c5,e5,a5] ~@3", // G Am
})).s("gm_piano").gain(0.19)

// other · pad poly · "Lead synth"
const pad_poly = note(`<
  ~@2 A ~ B ~ A ~ B ~@26 C@5 ~ A ~ B ~ A ~ B ~@26 C@5 ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ D@4
>`.pickRestart({
  A: "b5@5 ~ c6@10", B: "g5@5 ~ a5@10", C: "[~@7 a5@33]/5", D: "[g5@5 ~ a5@58]/4",
})).s("gm_pad_poly").gain(0.32)

// other · lead 2 sawtooth · "Synth2"
const lead_2_sawtooth = note("<~@25 A B A B A B A B ~@31 A B A B A B A B ~@38>".pickRestart({
  A: "c5!2 b4 a4!2 ~@2 c4", B: "g3 ~@2 c4 a3 ~@3",
})).s("gm_lead_2_sawtooth").gain(0.16)

// chords · electric guitar muted · "Mute Guitar"
const electric_guitar_muted = note("<~@33 A@2 B@5 ~@32 A@2 B@5 ~@31>".pickRestart({
  A: "[f3,a3] ~ [f3,a3]@2 [g3,a3] ~ [g3,a3]@2 [a3,c4]!2 [g#3,c4]@2 [a3,c4]@2 ~@2", // F Gsus2 Am G# Am
  B: "[[f3,a3] ~ [f3,a3]@2 [g3,a3] ~ [g3,a3]@2 [a3,c4] ~@5 [a2,e3]@26 ~@2 [g2,d3]@4 [f2,c3]@16 [e2,b2]@16 ~@2]/5", // F Gsus2 Am A5 G5 F5 E5
})).s("gm_electric_guitar_muted").gain(0.32)

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

// drums · snare
const snare = s("sd").struct("<A ~@32 B@3 ~@3 C ~@32 B@3 ~@3 C ~@27 D ~@3>".pickRestart({
  A: "~@3 x", B: "~ x ~ x", C: "~ x ~@2 x ~@3", D: "~@6 x!2",
})).gain(0.64)

// drums · clap
const clap = s("cp").struct("<~ [~ x ~ x]!32 ~@7 [~ x ~ x]!32 ~@7 [~ x ~ x]!27 [~ x ~@2] ~@3>").gain(0.8)

// drums · hihat
const hihat = s("hh").struct("<~ [x!8]!35 ~@4 [x!8]!35 ~@4 [x!8]!27 [x!6 ~@2] ~@3>").gain(0.64)

// drums · crash
const crash = s("cr").struct("<~ A ~@31 B C@2 ~ C@2 ~ A ~@31 B C@2 ~ C@2 ~ A ~@27 A ~@2>".pickRestart({
  A: "x", B: "x ~@6 x", C: "~@7 x",
})).gain(0.64)

// drums · vibraslap
const vibraslap = s("vibraslap:0").struct("<~@35 A ~@2 A ~@35 A ~ A ~@33>".pickRestart({
  A: "~@7 x",
})).gain(9.4)

stack(bass, piano, pad_poly, lead_2_sawtooth, electric_guitar_muted, kick, snare, clap, hihat, crash, vibraslap)