// Words Of Love — The Beatles
// 122 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: Full arrangement: all 66 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(122/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.

// bass · fretless bass
const bass = note(`<
  A B A B A B C ~ A B A B A B A B A B A B A B A B A B A B A B C ~ A B A B A B C ~ A B A B A B A B A B A B A B A B A B A
  B A B C ~ D ~
>`.pickRestart({
  A: "a1@3 ~ e2@3 ~", B: "d2@3 ~ e2@3 ~", C: "a1@5 ~@11", D: "a1",
})).s("gm_fretless_bass").gain(0.43).pan(0.4)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  A@2 B@2 C@2 D E F G H I J K L@2 M N O P Q G R@2 S T U T V W X Y A@2 B@2 C@2 D E F G H I J K L@2 M N O P Q G R@2 Z T AA
  T V W AB AC AD ~
>`.pickRestart({
  A: "[[a3,c#4]@4 [a3,c#4,e4]@4 [e3,a3,c#4]@4 [e3,a3,c#4]@2 ~@8 a3 ~@3 d4@2 ~@2 g#3 ~, e3@8 e4@6 ~ e4@2 ~ f#4@5 ~ e4@4 ~@4, ~@8 d3@7 ~, ~@10 d4@3 ~ [b3,e4]@2]/2", // A E5
  B: "[[e3,a3,c#4]@4 [e3,a3,c#4]@4 [a3,c#4]@4 [a3,c#4]@3 ~@7 a3@2 ~@2 d4@2 [b3,e4]@2 g#3 ~, a2@14 ~@2 d3@15 ~, ~@8 e3@6 ~ e4@2 ~ f#4@5 ~ e4@4 ~@4, ~@20 d4@5 ~@7]/2", // A E5
  C: "[[e3,a3,c#4]@4 [e3,a3,c#4]@4 [e3,a3,c#4]@4 [e3,a3,c#4]@3 ~@7 a3@2 ~@2 d4@2 ~@2 g#3@2, ~@15 e4@3 f#4@5 ~ g#3@6 ~@2, ~@8 d3@7 ~, ~@10 d4@3 ~ [b3,e4]@2, ~@6 e4 ~]/2", // A E5
  D: "[e4,a4]@2 [g4,g#4] [e4,f4,f#4] e4@2 [d4,d#4] c#4 [c#4,e4]@2 d4 [d#4,e4] e4@4", // A5 G#maj7 D#maj7 C#m Emaj7
  E: "~@6 a3 ~@3 d4@2 [b3,d4]@2 g#3@2, a3@2 d4@3 ~@3, ~@2 f#4@5 ~ e4@4 ~@4", // Bm
  F: "[a2,e3,a3,c#4]@2 ~ [e3,a3,c#4]@2 ~@2 [g#3,c#4,f4]", // A C#
  G: "[a3,d4,f#4]@4 ~@2 [e4,g#4]@4 [e4,g#4]@2 [b3,e4] ~@3, ~@3 b3@3 ~@2", H: "[a2,e3,a3]@2 ~ [e3,a3]@2 c#4 ~ [g#3,c#4]",
  I: "[a3,d4]@2 ~@3 g#4 ~@2, ~@3 [b3,e4]@3 ~@2", J: "[e3,a3,c#4]@2 ~ [a3,c#4]@2 c#4 ~ [g#3,c#4], ~@3 e3@3 ~@2",
  K: "[a3,d4,f#4]@2 ~ e4@2 [e4,g#4] ~@2, ~@3 b3@3 ~@2", // D E
  L: "[[e3,a3,c#4]@4 ~@2 [a3,c#4]@4 c#4@2 a3 ~@9 a3@2 ~@2 d4@2 b3@2 g#3 ~, ~@6 [a2,e3]@7 ~@2 e4@2 ~ f#4@4 ~@2 e4@4 ~@4, ~@16 d3@15 ~, ~@10 d4@3 ~@3]/2", // A A5
  M: "[a2,a3]@4 a2@2 ~@4 c#4@2 [a2,e3] ~ [g#3,c#4]@2, [e3,c#4]@3 [e3,a3]@3 ~@2", // A A5 C#5 C#m A5
  N: "[a3,d4]@4 ~@2 [e4,g#4]@3 ~ [e4,g#4]@2 [b3,e4] ~@3, ~@3 b3@3 ~@2", // D5 E E5
  O: "[e3,a3,c#4]@2 ~ a3@2 c#4 ~ [g#3,c#4], ~@3 e3@3 ~@2", P: "[a3,d4,f#4]@4 ~@6 g#4@2 [e4,g#4] ~@3, ~@3 [b3,e4]@3 ~@2",
  Q: "[e3,a3]@2 ~ c#4 ~ c#4 ~ [g#3,c#4], ~@3 [e3,a3]@3 ~@2", // A5 C#5 A5
  R: "[[e3,a3,c#4]@4 [e3,a3,c#4]@4 [e3,a3]@4 [e3,a3]@2 ~@8 a3 ~ e4@2 d4@2 [b3,e4]@2 g#3 ~, ~@8 c#4@6 ~ e4@2 ~ f#4@5 ~@9, ~@16 d3@7 ~@9, ~@20 d4@5 ~@7]/2", // A A5 E5
  S: "[e4,a4]@2 g#4 [f4,f#4] e4@2 [d4,d#4] c#4 [c#4,e4]@2 d4 [d#4,e4] e4@3 f#4", // A5 F#maj7 D#maj7 C#m Emaj7
  T: "[d4,f#4]@4 ~@2 [f#4,a4]@2 [e4,g#4]@3 ~ [g#4,b4]@4", // D F#m E G#m
  U: "[e4,a4]@2 [f#4,g4,g#4] [e4,f4] e4@2 [c#4,d4,d#4] ~ [c#4,e4]@2 d4 [d#4,e4] e4@3 ~", // A5 Fmaj7 C#m Emaj7
  V: "[e4,a4]@2 [f4,f#4,g#4] e4 e4@2 [c#4,d4,d#4] ~ [c#4,e4]@2 [d4,d#4] e4 e4@3 ~", // A5 Fm C#m D#maj7
  W: "[d4,f#4]@3 ~@3 [f#4,a4]@2 [e4,g#4]@3 ~ [g#4,b4]@3 ~", // D F#m E G#m
  X: "e4@4 a4@3 ~ a4 [f#4,g#4] e4@3 ~ b3@2, c#5@2 ~@2 e4@2 ~ e4@3 ~@6", // F#sus2
  Y: "~@3 a3 ~ d4 b3!2, a3@3 ~@5, d4@2 d4@3 ~@3, ~@2 f#4@5 ~ e4@4 e4@4",
  Z: "[e4,a4]@2 g#4 [f4,f#4] e4@2 [d4,d#4] c#4 [c#4,e4]@2 d4 [d#4,e4] e4@2 ~ f#4", // A5 F#maj7 D#maj7 C#m Emaj7
  AA: "[e4,a4]@2 [f#4,g4,g#4] [e4,f4] e4@2 [c#4,d4,d#4] ~ [c#4,e4]@2 d4 [d#4,e4] e4@4", // A5 Fmaj7 C#m Emaj7
  AB: "e4@4 [e4,a4]@3 ~ a4 [f#4,g#4] e4@3 ~ b3@2, c#5@2 ~@5 e4@3 ~@6", // A5 F#sus2
  AC: "~@3 a3 ~ d4 b3 g#3, a3@3 ~@5, d4@4 d4@5 ~@7, ~@2 f#4@5 ~ e4@4 e4@4", AD: "[e3,a3], c#4@13 ~@3",
})).s("gm_electric_guitar_clean").gain(0.43).pan(0.7)

// other · piano
const piano = note("<~@8 A@6 B C D@6 B C E ~@9 F ~ G@3 ~ H@6 B C I@6 B C B C B C B C B ~@3>".pickRestart({
  A: "[~@4 a4@4 e4@4 a4@10 ~@2 g#4@4 f#4@2 g#4@4 e4@22 g#4@4 f#4@2 g#4@4 e4@19 ~@3 g#4@4 b4@4]/6", B: "c#5",
  C: "d5@3 c#5 b4 c#5 d5 b4",
  D: "[c#5@4 a4@4 e4@4 a4@12 g#4@4 f#4@2 g#4@4 e4@22 g#4@4 f#4@2 g#4@4 e4@21 ~ g#4@4 b4@4]/6", E: "c#5@3 ~",
  F: "e5@4 ~@8 c#5 ~@3", G: "[c#5@4 a4@4 f#4@4 a4@3 ~ f4 ~@7 g#4@4 f#4@2 g#4@4 e4@7 ~@7, ~@5 f#4@3 ~@8]/3",
  H: "[c#5@4 a4@4 ~ e4@3 a4@2 f#4@10 g#4@4 f#4@2 g#4@4 e4@22 g#4@4 f#4@2 g#4@4 e4@22 g#4@4 b4@4]/6",
  I: "[c#5@2 a4@2 e4@2 a4@5 ~ g#4@2 f#4 g#4@2 e4@11 g#4@2 f#4 g#4@2 e4@11 g#4@2 b4@2]/6",
})).s("gm_piano").gain(0.39).pan(0.3)

// other · piano
const piano_2 = note("<~@8 A@2 B@4 C@2 D E@5 C@2 F ~@7 G@6 H ~ I@6 J@2 K@6 C@8 L ~@3>".pickRestart({
  A: "[a4@4 e4@4 c#4@4 e4@9 ~@3 e4@2 c#4@2 b3@2 c#4@2]/2",
  B: "[a3@21 ~@3 e4@2 c#4@2 b3@2 c#4@4 a3@19 ~@3 e4@4 g#4@3 ~]/4", C: "[a4@12 g#4 a4 b4 g#4]/2", D: "a4 e4 c#4 e4",
  E: "[~@8 e4@2 c#4@2 b3@2 c#4@4 a3@20 ~@2 e4@2 c#4@2 b3@2 c#4@4 a3@20 ~@2 e4@4 g#4@3 ~]/5", F: "a4@3 ~",
  G: "[~@4 a4@4 e4@3 ~ c#4@2 ~ d4@4 ~@5 e4@2 c#4@2 b3@2 c#4@4 a3@20 ~@2 e4@2 c#4@2 b3@2 c#4@4 a3@20 ~@2 e4@4 g#4@3 ~]/6",
  H: "a4@5 ~@3",
  I: "[a4@4 e4@4 c#4@4 e4@2 d4@10 e4@2 c#4@2 b3@2 c#4@4 a3@22 e4@2 c#4@2 b3@2 c#4@4 a3@20 ~@2 e4@4 g#4@3 ~]/6",
  J: "[a4@12 g#4 a4 b4 g#4, g#4 ~@31]/2",
  K: "[a4@4 e4@4 ~ c#4@3 e4@3 d4@7 ~@2 e4@2 c#4@2 b3@2 c#4@4 a3@22 e4@2 c#4@2 b3@2 c#4@4 a3@20 ~@2 e4@4 g#4@3 ~]/6",
  L: "a4",
})).s("gm_piano").gain(0.39).pan(0.7)

// other · electric guitar clean
const electric_guitar_clean_2 = note(`<
  ~@8 A@6 B C D@6 B C E ~@9 F ~ G@3 ~ H@6 B C I@6 B C B C B C B C B ~@3
