// Theme From Electric Surfboard — Brother Jack McDuff
// 97 bpm, 4/4, key Bb minor. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
setcpm(97/4)

const chords = arrange(
  // intro (13 bars)
  [13, "<Bbm7!12 [Bb5 Db5 Eb5 E5]>"],
  // main theme (12 bars)
  [12, "<[Fm7b5@2 Bb7b9@2] Ebm7 C9 [Cb^7@2 F7@2] Gb^9 Cb7#11 Gb^9 Cb7#11 Fm7b5!2 Bb7#9!2>"],
  // secondary theme (22 bars)
  [22, "<[Fm7b5@2 Bb7b9@2] Ebm7 C9 [Cb^7@2 F7@2] Gb^9 Cb7#11 Gb^9 Cb7#11 Fm7b5 Bb7#9 Bbm7!4 [Eb7@2 D7@2] [Db7@2 Cm7b5@2] F9 [Bb7@2 Bb9sus@2] [Eb@2 Bb9sus@2]!3 Eb>"],
  // main theme (12 bars)
  [12, "<[Fm7b5@2 Bb7b9@2] Ebm7 C9 [Cb^7@2 F7@2] Gb^9 Cb7#11 Gb^9 Cb7#11 Fm7b5 Bb7#9 Bbm7!2>"],
  // solo (4 bars)
  [4, "<Bbm7!4>"],
  // fadeout (23 bars)
  [23, "<Bbm7!23>"],
)
const bassline = arrange(
  [13, "<bb2!12 [bb2 db2 eb2 e2]>"],
  [12, "<[f2@2 bb2@2] [eb2@2 db2@2] c2 [b2@2 f2@2] gb2 b2 gb2 b2 f2!2 bb2!2>"],
  [22, "<[f2@2 bb2@2] [eb2@2 db2@2] c2 [b2@2 f2@2] gb2 b2 gb2 b2 f2 bb2!5 [eb2@2 d2@2] [db2@2 c2@2] f2 bb2 [eb2@2 bb2@2]!3 eb2>"],
  [12, "<[f2@2 bb2@2] [eb2@2 db2@2] c2 [b2@2 f2@2] gb2 b2 gb2 b2 f2 bb2!3>"],
  [4, "<bb2!4>"],
  [23, "<bb2!23>"],
)

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