// Twist and Shout — Chaka Demus
// 129 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 130 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(129/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 · acoustic bass · "ACOU BASS"
const bass = note(`<
  ~ A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D E F E F A B C D A B C D A B C D A B C D A B C D A B
  C D F@3 G A B C D A B C D A B C D A B C D A B C D A B C D H I@2 J A B C D A B C D A B C D A B C D A B C D A B C D K L
  M N A B C D A B C D O
>`.pickRestart({
  A: "d2@4 f#2@2 a2 ~ g1@4 b1 ~ d2 ~", B: "a1@4 c#2 ~ e2 ~ g1 ~ g2 ~ f#1 ~ e1 ~", C: "d2@3 ~ f#2@2 a2 ~ g1@4 b1 ~ d2 ~",
  D: "a1@3 ~ c#2@2 e2 ~ g2@2 g1@2 f#1@2 e1@2", E: "a2@5 ~ a2 ~ a2 ~ a2@2 f#2@2 e2@2",
  F: "a2@4 ~@2 a2 ~ a2 ~ a2@2 f#2@2 e2@2", G: "a2@4 ~@2 a2 ~ a2@2 e2@2 g2@2 a2 ~",
  H: "a1 ~ a2@3 ~ a2 ~ a2 ~ a2@2 a1@2 a2@2", I: "a1@2 a2@2 ~@2 a2 ~ a2 ~ a2@2 a1@2 a2@2",
  J: "e3@4 b1@3 ~@3 a2@2 b2@2 a2@2", K: "a1@2 a2@2 ~@2 a2@2 a1@2 a2 ~ a1@2 a2@2",
  L: "a1@2 a2@2 ~@2 a2 ~ a1@2 a2 ~ a1 ~ a2@2", M: "a1 ~ a2 ~@3 a2 ~ a1@2 a2@2 a1@2 a2 ~",
  N: "a1 ~ a2 ~ g2 ~ g2 ~ f#2 ~ d2 ~ c#2 ~ a1 ~", O: "d1 ~@3",
})).s("gm_acoustic_bass").gain(0.48)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  ~ A B C D E F G H E F G H E F G H E F G H E F G H E F G H E F G H I J K L E F G H E F G H E F G H E F G H E F G H E F
  G H I J K L E F G H E F G H E F G H E F G H E F G H E F G H I J K L E F G H E F G H E F G H E F G H E F G H E F G H I
  J K L E F G H E F G H M
>`.pickRestart({
  A: "[d3,f#3,a3,d4]@4 [d3,f#3,a3,d4]@4 [b3,g4]@2 [b3,g4,b4]@3 ~ [c#4,e4,a4] ~, ~@4 d4@3 ~", // D Em A
  B: "~@6 d4 ~ [c#4,e4,g4] ~ [c#4,e4,g4]@2 [c#4,e4,f#4] ~@3", // C#dim F#7
  C: "[f#3,a3]@4 [f#3,a3,d4]@4 [b3,d4,g4] ~ [b3,d4,g4,b4]@4 [c#4,e4,a4]@2", // F#m D G A
  D: "~@6 [a3,c#4,e4]@2 [a3,e4,g4]@2 [a3,e4,g4] ~ [a3,d4,f#4] ~@3", // A A7 D
  E: "[f#3,a3,d4]@2 [f#3,a3,d4]@2 [b3,d4] [b3,d4]@2 [c#4,e4,a4], ~@4 g4@3 ~", // D Bm A
  F: "~@4 [b3,d4,g4] b3 b3@2, ~@5 [d4,g4]@3", G: "[a3,d4]@4 [a3,d4]@4 [d4,g4]@2 [d4,g4]@4 [c#4,e4,a4] ~, f#3@4 b3@3 ~",
  H: "~@6 [b3,e4] ~ [b3,d4,g4]@2 [b3,d4,g4]@2 [b3,d4,g4]@2 ~@2", // E5 G
  I: "[a3,c#4,e4]@2 [a3,c#4,e4] [a3,c#4,e4]@2 [a3,c#4,e4] a3!2, a4@3 a4@3 [c#4,e4,a4]@2", // A
  J: "[a3,c#4,e4,a4]@2 [a3,c#4,e4,a4] [a3,c#4,e4,a4]@2 [a3,c#4,e4] [a3,c#4,e4]@2, ~@5 a4@3", // A
  K: "[a3,c#4,e4,a4]@2 [a3,c#4,e4] [a3,c#4,e4]@2 [a3,c#4,e4] [a3,c#4,e4]@2, ~@2 a4@3 a4@3", // A
  L: "[a3,c#4,e4,a4]@4 [a3,c#4,e4]@2 [a3,c#4,e4]@4 [a3,c#4,e4]@2 [a3,c#4,e4]@3 ~, ~@4 a4@6 a4@5 ~", // A
  M: "[d3,f#3,a3,d4]@3 ~@13", // D
})).s("gm_acoustic_guitar_steel").gain(0.06).pan(0.8)

// other · acoustic guitar nylon · "NYLON GTR"
const acoustic_guitar_nylon = note(`<
  A B A B C B A B C B D B A B ~ B ~ B D B A B ~ B ~ B D B A B ~ B ~ E@2 F G B D B A B ~ B ~ B D B A B ~ B ~ B D B A B ~
  B ~ E@2 F G B D B A B ~ B ~ B D B A B ~ B ~ B D B A B ~ B ~ E@2 F G B D B A B ~ B ~ B D B A B ~ B ~ B D B A B ~ B ~
  E@2 F G B D B A B ~ B ~@2
