// Paper Roses — Marie Osmond
// 114 bpm, 4/4, key Ab major. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
setcpm(114/4)

const chords = arrange(
  // intro (8 bars)
  [8, "<Db!2 Ab Fm Bbm Eb7 Ab Eb>"],
  // verse (16 bars)
  [16, "<Ab!2 Eb7!4 Ab!4 Db!2 Eb7!2 Ab!2>"],
  // chorus (16 bars)
  [16, "<Db!2 Ab!2 Bbm Eb7 Ab Ab7 Db [Db@2 Eb@2] Ab Fm Bbm Eb7 Ab E7>"],
  // verse (16 bars)
  [16, "<A!2 E7!4 A!4 D!2 E7!2 A!2>"],
  // chorus (18 bars)
  [18, "<D!2 A!2 Bm E7 A A7 D [D@2 E@2] A F#m Bm!2 E7 A!3>"],
)
const bassline = arrange(
  [8, "<db2!2 ab2 f2 bb2 eb2 ab2 eb2>"],
  [16, "<ab2!2 eb2!4 ab2!4 db2!2 eb2!2 ab2!2>"],
  [16, "<db2!2 ab2!2 bb2 eb2 ab2!2 db2 [db2@2 eb2@2] ab2 f2 bb2 eb2 ab2 e2>"],
  [16, "<a2!2 e2!4 a2!4 d2!2 e2!2 a2!2>"],
  [18, "<d2!2 a2!2 b2 e2 a2!2 d2 [d2@2 e2@2] a2 f#2 b2!2 e2 a2!3>"],
)

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