// Hang on Sloopy — McCoys
// 120 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 11 electric guitar clean (copy of ch 9 electric guitar jazz)
// note: Full arrangement: all 86 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(120/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 · electric guitar muted
const electric_guitar_muted = note(`<
  ~ A B C B C B D B C B D B C B D B C B D B C B D B C B E B C B F B C B F B C B D B C B G B C B D B C B D B C B D B C B
  D B C B D B C B D B C H@2 I B C B F B C B F B C J K L
>`.pickRestart({
  A: "~@3 d3", B: "g2 ~@5 g2@2 c3 ~@5 c3@2", C: "d3 ~@5 d3 ~ c3 ~@3 a2@4", D: "d3 ~@5 d3@2 c3 ~@3 a2@4",
  E: "d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~", F: "d3 ~@5 d3@2 c3 ~@3 b2@2 a2@2", G: "d3 ~@5 d3 ~ c3 ~@7",
  H: "[g2 ~@5 g2@2 c3 ~@3 c3@2 d3@4 d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~]/2",
  I: "d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ c3 ~ b2 ~ a2 ~", J: "~@2 g2 ~ g2@2 ~@4 c3 ~ c3@2 ~@2",
  K: "~@2 d3 ~ d3 ~@5 c3 ~ c3 ~ c3 ~", L: "g2 ~@15",
})).s("gm_electric_guitar_muted").gain(0.4).pan(0.2)

// chords · brass section
const brass_section = note("<~@6 A B ~@2 A B ~@18 A B ~@2 A B ~@28 C@2 D@2 E@2 F@3 G ~@3 G ~@3 G ~ A H I>".pickRestart({
  A: "~@2 [g4,b4,d5] ~ [g4,b4,d5] ~@5 [g4,c5,e5] ~ [g4,c5,e5] ~@3", // G C
  B: "~@2 [a4,d5,f#5] ~ [a4,d5,f#5] ~@5 [g4,c5,e5] ~ [g4,c5,e5] ~@3", C: "[~@6 b4@2 c5 ~@3 c5@2 d5@9 ~@9]/2",
  D: "[~@6 b4@2 c5 ~@3 c5@2 d5@8 ~@10]/2", E: "[~@6 b4@2 c5 ~@3 c5@2 d5@7 ~@11]/2",
  F: "[~@6 b4@2 c5 ~@3 c5@2 d5@31 ~@3]/3", G: "[b4,d5,g5]@8 [c5,e5,g5] ~@7",
  H: "~@2 [a4,d5,f#5] ~ [a4,d5,f#5] ~@5 [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~", I: "[b4,d5,g5] ~@15",
})).s("gm_brass_section").gain(0.43).pan(0.6)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@4 A B A B A B A B C D C D C D C D C D C D C D C E A B A B A B A B A B A B A B A B ~@4 C D C D C D C D C D C D C D C
  D C D C D C D C F@2 A B A B A B A B A B G H I
>`.pickRestart({
  A: "[g4,b4,d5] ~@3 [g4,b4,d5] ~@3 [g4,c5,e5] ~@3 [g4,c5,e5] ~@3", // G C
  B: "[a4,d5,f#5] ~@3 [a4,d5,f#5] ~@3 [g4,c5,e5] ~@3 [g4,c5,e5] ~@3", C: "~@4 [g4,b4,d5] ~@7 [g4,c5,e5] ~@3",
  D: "~@4 [a4,d5,f#5] ~@7 [g4,c5,e5] ~@3", E: "~@4 [a4,d5,f#5] ~@3 [a4,d5,f#5]@2 [a4,d5,f#5] ~@5",
  F: "~@4 [a4,d5,f#5] ~@7 [a4,d5,f#5] ~@3", G: "~@2 [d4,g4,b4] ~ [d4,g4,b4] ~@5 [e4,g4,c5] ~ [e4,g4,c5] ~@3",
  H: "~@2 [f#4,a4,d5] ~ [f#4,a4,d5] ~@5 [e4,g4,c5] ~ [e4,g4,c5] ~ [e4,g4,c5] ~", I: "[d4,g4,b4] ~@15",
})).s("gm_electric_guitar_clean").gain(0.23).pan(0.8)

// chords · electric guitar jazz
const electric_guitar_jazz = note("<~@36 A B@4 C@2 D E ~@41>".pickRestart({
  A: "[d5,f5] d5 [d5,f5]!3 d5 [d5,f5]!2 d5 [d5,f5]!3 d5 [d5,f5]!2 d5", // Dm
  B: "[[d5,f5]!15 ~ [f5,g5] g5!7 ~ g5 g5@2 a#5@2 c6@2 d6@2 d6@2 d6@2 d6@2 d6@2 d6@2 c6 a#5 c6 ~ a#5@5 ~ g4 ~ [c5,d5]@2 a#4 [a#4,c5] g4 [g4,a#4,c5] c5 [g4,a#4], ~@15 d5@41 ~@8]/4", // Dm Fsus2 Csus2 A#sus2 C7 Gm
  C: "[[f4,g4] f4 g4 ~ g4 f4 [d4,g4] [d4,f4] ~ d4 a#3 [a#3,c4] g3 f3 [d3,f3] g3@3 ~@6 [a#3,d4]@2 ~ a#3 [c4,e4]@2 [a#3,d4]@2, ~@3 a#4@2 ~@3 c4@2 ~@22]/2", // Fsus2 G5 Dm A#sus2 Dm A# C A#
  D: "[d4,f4]@2 [d4,f4]@2 [d4,f4]@2 [d4,f4]@2 [d4,f4] ~ [d4,f4]@2 e4 d4 [c4,e4]@2", E: "[a#3,d4]@3 ~@13",
})).s("gm_electric_guitar_jazz").gain(0.28)

// chords · tuba
const tuba = note(`<
  ~@6 A B ~@2 A B ~@2 A B ~@2 A B ~@2 A B ~@2 A C ~@2 A B ~@2 A B ~@24 D@2 E@2 F@2 G@2 F@2 H@3 ~@2 A B ~@2 A B ~@2 A I J
