// The Honeymoon Song — The Beatles
// 138 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 5 "GUITAR" acoustic guitar nylon (copy of ch 1 "GUITAR" electric guitar clean)
// note: Full arrangement: all 64 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(138/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 B F G C H I@2 J K J L M N F G O P Q R S T E L M N U V W X J Y Z AA E B AB AC J T C L AD N J AE C AF C AG AH
  J E H AI@2 S V D AJ
>`.pickRestart({
  A: "c2@6 g2 ~ g2@6 e2 ~", B: "f2@5 ~ f2@2 c3@6 f2 ~", C: "c2@3 g2 g2@3 c2", D: "c2@5 ~ c2@2 g2@5 ~ g2@2",
  E: "c2@5 ~ c2@2 g2@6 c2 ~", F: "c2@3 g2@4 g1", G: "c2@6 g2 ~ g2@4 g1@2 ~@2", H: "f2@5 ~ f2 ~ f2@6 f2 ~",
  I: "g2@6 d3 ~ d3@6 g2 ~", J: "c2@4 ~@2 c2@2 g2@6 c2 ~", K: "f2@5 ~ f2@2 d2@5 ~ d2@2", L: "f2@4 ~@2 f2@2 c3@6 f2 ~",
  M: "g2@4 d3@2 d2 ~ f2@5 ~ f2@2", N: "e2@5 ~ e2@2 d2@6 c#2@2", O: "a1@6 e2 ~ e2@6 d#2 ~", P: "e2@3 b2 b2@3 e2",
  Q: "a1@4 ~@2 a1@2 e2@6 a1 ~", R: "e2@5 ~ e2 ~ e2@6 e2 ~", S: "c2@6 g2 ~ g2@6 f#2 ~", T: "f2@6 c3 ~ c3@6 b1 ~",
  U: "c2@5 ~ c2 ~ c2@6 c2 ~", V: "f2@5 ~ f2@2 g2@5 ~ g2@2", W: "c3@5 ~ f#2@2 g2@6 b1@2",
  X: "c2@6 f#1@2 g1@6 c2 ~, ~@8 f1 ~@7", Y: "f2@6 c3 ~ c3@6 c#2 ~", Z: "c2@5 ~ f#2@2 g2@6 b2 ~",
  AA: "c3@3 f#2 g2@2 g1 ~", AB: "g2@5 ~ c#3@2 d3@6 f#3 ~", AC: "g3@3 c#3 d3@2 d2 ~", AD: "g2@6 f#2@2 f2@5 ~ f2@2",
  AE: "a1@5 ~ a1@2 g2@6 c#2@2", AF: "a1@3 g#2 g2@3 c#2", AG: "a1@5 ~ a1@2 g2@5 ~ g2@2", AH: "c2@6 g2 ~ g2@6 b1 ~",
  AI: "[c2@6 g2@8 e3@8 g2@4 c3@2 g2@2 c2 ~]/2", AJ: "c2@5 ~@11",
})).s("gm_electric_bass_finger").gain(0.4)

// chords · electric guitar clean · "GUITAR"
const electric_guitar_clean = note(`<
  A B C@2 D ~ E F ~@2 G H ~@2 I@2 ~@2 J K ~ L M N O ~ P Q ~@6 R S T@2 U V W ~@9 X Y Z AA AB@2 AC AD AE@2 AF AG AH AI
