// Hold Me Tight — The Beatles
// 135 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: duplicate parts dropped: ch 4 "VOCAL" viola (copy of ch 5 "VOCAL" trumpet)
// note: Full arrangement: all 63 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. 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.
// 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 A E F G A B H I J E K L M N O P Q B O P R L B S J B R T M L U B I D V W N X G Y H O D Q L E F I N J L F T M
  T Z AA ~
>`.pickRestart({
  A: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2@2 b1 ~", B: "c2 ~ c2 ~ c2 ~ c2@2 c2 ~ c2 ~ c2 ~ c2 ~",
  C: "f2 ~ f2 ~ f2 ~ f2 f1 f2 ~ f2 ~ f2@2 c#2 ~", D: "d2 ~ d2 ~ d2 ~ d2@2 d2 ~ d2 ~ d2 ~ d2 d1",
  E: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2@2", F: "f2 ~ f2 ~ f2 ~ f2@2 f2 ~ f2 ~ f2 ~ f2 f1",
  G: "d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 d1 d2 d1 d2!2", H: "c2 ~ c2 ~ c2 ~ c2 c1 c2 ~ c2 ~ c2@2 e2 ~",
  I: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 f1 f2 f1 f2!2", J: "f2 ~ f2 ~ f2 ~ f2 f1 f2 ~ f2 ~ f2@2 b1 ~",
  K: "g2 ~ g2 ~ g2 ~ g2@2 g2 ~ g2 ~ g2 ~ g2 ~", L: "c2 ~ c2 ~ c2 ~ c2@2 c2 ~ c2 ~ c2 ~ c2 c1",
  M: "d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2@2 b1 ~", N: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2@2 e2 ~",
  O: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2@2 c#2 ~", P: "d2 ~ d2 ~ d2 ~ d2@2 d2 ~ d2 ~ d2 ~ d2 ~",
  Q: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2@2", R: "g2 ~ g2 ~ g2 ~ g2 g1 g2 ~ g2 ~ g2@2 b1 ~",
  S: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2@2 e2 ~", T: "c2 ~ c2 ~ c2 ~ c2 c1 c2 ~ c2 ~ c2@2 d2 ~",
  U: "d#2 ~ d#2 ~ d#2 ~ d#2@2 d#2 ~ d#2 ~ d#2 ~ d#2 ~", V: "d2 ~ d2 ~ d2 ~ d2 d1 d2 ~ d2 ~ d2@2 f#2 ~",
  W: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 g1 g2 g1 g2!2", X: "f2 ~ f2 ~ f2 ~ f2@2 f2 ~ f2 ~ f2 ~ f2 ~",
  Y: "g2 ~ g2 ~ g2 ~ g2@2 g2 ~ g2 ~ g2 ~ g2 g1", Z: "d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2 ~ d#2@2",
  AA: "c2 ~ c2 ~ c2 ~ c2 c1 c2 ~ c2 ~ c2@2 f#2 ~",
})).s("gm_electric_bass_finger").gain(0.4)

// chords · acoustic guitar steel · "GUITAR"
const acoustic_guitar_steel = note(`<
  ~ A B C D E B C F G B H C I J K J L B C M E B C F E B H C K B K B L B L B C N O E B C P E B C O E B H Q I B K B L B L
  B R B S
>`.pickRestart({
  A: "~ [g3,d4,g4,b4,d5]@3", B: "[c3,g3,c4,e4,g4]", C: "[f3,a3,c4,f4,a4]", D: "[d3,f#3,a3,d4,f#4,a4]",
  E: "[g3,b3,d4,g4,b4]", F: "[d3,a3,d4,f#4,c5]", G: "[g3,b3,d4,g4,b4]@15 ~", H: "[c3,g3,c4,e4,g4,a#4]",
  I: "[g#3,c4,f4,g#4,c5]", J: "[c3,e3,g3,c4,e4,g4]", K: "[f3,g#3,c4,f4,g#4,c5]", L: "[d#3,a#3,d#4,g4,a#4]",
  M: "~ f#3@15, [d3,a3,d4,f#4,a4]", N: "[d3,a3,d4,f4,a4]", O: "[d3,f#3,a3,d4,f#4,c5]",
  P: "f#3 ~ f#3@14, [d3,a3,d4,f#4,c5]", Q: "[f3,c4,f4,a4,c5]", R: "[d#3,a#3,d#4,g4]", S: "[d#3,a#3,d#4,g4]@15 ~",
})).s("gm_acoustic_guitar_steel").gain(0.31).pan(0.3)

// chords · electric guitar clean · "GUITAR"
const electric_guitar_clean = note(`<
  ~ A B C D E F G H A F I J K B A I L F J D A B G M A B@2 G N B O F L P Q R S T U V I J M A F J D W F X G J X J B J F Y
  F L Z ~
