// Life Is A Carnival — The Band
// 90 bpm, 4/4, key E major. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
setcpm(90/4)

const chords = arrange(
  // intro (8 bars)
  [8, "<E!8>"],
  // verse (8 bars)
  [8, "<[E@3 A]!8>"],
  // pre-chorus (7 bars)
  [7, "<A A7 E7!2 [F#m7@2 E@2] [A@2 B@2] [E Esus E Esus]>"],
  // chorus (4 bars)
  [4, "<[E@3 A]!4>"],
  // trans (4 bars)
  [4, "<[E@3 D] D [E@3 D] E>"],
  // verse (8 bars)
  [8, "<[E@3 A]!8>"],
  // pre-chorus (7 bars)
  [7, "<A A7 E7!2 [F#m7@2 E@2] [A@2 Bsus@2] [E Esus E Esus]>"],
  // chorus (4 bars)
  [4, "<[E@3 A]!4>"],
  // instrumental (12 bars)
  [12, "<E!12>"],
  // pre-chorus (7 bars)
  [7, "<A A7 E7!2 [F#m7@2 E@2] [A@2 Bsus@2] [E Esus E Esus]>"],
  // chorus (4 bars)
  [4, "<[E@3 A]!4>"],
  // outro (8 bars)
  [8, "<[E@3 A]!2 E!6>"],
  // fadeout (6 bars)
  [6, "<E!6>"],
)
const bassline = arrange(
  [8, "<e2!8>"],
  [8, "<e2!8>"],
  [7, "<a2!2 e2!2 [f#2@2 g#2@2] [a2@2 b2@2] e2>"],
  [4, "<e2!4>"],
  [4, "<[b2 e2@2 d2] [d2@2 e2@2] [b2 e2@2 d2] e2>"],
  [8, "<e2!8>"],
  [7, "<a2!2 e2!2 [f#2@2 g#2@2] [a2@2 b2@2] e2>"],
  [4, "<e2!4>"],
  [12, "<e2!12>"],
  [7, "<a2!2 e2!2 [f#2@2 g#2@2] [a2@2 b2@2] e2>"],
  [4, "<e2!4>"],
  [8, "<e2!8>"],
  [6, "<e2!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)