// Let's Have a Party — The Chaplin Band
// 154 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 84 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): CLEAN GTR.
setcpm(154/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 · fretless bass · "FRETLESS"
const bass = note(`<
  A@4 B@2 C A D@2 A@2 E D E A B@2 C A D@2 A@2 E D E A@5 D@2 A@2 E D E A@2 B@2 C A D@2 A@2 E D E A B@2 C A D@2 A@2 E D E
  A B@2 C A D@2 A@2 E D E A@2 E A@2 E A F
>`.pickRestart({
  A: "e2 g#2 b2 g#2", B: "e2@3 ~@7 b1@2 c#2@2 d#2@2", C: "e2@3 ~@13", D: "a1 c#2 e2 c#2", E: "b1 d#2 f#2 d#2",
  F: "e2 g#2 ~@2",
})).s("gm_fretless_bass").gain(0.36)

// chords · electric guitar clean · "CLEAN GTR"
const electric_guitar_clean = note("<~@28 A@2 B@2 C@2 B@2 ~@3 B@2 ~@42 D>".pickRestart({
  A: "[~@7 d4@2 ~@2 d4@2 ~@3]/2", B: "[~@7 d4@2 ~@2 d4 ~@4]/2", C: "~ g4@2 g4@2 g4@2 ~",
  D: "~@3 [g#3,b3]!2 ~@3, ~@3 e4@2 ~@3", // G#m
})).s("gm_electric_guitar_clean").gain(0.27).pan(0.2)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  A@4 B@3 C D@2 E@2 F G F H B@3 C D@2 E@2 F G F H@5 D@2 E@2 F G F H@2 B@3 C D@2 E@2 F G F H B@3 C D@2 E@2 F G F H B@3 C
  D@2 E@2 F G F I@2 F I@2 F J@2
>`.pickRestart({
  A: "[e3,g#3,b3,e4] [g#3,b3,e4]!2 [e3,g#3,b3,e4]!2 [g#3,b3,e4]!2 [e3,g#3,b3,e4], ~ e3@2 ~@2 e3@2 ~", // E
  B: "[e3,g#3,b3,e4]@3 ~@13", // E
  C: "[e3,g#3,d4,b4] [g#3,d4,b4]!2 [e3,g#3,d4,b4]!2 [g#3,d4,b4]!2 [e3,g#3,d4,b4], ~ e3@2 ~@2 e3@2 ~", // E7 G#dim E7 G#dim E7
  D: "[[e3,a3,c#4] [a3,c#4]!2 [e3,a3,c#4] [e3,a3,c#4,g4] [a3,c#4]!3 [e3,a3,c#4] [a3,c#4]!2 [e3,a3,c#4]!2 [a3,c#4]!2 [e3,a3,c#4,a4], ~@2 e3@4 ~@4 [e3,a4]@4 e3 ~@3 [e3,a4]@4 ~@4 [e3,a4]@4 ~@2, ~@2 a4@2 ~@3 a4@2 ~@2 a4@2 ~@3]/2", // A A7 A A5
  E: "[[e3,g#3,b3] [g#3,b3]!2 [e3,g#3,b3] [e3,g#3,b3,d4] [g#3,b3]!3 [e3,g#3,b3] [g#3,b3]!2 [e3,g#3,b3]!2 [g#3,b3]!2 [e3,g#3,b3], ~@2 e3@4 ~@4 [e3,e4]@4 e3 ~@3 [e3,e4]@4 ~@4 e3@4 ~@2, ~@2 e4@2 ~@3 e4@2 ~@2 e4@2 e4@3]/2", // E G#m E E7 G#m E G#m E …
  F: "[b3,d#4,f#4] [d#4,f#4]!2 [b3,d#4,f#4]!2 [d#4,f#4]!2 [b3,d#4,f#4], ~ [b3,b4]@2 b4@2 b4@3, ~@5 b3@2 ~", // B D#m B D#m B
  G: "[a3,c#4,e4] [c#4,e4]!2 [a3,c#4,e4]!2 [c#4,e4]!2 [a3,c#4,e4], ~ [a3,a4]@2 a4@2 a4@3, ~@5 a3@2 ~", // A C#m A C#m A
  H: "[e3,g#3,b3] [g#3,b3]!2 [e3,g#3,b3]!2 [g#3,b3]!2 [e3,g#3,b3], ~ [e3,e4]@2 e4@2 e4@3, ~@5 e3@2 ~", // E G#m E G#m E
  I: "[[e3,g#3,b3] [g#3,b3]!2 [e3,g#3,b3]!2 [g#3,b3]!2 g#3 [e3,g#3] [g#3,b3]!2 [e3,g#3,b3]!2 [g#3,b3]!2 [e3,g#3,b3], ~ [e3,e4]@2 e4@2 [e3,e4]@2 [b3,g4]@2 ~@2 e4@2 e4@3, ~@14 e3 ~@3 [e3,e4]@4 ~@4 e3@4 ~@2]/2", // E G#m E G#m E G#m E G#m …
  J: "[[e3,g#3,b3] [g#3,b3]!2 [e3,g#3,b3]!2 [g#3,b3]!2 g#3 [e3,g#3] [g#3,b3]!2 ~@5, ~ [e3,e4]@2 e4@2 [e3,e4]@2 [b3,g4]@2 ~@7, ~@14 e3 ~@3 [e3,e4]@4 ~@10]/2", // E G#m E G#m E G#m E Em …
})).s("gm_acoustic_guitar_steel").gain(0.23).pan(0.6)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  A@4 B@3 C D E F G H I H J K B@2 C D E F L H I H J F@3 M N E F G H I O J@2 K B@2 C D E F P H I H Q K B@2 C D E F P H I
  H R K B@2 C D E F L H I H J Q H J@2 H J S
>`.pickRestart({
  A: "[e4,g#4]@2 b3 ~ [e4,g#4]@2 b3 ~ [e4,g#4]@2 b3 ~ [e4,g#4]@2 b3 ~, b3 ~@3 b3 ~@3 b3 ~@3 b3 ~@3", // E
  B: "[b3,e4,g#4]@3 ~@13", // E
  C: "[e5,g#5,e6] ~ [e5,g#5,e6] ~ [e5,g#5,e6] ~ [e5,g#5,e6] ~ [e5,g#5,e6] ~ [e5,g#5,e6] ~ [e5,g#5,e6] ~ [e5,g#5,e6] ~", // E
  D: "[e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~", // A
  E: "[e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e6,g#6] ~", // A E
  F: "[e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~", // E
  G: "[e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [g5,a5] [b5,c6,d6,e6] [f6,g6,a6,b6,c7,d7] [d7,e7,f7,g7] [b5,d6,e6,f6,g6,a6,b6,c7] [f#5,g#5]", // E Gsus2 Cmaj7 Dm7 Em7 Bm7b5 F#sus2
  H: "[b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~", // B
  I: "[a4,c#5,e5] ~ [a4,c#5,e5] ~ [a4,c#5,e5] ~ [a4,c#5,e5] ~ [a4,c#5,e5] ~ [a4,c#5,e5] ~ [a4,c#5,e5] ~ [a4,c#5,e5] ~", // A
  J: "[g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~", // E
  K: "[g#4,b4,e5] ~@15", // E
  L: "[e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [b6,c7,d7,e7] [d6,e6,f6,g6,a6] [e5,f#5,g#5,b5] d5 [c7,d7,e7] [f6,g6,a6,b6] [b5,d6,e6] [f#5,g#5]", // E Cmaj7 Dm E C G7 E7 F#sus2
  M: "[e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [d7,e7] [g6,a6,b6,c7] [c6,d6,e6,f6] [a5,b5] g5 ~@3", // E Dsus2 Cmaj7 Dm7 Asus2
  N: "[a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~ [e5,a5,c#6] ~", // A
  O: "[b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b4,d#5,f#5] ~ [b6,c7] [e6,f6,g6,a6] [a5,b5,c6,d6] [e5,f5,g5] [b4,c5,d5] a4 ~@2", // B Cmaj7 Fmaj7 D7 Em Bm
  P: "[e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [e6,g#6,e7] ~ [d7,e7] [a6,b6,c7] [d6,e6,f6,g6] [g#5,b5] [e5,f#5] d5 ~@2", // E Dsus2 Am Em7 G#m Esus2
  Q: "[g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g5,a5] [b5,c6,d6,e6] [f6,g6,a6,b6,c7,d7] [e7,f7,g7] [b6,c7,d7,e7,f7] [f6,g6,a6] [g#5,b5,d6,e6] f#5", // E Gsus2 Cmaj7 Dm7 Em Bdim F E7
  R: "[g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [d7,e7] [a6,b6,c7] [d6,e6,f6,g6] [g#5,b5] [e5,f#5] d5 ~@2", // E Dsus2 Am Em7 G#m Esus2
  S: "[g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~ [g#4,b4,e5] ~@7", // E
})).s("gm_piano").gain(0.27).pan(0.9)