>`.pickRestart({
  A: "~@2 d3 ~@5 d3@7 ~, ~@6 g2@9 ~", B: "~@2 [c3,g3]@2 ~@4 [c3,g3]@7 ~, ~@6 c2@9 ~",
  C: "~@2 [f3,c4] ~@5 f3@2 c4@2 ~@2 c4 ~, f2@5 ~ f2@10, ~@4 f4@3 ~, ~@3 f3", // F5
  D: "~@2 [d3,a3] ~@5 d3@2 a3@2 ~@2 a3 ~, d2@5 ~ d2@10, ~@4 d4@3 ~, ~@3 d3", // D5
  E: "g2@2 d3 ~@7 d3@2 ~@2 d3 ~, ~@6 g2@5 ~ g2@4, ~@4 g3@3 ~",
  F: "~@2 [c3,g3] ~@3 c2@2 ~@2 c2@2 ~@2 g3 ~, ~@2 [c3,g3] c3", // C5
  G: "~@2 [f3,c4] ~@3 f2@2 ~@2 f2@2 ~@2 c4 ~, ~@2 [f3,c4] f3", H: "~@2 [d3,a3]@2 ~@4 [d3,a3]@7 ~, ~@6 d2@9 ~",
  I: "~@2 [c3,g3] ~@3 c2@2 [c3,g3]@6 ~@2", J: "~@2 [f3,c4]@2 ~@4 [f3,c4]@7 ~, ~@6 f2@9 ~",
  K: "~@2 [f3,c4] ~@5 f3@2 c4@2 ~@2 c4@2, f2@5 ~ f2@10, ~@4 f4@3 ~, ~@3 f3", // F5
  L: "~@2 [d#3,a#3]@2 ~@4 [d#3,a#3]@7 ~, ~@6 d#2@9 ~", M: "~@2 [d3,a3] ~@3 d2@2 [d3,a3]@6 ~@2",
  N: "~@2 [f3,c4] ~@3 f2@2 [f3,c4]@6 ~@2", O: "g2@2 d3 ~@7 d3@2 ~@2 d3@2, ~@6 g2@5 ~ g2@4, ~@4 g3@3 ~",
  P: "~@2 g3 ~@2 c2 ~ g3, c2@9 ~@3 c3@4, ~@2 c3@4 [g3,c4]@7 ~@3", // C5
  Q: "~@2 a#3 ~@2 d#2 ~ a#3, d#2@9 ~@3 d#3@4, ~@2 d#3@4 [a#3,d#4]@7 ~@3", // D#5
  R: "~@2 [c3,g3,c4] ~@3 c2@2 [c3,g3,c4]@2 c2@4 [c3,g3,c4]@2", // C5
  S: "~@2 f4 ~ c4@2 f3@2 f4 ~ f3 f4 ~ f3 f4 c4, f2, ~@9 c4@2 ~ c4@2 ~@2",
  T: "~@2 [d3,a3] ~ [d3,a3]@2 d2@2 ~@4 d3@2 a3 ~, d2@5 ~@3 [d3,a3]@4 ~@4, ~@5 d2@2 ~", // D5
  U: "~@2 a3 ~@2 d2 ~ a3, d2@9 ~@3 d3@4, ~@2 d3@4 [a3,d4]@7 ~@3", // D5
  V: "~@2 [d3,g3] ~@3 g2@2 [d3,g3]@2 g2 ~@3 [g2,d3,g3] ~", W: "~@2 [g2,d3] ~@3 g2@2 ~@2 g2 ~ g2 ~ d3 ~, ~@2 d3 ~",
  X: "~@2 [c3,g3] ~@5 c3@2 g3@2 ~@2 g3 ~, c2@5 ~ c2@10, ~@4 c4@3 ~, ~@3 c3", // C5
  Y: "~@2 [d#3,a#3] ~@3 d#2@2 [d#3,a#3]@6 ~@2", // D#5
  Z: "~@2 [c3,g3] ~@5 c3@2 g3@2 ~@2 g3@2, c2@5 ~ c2@10, ~@4 c4@3 ~, ~@3 c3", // C5
})).s("gm_electric_guitar_clean").gain(0.25).pan(0.7)

// chords · electric guitar clean · "GUITAR" · soft notes
const electric_guitar_clean_2 = note(`<
  ~ A B ~@3 C D E A C F G ~ B A F H C G ~ A B D I A B@2 D J B ~ C H K L M ~ N O P F G I A C G ~ Q C ~ D G ~ G B G C R C
  H ~@2
>`.pickRestart({
  A: "g2 ~@3", B: "c2@5 ~@11", C: "c2 ~@11 g3 ~@3", D: "f2 ~@11 c4 ~@3", E: "d2@5 ~@11", F: "~@2 f#3 ~@13",
  G: "f2@5 ~@11", H: "d#2@5 ~@11", I: "~@2 g#3 ~@13", J: "~@2 b3 ~@13", K: "~@6 c3@5 ~@5", L: "~@6 d#3@5 ~@5",
  M: "c2@3 ~@9 c3 ~@3", N: "~@13 a3 ~@2", O: "~@6 d3@5 ~@5", P: "g2@3 ~@9 g2 ~@3", Q: "g2 ~@11 d3 ~@3",
  R: "~@2 a3 ~@13",
})).s("gm_electric_guitar_clean").gain(0.13).pan(0.7)

// drums · rim
const rim = s("rim").struct("<[~@3 x] ~@62>").gain(0.5)

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

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

// drums · low tom
const low_tom = s("lt").struct("<[~@3 x] ~@15 [~@3 x] ~@8 [~@3 x] ~@6 [~@12 x!4] ~@30>").gain(0.4)

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

// drums · mid tom
const mid_tom = s("mt").struct("<[~@3 x] ~@31 [~@8 x!2 ~@6] ~@30>").gain(0.45)

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

// drums · high tom
const high_tom = s("ht").struct("<~@32 [~@4 x!2 ~@10] ~@30>").gain(0.45)

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

// drums · tambourine
const tambourine = s("tb").struct("<~ [x!4]!31 [x!8] [x!4] [x!8]!6 [x!4]!22 ~>").gain(0.4)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~ [x!4]!33 [x!8]!6 [x!4]!22 ~>").gain(2.01)

// drums · cabasa · soft notes
const cabasa_soft = s("cabasa:4").struct("<~ [~ x ~ x ~ x ~ x]!33 ~@6 [~ x ~ x ~ x ~ x]!22 ~>").gain(1.26)

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

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