// Memphis, Tennessee — The Beatles
// 100 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 54 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(100/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 · "BASS"
const bass = note(`<
  A B C D E F G H I J C H E K L M N F J H O J@2 D E P C Q O R J Q I C R M N C R S T U J Q V L U H O R I W X Y
>`.pickRestart({
  A: "g2@3 ~ b2 ~ d3 ~ f2@3 ~ f2@2 ~@2", B: "c2@3 ~ e2 ~ g2 ~ g2@3 ~ g2@2 ~@2", C: "c2@3 ~ g2@3 ~ c2@3 ~ g2@2 ~@2",
  D: "f2@3 ~ c2@3 ~ f2@3 ~ c2@2 ~@2", E: "g2@3 ~ d2@3 ~ g2@2 ~ g2!2 ~ g2 ~", F: "c2@3 ~ g2@3 ~ c2@3 ~ a1 ~ d2 ~",
  G: "c2@3 ~ g2@3 ~ c2@3 ~ d2 ~ e2 ~", H: "f2@3 ~ c3@3 ~ f2@2 ~@2 c3@2 ~@2", I: "g2@3 ~ d3@3 ~ g2@2 ~@2 d3@2 ~@2",
  J: "c2@3 ~ g2@3 ~ c2@2 ~@2 g2@2 ~@2", K: "c2@3 ~ g2@3 ~ c2@3 ~ e2 ~ b1 ~", L: "c2@3 ~ g2@3 ~ c2@2 ~ c2 e2 ~ g2 ~",
  M: "f2@3 ~ c2@3 ~ f2@2 ~ f2 a2 ~ c3 ~", N: "g2@3 ~ d2@3 ~ g2@3 ~ g2 ~ g2 ~", O: "g2@3 ~ d2@3 ~ g2@3 ~ d2@2 ~@2",
  P: "c2@3 ~ g2@3 ~ c2@2 ~ c2 a1 ~ d2 ~", Q: "f2@3 ~ c2@3 ~ f2@3 ~ f2 ~ f2 ~", R: "c2@3 ~ g2@3 ~ c2@3 ~ c2 ~ c2 ~",
  S: "f2@3 ~ c2@3 ~ f2@2 ~ f2!2 ~ a2 ~", T: "g2@3 ~ d2@3 ~ g2@2 ~ g2 b2 ~ d3 ~", U: "c2@3 ~ g2@3 ~ c2@2 ~ c2!2 ~ c2 ~",
  V: "g2@3 ~ d2@3 ~ g2@3 ~ e2 ~ b1 ~", W: "f2@3 ~ c2@3 ~ f2@2 ~ f2!2 ~ f2 ~", X: "c2 c3 a2 g2", Y: "c3 ~@15",
})).s("gm_electric_bass_finger").gain(0.3)

