// I'll Be Back — The Beatles
// 142 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 23, 4/4 at bar 23, 2/4 at bar 44, ...) are rendered on a constant 4/4 grid of one bar per cycle
// note: Full arrangement: all 95 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(142/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, A@4 for four bars: edit a riff to change every repeat.

// chords · accordion · "Lead Organ 3"
const accordion = note(`<
  ~@2 A B C D E ~ A B C D E ~ F ~ G@2 H I J K L M N@2 O@2 L P N@2 ~ Q@2 R S T U V@4 B C W E ~ A B C D E ~ X ~ G@2 H I J
  K L P N@2 ~@29
>`.pickRestart({
  A: "~@2 e4 [a4,c5]@5", B: "~@2 [a4,c5] [b4,d5] [c5,e5]@2 [c5,e5]@2",
  C: "[b4,d5]@4 [g4,b4]@2 [a4,c5] [b4,d5] [a4,c5]@8", D: "~@3 [a4,c5] [a4,c5]@2 [g#4,b4]@2",
  E: "[f#4,a4] [g#4,b4]@2 [a4,c#5]@3 ~@2", F: "a4@2 b4@2 c#5@2 e5 f#5 e5@8", G: "[c#5 b4 a4 b4 c#5@2 b4@4 ~@5 b4]/2",
  H: "c#5 b4 a4 b4 c#5@2 b4@2", I: "c#5 b4 a4 b4@3 ~@2", J: "a4 g#4 f#4 g#4@3 e4@2", K: "[a4,c5]@4 ~@2 [a4,c5] [b4,d5]",
  L: "[c5,e5]@4 [c5,e5]@4 [b4,d5]@4 [g4,b4]@2 [a4,c5] [b4,d5]", M: "[a4,c5]@4 ~@2 [a4,c5]!2",
  N: "[[a4,c5]@2 [g#4,b4]@2 [f#4,a4] [g#4,b4]@2 [a4,c#5]@3 ~@6]/2", O: "[~@6 e4 [a4,c5]@5 ~@2 [a4,c5] [b4,d5]]/2",
  P: "[a4,c5]@4 ~@3 [a4,c5]", Q: "[e5@12 d5 c#5 b4 c#5]/2", R: "c#5 g#4@2 c#5@5", S: "~@10 e4@2 e4 e4@3",
  T: "c#5 b4@2 b4@3 a4@2 a4@4 ~@2 e4@2", U: "c#5 b4!2 a4 a4@2 ~ f#4",
  V: "[b4@2 b4!2 c#5@2 d5 c#5@2 b4@3 c#5 b4 a4 b4@3 ~@2 a4 g#4 f#4 g#4@3 e4@2 [a4,c5]@4]/4", // Am
  W: "~@2 [a4,c5]!2 [a4,c5]@2 [g#4,b4]@2", X: "a4 b4 c#5 e5@5",
})).s("gm_accordion").gain(0.72)