>`.pickRestart({
  A: "[~@4 a3@4 e3@4 a3@10 ~@2 g#3@4 f#3@2 g#3@4 e3@22 g#3@4 f#3@2 g#3@4 e3@19 ~@3 g#3@4 b3@4]/6", B: "c#4",
  C: "d4@3 c#4 b3 c#4 d4 b3",
  D: "[c#4@4 a3@4 e3@4 a3@12 g#3@4 f#3@2 g#3@4 e3@22 g#3@4 f#3@2 g#3@4 e3@21 ~ g#3@4 b3@4]/6", E: "c#4@3 ~",
  F: "e4@4 ~@8 c#4 ~@3", G: "[c#4@4 a3@4 f#3@4 a3@3 ~ f3 ~@7 g#3@4 f#3@2 g#3@4 e3@7 ~@7, ~@5 f#3@3 ~@8]/3",
  H: "[c#4@4 a3@4 ~ e3@3 a3@2 f#3@10 g#3@4 f#3@2 g#3@4 e3@22 g#3@4 f#3@2 g#3@4 e3@22 g#3@4 b3@4]/6",
  I: "[c#4@2 a3@2 e3@2 a3@5 ~ g#3@2 f#3 g#3@2 e3@11 g#3@2 f#3 g#3@2 e3@11 g#3@2 b3@2]/6",
})).s("gm_electric_guitar_clean").gain(0.23).pan(0.8)

// drums · kick
const kick = s("bd").struct("<A@6 B ~ A@22 B ~ A@6 B ~ A@22 B ~ B ~>".pickRestart({
  A: "x!2", B: "x",
})).gain(0.27)

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

// drums · open hat
const open_hat = s("oh").struct("<A@6 ~@2 A@22 ~@2 A@6 ~@2 A@22 ~@2 B ~>".pickRestart({
  A: "~ x ~ x", B: "x",
})).gain(0.27)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  A@3 B A@2 ~@2 A@3 B A@3 B A@3 B A@3 B A@3 B A@2 ~@2 A@3 B A@2 ~@2 A@3 B A@3 B A@3 B A@3 B A@3 B A@2 ~@4
>`.pickRestart({
  A: "~@2 x!2 ~@2 x ~@3 x ~ x ~ x ~", B: "~@2 x!2 ~@2 x ~@5 x ~@3",
})).gain(0.27)

stack(bass, electric_guitar_clean, piano, piano_2, electric_guitar_clean_2, kick, rim, open_hat, mid_tom)