// chords · electric guitar jazz · "GUITAR"
const electric_guitar_jazz = note(`<
  A B C D E F G H I J K L M N@2 D O F P Q R K S H M T U H M K G V R K U Q R S T W X J F H I C P Y X J O L Z@2
>`.pickRestart({
  A: "[d4,g4,b4]@2 ~@4 b4 ~ [f2,a3,c4,f4]@5 ~@3, g2 ~, ~ b3@3 ~@4, ~@3 d4@4 ~@9, ~@5 g4@2 ~@9", // G F
  B: "[c3,g3,c4,e4]@5 ~@3 [g2,g3,b3,d4]@5 ~@3", C: "~@3 c4 g4 a4@2 ~ [g4,c5]@3 ~ d4 e4@2 ~, ~@4 c5@3 c4@5 g4@3 ~",
  D: "[a3,c4,f4,a4]@5 ~@2 a4, f2, ~@5 a3@3, ~@11 c4@5, ~@13 f4@3", // F
  E: "~@2 [g3,b3,d4]@2 ~@2 [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4]@2 ~@2", // G
  F: "~@2 [g3,c4,e4]@2 ~@2 [g3,c4,e4] ~ [g3,c4,e4]@3 ~ [g3,c4,e4]@2 ~@2", // C
  G: "[g3,c4,e4,g4]@5 ~@2 g4, c3, ~@5 g3@3, ~@11 c4@5, ~@13 e4@3", // C
  H: "~@3 c5@6 ~ [a4,c5] ~@2 [a4,c5] ~@2, ~ f4@13 ~@2, ~@2 a4@7 ~@7, ~@3 f5@11 ~@2", // Am
  I: "[d4,g4,b4]@12 ~@3 b4, g2, b3 ~@11 b3@4, ~@13 d4@3, ~@7 g4", // G
  J: "~ g4 ~@8 [c4,e4,g4] ~@2 [c4,e4,g4] ~@2, c3@15 ~, g3@11 ~ g3@3 ~, [c4,e4]@9 ~@7", // C
  K: "[c4,e4,g4]@12 ~@3 g4, c3, g3 ~@11 g3@4, ~@13 c4@3, ~@7 e4", // C
  L: "[c4,f4,a4]@12 ~@3 a4, f2, a3 ~@11 a3@4, ~@13 c4@3, ~@7 f4", // F
  M: "~@2 b4@6 ~@2 [d4,g4,b4] ~@2 [d4,g4,b4] ~@2, [g2,b3]@15 ~, d4@9 ~@7, ~ g4@7 ~@8", // G
  N: "~@3 g4@6 ~ [e4,g4] ~@2 [e4,g4] ~@2, ~ c4@13 ~@2, ~@2 e4@7 ~@7, ~@3 c5@11 ~@2", // Em
  O: "~@3 g3 d4 e4@2 ~ [d4,g4]@3 ~ a3 b3@2 ~, ~@4 g4@3 g3@5 d4@3 ~", // G5
  P: "d4 e4@9 ~@3 e4 g4 ~, c3, g4@13 ~@3, c4@10 g3@5 ~, ~@11 c4@4 ~",
  Q: "~@2 a4@6 ~@2 [c4,f4,a4] ~@2 [c4,f4,a4] ~@2, [f2,a3]@15 ~, c4@9 ~@7, ~ f4@7 ~@8", // F
  R: "~@3 d4@6 ~ [b3,d4] ~@2 [b3,d4] ~@2, ~ g3@13 ~@2, ~@2 b3@7 ~@7, ~@3 g4@11 ~@2", // Bm
  S: "~@4 g4@5 ~ [c4,e4,g4]@3 [c4,g4]@2 ~, ~ g3@14 ~, ~@2 c4@7 ~@7, ~@3 e4@6 ~@7", // C C5
  T: "d4 e4 d4 ~@7 [c4,d4,g4] ~@2 [c4,d4,g4]@2 ~, g3@15 ~, [c4,g4]@9 ~@7", // Csus2 C5
  U: "~@2 g4@6 ~@2 [c4,e4,g4] ~@2 [c4,e4,g4] ~@2, [c3,g3]@15 ~, c4@9 ~@7, ~ e4@7 ~@8", // C C5
  V: "~@3 f4 c5 d5@2 ~ [c5,f5]@3 ~ g4 a4@2 ~, ~@4 f5@3 f4@5 c5@3 ~", // F5
  W: "g4 a4@9 ~@3 a4 c5 ~, f3, c5@13 ~@3, f4@10 c4@5 ~, ~@11 f4@4 ~",
  X: "~ b4 ~@8 [d4,g4,b4] ~@2 [d4,g4,b4] ~@2, g2@15 ~, b3@11 ~ b3@3 ~, [d4,g4]@9 ~@7", // G G5
  Y: "g4 a4 g4 ~@7 [f4,g4,c5] ~@2 [f4,g4,c5]@2 ~, c4@15 ~, [f4,c5]@9 ~@7", Z: "[d4 e4@21 ~@10, [c3,c4,g4]@11 ~@5]/2",
})).s("gm_electric_guitar_jazz").gain(0.3)

