// Dancing in the Street — Reeves
// 123 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 87 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(123/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 · "FINGERDBAS"
const bass = note(`<
  ~ A@3 B A@3 B A@3 B A@3 B A@2 C@4 A@4 D E F G H I J K A B A@5 B A@3 B A@3 B A@2 C@4 A@4 D E F G H I J K A B A B A@3 B
  A B A B A@3 B L@2
>`.pickRestart({
  A: "e1@2 ~@2 e1 ~ e1 ~ e1 ~ e1@4 d1@2", B: "e1@3 ~ e1 ~ e1 ~ e1 ~ e1@4 d1@2", C: "a1@5 ~ a1 ~ a1 ~ a1@3 ~ a1 ~",
  D: "g#1@5 ~ g#1 ~ g#1 ~ g#1@2 ~@2 g#1!2", E: "g#1@6 g#1 ~ g#1 ~ g#1@2 ~@2 g#1@2",
  F: "c#2@5 ~ c#2 ~ c#2 ~ c#2@2 ~@2 c#2!2", G: "c#2@6 c#2 ~ c#2 ~ c#2@2 ~@4", H: "f#1@3 ~ f#1@3 ~ f#1 ~ f#1@3 ~ e1@2",
  I: "f#1@3 ~ f#1@3 ~ f#1 ~ f#1@3 ~ f#1@2", J: "b1@5 ~ b1 ~ b1@5 ~ b1@2", K: "b1 g#1 f#1@4 b1 ~ b1@6 b1@2",
  L: "[e1@27 ~@5]/2",
})).s("gm_electric_bass_finger").gain(0.45)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  ~ A B A C A B A C A B A C A B A C A B D E@2 F A B A B G H I J K L M N A C A B A B A C A B A C A B A C A B D E@2 F A B
  A B G H I J K L M N A C A C A B A C A C A C A B A C ~@2
>`.pickRestart({
  A: "~@10 [e4,g#4]@5 ~", B: "~@5 [e4,b4]@2 ~", C: "~@10 [e4,b4]@5 ~", D: "~@4 [a3,e4]@3 ~ a3@7 ~",
  E: "[a3 ~ a3@3 ~ a3@13 ~ a3@4 a3@6 ~@2]/2", F: "[a3,e4]@2 a3@3 ~ a3@7 ~@3",
  G: "g#4@3 ~ g#4@4 d#4 ~ [d#4,g#4]@4 d#4 ~, d#4@7 ~@9", H: "g#4@3 ~ g#4@3 ~ d#4 ~ g#4@4 ~@2",
  I: "[e4,g#4]@3 ~ g#4@3 ~ e4 ~ [e4,g#4]@3 ~@3, ~@4 e4 ~@11", J: "[e4,g#4]@3 ~ g#4@2 e4 ~ g#4 ~ g#4@4 e4 ~",
  K: "[f#4,a4]@4 [f#4,a4]@3 ~ f#4 ~ a4@5 f#4, ~@5 f#4@2 ~", L: "[f#4,a4]@3 ~ [f#4,a4]@3 ~ [f#4,a4] ~ [f#4,a4]@3 ~@3",
  M: "[e4,a4]@3 ~ e4@4 a4 ~ e4@5 ~, ~@4 a4@3 ~@3 a4@3 ~@3", N: "[d#4,a4]@4 [d#4,a4]@4 d#4 ~ [d#4,a4]@3 ~@3",
})).s("gm_acoustic_guitar_steel").gain(0.35)

// chords · acoustic guitar steel · "STEEL GTR" · soft notes
const acoustic_guitar_steel_2 = note("<~@19 A B@2 C ~@5 D E F ~ G@2 ~@19 A B@2 C ~@5 D E F ~ G@2 ~@19>".pickRestart({
  A: "~@8 e4@7 ~", B: "[e4 ~ e4@3 ~ e4@13 ~ e4@4 e4@6 ~@2]/2", C: "~@2 e4@3 ~ e4@7 ~@3",
  D: "d#4@3 ~@3 d#4 ~@3 d#4@4 g#4 ~", E: "~@14 g#4 ~", F: "~@10 e4 ~@5", G: "~@14 a4 ~",
})).s("gm_acoustic_guitar_steel").gain(0.2)

// other · trumpet
const trumpet = note(`<
  ~ A@2 B@2 ~@4 C D@2 ~@7 E@2 F@2 ~@7 G H I@2 J ~@18 E@2 F@2 ~@7 G H I@2 K ~@2 L@2 A@2 L@2 ~@2 L@2 A@2 L@2 ~@2
