// Just — Radiohead
// 88 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 85 bars on a 32-step grid, each part at one level. Source detail keeps the original performance.
setcpm(88/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.

// chords · electric guitar jazz
const electric_guitar_jazz = note(`<
  A B C B C B D E F D E G D E H I J K J K A B A B D E F D E G D E H I J K J K A B A B L M L M D E N D E O P J K J K J K
  J K A B A B A B A B Q R Q R Q R Q R Q R Q R Q R Q S
>`.pickRestart({
  A: "[c3,g3,c4,e4]@5 ~@3 [c3,g3,b3,e4]@3 ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4]@3 ~ [d#3,a#3,d#4,g4]@3 ~ [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~", // C Cmaj7 C D# D
  B: "[d3,a3,d4,f#4]@3 ~ [d3,a3,d4,f#4]@3 ~ [d3,a3,d4,f#4]@3 ~ [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~ [f3,c4,f4,a4] ~ [f3,c4,f4,a4]@3 ~ [f3,c4,f4,a4]@3 ~ [a2,d3,g3] ~ [a2,d3,g3] ~", // D F Dsus4
  C: "[c3,g3,c4,e4]@5 ~@3 [c3,g3,c4,e4]@3 ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4]@3 ~ [d#3,a#3,d#4,g4]@3 ~ [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~", // C D# D
  D: "[e3,a3,c4,e4]@13 ~@7 [a2,e3,a3]@3 ~ [a2,e3,a3,c4,e4,a4]@3 ~ [g#2,d#3,g#3,c4,d#4] ~ [g#2,d#3,g#3,c4,d#4] ~, a2 ~", // Am A5 Am G#
  E: "[g#2,d#3,g#3,c4,d#4]@5 ~@3 [g#2,d#3,g#3,c4,d#4]@3 ~ [g#2,d#3,g#3,c4,d#4] ~ [g#2,d#3,g#3,c4,d#4]@4 ~@2 [g#2,d#3,g#3]@3 ~ [g#2,d#3,g#3,c4]@3 ~@5", // G# G#5 G#
  F: "[d#3,a#3,d#4,g4]@3 ~ [d#3,a#3,d#4]@3 ~ [d#3,a#3,d#4,g4]@3 ~ [f3,c4,f4,a4]@5 ~@3 [f3,c4,f4]@3 ~ [f3,c4,f4,a4]@5 ~@3", // D# D#5 D# F F5 F
  G: "[d#3,a#3,d#4,g4]@3 ~ [d#3,a#3,d#4]@3 ~ [d#3,a#3,d#4,g4]@3 ~ [a#2,f3,a#3,d4]@5 ~@3 [a#2,f3,a#3,d4]@4 [a#2,f3,a#3,d4]@5 ~@3", // D# D#5 D# A#
  H: "[g2,d3,g3,b3,d4,g4]@5 ~@3 [g2,d3,g3,b3,d4,g4]@3 ~ [g2,d3,g3,b3,d4,g4] ~ [g2,d3,g3,b3,d4,g4] ~ [f#2,c#3,f#3,a#3,c#4,f#4]@5 ~@3 [f#2,c#3,f#3,a#3,c#4,f#4]@3 ~ [f#2,c#3,f#3,a#3,c#4,f#4] ~ [f#2,c#3,f#3,a#3,c#4,f#4] ~", // G F#
  I: "[f2,c3,f3,a3,c4,f4]@21 ~@11", // F
  J: "[c3,g3,c4,e4]@3 ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [f#2,f#3]@3 ~ [f#2,c#3,f#3] ~ [f#2,c#3,f#3] ~ [f#2,c#3,f#3] ~ [f#2,c#3,f#3] ~@5 [f#2,c#3,f#3]@3 ~, ~@12 c#3 ~@19", // C F# F#5
  K: "[f2,c3,f3]@3 ~ [f2,c3,f3]@3 ~ [f2,c3,f3]@3 ~ [f2,c3,f3] ~ [f2,c3,f3] ~ [f2,c3,f3] ~ [f2,c3,f3] ~ [f2,c3,f3] ~ [f2,c3,f3] ~ [f2,c3,f3]@3 ~ [f2,c3,f3] ~ [f2,c3,f3] ~", // F5
  L: "[e3,b3,e4]!16 [d3,a3,d4]!16", M: "[c#3,g#3,c#4]!32",
  N: "[d#3,a#3,d#4,g4]@3 ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4] ~ [d#3,a#3,d#4,g4] ~ [a#2,f3,a#3]@3 ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~", // D# A#5
  O: "[a2,d3,g3,b3]@3 ~ [a2,d3,g3,b3]@3 ~ [a2,d3,g3,b3]@3 ~ [a2,d3,g3,b3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~", // G F#
  P: "[f2,c3,f3,a3] ~@31", // F
  Q: "[c3,g3,c4,e4]@5 ~@3 [c3,g3,c4,e4]@3 ~ [c3,g3,c4,e4] ~ [c3,g3,c4,e4] ~ [a#2,f3,a#3]@3 ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~ [a#2,f3,a#3]@3 ~ [a#2,f3,a#3] ~ [a#2,f3,a#3] ~", // C A#5
  R: "[a2,e3,a3]@5 ~@3 [a2,e3,a3]@3 ~ [a2,e3,a3] ~ [a2,e3,a3] ~ [d#3,a#3,d#4] ~ [d#3,a#3,d#4] ~ [d#3,a#3,d#4] ~ [d#3,a#3,d#4]!2 ~@2 [d#3,a#3,d#4] ~ [d#3,a#3,d#4] ~ [d#3,a#3,d#4] ~", // A5 D#5
  S: "[a2,e3,a3]@3 ~@29", // A5
})).s("gm_electric_guitar_jazz").gain(0.28)

// other · distortion guitar
const distortion_guitar = note(`<
  ~@2 A B C D E F G H I J K L M N O P O P Q B C R E F G H I J K L M N O P O P Q B C S T U V W X Y Z AA Y AB AC O P O P O
  P O P Q B C AD AE AF AG AH AI@4 AJ@2 AK AL AM AN AM AO AM AP AM AQ
>`.pickRestart({
  A: "[c3,c4]@5 ~@3 [c3,c4]@5 ~@5 [d#3,d#4] ~ [d#3,d#4]@3 ~ [d#3,d#4]@3 ~ [f3,f4]!4", // C D# F
  B: "[f#3,f#4]!12 [g#3,g#4]!4 [a3,a4]!12 [b3,b4]!4", C: "[c4,c5]!12 [d4,d5]!4 [d#4,d#5]!12 [f4,f5]!4",
  D: "[f#4,f#5]!12 [g#4,g#5]!4 [a4,a5]!11 [a4,a5]@3 ~@2", // F# G# A
  E: "[e3,a3,c4,e4]@13 ~@7 [a2,e3,a3]@3 ~ [a2,e3,a3,c4,e4,a4]@3 ~ [g#2,d#3,g#3,c4,d#4] ~ [g#2,d#3,g#3,c4,d#4] ~, a2 ~", // Am A5 Am G#
  F: "[g#2,d#3,g#3,c4,d#4]@5 ~@3 [g#2,d#3,g#3,c4,d#4]@3 ~ [g#2,d#3,g#3,c4,d#4] ~ [g#2,d#3,g#3,c4,d#4]@4 ~@2 [g#2,d#3,g#3]@3 ~ [g#2,d#3,g#3,c4]@3 ~@5", // G# G#5 G#
  G: "[d#3,a#3,d#4,g4]@3 ~ g#4@3 ~ a#4@3 ~ [f3,c4,f4,a4]@5 ~@3 a#4@3 ~ c5@5 ~@3", // D# F
  H: "[a2,e3,a3]@5 ~@3 [a2,e3,a3,c4,e4,a4]@4 ~@2 [a2,e3,a3,c4,e4,a4] ~@3 [a2,e3,a3,c4,e4,a4] ~ [a2,e3,a3,c4,e4,a4]@3 ~ [a2,e3,a3,c4,e4,a4]@3 ~ [g#2,d#3,g#3,c4] ~ [g#2,d#3,g#3,c4] ~", // A5 Am G#
  I: "[g#2,d#3,g#3,c4]@3 ~ [g#2,d#3,g#3,c4]@3 ~ [g#2,d#3,g#3,c4]@3 ~ [g#2,d#3,g#3,c4] ~ [g#2,d#3,g#3,c4]@4 ~@2 [g#2,d#3,g#3,c4]@3 ~ [g#2,d#3,g#3,c4]@5 ~@3", // G#
  J: "[d#3,a#3,d#4,g4]@3 ~ g#4@3 ~ a#4@3 ~ [a#2,f3,a#3,d4]@5 ~@3 d#4@3 ~ f4@5 ~@3", // D# A#
  K: "~@6 a3 ~ c4 ~ d4@3 ~ d#4@4 ~@2 a3@3 ~ c4@5 ~@3", L: "~@6 g#3 ~ c4 ~ d4@3 ~ d#4@4 ~@2 g#3@3 ~ c4@5 ~@3",
  M: "b3@3 ~ g3@3 ~ d3@5 ~@3 c4@3 ~ f#3@3 ~ c#3@5 ~@3", N: "f4 ~@3",
  O: "[c3,g3,c4,e4]@5 ~@3 [c3,g3,c4,e4]@5 ~@3 [f#2,c#3,f#3]@4 ~@2 e4@3 ~ a#3@3 ~ e4 ~", // C F#5
  P: "[f2,c3,f3]@3 ~ [f2,c3,f3]@3 ~ [f2,c3,f3]@8 ~@4 [f2,c3,f3] ~ e4@3 ~ c4@4 ~@2", // F5
  Q: "[c3,c4]!12 [d3,d4]!4 [d#3,d#4]!12 [f3,f4]!4", R: "[f#4,f#5]!12 [g#4,g#5]!4 [a4,a5]@5 ~@11",
  S: "[f#4,f#5]!12 [g#4,g#5]!4 [a4,a5]@3 ~@3 a4 ~ e4 ~ a4 ~ e4@3 ~", T: "e4!12 f#4!4 g4!12 a4!4",
  U: "[g#4,a#4]!16 a#4@3 ~ a#4@3 ~ b4@3 ~ b4@3 ~", V: "b4@4 ~@2 e5 ~ b4@4 ~@2 b4 ~ g4!8 f4!8",
  W: "e4@3 ~ e4@3 ~ e4@3 ~ e4@3 ~ e4@3 ~ e4@3 ~ e4@3 ~ e4@3 ~",
  X: "[c4,e4,c5,e5]@5 ~@3 [c4,e4,c5,e5]@3 ~ [c4,e4,c5,e5] ~ [b3,d4,b4,d5] ~@3 [a3,c4,a4,c5] ~ [a3,c4,a4,c5]@3 [a3,c4,a4,c5]@3 ~@2 [a3,c4,a4,c5] ~ [a3,c4,a4,c5] ~", // C Bm Am
  Y: "[c4,d#4,c5,d#5]@5 ~@3 [c4,d#4,c5,d#5]@3 ~ [c4,d#4,c5,d#5] ~ [a#3,d4,a#4,d5] ~@3 [a#3,d4,a#4,d5] ~ [a#3,d4,a#4,d5]@3 ~ [a#3,d4,a#4,d5]@3 ~ [g3,a#3,g4,a#4] ~ [a3,c4,a4,c5] ~", // Cm A# Gm Am
  Z: "[g3,a#3,g4,a#4]@3 ~ [g3,a#3,g4,a#4] ~ [g3,a#3,g4,a#4] ~ [g3,a#3,g4,a#4] ~ [g3,a#3,g4,a#4] ~ [f3,c4,f4,c5] ~ [g3,d4,g4,d5] ~ [f3,c4,f4,c5]@3 ~ [f3,c4,f4,c5]@3 ~ [f3,c4,f4,c5]@3 ~ [f3,c4,f4,c5] ~ [f3,c4,f4,c5] ~", // Gm F5 G5 F5
  AA: "[c4,e4,c5,e5]@5 ~@3 [c4,e4,c5,e5]@3 ~ [c4,e4,c5,e5] ~ [b3,d4,b4,d5] ~@2 a4 [a3,c4,c5] ~ [a3,c4,a4,c5]@3 [a3,c4,a4,c5]@3 ~@2 [a3,c4,a4,c5] ~ [a3,c4,a4,c5] ~", // C Bm Am
  AB: "[a2,d3,g3,b3]@3 ~ [a2,d3,g3,b3]@3 ~ [a2,d3,g3,b3]@3 ~ [a2,d3,g3,b3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~ [g#2,c#3,f#3,a#3]@3 ~", // G F#
  AC: "[f2,c3,f3,a3] ~@31", AD: "[f#4,f#5]!12 [g#4,g#5]!4 [a4,a5]!12 b4!4", AE: "c5!16 d#5!12 f5!4",
  AF: "f#5!12 g#5!4 a5!12 b4!4", AG: "c5!12 d5!4 d#5!12 f5!4", AH: "f#5!12 g#5!4 a5!12 b5!4",
  AI: "[c6@104 ~@4 a5@8 ~@4 c4@5 ~@3]/4",
  AJ: "[[c3,e3,a#3,d#4] ~ [c3,e3,a#3,d#4] ~ [c3,e3,a#3,d#4] ~@3 [c3,e3,a#3,d#4]@40 ~@12 [c3,e3,a#3,d#4] ~ [c3,e3,a#3,d#4] ~]/2", // C7
  AK: "~@2 d#4 ~ d#4 ~@3 d#4 ~ d#4 ~ d#4 ~@5 d#4 ~ d#4 ~@3 d#4 ~ d#4 ~ d#4 ~@3",
  AL: "~@2 d#4 ~ d#4 ~@3 d#4 ~ d#4 ~ [d#4,g4] ~@5 [d#4,g4] ~ [d#4,g4] ~ [d#4,g4] ~ [d#4,g4] ~ [d#4,g4] ~ [d#4,g4] ~ [d#4,g4] ~", // D#
  AM: "d#4 c4 a#3 c4 ~ c4 d#4 c4 a#3 c4 ~ c4 d#4 c4 a#3 c4", AN: "~ c4 d#4 c4 a#3 c4 ~ g4 d5 c5 a#4!2 g4 f4 d#4 c4",
  AO: "~ c4 d#4 c4 a#3 c4 [f4,g4]!10", AP: "~ d#4!2 c4 a#3@2 [g3,c4]!2 d5@2 a#4!2 g4 f4 d#4 c4", AQ: "c5@2 e3 ~@13",
})).s("gm_distortion_guitar").gain(0.6)

// bass · electric bass finger
const bass = note(`<
  A B A C D E F G H F G I F G J K L M L M A B A B F G H F G I F G J K L M L M A B A B N O N O P Q I P Q R S L M L M L M
  L M A B A B A B A B T U T U T U T U T U T U T U T V
>`.pickRestart({
  A: "c2@11 ~@5 d#2@11 ~@5", B: "d2@11 ~@5 f2@11 ~@5", C: "c1@8 ~@4 d#1@3 ~ e1@8 ~@4 f1@3 ~",
  D: "g1@11 ~ a1@3 ~ a#1@8 ~@4 c1@3 ~", E: "d#1@8 ~@4 e1@3 ~ f1@8 ~@4 g1@3 ~",
  F: "a1@5 ~@3 a1@4 ~@2 a1 ~ a1@3 ~ a1@3 ~ a1@3 ~ a1 ~ a1 ~",
  G: "g#1@5 ~@3 g#1@4 ~@2 g#1 ~ g#1@3 ~ g#1@3 ~ g#1@3 ~ g#1 ~ g#1 ~",
  H: "d#2@3 ~ d#2@3 ~ d#2@3 ~ f2@3 ~@5 f2@3 ~ f2@5 ~@3", I: "d#2@3 ~ d#2@3 ~ d#2@3 ~ a#1@3 ~@5 a#1@3 ~ a#1@5 ~@3",
  J: "g1@5 ~@3 g1@3 ~ g1 ~ g1 ~ f#1@5 ~@3 f#1@3 ~ f#1 ~ f#1 ~", K: "f1@21 ~@11",
  L: "c2@3 ~ c2 ~ c2 ~ c2 ~ c2 ~ f#1@3 ~ f#1 ~ f#1 ~ f#1 ~ f#1 ~@5 f#1@3 ~",
  M: "f1@3 ~ f1@3 ~ f1@3 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1@3 ~ f1 ~ f1 ~",
  N: "e2@3 ~ e2@3 ~ e2@3 ~ e2@3 ~ d2@3 ~ d2@3 ~ d2@3 ~ d2@3 ~",
  O: "c#2@3 ~@2 c#2@3 c#2@3 ~ c#2@3 ~@2 c#2@3 c#2@3 ~ c#2@3 ~ c#2@3 ~",
  P: "a1@5 ~@3 a1@3 ~ a1 ~ a1 ~@3 a1 ~ a1 ~ a1 ~ a1@3 ~ a1 ~ a1 ~",
  Q: "g#1@5 ~@3 g#1@3 ~ g#1 ~ g#1 ~@3 g#1 ~ g#1 ~ g#1 ~ g#1@3 ~ g#1 ~ g#1 ~",
  R: "g1@3 ~ g1@3 ~ g1@3 ~ g1@3 ~ f#1@3 ~ f#1@3 ~ f#1@3 ~ f#1@3 ~", S: "f1 ~@31", T: "c2@11 ~@5 a#1@11 ~@5",
  U: "a1@11 ~@5 d#2@11 ~@5", V: "a1@3 ~@29",
})).s("gm_electric_bass_finger").gain(0.2)

// drums · kick
const kick = s("bd").struct("<~ A B@4 C@9 ~ C@26 D C D E C@6 F C@31 F>".pickRestart({
  A: "~@8 x!8", B: "x!3 ~ x ~ x!5 ~ x ~ x!2", C: "x!2 ~ x!3 ~ x", D: "x!2 ~ x ~@4", E: "x ~ x ~@3 x ~ x!8", F: "x",
})).gain(0.5)

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

// drums · china
const china = s("cr").struct("<~@6 A@9 ~ A@26 B A B A@7 C A@31 C>".pickRestart({
  A: "x!8", B: "x!4 ~@4", C: "x",
})).gain(0.5)

// drums · ride bell
const ride_bell = s("rd").struct("<~@52 x ~@32>").gain(0.5)

stack(electric_guitar_jazz, distortion_guitar, bass, kick, snare, china, ride_bell)