// chords · acoustic guitar steel · "GUITAR"
const acoustic_guitar_steel = note(`<
  A B C D E C F G H F I J K L@2 M N O C P Q R F S E T O U V W I J V X F Y Q Z@2 G Q AA R G AB C Z AC H AD AB G AE AF
>`.pickRestart({
  A: "~@2 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4]@2 ~@3 [a3,c4,f4,a4] ~@3 [a3,c4,f4,a4] ~", // G F
  B: "~@2 [g3,c4,e4,g4] ~@3 [g3,c4,e4,g4] ~@3 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4]@2 ~", // C G
  C: "~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4]@3 [g3,g4] ~", // C G
  D: "f2@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] ~ f2 [a3,c4,f4,a4] ~@2 a3 f4 a4 f4 c4", // F
  E: "g2@2 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4] ~ g2 [b3,d4,g4,b4] ~ g2 b3@2 g2 d4 ~", // G
  F: "~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~ g3 [c4,e4,g4] ~ g3 [c4,e4,g4] ~", // C
  G: "~@2 [f4,a4] c4 a3 [f4,a4] c4 a3 [f4,a4] c4 a3 [f4,a4]@3 c4 ~", // F
  H: "~@2 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4] ~ b3 [g4,b4] d4 b3 g4@2 b3 d4 ~", // G
  I: "~@2 [g3,c4,e4,g4] ~@3 [g3,c4,e4,g4] ~@3 [g3,c4,e4,g4] ~@2 [c4,e4,g4] g3 ~", // C
  J: "~@2 [c4,f4,a4] ~@3 [c4,f4,a4] ~@3 [c4,f4,a4] ~@2 [c4,f4,a4] a3 ~", // F
  K: "~@2 [b3,d4,g4,b4] ~@3 [b3,d4,g4,b4] ~@3 [b3,d4,g4,b4] ~@2 [d4,g4,b4] b3 ~", // G
  L: "~@2 [g3,c4,e4,g4] ~@3 [g3,c4,g4] ~@3 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] c3 ~", // C C5 C
  M: "~@2 [a3,c4,f4,a4] ~@3 [a3,c4,a4] ~@3 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] f2 ~", // F Am F
  N: "~@2 [d4,g4,b4] ~@3 [d4,g4,b4] ~@3 [d4,g4,b4] ~@2 [d4,g4,b4] b3 ~", // G
  O: "~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] ~@2 [c4,e4,g4] g3 ~", // C
  P: "~@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] ~ a3 [c4,f4,a4] ~ [f4,a4] c4 a3 [f4,a4] c4 a3", // F
  Q: "~@2 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4] ~ b3 [d4,g4,b4] ~ b3 [d4,g4,b4] ~", // G
  R: "c3@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~ c3 [g3,c4,e4,g4] ~@2 g3 e4 g4 e4 c4", // C
  S: "f2@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] ~ f2 [a3,c4,f4,a4] ~ f2 a3@2 f2 c4 ~", // F
  T: "~@2 [e4,g4] c4 g3 [e4,g4] c4 g3 [e4,g4] c4 g3 [e4,g4]@3 c4 ~", // Em
  U: "~@2 [a3,c4,f4,a4] ~@3 [a3,c4,f4,a4] ~@3 [c4,f4] [a3,c4] ~ [c4,f4] a3 ~", // F F5 Am F5
  V: "~ g2 b3 [b3,d4,g4]@2 ~ [b3,d4,g4] ~@3 [b3,d4,g4] ~@2 g2 [b3,d4,g4] ~", // G
  W: "~ c3 g3 [g3,c4,e4]@2 ~ [g3,c4,e4] ~@3 [g3,c4,e4] ~@2 c3 [g3,c4,e4] ~", // C
  X: "~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] g3 ~ [c4,e4,g4] g3 ~", // C
  Y: "~@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4]@3 [a3,a4] ~", // F A
  Z: "~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~ g3 [c4,e4,g4] ~ [e4,g4] c4 g3 [e4,g4] c4 g3", // C Em
  AA: "c3@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~ c3 [g3,c4,e4,g4] ~ c3 g3@2 c3 c4 ~", // C
  AB: "~@2 [b3,d4,g4,b4] ~@2 [b3,d4,g4,b4] ~ b3 [d4,g4,b4] ~ [g4,b4] d4 b3 [g4,b4] d4 b3", // G
  AC: "~@2 [a3,c4,f4,a4] ~@2 [a3,c4,f4,a4] ~ a3 [f4,a4] c4 a3 f4@2 a3 c4 ~", // F
  AD: "~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~ g3 [e4,g4] c4 g3 e4@2 g3 c4 ~", // C Em
  AE: "~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~@2 [g3,c4,e4,g4] ~ g3 [c4,e4,g4] ~ g3 c4 e4", AF: "g3@2 [c4,e4,g4] ~@13",
})).s("gm_acoustic_guitar_steel").gain(0.16)

