// You Dropped the Bomb on Me — The Gap Band
// 130 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 138 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(130/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.

// bass · electric bass finger
const bass = note(`<
  ~ A@2 B@2 C D E F G H I J C D E F G H I J C D E F G H I J C D E F G H I K C D E F G H I K C D E F G H I K C D E F G H
  I J C D E F G H I J C D E F G H I K C D E F G H I K C D E F G H I J C D E F G H I J C D E F G H I J C D E F G H I J C
  D E F G H I J C D E F G H I J C D E F L
>`.pickRestart({
  A: "[e1@2 e2@11 b1 d2 b1]/2", B: "[e1@4 e2@18 d2 ~@3 d2@2 b1@2 d2 ~]/2", C: "e1@4 e2@3 ~@3 e1 ~@3 e1@2",
  D: "d2 a1 d2 ~@4 a1", E: "d2@4 ~@6 a1 ~@3 d2@2", F: "e1@3 ~@7 e2@2 d2@2 b1@2", G: "e1@2 e2 ~@4 e1",
  H: "d2@4 ~@10 a1 ~", I: "d2@4 ~@6 d2 ~@3 d2@2", J: "e1@2 e2@2 ~@6 e2 d2 b1@2 e2 ~", K: "e1@2 e2 ~@7 e2 d2 b1@2 e2 ~",
  L: "e2 e1 ~@6",
})).s("gm_electric_bass_finger").gain(0.4)

// chords · epiano2
const epiano2 = note(`<
  ~ A@4 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2
  B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D E F G H@2 B C D
  E F G H@2 B C D E F G H@2 B C D E I
>`.pickRestart({
  A: "[[e2,b2,e4]@32 ~@4 b2@17 ~@8 [g4,a4] [d4,e4,f4] [b3,c4], [e3,b3]@54 ~@2 [a6,b6,c7]@3 [f5,g5,a5] [d5,e5] [b4,c5]@2 ~, ~@32 e2@31 ~, ~@57 [e6,f6,g6]@6 ~, ~@58 [b5,c6,d6]@5 ~]/4", // E5 Gsus2 Dm Cmaj7 E5 Am F Dsus2 …
  B: "[e2,b2,e3] ~@3", C: "[d3,f#3,a3] ~@3", D: "[d3,f#3,a3,d4]@5 ~@11", E: "[e2,b2,e3,g3,b3] ~@3",
  F: "[e2,e3,b3]@4 b2 ~@11", G: "~@2 a3@2 f#3 ~@9 d3@2, d3 ~@3",
  H: "[[f#3,a3,d4]@4 d3 ~@5 [f#3,a3,d4] ~@9 b2 ~ [e3,g3] ~@5 d3 ~ b2 ~, ~@14 e2@9 ~@3 e2@4 ~@2]/2", // D Em
  I: "[e2,b3,d4,e4,g4] ~ [e2,b3,d4,e4,g4] ~@13", // Em7
})).s("gm_epiano2").gain(0.3)

// other · overdriven guitar
const overdriven_guitar = note(`<
  ~ A@2 B@2 C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D
  E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C D E F C D E G C
  D E F C D E G C D E F C D E G C D E F H
>`.pickRestart({
  A: "[[e2,e3]@15 e2]/2", B: "[e3@27 ~@5]/2", C: "[e2,b2,e3]@2 ~@5 c#3", D: "d3@2 c#3@2 d3@2 ~@4 a2 ~@3 c#3 ~",
  E: "d3@2 c#3@2 d3 ~@5 d3 ~@3 d3 ~", F: "e3@3 ~@5 a#3 a3 g3 ~ a3@2 g3 ~", G: "e3@3 ~@13", H: "e2 e3 ~@6",
})).s("gm_overdriven_guitar").gain(0.45)

// chords · rock organ
const rock_organ = note(`<
  ~ A@4 B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D
  B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D B C@2 D E@4 F G@2 H B C@2 D B C@2 D I J K L I J K L E@4 F G@2 H B C@2
  D B C@2 D I J K L I J K L ~
>`.pickRestart({
  A: "[e3@63 ~, e2 ~]/4", B: "[d6,g6,b6]", C: "[c6,d6,f#6,a6]/2", D: "[d6,g6,b6]@15 ~",
  E: "[[g6,b6]@15 ~@17 c6@14 ~@2 d6@13 ~@3, d6@15 ~@17, ~@16 [f#6,a6]@31 g#6@12 ~@5]/4", F: "[d6,e6,b6]",
  G: "[c6 ~ d6@13 ~ c6@15 ~, f#6@31 ~]/2", H: "~@4 [g6,b6] ~@3 [g6,b6]@4 e6@2 g6 ~",
  I: "~ [b4,b5] [e5,e6] [f#5,f#6] [g5,g6] ~ [e5,e6] ~", J: "[d5,d6]@2 [a4,a5]@2 ~@2 [d5,d6]@4 [a4,a5]@2 [d5,d6]@3 ~",
  K: "~@2 [d5,d6]@2 [e5,e6]@2 [d5,d6] ~ [f#5,f#6]@2 [e5,e6]@2 [d5,d6]@3 ~", // D E D F# E D
  L: "[e5,e6]@6 ~@2 [b5,b6] [a5,a6] [g5,g6] ~ [e5,e6]@2 [a5,a6] ~", // E B A G E A
})).s("gm_rock_organ").gain(0.2)

