// Karma Police — Radiohead
// 148 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 176 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(148/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 · acoustic guitar steel · "guitar/piano"
const acoustic_guitar_steel = note(`<
  ~@16 A B C D A B C D E F G H I J K L A B C D A B C D E F G H I J K L ~@12 M N K L O B C D O B C D P F G H I J K L ~@12
  M N K L Q R S R S T U V Q R S R S T U V Q R S R S T U V Q R S R S T U V Q R S R S T U V ~@40
>`.pickRestart({
  A: "[a2,e3,a3,e4]!3 [e2,a2,e3], c4 ~@3 c4 ~@3 c4 ~@7", B: "[f#2,a2,e3,a3]!3 [f#2,a2], c4 ~@3 c4 ~@3 c4 ~@7",
  C: "[e2,b2,e3]!2 [e2,b2] [f#2,a2]", D: "[g2,a2] a2 b2 [e2,a2]",
  E: "[a2,e3,a3,e4]!2 [e3,a3,e4] [e2,a2], c4 ~@3 c4 ~@3 c4 ~@7", F: "[d3,a3,d4,f#4]!2 [a3,d4,f#4] [b2,e3]",
  G: "[g2,b2,d3,g3,d4,g4]!2 [d3,g3,d4,g4] [g2,b2]", H: "[c3,e3,g3,e4]!2 [b2,g3,e4]!2, c4 ~@3 c4 ~@3 c4 ~@3 c4 ~@3",
  I: "[e3,a3]!3 [e2,a2], c4 ~@3 c4 ~@3 c4 ~@7", J: "[b2,f#3,b3,d4,f#4]!3 [f#2,b2,f#3]", K: "[a3,d4,f#4]!4",
  L: "[a3,d4,f#4]!3 [a2,d3,a3]", M: "[c3,e3,g3,e4]!2 [e3,g3,e4] [e2,a2], c4 ~@3 c4 ~@3 c4 ~@7",
  N: "[b2,f#3,b3,d4,f#4]!2 [f#3,b3,d4,f#4] [e2,a2]", O: "[a2,e3,a3] [a2,e3,a3,e4]!2 [e2,a2,e3], ~@4 c4 ~@3 c4 ~@7",
  P: "[a2,e3,a3] [a2,e3,a3,e4] [e3,a3,e4] [e2,a2], ~@4 c4 ~@3 c4 ~@7", // A5
  Q: "[b2,f#3,b3,d4,f#4] [f#3,b3,d4,f#4]!2 [b2,f#3,b3]", R: "[d3,a3,d4] [a3,d4,f#4] [a2,d3,a3] [g2,b2,d3,g3,b3,g4]",
  S: "[g2,b2,d3,g3] [d3,g3,d4,g4]!2 [g2,b2]", T: "[d3,a3,d4] [a3,d4,f#4] [a2,d3,a3] [e2,b2,d3,g#3]",
  U: "[e2,b2,d3] [e2,b2] [d3,g#3,b3] [e2,b2]", V: "[d3,g#3,b3] [e2,b2] [d3,g#3,b3] [e2,b2]",
})).s("gm_acoustic_guitar_steel").gain(0.51)

// chords · acoustic guitar steel · "guitar/piano" · soft notes
const acoustic_guitar_steel_2 = note(`<
  ~@136 A B C B C D E F A B C B C D E F A B C B C D E F A B C B C D E F A B C B C D E F
>`.pickRestart({
  A: "[b2,f#3,b3,d4,f#4] [f#3,b3,d4,f#4]!2 [b2,f#3,b3]", B: "[d3,a3,d4] [a3,d4,f#4] [a2,d3,a3] [g2,b2,d3,g3,b3,g4]",
  C: "[g2,b2,d3,g3] [d3,g3,d4,g4]!2 [g2,b2]", D: "[d3,a3,d4] [a3,d4,f#4] [a2,d3,a3] [e2,b2,d3,g#3]",
  E: "[e2,b2,d3] [e2,b2] [d3,g#3,b3] [e2,b2]", F: "[d3,g#3,b3] [e2,b2] [d3,g#3,b3] [e2,b2]",
})).s("gm_acoustic_guitar_steel").gain(0.15)