>`.pickRestart({
  A: "~@2 [b3,d4] ~ [b3,d4] ~@5 [c4,e4] ~ [c4,e4] ~@3", B: "~@2 [d4,f#4] ~ [d4,f#4] ~@5 [c4,e4] ~ [c4,e4] ~@3",
  C: "~@2 [d4,f#4] ~ [d4,f#4] ~@11", D: "[~@6 [d4,g4]@2 [e4,g4] ~@3 [e4,g4]@2 [f#4,a4]@8 ~@10]/2",
  E: "[~@6 [d4,g4]@2 [e4,g4] ~@3 [e4,g4]@2 [f#4,a4]@7 ~@11]/2", // G5 Em F#m
  F: "[~@6 [d4,g4]@2 [e4,g4] ~@3 [e4,g4]@2 [f#4,a4]@6 ~@12]/2", // G5 Em F#m
  G: "[~@6 [d4,g4]@2 e4@2 ~@2 [e4,g4]@2 [f#4,a4]@5 ~@13, ~@8 g4 ~@23]/2", // G5 Em F#m
  H: "[~@6 [d4,g4]@2 [e4,g4] ~@3 [e4,g4]@2 [f#4,a4]@31 ~@3]/3", // G5 Em F#m
  I: "~@2 [d4,f#4] ~ [d4,f#4] ~@5 [c4,e4] ~ [c4,e4] ~ [c4,e4] ~", J: "[b3,g4] ~@15",
})).s("gm_tuba").gain(0.36).pan(0.6)

// bass · electric bass finger
const bass = note(`<
  ~ A B C B C B C B C D C B C B C B C D C B C B C B C D E F G F G F G F G H I J I K L J M B C B C B C B C B C D C B C B
  C B C D C B C B C B N B E O H P J P H P J P H P Q R S
>`.pickRestart({
  A: "~@3 d2", B: "g1 ~@2 g1 c2 ~@2 c2", C: "d2 ~@2 d2 c2 ~ a1@2", D: "g1@2 ~@4 g1@2 c2 ~@5 c2@2",
  E: "d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~", F: "g1@5 ~ g1 ~ c2@5 ~ c2 ~", G: "d2@5 ~ d2 ~ c2 ~ c2 ~ b1 ~ a1 ~",
  H: "g1 ~ g1@3 ~ g1 ~ c2 ~ c2@4 c2 ~", I: "d2 ~ d2@3 ~ d2 ~ c2 ~ c2 ~ a1 ~ a1 ~",
  J: "g1 ~ g1@3 ~ g1 ~ c2 ~ c2@3 ~ c2 ~", K: "g1 ~ g1@3 ~ g1 ~ c2 ~ c2@3 ~ c2@2",
  L: "d2 ~ d2@4 d2 ~ c2 ~ c2 ~ a1 ~ a1 ~", M: "d2 ~ d2 ~ d2 ~ d2 ~ c2 ~ c2@2 a#1@2 a1 ~",
  N: "d2@2 ~@4 d2@2 c2@2 c2 ~ a1 ~ a1@2", O: "d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ c2 ~ b1 ~ a1 ~",
  P: "d2 ~ d2@3 ~ d2 ~ c2 ~ c2 ~ b1 ~ a1 ~", Q: "~@2 g1 ~ g1@2 ~@4 c2 ~ c2@2 ~@2",
  R: "~@2 d2 ~ d2@2 ~@4 c2 ~ c2 ~ c2 ~", S: "g1 ~@15",
})).s("gm_electric_bass_finger").gain(0.48)

// chords · percussive organ
const percussive_organ = note(`<
  ~@4 A B C D A B C D ~@16 A B C D A B C D A B C D A B C D ~@12 E@2 F@4 G@4 H@2 I@2 J@3 A B C D A B C D A B K L M