>`.pickRestart({
  A: "[~@2 [e4,e5] ~ [e4,e5]@2 [d4,d5] [f#4,f#5] [e4,e5] ~ [g#3,b3,b4]@18 ~@4]/2", // E D F# E G#m
  B: "[~@2 [e4,e5] ~ [e4,e5]@2 [d4,d5] [f#4,f#5] [e4,e5] ~ [g#3,b3,b4]@21 ~]/2", C: "~@4 d4 f#4 a4 [a4,c#5]",
  D: "[[e4,g#4,b4]@9 ~@7]/2", E: "[[e4,a4,c#5]@31 ~]/2", F: "[[a4,c#5]@29 ~@3]/2", G: "~@5 [c#4,c#5] [d#4,d#5] [e4,e5]",
  H: "f#5@11 ~ g#5@2 [e5,f#5] d#5", I: "[~ e4, c#5]/2", J: "[d#4,c5]", K: "d#4",
  L: "[~@2 [e4,e5] ~ [e4,e5]@2 [d4,d5] ~ [e4,e5] ~ [g#3,b3,b4]@21 ~]/2", // E D E G#m
})).s("gm_trumpet").gain(0.4).pan(0.1)

// other · trumpet · soft notes
const trumpet_soft = note("<~@21 A@2 ~@32 A@2 ~@11 B ~@2 C ~@3 C ~@3 C ~@3 C ~@3>".pickRestart({
  A: "[e4@15 ~]/2", B: "c5", C: "~@7 [f#4,f#5] ~@8",
})).s("gm_trumpet").gain(0.25).pan(0.1)

// chords · drawbar organ · "ORGAN 1"
const drawbar_organ = note(`<
  ~ A@18 ~@4 A@4 B@4 C@2 D E A@18 ~@4 A@4 B@4 C@2 D E A@2 F G F G H A@7 F A ~@2
>`.pickRestart({
  A: "~@10 [g#4,b4,e5]@5 ~", B: "[d#4@31 ~ e4@31 ~, g#4@63 ~]/4", C: "[[f#4,a4]@31 ~]/2", D: "[e4,a4]@15 ~",
  E: "[d#4,a4]", F: "~@10 [b4,e5]@5 ~, ~@5 g#4 ~@2", G: "~@10 [b4,e5]@5 ~", H: "~@10 [b4,e5]@5 ~, ~@10 g#4@3 ~@3",
})).s("gm_drawbar_organ").gain(0.16).pan(0)

// bass · baritone sax · "BARITONSAX"
const bass_2 = note(`<
  ~ A B C@2 ~@4 D@10 E F G H D@4 I J K L M N@2 O B@4 ~@8 D@6 E F G H D@4 I J K L M N@2 O B@16 P ~
>`.pickRestart({
  A: "e2@13 ~ d2@2", B: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2@4 d2@2",
  C: "[e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2@4 d2@2 e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2@4 d2@2, ~@10 g#3@21 ~]/2",
  D: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~", E: "a2@3 ~ a2@2 ~@2 a2@3 ~@5", F: "a2 ~ a2@2 ~@2 a2@7 ~@3",
  G: "~@2 a2 ~ a2 ~@3", H: "a2 ~ a2 ~@3 a2@5 ~@5", I: "g#2@3 ~ g#2 ~ g#2 ~ g#2 ~ g#2@3 ~ g#2 ~",
  J: "g#2@3 ~ g#2 ~ g#2 ~ g#2 ~ g#2@3 ~@3", K: "c#3@3 ~ c#3 ~ c#3 ~ c#3 ~ c#3@3 ~ c#3 ~",
  L: "c#3@3 ~ c#3 ~ c#3 ~ c#3 ~ c#3@3 ~@3", M: "a3@3 ~ a3 ~ a3 ~ a3 ~ a3@5 ~", N: "a3 ~ a3 ~ a3 ~ a3 ~ a3 ~ a3@5 ~",
  O: "a3 ~ a3 ~ a3 ~ a3 ~ a3 ~ a3@3 ~ d2@2", P: "e2 ~@7",
})).s("gm_baritone_sax").gain(0.3).pan(0.8)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  ~ A@3 B C@6 D C@7 E F E G C@4 H I J@2 K@2 L M C@10 D C@7 E F E G C@4 H I J@2 K@2 L M C@16 N@2
>`.pickRestart({
  A: "[a3,d4,f#4]@3 ~ [a3,d4,f#4]@3 ~ [b3,e4,g#4]@3 ~ [b3,e4,g#4]@3 ~", // D E
  B: "[a3,d4,f#4]@2 ~@2 [a3,d4,f#4]@3 ~ [b3,e4,g#4]@3 ~ [b3,e4,g#4]@2 ~@2", // D E
  C: "[d4,f#4,a4] ~ [d4,f#4,a4] ~ [e4,g#4,b4] ~ [e4,g#4,b4] ~", // D E
  D: "[d4,f#4,a4]@2 ~@2 [d4,f#4,a4]@2 ~@2 [e4,g#4,b4]@3 ~ [e4,g#4,b4]@2 ~@2", E: "~@4 a4@2 g#4@2 f#4@2 e4@3 ~ e4 ~",
  F: "e4@2 f#4@3 ~ e4@9 ~", G: "e4@2 f#4@3 ~ e4@4 ~@6", H: "~@4 [d#4,f#4]@2 c4@2 d#4 ~ [d#4,f#4]@4 c4@2",
  I: "d#4@2 f#4 ~ d#4@2 c4@2 d#4@2 [d#4,f#4]@4 c#4 ~, ~ f#4 ~@2", // D#m
  J: "[[c#4,e4,g#4]@3 ~ e4@2 c#4@2 e4 ~ [e4,g#4]@4 e4 ~ e4@2 g#4 ~ [e4,g#4]@2 c#4@2 e4 ~ [e4,g#4]@4 ~@2, ~@4 g#4@5 ~@5 c#4@5 ~@13]/2", // C#m E
  K: "[[f#4,a4]@8 ~@2 a4@15 ~@5 c#5@2, ~@8 f#4@17 ~ f#4@4 ~@2, ~@7 a4]/2", L: "e4@8 a4@2 e4@5 ~", M: "d#4@13 ~@3",
  N: "[[b3,g#4] ~@7, e4@27 ~@5]/2", // E
})).s("gm_piano").gain(0.25).pan(0.2)