// chords · electric guitar muted · "Lead Gtr Muted"
const electric_guitar_muted = note(`<
  A@2 B@3 C@2 D@4 E@2 F@6 G@2 H I J K L@2 H I J K M@2 N@2 O@2 P Q R S@5 E@2 D@4 E@2 F@6 G@2 H I J K L@2 T@7 U@16 V@5
>`.pickRestart({
  A: "[~@3 c#4@9 ~@4, f#3 e4 ~@6, ~ b3@2 ~@13]/2",
  B: "[~@4 e4@2 [a2,e3,a3,c4,e4]@18 ~ [b2,g3,b3,g4]@15 [f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3, f#3 ~@5 [g2,d3]@4 ~@2, ~ b3@2 ~@21]/3", // Am Em Fmaj7 G5
  C: "[[f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3 ~ [b2,g#3,b3,e4]@15 [a2,e3,a3,c#4,e4]@8, ~ [g#2,e3]@2 ~]/2", // Fmaj7 E A C#m
  D: "[~@6 c#4@18 ~ [c4,e4]@15 ~ [g3,b3,g4]@15 [f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3, f#3 e4 ~@14, ~ b3@2 ~@9 [a2,e3,a3]@8 [g2,b2,d3]@8 ~@4]/4", // C G Fmaj7 A5 G
  E: "[[f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3 ~ [g#3,b3,e4]@15 [a2,e3,a3,c#4,e4]@8, ~ [g#2,b2,e3]@2 ~]/2", // Fmaj7 E A E
  F: "[~@6 c#4@18 ~ [a3,c#4,f#4]@15 ~ [a3,c#4,f#4]@15 ~ [d4,f#4]@15 ~ [d4,f#4]@15 [g#2,b2,e3,g#3,b3,e4]@8, e3 e4 ~@22, ~ b3@2 ~@9 [f#2,c#3,f#3]@8 [f#2,c#3,f#3]@8 [b2,f#3,b3]@8 [b2,f#3,b3]@8 ~@4]/6", // F#m D E F#5 B5
  G: "d3 c#3 b2 e3@5", H: "~ [c4,e4]@15, [a2,e3,a3]", I: "~ [g3,b3,g4]@15, [g2,b2,d3]",
  J: "[f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3 [f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3", // Fmaj7
  K: "~ [g#3,b3,e4]@15, [g#2,b2,e3]", L: "[[a2,e3,a3,c#4,e4]@4 ~@3 c#4@9, ~@2 f#3 e4 ~@4, ~@5 b3@2 ~@9]/2",
  M: "[[a2,e3,a3,c#4,e4]@4 ~@3 c#4@9, ~@2 e3 e4 ~@4, ~@5 b3@2 ~@9]/2", N: "[~ b3@2 a#3@2 a3@3]/2",
  O: "[~ [e4,g#4]@19 ~ [e4,g#4]@11, [c#3,g#3,c#4]@5 [c#3,g#3,c#4]@3]/2", P: "~ [a3,c#4,f#4]@15, [f#2,c#3,f#3]",
  Q: "~ [b3,f#4]@15, [b2,d#3,a3]", R: "~ f#4@15, [d3,a3,d4]",
  S: "[[e2,b2,e3,g#3,b3,e4]@8 d3@2 c#3@2 b2@2 e3@10 d3@2 c#3@2 b2@2 e3@10 ~ [c4,e4]@15 ~ [g3,b3,g4]@15 [f3,a3,c4,e4]@3 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@3, ~@5 [a2,e3,a3]@2 [g2,b2,d3]@2 ~]/5", // E C G Fmaj7 A5 G
  T: "[~@6 e4 [a2,e3,a3,c4,e4]@5 ~ [a2,e3,a3,c4,e4] ~ [a2,e3,a3,c4,e4]@5 ~@3 c#4@5 ~ [a2,e3,a3,c#4,e4] ~ [a2,e3,a3,c#4,e4]@5 ~@2 e4 [a2,e3,a3,c4,e4]@5 ~ [a2,e3,a3,c4,e4] ~ [a2,e3,a3,c4,e4]@5 ~@3 c#4, ~@4 f#3@2 ~@14 f#3@2 e4@2 ~@13 b3@2 ~@14 b3@2 ~, ~@5 b3@2 ~@14 b3@2 ~@13 f#3@2 ~@14 f#3@2 e4@2]/7", // Am A Am
  U: "[~@5 [a2,e3,a3,c#4,e4] ~ [a2,e3,a3,c#4,e4]@5 ~@2 e4 [a2,e3,a3,c4,e4]@5 ~ [a2,e3,a3,c4,e4] ~ [a2,e3,a3,c4,e4]@5 ~@3 c#4@5 ~ [a2,e3,a3,c#4,e4] ~ [a2,e3,a3,c#4,e4]@5 ~@2 e4 [a2,e3,a3,c4,e4]@5 ~ [a2,e3,a3,c4,e4] ~ [a2,e3,a3,c4,e4]@5 ~@3 c#4, ~@12 f#3@2 ~@14 f#3@2 e4@2 ~@13 b3@2 ~@14 b3@2 ~, ~@13 b3@2 ~@14 b3@2 ~@13 f#3@2 ~@14 f#3@2 e4@2]/8", // A Am A Am
  V: "[~@5 [a2,e3,a3,c#4,e4] ~ [a2,e3,a3,c#4,e4]@5 ~@2 e4 [a2,e3,a3,c4,e4]@5 ~ [a2,e3,a3,c4,e4] ~ [a2,e3,a3,c4,e4]@5 ~@3 c#4@5 ~@4, ~@6 f#3 ~@7 f#3 e4 ~@4, ~@13 b3@2 ~@14 b3@2 ~@9]/5", // A Am
})).s("gm_electric_guitar_muted").gain(0.38).pan(0.4)