>`.pickRestart({
  A: "[c4,e4] ~@2 f4@2 [e4,g4] ~@2 [f4,a4]@2 ~ [f4,a4]@2 ~ [f4,a4] ~, ~ d4 ~@6", // C Em F
  B: "[f4,a4]@2 ~ [f4,a4]@2 ~ [f4,a4] ~ [f4,a4]@2 ~ [e4,g4] ~ [d4,f4] ~@2", // F Em Dm
  C: "[[c4,e4]@4 ~@2 [g3,c4]@13 ~@5 g2@2 f2@2 e2@2 d2@2]/2", D: "c2@5 ~@11", E: "~@8 g4@2 f4@4 e4 f4", F: "e4@7 ~@9",
  G: "~@8 g4@3 a4@3 b4@2", H: "b4@13 ~@3", I: "[~@4 a4@2 g4@5 ~@5]/2", J: "~@2 a4 g4", K: "e4@13 ~@3",
  L: "~@5 c4 c5 b4", M: "a4@3 ~", N: "~@6 c4@3 ~ c5@3 ~ b4@2", O: "c5 ~", P: "~@2 e4 f4", Q: "e4@9 ~@7",
  R: "[c4,e4] ~ d4 f4 ~ [e4,g4] ~ [f4,a4]@2 ~ [f4,a4] ~@2 [f4,a4] ~@2", // C Em F
  S: "[f4,a4]@2 ~ [f4,a4] ~ [f4,a4] ~@2 [f4,a4]@2 ~ [e4,g4]@2 ~ [d4,f4] ~", T: "[[c4,e4]@5 ~ [g3,c4]@22 ~@4]/2",
  U: "[c4,e4] ~ [d4,f4] ~@2 [e4,g4] ~@2 [f4,a4]@2 ~ [f4,a4] ~ [f4,a4] ~@2", // C Dm Em F
  V: "[f4,a4]@2 ~ [f4,a4] ~@2 [f4,a4] ~ [f4,a4] ~@2 [e4,g4] ~ [f4,a4] ~@2", W: "[g4,b4]", X: "~@10 c4@2 d4@2 e4 ~",
  Y: "d4@4 c4@9 ~ b3@2", Z: "c4@7 ~@9", AA: "~ d4", AB: "[c4@3 ~]/2",
  AC: "[c4,e4] ~@2 [d4,f4] ~ [e4,g4] ~@2 [f4,a4]@2 ~ [f4,a4] ~@2 [f4,a4] ~", // C Dm Em F
  AD: "[f4,a4]@2 ~ [f4,a4] ~@2 [f4,a4] ~ [f4,a4]@2 ~ [e4,g4] ~ [d4,f4] ~@2", AE: "[[c4,e4]@3 ~@3 [g3,c4]@22 ~@4]/2",
  AF: "[c4,e4]@2 ~ [d4,f4] ~ [e4,g4] ~@2 [f4,a4]@2 ~ [f4,a4]@2 ~ [f4,a4] ~", // C Dm Em F
  AG: "[f4,a4]@2 ~ [f4,a4] ~@2 [f4,a4] ~ [g4,b4]@2 ~ [g4,b4] ~@2 [g4,b4] ~", AH: "[g4,c5]@7 ~ g2@2 f2@2 e2@2 d2@2",
  AI: "c2@7 ~",
})).s("gm_electric_guitar_clean").gain(0.36)

// chords · acoustic guitar steel · "GUITAR"
const acoustic_guitar_steel = note(`<
  A B C D A E F@2 C G H@2 C I C B J K L M N A N O@2 B A E P Q@2 R@2 M C E F@2 A B S@2 A E A G T U C V W@3 V C A@2 G F@2
  A X D Y