// other · electric guitar clean · "CARL PERKINS"
const electric_guitar_clean = note("<~@34 A@2 B C@2 D E F ~@12>".pickRestart({
  A: "[~@2 [d#4,e4]@2 g4 e4@2 c4 e4 g4 e4 c4 e4 c4 a#3 c4@3 e4 ~ g4@2 ~ a4 ~ g4 ~ e4 g4@2 ~@2]/2", // Emaj7
  B: "c5 a#4 ~ g4 a#4 g4 ~ e4 g4 e4 c4 e4@2 g4 ~ c5",
  C: "[~ a#4 g4 a#4 g4 f4@2 e4 c4@2 ~ g3 a#3 c4 ~ [d#4,e4]@2 ~ g4 ~ a4 g4 ~ a4 g4 d#4 ~@2 g4 a4 ~ c5]/2", // Emaj7
  D: "~ a4 ~ g4 a4 g4 ~ g4 ~@3 c5 ~ a#4 ~ g4", E: "a#4 g4 f4 g4 f4 d#4 f4 d#4 f4 d#4 c4 d#4 c4 a#3 c4 d#4",
  F: "~ c4 ~ a#3 c4 a#3 e3 ~ c3@3 ~@5",
})).s("gm_electric_guitar_clean").gain(0.41)

// other · french horn · "BEATLES GET BACK SESSIONS"
const french_horn = note(`<
  ~@2 A B C D A B E F G B H I J B K L A B M I N B O F P Q R I P S T U ~@8 A B V W A X Y Z AA AB@2 ~
>`.pickRestart({
  A: "c5@4 a4@2 g4@2 c5@4 a4@2 g4 ~", B: "g4@2 f4@11 ~ a4@2", C: "g4@2 g4@3 ~ g4@2 c5@2 c5@2 b4@2 a4@2",
  D: "g4@14 c5 ~", E: "g4 ~ g4 ~ g4 ~ g4 ~ b4 ~ b4@2 a4@2 g4@2", F: "e4@3 ~",
  G: "g4 ~ g4 ~ g4@2 c5@2 a4@2 g4 ~ g4 ~ g4 ~", H: "g4 ~ g4 ~ g4 ~ a4 ~ c5 ~ c5 ~ b4 ~ a4@2", I: "g4@15 ~",
  J: "g4@2 g4 ~ g4@2 c5@2 b4 ~ a4 ~ g4 ~ g4 ~", K: "g4 ~ g4 ~ g4 ~ g4@2 c5@2 c5@2 a4@2 g4@2", L: "e4@11 ~@5",
  M: "g4 ~ g4 ~ g4 ~ g4 ~ c5 ~ c5@2 b4@2 a4 ~", N: "c5@3 ~ a4@2 g4@2 c5@4 a4@2 g4 ~",
  O: "g4 ~ g4 ~ g4 ~ g4 ~ b4 ~ b4 ~ a4@2 g4@2", P: "g4@2 g4@2 g4@2 c5@2 a4@2 g4 ~ g4 ~ g4 ~", Q: "g4@2 f4@13 ~",
  R: "g4@2 g4 ~ g4 ~ g4 ~ c5 ~ c5 ~ b4@2 a4@2", S: "g4 f4@5 g4!2", T: "f4 ~ f4@2 b4 ~ b4 ~ b4@2 b4 ~ a4@2 g4@2",
  U: "e4@7 ~", V: "g4 ~ g4@2 g4 ~ g4@2 c5@2 c5@2 b4@2 a4@2", W: "g4@13 ~ g4@2", X: "g4 f4@6 a4",
  Y: "g4@2 g4@2 g4 ~ g4@2 b4@2 b4@2 a4@2 g4@2", Z: "e4@7 e4", AA: "a4@2 g4@2 g4 ~ g4 ~ b4 ~ b4 ~ a4@2 g4@2", AB: "e4",
})).s("gm_french_horn").gain(0.36)

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