// chords · acoustic guitar nylon · "Rythm Gtr Nylon"
const acoustic_guitar_nylon = note(`<
  A B C D E F G B C D E F G B H I J K L M@2 N O P Q R@2 N O P Q R@2 S@2 T@2 U V W X@3 D E F G B C D E F G B H I J K L
  M@2 N O P Q R@2 Y@2 Z@2 Y@2 Z@2 Y@2 Z@2 Y@2 Z@2 Y@2 Z@2 Y@2 Z@2 Y@2 AA@2
>`.pickRestart({
  A: "~@3 [a2,e3,a3,c#4,e4]@3 [a2,e3,a3,c#4,e4]@2", // A
  B: "[a3,c#4,e4]!4 [a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]@2, [a2,e3]!2 ~@2", // A A5
  C: "[a3,c#4,e4]!4 [a2,e3,a3,c4,e4]@2 [a2,e3,a3,c4,e4]@2, [a2,e3]!2 ~@2", // A Am A5
  D: "[a3,c4,e4]!4 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@2, [a2,e3]!2 ~@2", // Am G A5
  E: "[g3,b3,g4]!4 [f3,a3,c4,e4]@2 [f3,a3,c4,e4]@2, [g2,b2,d3]!2 ~@2", // G Fmaj7 G
  F: "[c4,e4]!4 [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]@2, [f3,a3]!2 ~@2", // C E F
  G: "[g#3,b3,e4]!4 [a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]@2, [e2,b2,e3]!2 ~@2", // E A E5
  H: "[a3,c#4,e4]!4 [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4]@2, [a2,e3]!2 ~@2", // A F#m A5
  I: "[a3,c#4,f#4]!4 [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4]@2, [f#2,c#3,f#3]!2 ~@2", // F#m F#5
  J: "[a3,c#4,f#4]!4 [b2,f#3,b3,d4,f#4]@2 [b2,f#3,b3,d4,f#4]@2, [f#2,c#3,f#3]!2 ~@2", // F#m Bm F#5
  K: "[b3,d4,f#4]!4 [b2,f#3,b3,d4,f#4]@2 [b2,f#3,b3,d4,f#4]@2, [b2,f#3]!2 ~@2", // Bm B5
  L: "[b3,d4,f#4]!4 [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]@2, [b2,f#3]!2 ~@2", // Bm E B5
  M: "[d4,f#4]!2 [d3,a3,d4,f#4] [g#3,b3,e4]@2 [g#3,b3,e4]!3, [d3,a3]@2 ~ [e2,b2,e3]@3 [e2,b2,e3]@2", // D E D5 E5
  N: "[a2,e3,a3,c4,e4]@2 [a2,e3,a3,c4,e4]@2 [a3,c4,e4]!4, ~@2 [a2,e3]!2", // Am A5
  O: "[g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@2 [g3,b3,g4]!4, ~@2 [g2,b2,d3]!2", // G
  P: "[f3,a3,c4,e4]@2 [f3,a3,c4,e4]@2 [c4,e4]!4, ~@2 [f3,a3]!2", // Fmaj7 C F
  Q: "[e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]@2 [g#3,b3,e4]!4, ~@2 [e2,b2,e3]!2", // E E5
  R: "[a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]@2 [a3,c#4,e4]!4, ~@2 [a2,e3]!2", // A A5
  S: "[b2,f#3,b3,d4,f#4]@2 [b2,f#3,b3,d4,f#4]@2 [b3,d4,f#4]!4, ~@2 [b2,f#3]!2", // Bm B5
  T: "[c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4]@2 [c#4,e4,g#4]!4, ~@2 [c#3,g#3]!2", // C#m C#5
  U: "[f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4]@2 [a3,c#4,f#4]!2 [f#2,c#3,f#3,a3,c#4,f#4] ~, ~@2 [f#2,c#3,f#3] ~", // F#m F#5
  V: "[b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4]@2 [a3,b3,f#4]!2 [b2,d#3,a3,b3,f#4]@2, ~@2 [b2,d#3] ~", // B7 B
  W: "[d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]@2 [d4,f#4]!4, ~@2 [d3,a3]!2", // D D5
  X: "[[e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]@2 [d4,f#4]!2 [d3,a3,d4,f#4] [g#3,b3,e4]@2 [g#3,b3,e4]!3 [d4,f#4]!2 [d3,a3,d4,f#4] [g#3,b3,e4]@2 [g#3,b3,e4]!3 [a2,e3,a3,c4,e4]@2 [a2,e3,a3,c4,e4]@2, ~@4 [d3,a3]@2 ~ [e2,b2,e3]@3 [e2,b2,e3]@2 [d3,a3]@2 ~ [e2,b2,e3]@3 [e2,b2,e3]@2 ~@4]/3", // E D E D E Am D5 E5 …
  Y: "[[a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]@2 [a3,c#4,e4]!2 [a2,e3,a3,c#4,e4] [a2,e3,a3,c4,e4]@3 [a2,e3,a3,c4,e4]@2 [a3,c4,e4]!4, ~@2 [a2,e3] ~@3 [a2,e3]!2]/2", // A Am A5
  Z: "[[a2,e3,a3,c4,e4]@2 [a2,e3,a3,c4,e4]@2 [a3,c4,e4]!2 [a2,e3,a3,c4,e4] [a2,e3,a3,c#4,e4]@3 [a2,e3,a3,c#4,e4]@2 [a3,c#4,e4]!4, ~@2 [a2,e3] ~@3 [a2,e3]!2]/2", // Am A A5
  AA: "[[a2,e3,a3,c4,e4]@2 [a2,e3,a3,c4,e4]@2 [a3,c4,e4]!2 [a2,e3,a3,c4,e4] [a2,e3,a3,c#4,e4]@3 ~@6, ~@2 [a2,e3] ~@5]/2", // Am A A5
})).s("gm_acoustic_guitar_nylon").gain(0.35).pan(0.7)

