// Stop The Wedding — Etta James
// 88 bpm, 12/8, key Bb major. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
setcpm(88/6)

const chords = arrange(
  // intro (5 bars)
  [5, "<Bb!2 [F7@6 Bb@6] Bb ~>"],
  // verse (16 bars)
  [16, "<Bb!2 Eb!2 F Eb [Bb@6 Eb@6] Bb!2 Bb7 Eb!2 F Eb [Bb@6 Eb@6] [Eb@3 Bb@9]>"],
  // chorus (12 bars)
  [12, "<Bb D Eb Eo [Bb@6 Gm7@6] [Cm7@6 F7@6] [Bb@6 Eb@6] [Bb@6 F7@6] [Bb@6 Gm7@6] [Cm7@6 F7@6] [Bb@6 Eb@6] [Bb@6 F7@6]>"],
  // outro (4 bars)
  [4, "<[Bb@6 Gm7@6] [Cm7@6 F7@6] [Bb@6 Eb@6] [Bb@3 Gm@3 F7@6]>"],
  // fadeout (5 bars)
  [5, "<[Bb@6 Gm7@6] [Cm7@6 F7@6] [Bb@6 Eb@6] [Bb@3 Gm@3 F7@6] Bb>"],
)
const bassline = arrange(
  [5, "<bb2!2 [f2@6 bb2@6] bb2 ~>"],
  [16, "<bb2!2 eb2!2 f2 eb2 [bb2@6 eb2@6] bb2!3 eb2!2 f2 eb2 [bb2@6 eb2@6] bb2>"],
  [12, "<bb2 d2 eb2 e2 [f2@6 g2@6] [c2@6 f2@6] [bb2@6 eb2@6] [bb2@6 f2@6] [bb2@6 g2@6] [c2@6 f2@6] [bb2@6 eb2@6] [bb2@6 f2@6]>"],
  [4, "<[bb2@6 g2@6] [c2@6 f2@6] [bb2@6 eb2@6] [bb2@3 g2@3 f2@6]>"],
  [5, "<[bb2@6 g2@6] [c2@6 f2@6] [bb2@6 eb2@6] [bb2@3 g2@3 f2@6] bb2>"],
)

// 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 hh] [sd hh hh] [bd hh hh] [sd hh hh]").gain(0.8)

stack(keys, bass, drums)