// chords · alto sax
const alto_sax = note(`<
  ~@8 A B C D@2 E F G@2 H@2 I@2 H@2 J@2 B C D@2 E F G@2 H@2 I@2 H@2 J@2 B C D@2 E F G@2 H@2 I@2 H@2 I@2 H@2 I@2 H@2 I@2
  B C D@2 E F G@2 H@2 I@2 H@2 I@2 H@2 I@2 H@2 I@2 K L M@2 N O P ~ H@2 I@2 H@2 I@2 ~@8 K L M@2 N O P ~ H@2 I@2 H@2 I@2
  ~@9
>`.pickRestart({
  A: "~@7 b5", B: "g5 ~ e5 ~ e5@2 ~@8 e5 ~", C: "f#5@4 e5@2 d5@6 ~@2 d5 ~",
  D: "[~@2 d5 ~ d5 ~ d5 ~ f#5@2 e5@2 d5@2 e5@8 ~@4 g5@3 ~ a5 ~]/2", E: "g5@2 e5@2 ~@6 e5@3 ~ e5@2",
  F: "f#5@2 e5@4 d5@7 ~ d5@2", G: "[~@2 d5@2 b4@2 d5 ~ d5@2 d5@2 f#5@2 e5@6 ~@12]/2",
  H: "[~@2 [b4,e5] ~ [b4,e5] ~ [g4,b4] ~ [b4,e5] ~ [g4,b4] ~@3 [e4,a4]@6 ~@4 [g4,b4]@2 [a4,d5] ~@5]/2", // E5 G E5 G A5 G D5
  I: "[~@2 [a4,e5] ~ e5@2 [g4,b4] ~ e5@2 b4@2 ~@2 [e4,g4]@7 ~@11, ~@4 a4 ~@3 b4 ~ g4 ~@21]/2", // A5 G Em
  J: "[~@2 [a4,e5] ~ e5@2 [g4,b4] ~ e5@2 b4@2 ~@2 [e4,g4]@7 ~@9 b5 ~, ~@4 a4 ~@3 b4 ~ g4 ~@21]/2", // A5 G Em
  K: "~@3 [e5,g#5]@4 ~", L: "~@6 [f#5,a5]@2 ~@2 [d5,f#5]@5 ~", M: "[~@6 [f#5,a5]@3 ~ [d5,f#5]@3 ~ [e5,g#5]@4 ~@14]/2",
  N: "~@4 [e5,g#5]@7 ~@5", O: "~@6 [f#5,a5]@3 ~ [d5,f#5]@5 ~", P: "~@6 [f#5,a5]@3 ~ [d5,f#5]@3 ~ [e5,g#5]@2",
})).s("gm_alto_sax").gain(0.51)

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

// drums · snare
const snare = s("sd").struct(`<
  A B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C
  B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C D
>`.pickRestart({
  A: "~@14 x!2", B: "~ x ~ x", C: "~@4 x ~@7 x ~ x!2", D: "x!2 ~@6",
})).gain(0.45)

// drums · clap
const clap = s("cp").struct("<~@89 [~ x ~ x]!8 ~@16 [~ x ~ x]!8 ~@17>").gain(0.45)

// drums · low tom
const low_tom = s("lt").struct("<~@136 [~@15 x] ~>").gain(0.5)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  ~ A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A
  B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 A B@3 ~
>`.pickRestart({
  A: "~@3 x ~ x ~ x", B: "~ x ~ x ~ x ~ x",
})).gain(0.2)

// drums · mid tom
const mid_tom = s("mt").struct("<~@136 [~@9 x ~@2 x ~ x ~] ~>").gain(0.4)

// drums · open hat
const open_hat = s("oh").struct("<~@137 x>").gain(0.45)

// drums · high tom
const high_tom = s("ht").struct("<~@136 [~@4 x!2 ~@2] ~>").gain(0.45)

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

stack(
  bass, epiano2, overdriven_guitar, rock_organ, alto_sax, kick, snare, clap, low_tom, hihat, hihat_soft, mid_tom,
  open_hat, high_tom, crash
)