>`.pickRestart({
  A: "[g4,b4,d5] [g4,c5,e5]", B: "[a4,d5,f#5] [c5,e5,g5]", C: "[b4,d5,g5] [c5,e5,g5]", D: "[a4,d5,f#5] [g4,c5,e5]",
  E: "[[g4,b4,d5]@7 ~ [g4,c5,e5]@6 [a4,d5,f#5]@9 ~ [g4,c5,e5]@7 ~]/2", // G C D C
  F: "[[g4,b4,d5]@8 [g4,c5,e5]@3 ~ [g4,e5] ~ [a4,d5,f#5]@9 ~ [g4,c5,e5]@8, ~@6 c5 ~@9]/2", // G C D C
  G: "[[g4,b4,d5]@7 ~ [g4,c5,e5]@3 ~ [g4,e5] ~ [a4,d5,f#5]@9 ~ [g4,c5,e5]@7 ~, ~@6 c5 ~@9]/2", // G C D C
  H: "[[g4,b4,d5]@7 ~ [g4,c5,e5]@3 ~ [g4,e5] ~ [a4,d5,f#5]@9 ~ [g4,c5,e5]@8, ~@6 c5 ~@9]/2", // G C D C
  I: "[[g4,b4,d5]@8 [g4,c5,e5]@3 ~ [g4,c5,e5] ~ [a4,d5,f#5]@9 ~ [g4,c5,e5]@7 ~]/2", // G C D C
  J: "[[g4,b4,d5]@5 ~ [g4,b4,d5]@2 [g4,c5,e5]@3 ~ [g4,c5,e5]@2 [a4,d5,f#5]@30 ~@4]/3", // G C D
  K: "~@2 [g4,b4,d5] ~ [g4,b4,d5] ~@5 [g4,c5,e5] ~ [g4,c5,e5] ~@3", // G C
  L: "~@2 [a4,d5,f#5] ~ [a4,d5,f#5] ~@5 [g4,c5,e5] ~ [g4,c5,e5] ~ [g4,c5,e5] ~", M: "[g4,b4,d5] ~@15",
})).s("gm_percussive_organ").gain(0.11).pan(0.6)

// drums · kick
const kick = s("bd").struct("<[x!4]!85 x>").gain(0.49)

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

// drums · clap
const clap = s("cp").struct("<~@28 A@6 B C A@8 ~@29 A@10 B C D>".pickRestart({
  A: "~ x ~ x", B: "~ x!2 ~@2 x!2 ~", C: "~ x!2 ~@2 x!3", D: "x",
})).gain(0.38)

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

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

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@35 [~@6 x!2 ~ x!2 ~@5] ~@36 [~@9 x!3 ~@4] ~@11 [~@6 x!2 ~ x!2 ~@5] ~>").gain(0.38)

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

// drums · high tom
const high_tom = s("ht").struct("<~@35 [x!2 ~ x!2 ~@11] ~@36 [x!2 ~ x!2 ~ x!2 ~@8] ~@11 [x!2 ~ x!2 ~@11] ~>").gain(0.38)

// drums · ride
const ride = s("rd").struct("<~@4 [x!8]!8 ~@16 [x!8]!16 ~@42>").gain(0.27)

// drums · tambourine
const tambourine = s("tb").struct("<[~ x ~ x ~ x ~ x]!85 ~>").gain(0.22)

// drums · cowbell
const cowbell = s("cb").struct("<~@2 [x!4]!83 x>").gain(0.44)

stack(
  electric_guitar_muted, brass_section, electric_guitar_clean, electric_guitar_jazz, tuba, bass, percussive_organ, kick,
  snare, clap, hihat, low_tom, open_hat, mid_tom, crash, high_tom, ride, tambourine, cowbell
)