// drums · kick
const kick = s("bd").struct("<A@4 B ~@3 A@8 B ~@3 A@21 B ~@3 A@8 B ~@3 A@8 B ~@3 A@15>".pickRestart({
  A: "x!2", B: "x",
})).gain(0.53)

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

// drums · hihat
const hihat = s("hh").struct("<A B@3 C ~@3 A B@6 D C ~@3 A B@6 E ~@13 C ~@11 C ~@11 C ~@3 A B@7 E ~@6>".pickRestart({
  A: "~ x!7", B: "x!8", C: "x", D: "x!4 ~@4", E: "x!5 ~@3",
})).gain(0.47)

// drums · mid tom
const mid_tom = s("mt").struct("<~@7 A ~@11 B ~@24 A ~@11 A ~@11 A ~@8 B ~@6>".pickRestart({
  A: "~@6 x!2", B: "~@7 x",
})).gain(0.41)

// drums · open hat
const open_hat = s("oh").struct("<~@15 [~ x] ~@68>").gain(0.47)

// drums · high tom
const high_tom = s("ht").struct("<~@7 A ~@36 A ~@11 A ~@11 A ~@8 B ~@6>".pickRestart({
  A: "~@4 x!2 ~@2", B: "~@3 x",
})).gain(0.41)

// drums · crash
const crash = s("cr").struct("<A ~@7 A ~@11 A ~@7 A ~@3 A ~@6 A ~@5 A ~@11 A ~@11 A ~@8 A ~@2 A ~@2>".pickRestart({
  A: "x",
})).gain(0.29)

// drums · ride
const ride = s("rd").struct("<~@28 A B@3 C B@6 A B ~@4 A B@7 ~@4 A B@7 ~@13 A B D A B E>".pickRestart({
  A: "~ x!7", B: "x!8", C: "~@2 x!6", D: "x!5 ~@3", E: "x!7 ~",
})).gain(0.35)

stack(
  bass, electric_guitar_clean, acoustic_guitar_steel, piano, kick, snare, hihat, mid_tom, open_hat, high_tom, crash,
  ride
)