// Brickhouse — Commodores
// 110 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 8 synth brass 1 (copy of ch 2 brass section)
// note: Full arrangement: all 72 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(110/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once · [...]/2 spreads a riff over 2 bars.
// A part's distinct bars are riffs (A, B, C...) played in order: edit a riff to change every repeat.

// chords · brass section
const brass_section = note(`<
  ~@6 A ~ B C D E ~ F E G E H F E ~ D ~ I ~ J@2 I ~ C D E ~ F E G E H ~ I ~ J@2 I ~ C D E ~ F E G E H K L@3 K L@2 M D E
  ~ F E G E H N O
>`.pickRestart({
  A: "a4 ~@3 c5 ~ d5 ~ g4 ~@2 g#4 ~@2 a4 ~", B: "~@2 g4 a4 c5 a4@3 ~@2 g4 a4 d5 c5@3",
  C: "~@2 [c5,f#5,g5] ~@2 [c5,f#5,g5] ~@2 [c5,f#5,g5] ~@3 [g4,g5] [a4,a5]@2 ~", D: "~@14 [a3,a4,f#5,a5] ~",
  E: "~@6 g4 a4 b4@3 a4 ~@4", F: "~@6 e5 ~ b4@3 a4 ~@4", G: "~@6 e5 ~ [d5,f#5]@2 ~ e5 [d5,f#5]!2 ~@2",
  H: "~@2 [c5,f#5,g5] ~@2 [c5,f#5,g5] ~@2 [c5,f#5,g5] ~@7", I: "~@10 g4 ~ c5 a4@2 ~", J: "[~@12 c5 a4 ~ a4@2 ~@15]/2",
  K: "[a3,c4,g4,d5]@2 ~ [a3,c4,g4,d5] ~@12", L: "[a3,c4,g4,d5]@3 [a3,c4,g4,d5] ~@12",
  M: "[a3,c4,g4,d5]@3 [a3,c4,g4,d5] ~@8 [a3,a4]@2 ~@2, ~@12 a5 ~@3", N: "a4 ~@3 c5 ~ d5 ~ g4 ~@2 g#4 ~@4",
  O: "~@2 [a4,a5] ~@13, ~ a6 ~@6", // A
})).s("gm_brass_section").gain(0.29).pan(0)

// bass · slap bass 2
const bass = note(`<
  ~@2 A B C D A B C D A B C D A B C D A B C D E@6 F@2 A B C D A B C D E@6 F@2 A B C D A B C D G H I J K L M N A B C D A
  B C D O P
>`.pickRestart({
  A: "a1@2 ~@2 c2 ~ d2 ~ g1@2 ~ g#1@2 ~ a1@2", B: "~@2 g2 a2 c2 ~ d2 ~ e2@2 ~ d2@2 ~ c2 ~, ~@8 d2 ~@7",
  C: "a1@2 ~@2 c2 ~ d2 ~ g1@2 ~ g#1 ~@2 a1 ~", D: "~@2 a1 ~ c2 ~ d2 ~ e2@2 ~ d2@2 ~ c2 ~, ~@8 d2 ~@7",
  E: "[a1@4 ~@2 a1@2 a1@4 ~@2 a1@6 ~@2 a1@2 a1@3 a1 ~@2 g1 ~]/2",
  F: "[a1@4 ~@2 a1@2 a1@4 ~@2 a1@6 ~@2 e2@2 a2@2 g2 ~ e2 d2 c2 ~]/2", G: "a1@3 a1 ~@2 e2 ~ g2 ~ g2 ~ g2 a2 ~@2",
  H: "a1@3 a1 ~@2 f#2 ~ g2 f#2 e2 ~ d2 c2@2 ~", I: "a1@3 a1 ~@2 f#2 ~ g2 ~ g2 ~ g2 a2 ~@2",
  J: "a1@2 ~ a1 ~@2 a2 ~ c3 b2 a2 ~ g2 e2 ~@2", K: "a1@3 a1 ~@2 f#2 ~ g2 ~ g2 ~ g2 a2@2 ~",
  L: "a1@2 ~ a1 ~@2 f#2 ~ g2 f#2 e2 ~ d2 c2@2 ~", M: "a1@2 ~ a1 ~@2 f#2 ~ g2 ~ g2 ~ g2 a2 ~@2",
  N: "a1@2 ~ a1 ~@2 a2 ~ c3 a2 g2 ~ e2 d2@2 ~", O: "a1@2 ~@2 c2 ~ d2 ~ g1@2 ~ g#1 ~@4", P: "~@2 a1 ~@13",
})).s("gm_slap_bass_2").gain(0.66).pan(0.4)

// chords · epiano1
const epiano1 = note(`<
  ~@10 A B A B A B A B A B A C ~@8 A B A B A B A C ~@8 A B A B A B A C D@4 E D@3 A B A B A B A C ~ F
>`.pickRestart({
  A: "[e4,g4,a4,c5] ~@5 [d4,f#4,b4] ~ [d4,f#4,b4]@2 ~ [c4,e4,a4] ~@2 [c4,e4,a4] ~", // Am7 Bm Am
  B: "~@4 [c4,e4,a4] ~ [c4,e4,a4] ~ [d4,f#4,b4]@2 ~ [c4,e4,a4] ~@2 [e4,g4,a4,c5] ~", // Am Bm Am Am7
  C: "~@4 [c4,e4,a4] ~ [c4,e4,a4] ~ [d4,f#4,b4]@2 ~ [c4,e4,a4] ~@4", D: "[a3,e4]@2 ~ [a3,e4] ~@12",
  E: "[a3,e4]@3 [a3,e4] ~@12", F: "~@2 [e4,g4,b4,d#5,f#5,a5] ~@13",
})).s("gm_epiano1").gain(0.56).pan(0.3)

