// Big Man With a Gun — Nine Inch Nails
// 100 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 41 bars on a 32-step grid, each part at one level. Source detail keeps the original performance.
setcpm(100/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 · distortion guitar
const distortion_guitar = note("<~@8 A B C@2 D@2 E@2 F@2 G@2 H I J K@3 L M N O P I Q R S@2 T U V@2 W>".pickRestart({
  A: "[d3,a3]@5 ~@4 [d#3,a#3]@5 ~@3 b3@12 [d3,a3]@3, ~@16 e3@13 ~@3", // D5 D#5 D5
  B: "~ [d3,a3]@3 [d#3,a#3]@4 ~ e3@4 [e3,b3]@5 ~ [e3,b3]@6 ~@7, ~@2 b3 ~@5", // D5 D#5 E5
  C: "[[d3,a3]@5 ~@3 [d#3,a#3]@6 ~@3 [e3,b3]@11 ~ d3@7 [d#3,a#3]@4 e3@4 e3@5 ~ [e3,b3]@6 ~@8, ~@28 a3@7 ~@5 b3@9 ~@15]/2", // D5 D#5 E5 D#5 E5
  D: "[[d3,a3]@6 ~@3 [d#3,a#3]@6 ~@2 [e3,b3]@13 d3@3 ~ d3@3 [d#3,a#3]@4 e3@3 ~ e3@4 ~@2 [e3,b3]@5 ~@8, ~@30 a3@7 ~@4 b3@8 ~@15]/2", // D5 D#5 E5 D#5 E5
  E: "[[d3,a3]@4 ~@4 [d#3,a#3]@5 ~@3 e3@4 ~@4 b3@4 ~ d3@3 d3@3 ~ d#3@3 ~ [e3,b3]@3 ~ e3@5 ~ [e3,b3]@5 ~@9, ~@4 b3@2 ~ a3@2 ~@7, ~@21 e3@8 ~@6 a#3@4 ~@4 b3@5 ~@16]/2", // D5 D#5 E5
  F: "[[d3,a3]@5 ~@4 d#3@5 ~@2 [e3,b3]@4 ~ [e3,b3]@3 [e3,b3]@4 a3@3 ~ a3@4 [d#3,a#3]@3 [e3,b3]@4 ~ [e3,b3]@5 ~@2 [e3,b3]@5 ~@8, ~@8 a#3@5 ~@15 d3@9 ~@27]/2", // D5 E5 D#5 E5
  G: "[[d3,a3]@6 ~@2 [d#3,a#3]@6 ~@3 [e3,b3]@3 ~ e3@7 [d3,a3]@3 ~ d3@4 [d#3,a#3]@4 [e3,b3]@3 ~ [e3,b3]@5 ~ [e3,b3]@6 ~@8, ~@20 b3@7 ~@4 a3@4 ~@29]/2", // D5 D#5 E5 D5 D#5 E5
  H: "~ [d3,a3]@5 ~@3 [d#3,a#3]@5 ~@3 b3@4 b3@3 ~ [e3,b3]@4 [d3,a3]@3, ~@17 e3@7 ~@8", // D5 D#5 E5 D5
  I: "[d3,a3]@4 [d#3,a#3]@4 [e3,b3]@3 ~ [e3,b3]@5 ~ [e3,b3]@6 ~@8", // D5 D#5 E5
  J: "[d3,a3]@5 ~@4 [d#3,a#3]@5 ~@3 [e3,b3]@4 [e3,b3]@4 [e3,b3]@4 [d3,a3]@3", // D5 D#5 E5 D5
  K: "[[d3,a3]@3 ~ d#3@4 [e3,b3]@4 [e3,b3]@4 ~@2 [e3,b3]@6 ~@8 d3@4 ~@4 [d#3,a#3]@5 ~@3 [e3,b3]@4 [e3,b3]@3 ~ [e3,b3]@3 ~ d3@3 ~ d3@3 ~ d#3@4 [e3,b3]@4 ~ e3@5 [e3,b3]@6 ~@8, ~@3 a#3@5 ~@23 a3@5 ~@23 a3@3 ~ a3@4 a#3@5 ~@4 b3@5 ~@15]/3", // D5 E5 D#5 E5
  L: "[d3,a3]@5 ~@3 [d#3,a#3]@4 ~@4 [e3,b3]@4 e3@3 ~ e3@4 [d3,a3]@3 ~, ~@20 b3@7 ~@5", // D5 D#5 E5 D5
  M: "[d3,a3]@4 ~ d#3@3 [e3,b3]@3 ~ [e3,b3]@5 ~ [e3,b3]@6 ~@8, ~ a#3 ~@6", // D5 E5
  N: "[d3,a3]@4 ~@4 [d#3,a#3]@5 ~@4 e3@3 ~ [e3,b3]@3 ~ [e3,b3]@3 [d3,a3]@3 ~, ~@4 b3 ~@3", // D5 D#5 E5 D5
  O: "d3@4 [d#3,a#3]@4 [e3,b3]@3 ~ [e3,b3]@5 ~ [e3,b3]@6 ~@8, a3@3 ~@29", // D#5 E5
  P: "[d3,a3]@5 ~@3 [d#3,a#3]@4 ~@5 e3@3 e3@3 ~ [e3,b3]@4 ~ a3@3, ~@16 b3@7 ~@5 d3@3 ~", // D5 D#5 E5
  Q: "~@4 a3@3 ~@4 [d#3,a#3]@4 ~@4 [e3,b3]@3 ~ b3@3 [e3,b3]@4 [d3,a3]@2, ~@3 d3@4 ~@15 e3@3 ~@7", // D#5 E5 D5
  R: "~@3 a3@3 [d#3,a#3]@4 [e3,b3]@3 ~ [e3,b3]@4 ~@2 [e3,b3]@5 ~@7, ~ d3@2 ~@13", // D#5 E5
  S: "[[d3,a3]@4 ~@3 [d#3,a#3]@5 ~@3 [e3,b3]@4 [e3,b3]@3 ~ [e3,b3]@4 ~ d3@3 ~ d3@4 [d#3,a#3]@4 ~ e3@3 ~ e3@5 [e3,b3]@6 ~@8, ~@27 a3@3 ~ a3@5 ~@4 b3@9 ~@15]/2", // D5 D#5 E5 D#5 E5
  T: "[d3,a3]@5 ~@3 [d#3,a#3]@4 ~@5 e3@3 [e3,b3]@7 ~ [d3,a3]@4, ~@16 b3@3 ~@13", // D5 D#5 E5 D5
  U: "[d3,a3]@4 ~ d#3@3 [e3,b3]@3 ~@2 e3@5 [e3,b3]@6 ~@8, ~@4 a#3@5 ~@3 b3@5 ~@15", // D5 E5
  V: "[[d3,a3]@5 ~@3 [d#3,a#3]@5 ~@2 [e3,b3]@4 ~ e3@8 d3@3 d3@5 [d#3,a#3]@4 [e3,b3]@3 ~ [e3,b3]@4 ~ [e3,b3]@7 ~@8, ~@19 b3@7 ~@2 a3@8 ~@28]/2", // D5 D#5 E5 D#5 E5
  W: "[d3,a3] ~@7", // D5
})).s("gm_distortion_guitar").gain(0.64)

// bass · electric bass finger
const bass = note("<~@4 A@2 B@5 C@5 D@8 ~@4 E@8 F@5>".pickRestart({
  A: "[e2@3 e2@3 ~ e2@6 ~@2 e2 e2@6 ~ e2@5 g2@2 a#2@3 e2@4 ~ e2@2 e2@5 ~@2 e2 ~ e2@2 e2@3 e2@5 ~@2 a#2@3, ~@30 g2 ~]/2",
  B: "[~@2 e2@4 ~ e2 ~ e2@5 ~ e2@2 e2@3 ~@2 e2@2 e2@4 g2@2 ~ a#2@3 e2@4 ~ e2 ~ e2@2 e2@3 ~ e2@2 ~ e2@3 ~ e2 ~ e2@4 g2@2 a#2@3 e2@4 ~ e2@2 ~ e2@2 e2@3 e2@2 ~ e2@2 e2@3 ~ e2@2 e2@3 g2@2 a#2@4 e2@3 ~ e2@2 e2@2 e2@4 ~ e2@2 e2@2 e2@3 ~ e2@2 e2@3 g2@2 a#2@4 e2@3 ~ e2@2 ~ e2@2 e2@3 ~ e2 ~ e2@2 e2@6 ~ e2@2 g2@2 a#2@2]/5",
  C: "[~@2 e2@3 ~ e2@2 e2 ~ e2@3 ~ e2@2 ~ e2@2 ~ e2@3 ~ e2@4 g2@2 a#2@5 e2@4 e2 ~@2 e2@6 e2@2 e2@4 ~ e2@2 e2@4 g2@2 a#2@4 e2@3 ~ e2@2 ~ e2@3 ~ e2@3 e2@5 ~ e2@2 e2@3 g2@2 a#2@4 e2@3 ~ e2 ~ e2 ~ e2@3 ~ e2 ~ e2 ~ e2@3 ~ e2 ~ e2@2 e2@2 ~ g2@2 ~@3 e2@3 ~ f2 ~ e2@2 e2@4 e2@2 e2@7 ~ e2@4 ~ a#2@3, ~@127 a#2@5 ~ e2@2 ~@21 g2@3 ~]/5",
  D: "[~@2 e2@3 ~ e2 ~ e2@2 ~ e2@3 e2 ~ e2@6 e2@2 e2@3 ~ g2@3 a#2@4 e2@3 e2@2 ~ e2@2 e2@3 ~ e2 ~ e2@2 e2@3 ~ e2@2 e2@3 g2@2 a#2@4 e2@3 ~ e2@2 e2@2 e2@3 ~ e2 ~@2 e2@2 e2@3 e2@2 ~ e2@3 g2@2 a#2@5 e2@2 ~ e2@2 e2@2 ~ e2@3 ~ e2@2 e2@3 ~ e2@2 e2@2 ~ e2@3 g2@2 a#2@5 e2@3 e2@2 ~ e2@3 ~ e2@2 e2@4 ~ e2@2 ~ e2@4 g2@2 a#2@4 e2@3 ~ e2 ~ e2 ~ e2@3 ~ e2 ~ e2@3 ~@2 e2@2 ~ e2@4 g2@2 a#2@5 e2@3 ~ e2 ~ e2@2 e2@3 ~ e2@2 ~ e2@3 e2@2 ~ e2@5 g2@2 a#2@4 e2@3 ~ e2@2 e2@3 ~@2 e2@2 e2@3 ~ e2@2 ~@2 e2@3 g2@2 a#2@3, ~@231 f2 ~@24]/8",
  E: "[e2@2 ~@2 e2@3 ~ e2@3 e2@3 ~ e2@2 e2@3 e2@2 ~ e2@2 e2@3 g2@2 a#2@5 e2@3 e2@2 ~ e2 ~ e2@3 e2@2 ~ e2@5 e2@2 e2@4 g2@2 a#2@5 e2@3 e2@2 ~ e2@2 e2@3 ~ e2@2 e2@3 ~ e2@3 ~ e2@3 g2@2 a#2@5 e2@3 ~ e2@2 e2 ~ e2@3 ~ e2@2 e2@3 ~ e2@3 e2@4 g2@2 a#2@5 e2@3 ~ e2@2 ~ e2@3 ~ e2 ~@2 e2@4 ~ e2 ~ e2@4 g2@2 a#2@4 ~ e2@3 ~ e2@2 e2@2 ~ e2@2 ~ e2@2 ~ e2@3 ~ e2 ~ e2@4 g2@2 a#2@3 e2@3 ~ e2 ~@2 e2 ~ e2@3 ~ e2@2 e2@2 ~ e2@2 ~ e2 ~@2 e2@3 g2@2 a#2@5 e2@3 ~ e2@2 ~ e2@2 e2@3 e2@2 ~ e2@2 ~ e2@3 ~ e2@3 g2@2 a#2@2]/8",
  F: "[~@2 e2@2 ~ e2@2 ~ e2 ~ e2@4 ~ e2 ~ e2@6 ~ e2@4 g2@2 a#2@4 e2@2 ~@2 e2@2 e2@2 e2@3 ~@2 e2@2 e2@3 e2@3 ~ e2@4 g2@2 a#2@4 e2@3 ~ e2@2 e2@2 e2@3 ~ e2@2 ~ e2@2 e2@3 ~ e2@5 g2@2 a#2@4 e2@3 e2@2 ~ e2@2 e2@3 ~ e2@2 ~ e2@3 ~ e2@3 e2@3 g2@2 a#2@5 ~@30]/5",
})).s("gm_electric_bass_finger").gain(0.4)

// bass · guitar harmonics
const bass_2 = note("<~@24 A B C@2 D E F G@2 ~@8>".pickRestart({
  A: "a2@6 ~ g#2@4 g2@7 c2@5 ~ c2@4 d2@2 ~@2", B: "d2@4 a2@3 g#2@4 ~ g2@6 c2@5 ~ c2@4 d2@3 ~",
  C: "[d2@4 a2@4 g#2@4 g2@6 c2@4 ~@2 c2@3 ~ d2@3 d2@5 a2@3 g#2@4 ~ g2@6 c2@5 ~ c2@4 d2@2 ~@2]/2",
  D: "d2@4 a2@4 g#2@4 g2@6 c2@5 ~ c2@4 d2@3 ~", E: "d2@4 a2@4 g#2@4 g2@5 ~ c2@5 ~@2 c2@3 d2@3 ~",
  F: "d2@4 a2@4 g#2@3 g2@6 ~ c2@5 ~ c2@3 d2@3 ~@2", G: "[d2@5 a2@3 g#2@4 g2@6 c2@5 c2@4 ~ d2@14 ~@22]/2",
})).s("gm_guitar_harmonics").gain(0.52)

// other · reed organ
const reed_organ = note("<~@24 A@3 B@6 ~@8>".pickRestart({
  A: "[a4@6 g#4@5 g4@5 ~@2 c4@6 c4@3 d4@9 a4@4 g#4@4 g4@6 c4@5 ~ c4@3 d4@9 ~@3 g#4@4 g4@6 c4@9 d4@6, ~@68 a4@5 ~@23]/3",
  B: "[~@3 a4@4 g#4@4 g4@6 ~ c4@9 d4@9 a4@4 g#4@4 g4@6 c4@10 d4@8 ~@3 g#4@5 g4@7 c4@9 d4@8 a4@4 g#4@4 g4@6 c4@6 c4@4 d4@8 a4@4 g#4@4 g4@6 c4@10 d4@7 a4@4 g#4@4 ~@21, ~@68 a4@5 ~@119]/6",
})).s("gm_reed_organ").gain(0.53)

// drums · kick
const kick = s("bd").struct(`<
  A B C D E F G H I H J H B J H@3 J@2 K L A M L H N H@2 O J P Q R S T D U L V W ~
>`.pickRestart({
  A: "~@2 x ~@3 x ~@3 x ~@3 x ~@3 x ~@4 x ~@5 x ~@2", B: "~@3 x ~@3 x ~@3 x ~@3 x ~@3 x ~@2 x ~@5 x ~@3",
  C: "~@3 x ~@2 x ~@4 x ~@2 x ~@4 x ~@3 x ~@5 x ~@2", D: "~@3 x ~@3 x ~@3 x ~@2 x ~@3 x ~@3 x ~@5 x ~@3",
  E: "~@2 x ~@3 x ~@4 x ~@2 x ~@3 x ~@3 x ~@4 x ~@4", F: "~ x ~@4 x ~@3 x ~@3 x ~@3 x ~@3 x ~@5 x ~@3",
  G: "~@2 x ~@3 x ~@3 x ~@3 x ~@4 x ~@3 x ~@4 x ~@3", H: "~ x ~ x ~ x ~ x ~ x ~ x ~@2 x ~",
  I: "~@2 x ~@3 x ~@3 x ~@3 x ~@4 x ~@2 x ~@5 x ~@3", J: "~@2 x ~@3 x ~@4 x ~@2 x ~@3 x ~@3 x ~@5 x ~@3",
  K: "~@2 x ~@3 x ~@4 x ~@3 x ~@3 x ~@3 x ~@5 x ~@2", L: "~@3 x ~@2 x ~@4 x ~@2 x ~@3 x ~@3 x ~@5 x ~@3",
  M: "~@3 x ~@3 x ~@4 x ~@2 x ~@3 x ~@3 x ~@4 x ~@3", N: "~ x ~ x ~ x ~ x ~@2 x ~@3 x ~",
  O: "~@3 x ~@2 x ~@4 x ~@3 x ~@2 x ~@3 x ~@5 x ~@3", P: "~@3 x ~@3 x ~@3 x ~@2 x ~@4 x ~@2 x ~@5 x ~@3",
  Q: "~@3 x ~@2 x ~@3 x ~@3 x ~@5 x ~@11", R: "~@3 x ~@3 x ~@8 x ~ x ~@4 x ~@3 x ~@2 x ~",
  S: "~@4 x ~@5 x ~@3 x ~@3 x ~@3 x ~@4 x ~@4", T: "~@2 x ~@3 x ~@3 x ~@3 x ~@3 x ~@3 x ~@6 x ~@2",
  U: "~@3 x ~@2 x ~@4 x ~@2 x ~@3 x ~@3 x ~@6 x ~@2", V: "~@2 x ~@3 x ~@3 x ~@3 x ~@3 x ~@2 x ~@6 x ~@3",
  W: "~@2 x ~@3 x ~@3 x ~@2 x ~@4 x ~@3 x ~@5 x ~@3",
})).gain(0.46)

// drums · snare
const snare = s("sd").struct(`<
  A B A C D E A F G H I F B J H F@2 I@2 K C A B L F@4 M F M N O D E C F L F P Q
>`.pickRestart({
  A: "x ~@7 x ~@7 x ~@8 x ~@6", B: "~ x ~@7 x ~@7 x ~@7 x ~@6", C: "~ x ~@7 x ~@6 x ~@7 x ~@7",
  D: "x ~@7 x ~@7 x ~@7 x ~@6 x", E: "~ x!3", F: "x!4", G: "x ~@7 x ~@8 x ~@6 x ~@7", H: "~ x ~@6 x ~@8 x ~@6 x ~@7",
  I: "x ~@8 x ~@6 x ~@7 x ~@7", J: "x ~@8 x ~@6 x ~@8 x ~@6", K: "x ~@8 x ~@7 x ~@7 x ~@6",
  L: "~ x ~@6 x ~@7 x ~@7 x ~@7", M: "x ~@8 x ~@7 x ~@6 x ~@7", N: "~ x ~@6 x ~@7 x ~@7 x ~ x ~ x ~ x ~",
  O: "x!2 ~@3 x ~@5 x ~@12 x ~@7", P: "x ~@7 x ~@6 x ~@8 x ~@7", Q: "x",
})).gain(0.46)

// drums · crash
const crash = s("cr").struct("<~@4 A ~@3 A ~@3 B ~@3 A ~@7 A ~@15 A>".pickRestart({
  A: "x", B: "~ x ~@30",
})).gain(0.46)

stack(distortion_guitar, bass, bass_2, reed_organ, kick, snare, crash)