// bass · acoustic bass · "bass"
const bass = note(`<
  ~@16 A B C D E B C D E F G H E I J@2 A B C K A B C D A F G H A I J@2 ~@12 L M J@2 A B C K A B C K A F G H A I J@2 ~@12
  N M J@2 O P G Q G F R@2 O P G Q G F R@2 O P G Q G F R@2 O P G Q G F R@2 O P G Q G F R@2 ~@40
>`.pickRestart({
  A: "a1!4", B: "f#1!4", C: "e1!3 f#1", D: "g1 a1 b1 e1", E: "a1!3 e1", F: "d2!3 e1", G: "g1!4", H: "c2!4", I: "b1!4",
  J: "d2!4", K: "g1 a1 b1 a1", L: "c2!3 a1", M: "b1!3 a1", N: "c2!2 g1 a1", O: "b1 c#2 d2 b1", P: "d2 e2 f#2 d2",
  Q: "d2!3 g1", R: "e1!4",
})).s("gm_acoustic_bass").gain(0.51)

// bass · acoustic bass · "bass" · soft notes
const bass_soft = note(`<
  ~@136 A B C D C E F@2 A B C D C E F@2 A B C D C E F@2 A B C D C E F@2 A B C D C E F@2
>`.pickRestart({
  A: "b1 c#2 d2 b1", B: "d2 e2 f#2 d2", C: "g1!4", D: "d2!3 g1", E: "d2!3 e1", F: "e1!4",
})).s("gm_acoustic_bass").gain(0.15)

// chords · piano · "piano/guitar"
const piano = note(`<
  A B C D A B C D E F G H I J K L ~@32 M N O P M N O P Q N O P ~@20 M N O P M N O P Q N O P ~@84
>`.pickRestart({
  A: "[a2,e3,a3] [a2,e3,a3,c4,e4]!2 [e2,a2,e3]", B: "[f#2,a2,e3,a3,c4]!3 [f#2,a2]", C: "[e2,b2,e3]!2 [e2,b2] [f#2,a2]",
  D: "[g2,a2] a2 b2 [e2,a2]", E: "[a2,e3,a3] [a2,e3,a3,c4,e4] [e3,a3,c4,e4] [e2,a2]",
  F: "[d3,a3,d4,f#4]!2 [a3,d4,f#4] [b2,e3]", G: "[g2,b2,d3,g3,d4,g4]!2 [d3,g3,d4,g4] [g2,b2]",
  H: "[c3,e3,g3,c4,e4]!2 [b2,g3,c4,e4]!2", I: "[e3,a3,c4]!3 [e2,a2]", J: "[b2,f#3,b3,d4,f#4]!3 [f#2,b2,f#3]",
  K: "[a3,d4,f#4]!4", L: "[a3,d4,f#4]!3 [a2,d3,a3]", M: "[c3,e3,g3] [c3,e3,g3,c4] [c3,e3] [e3,g3,c4]",
  N: "[d3,a3,d4,f#4]!2 [d3,a3] [g2,b2,d4,g4]", O: "[g2,b2] [g3,d4,g4]!2 [b2,f#3,b3,d4,f#4]",
  P: "[b2,f#3,b3,d4] [f#3,b3,d4,f#4]!2 [e2,a2]", Q: "[c3,e3,g3,c4]!2 [c3,e3] [e3,g3,c4]",
})).s("gm_piano").gain(0.51)