// drums · rim
const rim = s("rim").struct("<A ~@9 A@2 B C A@3 ~@9 A@2 B C A@3 ~@21>".pickRestart({
  A: "~@3 x ~@3 x", B: "~@6 x ~@2 x ~ x ~@2 x ~", C: "~@3 x ~@4",
})).gain(0.35)

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

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~ A ~@11 B ~@3 C ~@7 C ~@15 C ~@9 A ~@2>".pickRestart({
  A: "~ x ~ x!2 ~ x ~ x!5 ~@3", B: "~@9 x ~ x ~@2 x ~", C: "~ x ~@6",
})).gain(0.1)

// drums · low tom
const low_tom = s("lt").struct("<~@9 [~@14 x!2] ~@23 [~@14 x!2] ~@15 [~@11 x!2 ~ x ~] ~@4>").gain(0.4)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  ~@2 A@2 B C A@2 B ~@2 D ~@4 D ~ A@2 E A@4 ~@4 F ~@4 A G A H B@2 ~@2 A@2 I A ~ A I ~ A ~ J ~
>`.pickRestart({
  A: "~@15 x", B: "~@11 x ~@3 x", C: "~@3 x ~@3 x ~@7 x", D: "~ x ~@3 x ~@7 x ~@2", E: "~@3 x ~@7 x ~@4",
  F: "~@9 x ~@3 x ~@2", G: "x ~@10 x ~@3 x", H: "~@3 x ~@7 x!2 ~@3", I: "~@3 x ~@12", J: "~@3 x ~@3 x ~@3 x ~@3 x",
})).gain(0.2)

// drums · mid tom
const mid_tom = s("mt").struct("<~@9 [~@11 x!2 ~@3] ~@23 [~@11 x!2 ~@3] ~@15 [~ x] ~@4>").gain(0.3)

// drums · open hat
const open_hat = s("oh").struct("<~@11 A ~@2 B ~ C D ~@7 D ~@5 B ~@9 D ~@12>".pickRestart({
  A: "~@14 x!2", B: "~@7 x", C: "~@15 x", D: "x",
})).gain(0.15)

// drums · high tom
const high_tom = s("ht").struct("<~@9 [~@9 x ~@6] ~@23 [~@9 x ~@6] ~@15 [~@5 x ~@10] ~@4>").gain(0.35)

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

stack(
  bass, electric_guitar_jazz, acoustic_guitar_steel, electric_guitar_clean, french_horn, kick, rim, snare, snare_soft,
  low_tom, hihat, hihat_soft, mid_tom, open_hat, high_tom, crash
)