// Do You Want To Know A Secret — The Beatles
// 115 bpm, 4/4, key E major. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 73 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(115/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 E.Bass"
const bass = note(`<
  ~@5 A@2 B C B C B D E F G F H I J K B C B C B D E F G F H I J K L M N O P Q B C B C B D E F G F H I J K ~ R ~ R ~ R ~
  R ~ R ~ R ~ R ~ R ~@2
>`.pickRestart({
  A: "[~@4 b2@27 ~]/2", B: "e2@3 e2 g#2@2 g2@2", C: "f#2@3 f#2 b2 a2 g#2 f#2", D: "f#2@3 f#2 c3@4",
  E: "e2@2 g#2 a2 g#2@2 g2@2", F: "f#2@2 f#2@2 b2 a2 g#2 f#2", G: "e2!2 g#2 g2", H: "a2@3 a2@3 a2@2",
  I: "b2@3 b2@3 b2@2", J: "c#3 c#2!7", K: "f#2@2 c#3 c3 b2 a2 g#2 f#2", L: "a2@3 a2 f#2@2 f#2@2", M: "c#3@3 d3 b2@4",
  N: "a2!2 f#2!2", O: "c#3@3 d3 b2@3 b2", P: "f#2@3 f#2 f#2@3 f#2", Q: "b2!2 a2!2 g#2!2 f#2 b1", R: "b2 a2 f#2 b2",
})).s("gm_fretless_bass").gain(0.45).pan(0.6)

// chords · acoustic guitar nylon · "Nylon Gtr"
const acoustic_guitar_nylon = note(`<
  A@7 B C B C B D E C B F G H I F B C B C B D E C B F G H I F J K L M N O B C B C B D E C B F G H I F P Q P Q P Q P Q P
  Q P Q P Q P Q ~@2
>`.pickRestart({
  A: "[~@4 [b3,e4]@22 ~ c4@4 ~@19 [d4,g4]@21 ~@2 [c4,f4]@9 ~ [d#4,f#4]@13 ~@2 b2@2 b2 c#3 ~ b2 d3@2 b2@2 d#3@2 b2@2, ~@2 e2@23 ~@2 e4@5 [e3,g3,b3]@16 ~ [d3,g3,b3]@22 ~ [c3,f3,a3]@10 [b2,f#3,b3]@14 ~@16, ~@3 [b2,e3,g3]@23 [a2,e3,a3]@5 [e2,b2]@17 g2@23 f2@10 ~@31, ~@33 e4@32 ~@18 b4@15 ~@14]/7", // E5 G5 F5 D#m Em G F B5 …
  B: "~@2 [g#3,b3,e4]@2 ~ [g#3,b3,d#4,g#4] ~ [g3,a#3,d4,g4], e3@2 d#3 d3", // E G#m Gm
  C: "~ [f#3,a3,c#4,f#4] d#3 [d#3,a3,b3,f#4], c#3 ~", D: "[f#2,c#3,f#3,a3,c#4,f#4] [c3,g3,c4,e4,g4]",
  E: "[e2,b2,e3,g#3,b3,e4]@2 [e2,b2,e3,g#3,b3,e4]@2 ~ [g#3,b3,d#4,g#4] ~ [g3,a#3,d4,g4], ~@2 d#3 d3", // E G#m Gm
  F: "[f#2,c#3,f#3,a3,c#4,f#4] [b2,d#3,a3,b3,f#4]", G: "[a2,e3,a3,c#4,e4]@3 [a2,e3,a3,c#4,e4]@3 [a2,e3,a3,c#4,e4]@2",
  H: "[b2,d#3,a3,b3,f#4]@3 [b2,d#3,a3,b3,f#4]@3 [b2,d#3,a3,b3,f#4]@2", I: "~ e4, [c#3,e3], ~@3 c#4@5",
  J: "[a2,e3,a3,c#4,e4] [f#2,c#3,f#3,a3,c#4,f#4]", // A F#m
  K: "[c#3,g#3,c#4,e4,g#4]!2 ~ [c#3,g#3,c#4,e4,g#4] [b2,f#3,b3,d4,f#4]!2 [b2,f#3,b3,d4,f#4]@2", // C#m Bm
  L: "[a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4] ~ [f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4] ~", // A F#m
  M: "[c#3,g#3,c#4,e4,g#4]@2 [c#3,g#3,c#4,e4,g#4] ~ [b2,f#3,b3,d4,f#4]@2 [b2,f#3,b3,d4,f#4] ~", // C#m Bm
  N: "[f#2,c#3,f#3,a3,c#4,f#4]@3 [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#m
  O: "[b2,f#3,a3,d#4,f#4]@3 [b2,f#3,a3,d#4,f#4]@3 [b2,f#3,a3,d#4,f#4]@2", // B7
  P: "~@5 c#4@3, c#3, ~ g#3@3, ~@3 c#4@2 ~@3, ~ e4",
  Q: "[f#2,c#3,f#3,a3,c#4,f#4]@2 [f#2,c#3,f#3,a3,c#4,f#4] ~ [b2,d#3,a3,b3,f#4]@2 [b2,d#3,a3,b3,f#4] ~", // F#m B7
})).s("gm_acoustic_guitar_nylon").gain(0.35).pan(0.3)

