// You're Going to Lose That Girl — The Beatles
// 135 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: Full arrangement: all 78 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(135/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.

// other · rock organ · "Lead Rock Organ"
const rock_organ = note(`<
  A B C D E F G H ~ I G H A B C D E I G H ~ J G H A B C D K L@2 M N@2 O P Q@2 ~@7 A B C D K L@2 M N@2 O P Q@2 I G H ~ J
  G H A B C D K R@2 S@3 ~@2
>`.pickRestart({
  A: "~@5 g#4 b4 g#4", B: "c#5 g#4@2 b4@3 ~@2", C: "~@5 b4 c#5 b4", D: "g#5@6 f#5 e5", E: "f#5 b4@3 ~@4",
  F: "~ g#4 b4!3 b4@3", G: "d#5@2 e5 d#5@2 d#5!3", H: "c#5@2 b4 f#4@3 ~@2", I: "~ b4!4 b4@3", J: "~ g#4 b4 g#4 b4 b4@3",
  K: "f#5 b4@3 ~ b4 c#5 b4", L: "[a5@5 b5 g#5 a5@7 ~@2]/2",
  M: "~ [a#4,c5,g5] [b4,d5,g5] [a#4,c5,g5] [b4,d5,g5]@2 ~ [g4,d5,g5]", // C7 G C7 G G5
  N: "[[c5,e5,g5] [b4,d5,g5] [c5,e5,g5] [b4,d5,g5] [c5,e5,g5] [g4,e5,g5]@2 [b4,d5,g5]@3 ~@6]/2", O: "b4 a4 g4@4 ~@10",
  P: "~ [a#4,c5,g5] [b4,d5,g5] [a#4,c5,g5] [b4,d5,g5] [b4,d5,g5]@2 ~", // C7 G C7 G
  Q: "[[c5,e5,g5] [c5,e5,g5]@3 [c5,e5,g5] [c5,e5,g5]@2 [a4,c5,f5]@9]/2", // C F
  R: "[a5@5 b5 g#5 ~ [d5,f#5]@4 [c#5,e5,a5]@4, ~@7 a5@5 ~@4]/2", S: "[[c#5,a5]@2 [b4,g#5]@31 ~@15, e5@11 ~@5]/3",
})).s("gm_rock_organ").gain(0.72)

// chords · acoustic guitar nylon · "Ryth Gtr Nylon Bnk32"
const acoustic_guitar_nylon = note(`<
  ~@5 A B C D@2 E F G A H I J@2 K C D@2 E F G L M N O P Q R S T@3 U V A W C X A W C X L Y N O P Q R S T@3 U V A K C D@2
  E F G L M N O P Z AA@5
>`.pickRestart({
  A: "[e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4] [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]", // E
  B: "[g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4] [g#2,d#3,g#3,b3,d#4,g#4]@5", // G#m
  C: "[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,a3,c#4,f#4] [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4]", // F#m
  D: "[[b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4]!2 [e2,b2,e3,g#3,b3,e4]@3 [e2,b2,e3,g#3,b3,e4] [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]!3]/2", // B7 E
  E: "[g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4] [g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4]!3", // G#m
  F: "[f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4] [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4]!3", // F#m
  G: "[b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4]!3", // B7
  H: "[c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4] [c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4] [c#3,g#3,c#4,e4,g#4]@2", // C#m
  I: "[f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4] [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4] [f#2,c#3,f#3,a3,c#4,f#4]@2", // F#m
  J: "[[b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4]!2 [e2,b2,e3,g#3,b3,e4]@3 [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4] [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]]/2", // B7 E
  K: "[g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4] [g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4] [g#2,d#3,g#3,b3,d#4,g#4]@2", // G#m
  L: "[e2,b2,e3,g#3,b3,e4]!2 [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4] [e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]", // E
  M: "[c#3,g#3,c#4,e4,g#4]!3 [c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4] [c#3,g#3,c#4,e4,g#4]@2", // C#m
  N: "[f#2,c#3,f#3,a3,c#4,f#4]@3 [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4] [f#2,c#3,f#3,a3,c#4,f#4]@2", // F#m
  O: "[b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] [b2,d#3,a3,b3,f#4]@2", // B7
  P: "[f#2,c#3,f#3,a3,c#4,f#4]!3 [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4]!3", // F#m
  Q: "[d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!4", // D
  R: "[g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@3 [g2,b2,d3,g3,b3,g4]!3", // G
  S: "[c3,e3,g3,d4,g4]@2 [c3,e3,g3,d4,g4]@2 [c3,e3,g3,d4,g4]!4", // C
  T: "[[g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@4 [g2,b2,d3,g3,b3,g4]@5 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@3 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]!2]/3", // G
  U: "[c3,e3,g3,d4,g4]!5 [c3,e3,g3,d4,g4]@3", // C
  V: "[f2,c3,f3,a3,c4,f4]@2 [f2,c3,f3,a3,c4,f4]@3 [f2,c3,f3,a3,c4,f4]@2 [f2,c3,f3,a3,c4,f4]", // F
  W: "[g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4] [g#2,d#3,g#3,b3,d#4,g#4]@2 [g#2,d#3,g#3,b3,d#4,g#4]", // G#m
  X: "[b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4]", // B7
  Y: "[c#3,g#3,c#4,e4,g#4]!2 [c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4] [c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4]", // C#m
  Z: "[d3,f#3,a3,d4,f#4]!4 [a2,e3,a3,c#4,e4]!2 [a2,e3,a3,c#4,e4]@2", AA: "[[e2,b2,e3,g#3,b3,e4]@33 ~@7]/5",
})).s("gm_acoustic_guitar_nylon").gain(0.33).pan(1)