>`.pickRestart({
  A: "~@5 a2 b2 c#3", B: "d3@2 f#3 a3 g3 b3@2 a3", C: "~@10 a2@2 b2@2 c#3 ~", D: "~@10 a2@2 b2 ~ c#3@2",
  E: "a2@4 a2@2 a2@2 ~@2 a2 ~ a2 ~@3", F: "a2 ~@3 a2 ~ a2 ~@3 a2 ~ a2 ~@3", G: "a2 ~@3 a2 ~ a2 ~@3 a2 ~ b2@2 c#3 ~",
})).s("gm_acoustic_guitar_nylon").gain(0.11).pan(0.2)

// other · taiko drum · "+CONCERTBD"
const taiko_drum = note("<~ [f3 ~@15]!129>").s("gm_taiko_drum").gain(0.36)

// other · melodic tom · "MELO TOM 1"
const melodic_tom = note(`<
  A ~@7 B ~@15 A ~@7 A ~@3 B ~@7 A ~@15 A ~@3 C ~@7 A ~@15 A ~@2 A@2 ~@21 A ~ A ~@2 B@2 ~@7 B ~
>`.pickRestart({
  A: "~@8 c4 ~@5 d3 ~", B: "c4 ~@5 d3 ~@9", C: "c4 ~@5 d3 ~ c4 ~@5 d3 ~",
})).s("gm_melodic_tom").gain(0.56)

// drums · kick
const kick = s("bd").struct("<~ [x ~@2 x!2 ~@3]!128 ~>").gain(0.56)

// drums · clap
const clap = s("cp").struct("<~ [~ x ~ x]!128 x>").gain(0.56)

// drums · snare
const snare = s("sd").struct(`<
  A ~@7 B ~@15 A ~@7 A ~@3 B ~@7 A ~@15 A ~@3 C ~@7 A ~@15 A ~@2 A@2 ~@21 A ~ A ~@2 B@2 ~@7 B ~
>`.pickRestart({
  A: "~@9 x!4 ~@3", B: "~ x!4 ~@11", C: "~ x!4 ~@4 x!4 ~@3",
})).gain(0.24)

// drums · hihat
const hihat = s("hh").struct("<~ [x!8]!128 ~>").gain(0.32)

// drums · high tom
const high_tom = s("ht").struct("<~ A@7 B A@27 B A@43 B A@19 B A@19 B A@7 B C>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~@2 x ~@3 x ~ x ~ x!3 ~ x ~", C: "x",
})).gain(0.24)

// drums · splash
const splash = s("cr").struct("<~@129 x>").gain(0.72)

// drums · congas
const congas = s("conga:13").struct("<~ [~@3 x ~ x ~@10]!128 ~>").gain(0.77)

// drums · congas
const congas_2 = s("conga:18").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 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 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 B A B A B A B A B A
  B A B A B A B A B A B ~
>`.pickRestart({
  A: "~ x ~ x!2 ~@3", B: "~ x ~ x!3 ~@2",
})).gain(0.77)

// drums · congas
const congas_3 = s("conga:33").struct(`<
  ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~
  A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A
  ~ A ~ A ~ A ~ A ~ A ~@2
>`.pickRestart({
  A: "~@5 x ~@2",
})).gain(0.77)

// drums · mt
const mt = s("mt").struct("<~@8 A ~@27 A ~@43 A ~@19 A ~@19 A ~@7 A ~>".pickRestart({
  A: "~@5 x ~@2",
})).gain(0.4)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~ [x!8]!127 [x!7 ~] ~>").gain(1.22)

// drums · guiro
const guiro = s("guiro:4").struct("<~ [~@5 x ~@2]!128 ~>").gain(8.45)

stack(
  bass, acoustic_guitar_steel, acoustic_guitar_nylon, taiko_drum, melodic_tom, kick, clap, snare, hihat, high_tom,
  splash, congas, congas_2, congas_3, mt, cabasa, guiro
)