// chords · epiano1 · "Rhodes Piano"
const epiano1 = note(`<
  ~@7 A B C D E F G H I J K@2 L@2 M N O P Q R@2 S T@2 U@3 V W X Y Z AA AB@2 AC AD AE Q AF@2 AG AH AI@3 AJ@2 AK@2 AL@2 AM
  AN@2 AO AP@2 AQ AR@2 AS AT@4
>`.pickRestart({
  A: "~@4 g#3@2 [e3,g#3,b3,e4,g#4]@2 [g#3,b3,d#4,g#4]@3 ~ [g3,d4,g4,a#4,d5]@3 ~, [b3,e4]@3 ~@5, g#3 ~@3, ~ e3@2 ~@5", // E G#m Gm E5
  B: "~@2 a3 [a3,f#4] b2 ~ a3 [a3,b3,d#4,f#4], a4@4 ~ b2@3, [c#4,f#4]@3 ~ [b3,d#4,f#4]@3 ~, a3 ~ a3 ~, ~ f#3@2 [f#3,c#4]@5", // D B7 F#5 B F#5
  C: "[g#3,b3,e4,g#4]@7 ~ d#4 ~@2 g#3 [g3,d4,g4,a#4]@3 ~, ~@2 [g#3,g#4] ~, ~@4 b3!2 ~@2, ~@9 d#4@3 ~@4", // E Gm G#
  D: "[a3,c#4,f#4]@7 ~ [a3,b3,d#4,f#4]@7 ~", // F#m B7
  E: "~@4 g#3@2 [g#3,b3,e4]@2 d#4 ~@2 g#3 [g3,a#3,d4]@3 ~, g#4@8 ~ d#4@3 ~@4, [b3,e4]@3 ~ b3!2 ~@2, g#3 ~ [g#3,g#4] ~, ~ e3@3 ~@4", // E Gm E5 G#
  F: "a3@4 ~@2 c#4@2 [g3,c4,e4]@7 ~, [f#4,a4] ~, c#4@3 ~@5, ~ a3 ~@2", // C F#m
  G: "[e3,g#3,b3,e4,g#4]@7 ~ [g#3,b3,d#4,g#4]@3 ~ [g3,a#3,d4,g4]@3 ~", // E G#m Gm
  H: "~@6 c#4@2 [b2,f#3,b3,d#4,f#4]@7 ~, f#4 ~, c#4@3 ~@5, a3!2 ~@2, ~ f#3@3 ~@4", // B
  I: "g#3@4 ~@2 b3@2 [g#3,b3,d#4,g#4]@3 ~ [a#3,d4,g4,a#4]@3 ~, e4 ~, b3@3 ~@5, ~ g#3 ~@2", // G#m Gm
  J: "f#3 ~@2 f#4 ~@2 a3 [a3,b3,d#4,f#4], a4 ~, f#4@3 ~@2 b2@3, c#4@2 c#4@2 [b3,d#4,f#4]@3 ~, ~ f#3@3 a3@2 ~@2", // B7 B
  K: "[a3@5 ~@3 [a3,b3,d#4,f#4]@8, a4 ~, e4@7 e4@9, c#4@3 c#4 ~@4, ~@5 a3@3 ~@8]/2", // B7
  L: "[~@12 c#4@4 ~@4 a3@2 [a3,c#4,f#4,a4]@2 [a3,b3,d#4,f#4]@7 ~, g#4@8 [c#4,f#4]@3 ~@5, [g#3,c#4,e4]@3 [g#3,e4]@3 ~@2, ~@5 c#3@3 a3@2 ~@6, ~@9 f#3@3 ~@4]/2", // F#m B7 F#5 C#m
  M: "~@4 g#3@2 [e3,g#3,b3,e4]@2 d#4 ~@2 g#3 [g3,a#3,d4]@3 ~, g#4@8 ~ d#4@3 ~@4, [b3,e4]@3 ~ b3!2 ~@2, g#3 ~ [g#3,g#4] ~, ~ e3@2 ~@5", // E Gm E5 G#
  N: "~@6 a3 [b2,a3,b3,d#4,f#4], [f#4,a4]@4 ~ b2@2 ~, c#4@3 c#4@5, a3@2 a3@2 [b3,d#4,f#4]@3 ~, ~ f#3@3 a3@2 ~@2", // B7 F#m B
  O: "e3@2 ~@2 g#3@2 [g#3,b3,e4]@2 [g#3,b3,d#4,g#4]@3 ~ [g3,a#3,d4]@3 ~, [b3,e4]@3 ~@5, g#3 ~@3, ~ e3@3 ~@4", // E G#m Gm E5
  P: "~@6 c#4@2 [d#4,f#4,a4,b4]@7 ~, [f#4,a4] ~, c#4@3 ~@5, a3!2 ~@2, ~ f#3@3 ~@4", // B7 F#m
  Q: "[g#3,b3,e4]@7 ~ [g#3,b3,d#4]@3 ~ [g3,a#3,d4]@3 ~", // E G#m Gm
  R: "[~@16 g#3@4 ~@2 b3@2 [g#3,b3,d#4]@3 ~ [g3,d4,g4,a#4]@3 ~, [a3,c#4,f#4,a4]@7 c4@5 ~@4, ~ [e4,g4] [e4,g#4] ~, ~@4 c4@2 g3@2 b3@3 ~@5, ~@4 g3 c3@3 ~@2 g#3@2 ~@4]/2", // G#m Gm F#m Em E
  S: "f#3 ~ a3 f#4 b2 ~@2 b3, [c#4,f#4,a4]@3 ~ [d#4,f#4]@4, a3@2 ~ [a3,c#4,a4]@5, ~ f#3@3 b3@2 f#3@2, ~@4 f#3 b2@3", // F#m D#m A
  T: "[[e3,g#3,b3,e4]@7 ~ [g#3,b3,d#4]@3 ~ g4 ~@3 c#4@4 ~@2 f#4@2 ~@4 a3@2 [a3,b3,d#4,f#4]@2, ~@12 [g3,a#3,a#4]@3 a#3@9 [b3,d#4,f#4]@6 ~@2, ~@6 d4!2 [f#3,a4]@4 a3@2 ~@2, ~@13 g4@3 f#4@6 ~@10, ~@10 c#4@2 ~ b2@3]/2", // E G#m B7 Gm B F#m
  U: "[~@6 a3@2 a3@5 ~@3 [c#3,g#3,c#4,e4,g#4]@8, a4@8 f#4@7 d#4@9, [a3,c#4,e4]@3 [c#4,e4]@5 ~@4, ~@5 a2@3 d#4@6 b3@2 ~@8, ~@8 b3@5 a3@3 ~@8]/3", // C#m A C#m
  V: "~@2 a3 [a3,f#4] b2 ~ a3 [b2,a3,b3,d#4,f#4], [c#4,f#4,a4]@3 ~ [b3,d#4,f#4]@3 ~, a3 ~ a3 ~, ~ f#3@2 [f#3,c#4,a4]@5, ~@5 b2@2 ~", // D B7 F#m B F#m
  W: "a3@4 ~@2 c#4@2 [a3,c#4,f#4]@7 ~, e4 ~, c#4@3 ~@5, ~ a3 ~@2", // F#m
  X: "g#3@4 ~@2 c#4@2 [b2,f#3,b3,d4]@7 ~, [e4,g#4] ~, c#4@3 ~@5, ~ g#3 ~@2", // Bm E
  Y: "[a3,c#4,a4]@4 a3@2 ~ c#4, [a2,e4], ~ [f#4,a4], ~@4 c#4@3 ~, ~@3 a3", // A A5 F#m
  Z: "~@4 g#3@2 [c#3,g#3,c#4,e4,g#4]@2 [f#3,b3,d4,f#4]@7 ~, [c#4,e4]@3 ~@5, g#3 ~@3, ~ c#3@2 ~@5", AA: "[a3,c#4,f#4]",
  AB: "[a3@10 ~@12 b3@2 [g#3,b3,d#4,g#4]@3 ~ [g3,a#3,d4,g4]@3 ~, f#4@2 [e4,g#4] ~, d#4@7 d#4@5 ~@4, b3@3 b3 b3 g#3 ~@2, ~@5 a3@3 g#3 e3@3 ~@4]/2", // G#m Gm E
  AC: "~@7 b3, f#4 [d#4,f#4], c#4@3 c#4@5, a3!2 b3 a3, ~ f#3@3 a3 b2@3", // D#m
  AD: "g#3@4 ~@2 b3@2 [g#3,b3,d#4]@3 ~ d4 ~@2 g3, e4@8 ~@5 d4@3, b3@3 ~@4 a#3, ~@4 g#3@4 ~@4 [g3,a#3]@3 ~", // G#m Gm
  AE: "[a3,c#4,f#4,a4]@7 ~ [a3,b3,d#4,f#4]@7 ~", // F#m B7
  AF: "[c#4@4 ~@12 g#3@4 ~@2 b3@2 [g#3,b3,d#4]@3 ~ [a#3,d4,g4]@3 ~, [f#3,a4]@4 c4@2 g3 c4@5 ~@4, f#4@3 f#4@5 b3@3 ~@5, ~ c#4 [e4,g4]@2 [e4,g#4]@2 ~@2, ~@4 g3 c3@3 ~@2 g#3@2 ~@4]/2", // G#m Gm F#m Em E
  AG: "[f#3,f#4]@4 ~@2 f#3 [f#3,b3,d#4], [a3,c#4,a4], ~ f#4, ~@4 [b3,d#4]@3 ~, ~@4 f#3 b2@3", // F# B A B
  AH: "[g#3,b3,e4,g#4]@7 ~ d#4 ~@2 g#3 [g3,a#3,d4]@3 ~, ~@4 [g#3,b3] b3 ~@2, ~@9 d#4@3 ~@4", // E Gm G#m
  AI: "[[a3,f#4]@4 b2 ~@3 a2@5 ~ a4@2 [b2,d#4,f#4,a4,b4]@8, c#4@7 b3@9 ~@8, ~ [d#4,f#4] ~@4, ~@2 b3 a3 [a3,c#4,e4,a4]@3 [a3,c#4,e4]@5, ~@4 a3 b2@3 ~@5 a2@3 ~@8]/3", // D B7 D#m A
  AJ: "[~@6 c#4@2 ~@4 b2 ~ a3 [a3,b3,d#4,f#4], [g#3,c#4,e4]@6 [g#3,e4,g#4]@5 c#4@5, ~@5 c#3@3 f#4@4 ~ b2@3, ~@8 c#4@2 a3@2 [b3,d#4,f#4]@3 ~, ~@8 a3 f#3@3 a3@2 ~@2]/2", // B7 C#m B
  AK: "[c#3@5 ~ c#4@2 ~@4 b2 ~ a3 [a3,b3,d#4,f#4], [g#3,c#4,e4,g#4]@6 [g#3,e4,g#4]@5 c#4@5, ~@5 c#3@3 [f#4,a4]@4 ~ b2@3, ~@8 c#4@2 a3@2 [b3,d#4,f#4]@3 ~, ~@8 a3 f#3@3 a3@2 ~@2]/2", // B7 C#m F#m B
  AL: "[g#3@5 ~@5 c#4 f#4 ~@2 a3 [a3,b3,d#4,f#4], e4@7 e4@5 [b3,d#4,f#4]@3 ~, c#4@6 c#4@2 c#5@4 ~ b2@3, ~@5 g#3@3 [f#4,a4]@3 [c#4,a4]@5, ~@8 c#4 f#3@3 a3@2 ~@2]/2", // B7 B F#m
  AM: "g#3@5 ~@2 e4, c#3, e4@7 ~, c#4@3 c#4, ~@5 g#3@3",
  AN: "[[a3,f#4]@4 b2 ~@3 g#3@5 ~@2 e4, c#4@7 b3@9, ~@2 [d#4,f#4]@2 e4@3 c#4, ~@4 b3@2 a3@2 c#4@5 g#3@3, ~@4 a3 b2@3 c#3@8]/2", // D D#m
  AO: "[a3,f#4]@4 a3@2 ~ b3, [f#3,c#4,a4], ~ [d#4,f#4], ~@4 b3@3 ~, ~@3 a3", // D F#m D#m
  AP: "[g#3@10 ~@12 c#4@2 [d#4,f#4,a4,b4]@7 ~, [c#3,g#4]@8 a3 f#3@3 ~@4, e4@7 e4@5 ~@4, c#4@3 c#4 f#4@2 ~@2, ~@5 g#3@3 c#4@2 a3@2 ~@4]/2", // B7 C#5
  AQ: "~@5 c#3 [c#3,g#3,c#4,e4]@2, g#4, [g#3,c#4,e4]@3 ~", // C#m
  AR: "[[a3,f#4]@4 ~@4 g#3@5 ~@2 e4, [c#4,a4]@7 b3@9, ~@2 [d#4,f#4]@2 e4@3 c#4, ~@4 b3@2 a3@2 c#4@5 g#3@3, ~@4 a3 b2@3 [c#3,g#4]@8]/2", // D F#m D#m C#5
  AS: "[f#3,a3,c#4,f#4]@7 ~ [a3,b3,d#4,f#4]@7 ~", // F#m B7
  AT: "[c#3@5 ~ c#4@2 a3@2 ~@2 [d#4,f#4]@16 ~@4, [g#3,c#4,e4]@3 [g#3,e4,g#4]@3 a3 ~@9, ~@5 c#3@3 [f#3,f#4,a4]@4 ~@20, ~@8 c#4@3 c#4@16 ~@5, ~@10 a3@2 b3@3 ~@17]/4", // D#m C#m F#m
})).s("gm_epiano1").gain(0.31).pan(1)

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