// chords · piano
const piano = note(`<
  ~ A B C D E F G H E F G H A B C I E F G H E F G H J K L M L N O P Q R S T U J V L M J V L M J K L M L N O P Q R S T U
  E F G H E F G H J K L M L W X@5
>`.pickRestart({
  A: "e3@2 [e3,b3,e4,g#4]@2 [e3,b3,e4,g#4] [e3,b3,e4,g#4]@2 [e3,b3,e4,g#4]", // E
  B: "c#3@2 [c#3,c#4,e4,g#4]@2 [c#3,c#4,e4,g#4] [c#3,c#4,e4,g#4]@2 [c#3,c#4,e4,g#4]", // C#m
  C: "f#2@2 [f#2,a3,c#4,f#4]@2 [f#2,a3,c#4,f#4] [f#2,a3,c#4,f#4]@2 [f#2,a3,c#4,f#4]", // F#m
  D: "b2@4 b2@4 b2!4 b2@2 b2@2, ~ [b3,d#4,f#4]@3", E: "e3 e3@3 b2 b2@3", F: "g#2 g#2@3 g#2 g#2@3",
  G: "f#2 f#2@3 f#2 f#2@3", H: "b2 b2@3 b2!2 c#3 d#3",
  I: "b2@2 [b2,b3,d#4,f#4]@2 [b2,b3,d#4,f#4] [b2,b3,d#4,f#4]@2 [b2,b3,d#4,f#4]", J: "[e3,b3,e4,g#4]!8",
  K: "[c#3,c#4,e4,g#4]!8", L: "[f#2,a3,c#4,f#4]!8", M: "[b2,b3,d#4,f#4]!8", N: "[d3,a3,d4,f#4]!8",
  O: "g2!2 [g2,g3,b3,d4]!2 g2!2 [g2,g3,b3,d4]!2", P: "c3!2 [c3,g3,c4,e4]!2 c3!2 [c3,g3,c4,e4]!2",
  Q: "g2!8, ~@2 [g3,b3,d4]@3 [g3,c4,e4]@3", R: "g2!7 [g2,g3,d4,f4], ~@2 [g3,b3,d4]@3 [g3,c4,e4]@2 ~",
  S: "g2!7 [g2,g3,b3,d4], ~@2 [g3,b3,d4]@3 [g3,c4,e4]@2 ~", T: "c3!7 [c3,g3,c4,e4], ~@2 [g3,c4,e4]@3 [g3,c4,e4]@2 ~",
  U: "[f3,a3,c4,f4]!8", V: "[g#2,b3,d#4,g#4]!8", W: "[d3,a3,d4,f#4] [a2,a3,c#4,e4]", X: "[[e2,g#3,b3,e4]@33 ~@7]/5",
})).s("gm_piano").gain(0.44).pan(0.1)

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

// other · electric guitar jazz · "Gtr Lead Jazz Elec."
const electric_guitar_jazz = note("<~@38 A B@2 C A D E C F ~@31>".pickRestart({
  A: "f#4 g#4 b4 f#4 g#4 b4 f#4 g#4",
  B: "[b4@2 f#4@2 g#4@2 b4@2 g#4@2 f#4@3 ~ f#4@4 e4@4 e5@6 ~@2 [c#5,d#5]@2, ~@14 e4 ~@17]/2", C: "c#5 b4@2 b4@5",
  D: "b4 f#4 g#4 b4 g#4@2 [f#4,g#4] f#4, ~@8 f#4 ~@7", E: "[f#4,g#4] f#4 e4 e5@3 ~ [c#5,d#5]", F: "g#4",
})).s("gm_electric_guitar_jazz").gain(0.55).pan(0.2)

// drums · kick
const kick = s("bd").struct("<~@5 [x ~@2 x!2 ~@3]!68 x ~@4>").gain(0.49)

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

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

// drums · open hat
const open_hat = s("oh").struct("<~@7 A ~@3 A ~@2 A ~ A ~@2 A ~@8 A ~@13 A ~@6 A ~@11 A ~@9 A@2 ~@5>".pickRestart({
  A: "~@7 x",
})).gain(0.49)

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

stack(rock_organ, acoustic_guitar_nylon, piano, bass, electric_guitar_jazz, kick, snare, hihat, open_hat, crash)