// Suzie Q — Creedence Clearwater Revival
// 128 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: duplicate parts dropped: ch 6 "Clean Gt." electric guitar clean (copy of ch 4 "Steel-str. Gt." acoustic guitar steel)
// note: Full arrangement: all 148 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): Steel-str. Gt., Steel-str. Gt., Overdrive Gt., Gt. Harmonics.
setcpm(128/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.

// bass · electric bass finger · "Fingered Bass"
const bass = note(`<
  ~@8 A@9 B C D A@5 B C D A@5 B C D A@5 B C D A E A@7 F A@3 B C D A@5 B C D A@3 G A H I G A H I G A H I G A H A@15 B C D
  A@5 B C D A@5 B C D A@3 G A H I G A J A G A H I G A K L M L@2 A@3 J N@2
>`.pickRestart({
  A: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~", B: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ g1 ~",
  C: "a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ b1 ~", D: "c2 ~ c2 ~ c2 ~ c2 ~ b1 ~ b1 ~ b1 ~ b1 ~",
  E: "e1 ~ e1 ~ e1 ~ b1@2 d2@2 b1@2 a1@2 g1@2", F: "e1 ~ e1 ~ e1 ~ d2@3 ~ b1@2 a1@2 g1@2",
  G: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e2@2", H: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e2@2 e1@2 e2@2",
  I: "e1@2 e2@2 e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~", J: "e1 ~ e1 ~ c#1 ~ c#1 ~ d1 ~ d1 ~ d#1 ~ d#1 ~",
  K: "e1 e2 c#1 c#2 d1 d2 d#1 d#2", L: "e1 ~ e1 ~ e1 ~ e2@2 e1 ~ e1 ~ e1 ~ e1 ~",
  M: "e1 ~ e1 ~ e1 ~ e2@2 e1 ~ e1 ~ e1 ~ e1@2", N: "[b2 a2 g2 a2 g2 e2 g2 e2 d2 e2 d2 b1 a1 b1 d2 e2@3 ~@14]/2",
})).s("gm_electric_bass_finger").gain(0.21)

// chords · piano · "piano 2"
const piano = note(`<
  ~@10 A@2 B@2 A@2 C@2 D E C@2 A@2 C@2 D E F G A@2 C@2 D E C@2 A@2 C@2 D E F G A@2 B@2 A@2 B@2 A@2 C@2 D E C@2 A@2 C@2 D
  E F G H@7 I@6 J@3 A@2 B@2 A@2 B@2 A@2 B@2 A@2 C@2 D E C@2 A@2 C@2 D E C@2 A@2 C@2 D E F G A@2 C@2 A@2 C@2 A@2 C@2 A@2
  F G K@4 A@2 F G L@2
>`.pickRestart({
  A: "[g#3,b3,d4]/2", B: "[[g#3,b3,d4]@13 [b3,d4,g#4]@3]/2", C: "[[g#3,b3,d4]@13 [b3,d4,g#4] ~@2]/2", D: "[a3,c#4,e4]",
  E: "[c4,e4,g4] [b3,d#4,f#4]", F: "[g#3,b3,d4]@7 a5", G: "g#5 d5 b4 [a4,c#6] [g#4,b5] [d4,g#5] [b3,d5]@2",
  H: "[[g#3,b3,d4]@12 ~@2 d4 [b3,d4,g#4]@13 ~@2 g#4 [d4,g#4,b4]@13 ~@2 b4 [b3,d4,g#4]@9, ~@12 g#3@3 ~@14 d4@2 ~@13 d4@3 ~@9, ~@26 b3@4 ~@26 b3@6 ~@28 g#4@4 a4 ~@17]/7", // G#dim
  I: "[~@6 g#4 [g#3,b3,d4]@13 ~@2 d4 [b3,d4,g#4]@13 ~@2 g#4 [d4,g#4,b4]@9, ~@4 b3@3 ~@13 g#3@3 ~@13 b3@3 ~@9, ~@10 d4@4 ~@28 b3@4 f#4 ~@27 d4@4 ~@18]/6", // G#dim
  J: "[~@12 b4@2 [b3,d4,g#4]@27 ~@5 g#4@2, ~@4 d4@3 ~@14 b3@3, ~@5 g#4@2 ~@15 d4@2]/3", // G#dim
  K: "[[g#3,b3,d4]@3 [b3,d4,g#4]@4 [d4,g#4,b4]@4 [b3,d4,g#4]@4 [g#3,b3,d4]@4 [b3,d4,g#4]@4 [d4,g#4,b4]@4 [b3,d4,g#4]@5]/4", // G#dim
  L: "[b4 a4 g4 a4 g4 e4 g4 e4 d4 ~ d4 b3 a3 b3 d4 [b3,e4,g4]@3 ~@14, ~@9 e4@2 ~@21]/2", // Em
})).s("gm_piano").gain(0.18)

// chords · electric guitar muted · "Muted Gt."
const electric_guitar_muted = note(`<
  ~@18 A B ~@6 A B ~@2 C@4 A B C@6 A B C@2 ~@12 A B ~@6 A B ~@18 C@4 ~@12 A B ~@6 A B ~@6 A B ~@2 C@24 D ~
>`.pickRestart({
  A: "[a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [b2,f#3] ~", // A5 B5
  B: "[c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [c3,g3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~", // C5 B5
  C: "[e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~", // E5
  D: "b3 a3 g3 a3 g3 e3 g3 e3 d3 e3 d3 b2 a2 b2 d3 ~",
})).s("gm_electric_guitar_muted").gain(0.1)

// chords · distortion guitar · "Distortion Gt."
const distortion_guitar = note(`<
  ~@6 A B A B A B A B A B A C D E A C A B A C D E A C F@4 D E F@6 D E F@2 A B A B A B A B A B A C D E A C A B A C D E A
  C G@8 H@7 I@2 F@3 A B A B A B A B A B A C D E A C A B A C D E A C A B A C D E A C F@24 J@2
>`.pickRestart({
  A: "e2@2 ~@2 d4 ~@3 a3 ~ g3@4 d3@2", B: "e3 d3 e3 a2 b2 d3 g2@2", C: "e3 d3 e3 b2 d3 b2 a2 g2",
  D: "[a2,e3]@7 [b2,f#3]", E: "[c3,g3] [b2,f#3]",
  F: "[e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~ [e2,b2] ~", // E5
  G: "[e2 ~ e3 ~ g3@2 ~ a#2@2 d3 b2 ~ a2 g2 ~ d2]/2",
  H: "[e2@2 ~@2 e3@2 ~@2 g3@2 ~@2 e3@2 g3@4 e3 ~ e3 ~ e3@2 d3@2 e3@2 a#2@2 b2@6 e3@2 ~@2 g3@2 ~@2 e3@2 g3@4 e3 ~ e3 ~ e3@2 d3@2 e3@2 a#2@2 b2@6 e3@4 g3@2 ~@2 e3@2 g3@4 e3 ~ e3 ~ e3@2 d3@2 e3@2 a#2@2 b2@6 e3@4 g3@2 ~@2 e3@2 g3@2]/7",
  I: "[~@2 e3 ~ e3 ~ e3@2 d3@2 e3@2 d#3@2 e3@14 ~@4]/2",
  J: "[b3 a3 g3 a3 g3 e3 g3 e3 d3 e3 d3 b2 a2 b2 d3 e3@3 ~@14]/2",
})).s("gm_distortion_guitar").gain(0.15)

// chords · electric guitar clean · "Clean Gt."
const electric_guitar_clean = note(`<
  ~@8 A@10 B C A@6 B C A@6 B C A@6 B C A@2 ~@2 A@10 B C A@6 B C A@22 ~@2 A@10 B C A@6 B C A@6 B C A@26 ~@2
>`.pickRestart({
  A: "~@4 [b3,d4,g#4] ~@7 [b3,d4,g#4] ~@3", B: "~@4 [c#4,e4,a4] ~@7 [c#4,e4,a4] ~@3",
  C: "~@4 [e4,g4,c5] ~@7 [d#4,f#4,b4] ~@3", // C B
})).s("gm_electric_guitar_clean").gain(0.12)

// other · guitar harmonics · "Gt. Harmonics"
const guitar_harmonics = note("<~@36 [~@14 a4 ~] ~@111>").s("gm_guitar_harmonics").gain(0.18)

// other · overdriven guitar · "Overdrive Gt."
const overdriven_guitar = note(`<
  ~@30 A B C D E@2 F G H I J K I L M@3 ~@75 N@2 O P Q R S T U@2 V W X Y Z AA AB@8 AC@2
>`.pickRestart({
  A: "e4@7 ~@2 d4 b3@2 d4@4, ~@4 e4 ~@3", B: "~@2 d4@2 e4@2 d4@2 e4@3 ~ e4@3 ~",
  C: "~ d4 b3@2 d4@2 e4@4 g4@2 a4@2 g4@2, e4 ~@7", D: "a4@2 e5 d5 e5 a4@2 g4",
  E: "[a4@4 a4@2 g4@2 a4@2 g4@4 a4@6 a#4 a4@3 a#4@2 g4@2 e4@2 d4@2]/2", F: "e4@4 g4@2 a4 ~ a4@2 ~ a4@2 ~ a4 ~",
  G: "a4 ~ g4 [g#4,a4] a#4 [g#4,a4] g4@2 a4@2 g4@2 e4@2 d4@2", H: "d4 e4@2 ~ e4@3 ~ e4 d4 b3@2 d4@2 e4@2",
  I: "g4@3 ~ g4@3 ~ g4@3 ~ g4@3 ~", J: "g4@3 ~ g4 ~ g4 [f4,f#4] e4@4 d4@2 e4@2", K: "e4 ~ e4 d4 b3@2 d4@4 e4@4 e4@2",
  L: "g4@5 [f4,f#4] e4@2 d4@2 a#3@2 a3@2 g3@2", M: "[e3@23 ~]/3", N: "[~@4 e4@14 ~@2 d4@2 e4 ~ e4@4 d4@4]/2",
  O: "e4 d4 b3@2 d4@5 ~ d4@2 e4@2 d4@2", P: "e4@3 ~ e4 d4 b3@2 g4@3 ~ g4@3 ~", Q: "g4@3 e4 d4@4",
  R: "e4@3 ~ e4@2 b3@4 d4@2 e4@2 d4@2, ~@6 d4 ~@9", S: "g4@2 e4 d4 [b3,e4]@2 d4@4 b3@2 d4@2 e4@2",
  T: "g4 a4 b4 a4 b4 a4 e5 d5", U: "[d5@3 ~ a4 g4 e4@2 g4@2 a4 ~ a4 g4 e4 g4@3 a4@4 e5@2 a4@4 e5@4]/2",
  V: "g4@2 a4 g4 a4 g4 f#4 g4", W: "a4 g4 a4@2 e5 d5 e5 g5", X: "g#5@3 ~@3 e5@2 d5@2 e5 ~ a#4 [g4,a4] e4@2",
  Y: "g#4 [a4,a#4] b4@2 a4 g4 e4 g4 a4 g4 a4 g4 a4 g4 a4 g4", Z: "a4@3 [e4,g4] g4@2 e4@6 g4 a4@3",
  AA: "e5 d5 e5 d5 e5 d5 e5 d5", AB: "[g5@2 ~@2 e5 [b4,d5] e5@2 a4@4 g4@2 g5@4 e5 d5 [b4,e5]@2 a4@4 g4@2 e4@2 e5@2]/2",
  AC: "[a5@2 g5 a5 g5 e5 g5 e5 d5 e5 d5 b4 a4 b4 d5 e5@4 ~@13]/2",
})).s("gm_overdriven_guitar").gain(0.22)

// other · pad sweep · "Sweep Pad"
const pad_sweep = note("<~@46 A@4 ~@98>".pickRestart({
  A: "g4/4",
})).s("gm_pad_sweep").gain(0)

// drums · kick
const kick = s("bd").struct(`<
  A@13 B A@15 B C A@14 B C A@6 B C A@14 B C A@8 B A B A B A B C A@26 B C B A B@3 A@2 C A@2 B A@4 C A@15 D ~
>`.pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~@2", C: "x!2 ~ x ~ x ~ x", D: "~@15 x",
})).gain(0.45)