// chords · piano
const piano = note("<~@22 A B C B C B C D ~@8 C B C B C B C E ~@26>".pickRestart({
  A: "[c4,f#4,a4]@2 ~ [c4,f#4,a4] ~@4 [c4,f#4,a4]@2 ~ [c4,f#4,a4] ~@2 [c4,f#4,a4]@2", // F#dim
  B: "~@2 [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,g4,a4]@2 ~ [c4,f#4,a4] ~@2 [c4,f#4,a4] ~", // F#dim Am7 F#dim
  C: "[c4,f#4,a4]@2 ~ [c4,f#4,a4] ~@2 [c4,f#4,a4] ~ [c4,f#4,a4]@2 ~ [c4,f#4,a4] ~@2 [c4,f#4,a4]@2", // F#dim
  D: "~@2 [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,g4,a4]@3 ~ [c4,f#4,a4] ~@3", // F#dim Am7 F#dim
  E: "~@2 [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,f#4,a4] ~ [c4,g4,a4]@2 ~ [c4,f#4,a4] ~@4", // F#dim Am7 F#dim
})).s("gm_piano").gain(0.44).pan(0.6)

// drums · kick
const kick = s("bd").struct(`<
  A ~ B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C D@8 B C B
  C B C B C E F
>`.pickRestart({
  A: "~@14 x!2", B: "x ~@5 x ~ x ~@2 x ~@2 x ~", C: "x ~@2 x!2 ~@2 x", D: "x!4", E: "x", F: "x!2 ~@6",
})).gain(0.8)

// drums · snare
const snare = s("sd").struct("<~ A B@3 C B@3 D B@3 E B@7 D B@3 E B@7 E B@7 E B@7 E B@4 F@8 B@3 E B@4 G ~>".pickRestart({
  A: "x!2 ~@14", B: "~ x ~ x", C: "~@4 x ~@7 x ~ x!2", D: "~@2 x ~@2 x!2 ~", E: "~@2 x ~@3 x!2", F: "~@3 x ~@8 x ~@3",
  G: "~@13 x ~@2",
})).gain(0.8)

// drums · clap
const clap = s("cp").struct("<~@17 A ~@4 A@7 B ~@7 A@8 B ~@7 A C A ~ A D E A@2 ~@7 A ~@2>".pickRestart({
  A: "~@3 x", B: "~@5 x!2 ~", C: "~ x", D: "~@3 x ~@12", E: "~@3 x ~@8 x ~@3",
})).gain(0.64)

// drums · low tom
const low_tom = s("lt").struct("<~ A ~@53 B ~ B ~ B ~ B ~@8 C ~>".pickRestart({
  A: "~@11 x!3 ~@2", B: "x", C: "~@14 x!2",
})).gain(0.64)

// drums · hihat
const hihat = s("hh").struct(`<
  A ~ B C B@3 C B@3 C B@3 C B@3 C B@2 C@3 B C@2 B@3 C B@3 C B@2 C@3 B C@2 B@3 C B@3 C B@2 C@8 B C B@3 C B@2 D ~
>`.pickRestart({
  A: "x!4", B: "x!7 ~", C: "x!8", D: "x",
})).gain(0.8)

// drums · mid tom
const mid_tom = s("mt").struct("<~ A ~@7 B ~@7 C ~@3 B ~@7 C ~@7 C ~@7 C ~@7 C ~@3 D ~@3 D ~@7 C E ~>".pickRestart({
  A: "~@4 x!2 ~ x ~ x!3 ~@4", B: "~@15 x", C: "~@14 x!2", D: "~@11 x ~ x!3", E: "~@7 x",
})).gain(0.64)

// drums · open hat
const open_hat = s("oh").struct("<~@2 A@7 ~ A@7 ~ A@3 ~@4 A ~@2 A ~ A@7 ~@4 A ~@2 A ~ A@7 ~@9 A@7 ~@3>".pickRestart({
  A: "~@7 x",
})).gain(0.8)

// drums · high tom
const high_tom = s("ht").struct("<~ A ~@7 B ~@7 C ~@3 B ~@7 C ~@7 C ~@7 C ~@7 C ~@3 D ~@3 D ~@7 C ~@2>".pickRestart({
  A: "~@2 x!2 ~@12", B: "~@7 x", C: "~@13 x ~@2", D: "~@4 x!2 ~@2",
})).gain(0.64)

// drums · crash
const crash = s("cr").struct(`<
  ~@2 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@2 A@2 ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~ A ~ A ~ A ~ A ~@3 A ~@3 A B
>`.pickRestart({
  A: "x", B: "~ x ~@6",
})).gain(0.8)

// drums · ride bell
const ride_bell = s("rd").struct("<~@54 [~ x ~ x ~ x ~ x]!7 [~ x ~ x ~@4] ~@10>").gain(0.64)

// drums · tambourine
const tambourine = s("tb").struct("<~@54 A B A B A B A B ~@10>".pickRestart({
  A: "~@6 x!2 ~@2 x!2 ~@4", B: "~@2 x!2 ~@2 x!2 ~@2 x!2 ~@2 x!2",
})).gain(0.64)

// drums · cowbell
const cowbell = s("cb").struct("<~@54 [x!4]!8 ~@8 [x!2 ~@2] ~>").gain(0.64)

stack(
  brass_section, bass, epiano1, piano, kick, snare, clap, low_tom, hihat, mid_tom, open_hat, high_tom, crash, ride_bell,
  tambourine, cowbell
)