>`.pickRestart({
  A: "[g3,e4] ~ [g3,e4] ~@2 [g3,e4] ~@2", B: "~@2 [a3,f4]@5 ~ [a3,f4]@2 ~@2 [a3,f4]@2 ~@2",
  C: "~@2 [g3,e4]@5 ~ [g3,e4]@2 ~@2 [g3,e4]@2 ~@2", D: "[g3,e4]@2 c3@2 [g3,e4]@3 ~@3 [b3,g4]@6",
  E: "~@2 f4 a4@2 f4 ~ a3, ~@2 a3@9 ~ c4@4",
  F: "[~@22 g4@3 ~ a4@2 g4@2 ~@2, ~@2 c3@29 ~, ~@3 g3@11 a4@6 e4@8 ~@4, ~@4 b3@3 g4@5 e4@6 g3@13 ~, ~@5 e4@5 b3@11 ~@4 b3@7]/2",
  G: "[a3,f4] ~ [a3,f4] ~@2 [a3,f4] ~@2", // Dm
  H: "[~@22 d4@3 ~ e4@2 d4@2 ~@2, ~@2 g2@29 ~, ~@3 d3@11 e4@6 b3@8 ~@4, ~@4 f#3@3 d4@5 b3@6 d3@13 ~, ~@5 b3@5 f#3@11 ~@4 f#3@7]/2",
  I: "~@2 [a3,f4]@6 [a3,f4]@2 d3@2 [a3,f4]@3 ~", J: "~@2 [b3,g4]@6 [a3,f4]@2 f2@2 [a3,f4]@3 ~",
  K: "[g3,e4] e2 [g3,e4] ~@2 [a3,f4]@3", L: "[c4,g4] ~ [c4,g4] ~@2 c3 g3 [c4,g4]",
  M: "~ c3 g3 [c4,g4]@2 c3 [g3,c4,g4] ~", N: "~@2 [e3,c4]@5 ~ [e3,c4]@2 ~@2 [e3,c4]@2 ~@2",
  O: "[~@2 [g3,e4]@5 ~ [g3,e4]@2 ~@2 [g3,e4]@2 [g3,e4]@4 ~@2 [g3,e4]@2 ~@4 [g3,e4]@2 ~@4]/2", // C
  P: "[b3,g4] ~ [b3,g4] ~@2 [a3,f4]@3", Q: "[~ [g3,e4]@3 ~ [a3,f4]@2 [g3,e4]@2 ~ [g3,e4] ~@2 [g3,e4] ~@2]/2",
  R: "[[a3,f4]@2 f2@2 [a3,f4]@3 ~ [b3,g4]@2 g2@2 [b3,g4]@2 [c4,g4]@4 ~@2 [c4,g4]@2 ~@4 c3@2 g3@2 [c4,g4]@2]/2", // Dm Em C5
  S: "[[e3,a3,d4]@2 ~@8 f#4@4 a4@4 f#4@4 d4@4 b3@2 d4@2 e4 ~, ~@4 [e3,a3]@27 ~, ~@2 d4@7 ~@7]/2", // Dsus2 A5
  T: "~ [b3,g4]@3 ~ [a3,f4]@3", U: "~@2 [g3,e4]@6 [a3,f4]@2 d3@2 [a3,f4]@3 ~",
  V: "[e3,c4]@2 a2@2 [e3,c4]@3 ~@3 [b3,g4]@6", // C Em
  W: "[~@2 [g3,e4]@5 ~ [g3,e4]@2 ~@2 [g3,e4]@2 [e3,c4]@4 ~@2 [e3,c4]@2 ~@4 [b3,g4]@4 [g3,e4]@4 ~@2 [g3,e4]@2 ~@4 [g3,e4]@2 ~@4]/3", // C Em C
  X: "[a3,f4]@2 f2@2 [a3,f4]@3 ~@3 [b3,g4]@6", Y: "c4 ~@15",
})).s("gm_acoustic_guitar_steel").gain(0.19)

// drums · kick
const kick = s("bd").struct("<A@19 B A@30 B A C A@2 C A@7 ~>".pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "x", C: "x ~@2 x!2 ~@3",
})).gain(0.44)

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

// drums · snare
const snare = s("sd").struct("<~@3 A ~@15 B ~@3 C ~@9 D ~@16 B ~ E ~@2 E ~@8>".pickRestart({
  A: "~ x", B: "x", C: "x ~@6 x", D: "x ~@2 x ~@2 x ~", E: "~@5 x ~@2",
})).gain(0.38)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@23 [~ x!2 ~ x!2 ~@2] ~@9 [~@2 x ~@2 x ~@2] ~@7 [~ x ~@2 x ~@3] ~@22>").gain(0.16)

// drums · low tom
const low_tom = s("lt").struct("<~@3 A ~@19 B ~@9 C ~@7 D ~@10 E ~@2 E ~@8>".pickRestart({
  A: "~@2 x ~@4 x", B: "~@3 x", C: "~@7 x", D: "~@5 x ~@2", E: "~@6 x!2",
})).gain(0.38)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@3 A ~@25 B ~@3 C ~ D ~@3 D ~ E ~@10 F ~ B F ~ D ~@6>".pickRestart({
  A: "~@5 x ~@2", B: "~@7 x", C: "~ x ~@2 x ~ x ~", D: "~@3 x", E: "~@2 x ~@2 x ~@2", F: "x!2 ~ x!3 ~@2",
})).gain(0.33)

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

// drums · high tom
const high_tom = s("ht").struct("<~ A ~ B ~@11 A ~@3 C ~@3 A ~@9 D ~@16 C ~ E ~ A E ~ A ~@6>".pickRestart({
  A: "~@3 x ~@4", B: "~ x", C: "~@2 x!6", D: "x ~@2 x ~@4", E: "~ x ~@2",
})).gain(0.22)

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

// drums · cabasa
const cabasa = s("cabasa:4").struct("<[~@3 x!2 ~ x ~@5 x ~@3]!63 ~>").gain(1.94)

// drums · cabasa · soft notes
const cabasa_soft = s("cabasa:4").struct("<[~ x ~@3 x ~ x]!33 [x!2] [~ x ~@3 x ~ x]!29 ~>").gain(1.11)

// drums · shaker
const shaker = s("sh").struct("<[x!4]!33 [~ x ~ x ~ x ~ x] [x!4]!29 x>").gain(0.33)

stack(
  bass, electric_guitar_clean, acoustic_guitar_steel, kick, rim, snare, snare_soft, low_tom, hihat, mid_tom, open_hat,
  high_tom, crash, cabasa, cabasa_soft, shaker
)