// drums · snare
const snare = s("sd").struct("<[~ x ~ x]!121 [~ x!3] [~ x ~ x]!24 [~ x!2 ~ x!2 ~ x!2 ~ x!2 ~@4] ~>").gain(0.45)

// drums · pedal hat
const pedal_hat = s("hh").struct("<[~ x!3] [x!4]!145 ~@2>").gain(0.35)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@13 A ~@15 A ~@15 A ~@7 A ~@15 A ~@9 A ~ A ~ A ~ A ~@27 A ~ A ~ A@3 ~@5 A ~@20 B ~
>`.pickRestart({
  A: "~@7 x", B: "~@6 x ~@2 x ~@4 x ~",
})).gain(0.45)

// drums · high tom
const high_tom = s("ht").struct("<~@146 [x ~@2 x ~@8 x!2 ~@2] ~>").gain(0.45)

// drums · crash
const crash = s("cr").struct(`<
  ~@30 A ~@15 A ~@7 A ~@15 A B ~ B ~ B ~ B ~@8 A ~@27 A ~@7 A ~@7 A ~@7 C@8 D E
>`.pickRestart({
  A: "x", B: "~@7 x", C: "~@3 x ~@4", D: "~@15 x", E: "~@3 x ~@12",
})).gain(0.4)

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

// drums · tambourine
const tambourine = s("tb").struct("<[~ x ~ x]!146 ~@2>").gain(0.5)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<[~ x ~@14]!146 ~@2>").gain(1.01)

// drums · shaker
const shaker = s("sh").struct("<[~@3 x ~@9 x ~ x]!146 ~@2>").gain(0.3)

stack(
  bass, piano, electric_guitar_muted, distortion_guitar, electric_guitar_clean, guitar_harmonics, overdriven_guitar,
  pad_sweep, kick, snare, pedal_hat, mid_tom, high_tom, crash, ride, tambourine, cabasa, shaker
)