// other · brass section · "BRASS 1"
const brass_section = note(`<
  ~ A@3 B ~@5 C@8 ~ D@2 E@2 ~@4 F@2 G@2 H@3 I A@18 D@2 E@2 ~@8 H@2 J I A@15 B ~@2
>`.pickRestart({
  A: "e3@15 ~", B: "e3", C: "[~@13 e3@16 ~ e3@16 e3@15 ~ e3@15 ~ e3@15 ~ e3@15 ~ e3@15 ~ e3@2]/8", D: "[e3@7 ~]/2",
  E: "[e3@3 ~]/2", F: "[[d#3,g#3]@23 ~ [d#3,g#3] ~ [d#3,g#3] ~ [d#3,g#3] ~ g#3@2, ~@30 d#3 ~]/2",
  G: "[[e3,g#3]@22 [e3,g#3] ~ [e3,g#3] ~ [e3,g#3]@5 ~]/2", H: "c#4@15 ~", I: "c4", J: "c#4",
})).s("gm_brass_section").gain(0.35)

// chords · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note("<~@5 A@14 B@2 C B A@4 ~@8 A@18 B@2 C B A@4 ~@8 A@16 ~@2>".pickRestart({
  A: "~@2 [a3,d4] ~@3 [a3,d4] ~@3 [b3,e4] ~@3 [b3,e4] ~", B: "~@2 [a3,c#4] ~@3 [a3,c#4] ~@3 [a3,c#4] ~@3 [a3,c#4] ~",
  C: "~@2 [a3,c#4] ~@3 [a3,c#4] ~@3 [a3,c#4] ~ [a3,c#4] ~ [a3,c#4] ~", // A
})).s("gm_overdriven_guitar").gain(0.25)

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

// drums · snare
const snare = s("sd").struct(`<
  A B@3 C B@3 D B@9 C B@3 C B@3 C B@3 C B E B C B@3 D B@3 F B@9 E B@3 C B@3 C B@3 C B E B C B@7 D B@7 G H ~
>`.pickRestart({
  A: "~@8 x ~ x!3 ~ x ~", B: "~ x ~ x", C: "~@4 x ~@3 x!5 ~ x ~", D: "~@4 x ~@6 x!4 ~", E: "~@4 x ~@3 x!5 ~@3",
  F: "~@4 x ~@5 x!5 ~", G: "~@4 x ~@6 x!5", H: "x",
})).gain(0.45)

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

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

// drums · tambourine
const tambourine = s("tb").struct("<~@5 [~ x ~ x]!80 ~@2>").gain(0.45)

// drums · congas
const congas = s("conga:13").struct("<~ [~ x ~ x ~ x ~ x]!84 ~@2>").gain(1.11)

stack(
  bass, acoustic_guitar_steel, acoustic_guitar_steel_2, trumpet, trumpet_soft, drawbar_organ, bass_2, piano,
  brass_section, overdriven_guitar, kick, snare, hihat, hihat_soft, tambourine, congas
)