// bass · slap bass 2 · "Fretless E. Bass"
const bass = note(`<
  A B C D E F G H C I J F G H K L M N O P Q R S T U V W R X T U V Y Z@2 AA AB AC Z AD AE@3 AF E F G AG C AF J F G AG K L
  M N O P Q R S T U V AH@28 ~
>`.pickRestart({
  A: "~@6 a1@7 ~ a1@2", B: "e2@3 e2 a1@3 a1", C: "e2@2 e2@2 a1@3 a1", D: "e2@2 a1@2 g1@3 g1", E: "g1@7 ~ f1@6 f1@2",
  F: "f1@7 ~ e1@6 e1@2", G: "e1@3 e1 a1@3 a1", H: "e2@3 e2 a2@3 a2", I: "a1 a1@3 g1@3 g1", J: "g1@3 g1 f1@3 f1",
  K: "e2@2 a2@2 f#2@3 f#2", L: "c#2@2 c#2 e2 f#2@3 f#2", M: "c#2@2 f#2@2 b1@3 b1", N: "f#2@2 f#2@2 b1@3 b1",
  O: "f#2@4 b1@4 e2@7 ~", P: "d2@6 e2@9 ~", Q: "d2@3 e2@3 e1@2", R: "a1@6 a1@2 a1@7 ~", S: "g1@6 g1@2 g1@7 ~",
  T: "f1@6 f1@2 f1@7 ~", U: "e1@3 e1 e1@3 e1", V: "a1@3 a1 e2@2 e2@2", W: "a2@3 a2 e2@2 e2@2", X: "g1@3 g1 g1@3 g1",
  Y: "a1@3 a1 e2@2 a1@2", Z: "b1@3 b1 b1@3 b1", AA: "c#2@3 c#2 c#2@3 c#2", AB: "c#2@3 c#2 c#2@2 g#1@2",
  AC: "f#1@3 f#1 f#1@3 f#1", AD: "d2@3 d2 d2@2 d2@2", AE: "[e2@3 e2 d2@3 e2@3 e2@2 d2@3 e2@3 e1@2 a1@3 a1]/3",
  AF: "a1@7 ~ g1@6 g1@2", AG: "e2@2 e2@2 a2@3 a2", AH: "a1@3 a1 a1@3 e2",
})).s("gm_slap_bass_2").gain(0.49)

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

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

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

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@6 A ~ A ~@4 A ~@3 A ~@5 A ~@9 B C ~@9 A ~@10 A ~@5 D ~@11 D@2 ~ D@2 ~@7 D@2 ~ D@2 ~@5
>`.pickRestart({
  A: "~@3 x ~@4", B: "~ x ~ x", C: "~ x ~@2", D: "~@7 x",
})).gain(0.4)

// drums · crash
const crash = s("cr").struct("<[~@3 x ~@4] ~@18 [~@3 x ~@4]!2 ~@19 [~@7 x]!2 ~@17 [~@3 x ~@4]!2 ~@34>").gain(0.4)

stack(accordion, electric_guitar_muted, acoustic_guitar_nylon, bass, kick, snare, hihat, open_hat, crash)