// That's The Way I Feel About Cha — Bobby Womack
// 70 bpm, 4/4, key D major. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
setcpm(70/4)

const chords = arrange(
  // intro (4 bars)
  [4, "<G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7]>"],
  // verse (16 bars)
  [16, "<G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7] G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7] G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7] G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7]>"],
  // chorus (16 bars)
  [16, "<G!2 [D^7@2 A7@2] Bm7 Em7 A7 [D6@2 A7@2] [Bm7@3 F#] Bm9 [Bm9@2 E7@2] [G^7@2 Bm7@2] [Em7@3 F#] Bm9 [Bm9@2 E7@2] G^7 G>"],
  // verse (8 bars)
  [8, "<G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7] G^7 D6 [G^7 D6 Em7 A7sus] [D^7@2 Em7 A7]>"],
  // chorus (12 bars)
  [12, "<G!2 [D^7@2 A7@2] Bm7 [Em7@2 G@2] A7 [D6@2 A7@2] Bm7 [Em7@2 G@2] A7 [D6@2 A7@2] Bm7>"],
  // fadeout (8 bars)
  [8, "<[Em7@2 G@2] A7 [D6@2 A7@2] Bm7 [Em7@2 G@2] A7 [D6@2 A7@2] Bm7>"],
)
const bassline = arrange(
  [4, "<g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2]>"],
  [16, "<g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2] g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2] g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2] g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2]>"],
  [16, "<a2!2 [d2@2 a2@2] b2 e2 a2 [d2@2 c#2@2] [b2@3 f#2] b2 [b2@2 e2@2] [g2@2 b2@2] [e2@3 f#2] b2 [b2@2 e2@2] g2 a2>"],
  [8, "<g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2] g2 d2 [g2 f#2 e2 a2] [d2@2 e2 a2]>"],
  [12, "<a2!2 [d2@2 a2@2] b2 [e2@2 g2@2] a2 [d2@2 c#2@2] b2 [e2@2 g2@2] a2 [d2@2 c#2@2] b2>"],
  [8, "<[e2@2 g2@2] a2 [d2@2 c#2@2] b2 [e2@2 g2@2] a2 [d2@2 c#2@2] b2>"],
)

// chords · gm_piano
const keys = chord(chords).voicing().s("gm_piano").gain(0.8)
// bass · gm_electric_bass_finger
const bass = note(bassline).s("gm_electric_bass_finger").gain(0.9)
// drums
const drums = s("[bd hh] [sd hh] [bd hh] [sd hh]").gain(0.8)

stack(keys, bass, drums)