// bass · piano · "piano/guitar"
const bass_2 = note(`<
  A B C D A B C D A E F G A H I@2 J B C D A B C D A E F G A H I@2 J B C K J B C D J E F G J H I@2 G L M N G L M N G L M
  N O N I@2 J B C K J B C K J E F G J H I@2 G L M N G L M N G L M N P N I@2 Q R F L F E S@2 Q R F L F E S@2 Q R F L F E
  S@2 Q R F L F E S@2 Q R F L F E S@2 ~@26 T@4 ~@10
>`.pickRestart({
  A: "a1!3 e1", B: "f#1!4", C: "e1!3 f#1", D: "g1 a1 b1 e1", E: "d2!3 e1", F: "g1!4", G: "c2!4", H: "b1!4", I: "d2!4",
  J: "a1!4", K: "g1 a1 b1 a1", L: "d2!3 g1", M: "g1!3 b1", N: "b1!3 a1", O: "c2!3 a1", P: "c2!2 g1 a1",
  Q: "b1 c#2 d2 b1", R: "d2 e2 f#2 d2", S: "e1!4", T: "[~ e1@29 ~@2]/4",
})).s("gm_piano").gain(0.51)

// bass · piano · "piano/guitar" · soft notes
const bass_soft_2 = note(`<
  ~@136 A B C D C E F@2 A B C D C E F@2 A B C D C E F@2 A B C D C E F@2 A B C D C E F@2
>`.pickRestart({
  A: "b1 c#2 d2 b1", B: "d2 e2 f#2 d2", C: "g1!4", D: "d2!3 g1", E: "d2!3 e1", F: "e1!4",
})).s("gm_piano").gain(0.15)

// other · reed organ
const reed_organ = note("<~@143 A@8 ~@4 B@8 ~@13>".pickRestart({
  A: "[~@7 b1@57]/8", B: "e2/8",
})).s("gm_reed_organ").gain(0.26)

// other · pad halo
const pad_halo = note("<~@165 A@6 B@5>".pickRestart({
  A: "[~@6 b2@47 ~@5 b2@35 ~@3]/6", B: "[~@9 b2@40 ~ b2@19 ~@11]/5",
})).s("gm_pad_halo").gain(0.26)

// other · pad halo
const pad_halo_2 = note("<~@162 A@8 ~@6>".pickRestart({
  A: "[~ e1@63]/8",
})).s("gm_pad_halo").gain(0.26)

// other · tenor sax
const tenor_sax = note("<~@162 A@8 ~@6>".pickRestart({
  A: "[~ e0@63]/8",
})).s("gm_tenor_sax").gain(0.51)

// other · baritone sax
const baritone_sax = note("<~@162 A@8 ~@6>".pickRestart({
  A: "[~ c-1@63]/8",
})).s("gm_baritone_sax").gain(0.26)

// drums · snare
const snare = s("sd").struct("<~@16 A@32 ~@12 A@20 ~@12 A B A@3 C A@6 C A@2 C A@18 C@3 A@15 ~@32>".pickRestart({
  A: "~ x", B: "~@9 x ~@6", C: "~@7 x ~@8",
})).gain(0.51)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@16 A B C D@3 B C D E D@6 F D@5 B C D@8 G ~@11 C D@4 H I D@8 A D@4 G ~@11 C J A D@2 K L D@2 A D E D@6 B C M D@2 N D B
  C D E D@5 K D@2 E D L D@2 A D@4 N D@6 A@6 D G ~@22
>`.pickRestart({
  A: "~ x ~@2 x ~@3 x ~@3 x ~@3", B: "x ~@3 x ~@3 x ~@3 x ~@2 x", C: "~ x!3", D: "x!4", E: "x ~@3 x ~@3 x ~@2 x ~@4",
  F: "x ~@4 x ~@2 x ~@3 x ~@3", G: "x", H: "x ~@4 x ~ x ~@3 x ~@3 x", I: "~@3 x ~@4 x ~@3 x ~@3",
  J: "~ x ~@2 x ~@4 x ~@2 x ~@3", K: "x ~@3 x ~@2 x ~@3 x ~@4", L: "x ~@2 x!2 ~ x ~", M: "x ~@3 x ~@2 x ~@4 x ~@3",
  N: "x ~@2 x ~@4 x ~@3 x ~@3",
})).gain(0.51)

stack(
  acoustic_guitar_steel, acoustic_guitar_steel_2, bass, bass_soft, piano, bass_2, bass_soft_2, reed_organ, pad_halo,
  pad_halo_2, tenor_sax, baritone_sax, snare, open_hat
)