// drums · rim
const rim = s("rim").struct(`<
  ~@7 A B A B A B A B A C ~@4 A B A C A B A B A C ~@10 A B A B A B A B A C ~@22
>`.pickRestart({
  A: "~ x ~ x", B: "x!2 ~ x", C: "x!2 ~@2",
})).gain(0.42)

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

// drums · hihat
const hihat = s("hh").struct(`<
  ~@7 A B@7 A C D E F C B@3 G A B@4 C H I J C A K L@3 C B@5 I B I B C M L N C O P A G Q C R G R C S P T C T G ~@2
>`.pickRestart({
  A: "~ x!7", B: "x!8", C: "x ~ x ~ x ~ x ~ x ~ x ~ x!2 ~@2", D: "x ~ x ~ x ~ x!3 ~ x!3 ~ x ~",
  E: "x ~ x!3 ~ x!3 ~ x ~ x ~ x ~", F: "x ~ x ~ x ~ x!3 ~ x ~ x ~ x ~", G: "x ~ x ~ x ~ x ~ x ~ x ~ x!2 ~ x",
  H: "x ~ x ~ x ~ x ~ x ~ x!3 ~ x!2", I: "x ~ x ~ x ~ x ~ x ~ x ~ x ~ x!2", J: "x ~ x ~ x ~ x ~ x ~ x!3 ~ x ~",
  K: "x ~ x!3 ~ x ~ x ~ x ~ x ~ x!2", L: "x ~ x ~ x ~ x!3 ~ x!3 ~ x!2", M: "x ~ x!3 ~ x ~ x ~ x ~ x ~ x ~",
  N: "x ~ x ~ x ~ x!3 ~ x ~ x ~ x!2", O: "~@2 x ~ x ~ x!3 ~ x!3 ~ x!2", P: "x ~ x ~ x ~ x ~ x ~ x ~ x!3 ~",
  Q: "~@2 x!3 ~ x ~ x ~ x!3 ~ x ~", R: "~@2 x!3 ~ x!3 ~ x!3 ~ x ~", S: "~@2 x!3 ~ x!3 ~ x ~ x ~ x!2",
  T: "~@2 x!3 ~ x!3 ~ x!3 ~ x!2",
})).gain(0.42)

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

// drums · open hat
const open_hat = s("oh").struct("<~@15 A B@4 ~@13 B ~ B ~@9 C ~@5 B ~@5 D ~ B ~ B ~ D E ~ B A ~@5>".pickRestart({
  A: "x", B: "~@15 x", C: "~@3 x", D: "x ~@14 x", E: "~@7 x",
})).gain(0.36)

// drums · crash
const crash = s("cr").struct("<~@7 A ~@17 A ~@9 A ~@19 A ~@3 A ~ A ~@3 A ~@3 A ~@3>".pickRestart({
  A: "x",
})).gain(0.48)

stack(bass, acoustic_guitar_nylon, epiano1, kick, rim, snare, hihat, hihat_soft, open_hat, crash)