// That Old Black Magic — Louis Prima & Keely Smith
// 248 bpm, 4/4, key C major. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
setcpm(248/4)

const chords = arrange(
  // intro (8 bars)
  [8, "<~!2 C!6>"],
  // verse (16 bars)
  [16, "<C!6 Dm7!8 C!2>"],
  // verse (16 bars)
  [16, "<C!6 F!3 [F@2 Fm@2] C6 Co Dm7 G7 C!2>"],
  // bridge (16 bars)
  [16, "<Am!2 B7!2 E7!2 A7!2 Dm7!2 Fm6!2 ~ Dm7b5 ~!2>"],
  // interlude (8 bars)
  [8, "<~!2 C!6>"],
  // verse (40 bars)
  [40, "<C!4 C7!4 F!2 Dm!2 Dm7 [Dm7@2 Fm6@2] Em7 [Em7@2 F#o@2] Dm7!2 Dm7b5!4 C!2 Dm7!2 Dm7b5!2 Dm7 G7sus C!2 Dm7!2 Dm7b5!2 Dm7!2 C!2>"],
  // bridge (16 bars)
  [16, "<Am!2 B7!2 E7!2 A7!2 Dm7!2 Fm6!2 ~ Dm7b5 ~!2>"],
  // interlude (8 bars)
  [8, "<~!2 C!6>"],
  // verse (50 bars)
  [50, "<C!4 C7!4 F!2 Dm!2 F6 [F6@2 Fm6@2] Em7 [Em7@2 F#o@2] Dm7!2 Do!3 G7 C!2 Dm7!2 Dm7b5!2 Dm7!2 C!2 Dm7!2 Dm7b5!2 Dm7!2 C!2 Dm7!2 Dm7b5!2 C!6>"],
)
const bassline = arrange(
  [8, "<~!2 c2!6>"],
  [16, "<c2!6 d2!8 c2!2>"],
  [16, "<c2!6 f2!3 [f2@2 ab2@2] g2 c2 d2 g2 c2!2>"],
  [16, "<a2!2 b2!2 e2!2 a2!2 d2!2 f2!2 ~ d2 ~!2>"],
  [8, "<~!2 c2!6>"],
  [40, "<c2!8 f2!2 d2!2 a2 [a2@2 ab2@2] g2 [g2@2 f#2@2] d2!6 c2!2 d2!5 g2 c2!2 d2!6 c2!2>"],
  [16, "<a2!2 b2!2 e2!2 a2!2 d2!2 f2!2 ~ d2 ~!2>"],
  [8, "<~!2 c2!6>"],
  [50, "<c2!8 f2!2 d2!2 a2 [a2@2 ab2@2] g2 [g2@2 f#2@2] d2!5 g2 c2!2 d2!6 c2!2 d2!6 c2!2 d2!4 c2!6>"],
)

// 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)