// Deformography — Marilyn Manson
// 166.5 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: ch 8 "Extra Dist. Guitar" named as a guitar, played on electric guitar clean (its piano patch is not one)
// note: Full arrangement: all 188 bars on a 24-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): Extra Dist. Guitar.
setcpm(166.5/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.

// bass · electric bass finger · "Bass 1"
const bass = note(`<
  [a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2]!18
  [~ a1 ~ a1 ~@2 a1 ~@3 a1 ~ a1 ~@3 a1 ~ a1 ~@2 a1 ~@2]
  [a1 ~@3 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~ a1 ~@3 a1 ~]
  [a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2]!4
  ~@112
  [~ a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~@2 a1 ~]!16
  ~@36
>`).s("gm_electric_bass_finger").gain(0.64)

// chords · lead 8 bass lead · "Bass + Lead"
const lead_8_bass_lead = note(`<
  A B A B A B A B A B A B A B A B A B A B C D A B ~@32 E F E F E G H G H G H G H G H G ~@24 H G H G H G H G H G H G H G
  H G ~@24 I J I J I J I J I J I J I J I J H G H G K G K G K G K G K G K L K L K L K L K L K L M N M N M N ~@4
>`.pickRestart({
  A: "~@6 f1 ~@2 f#1 ~@2 g#1 ~@2 g1 ~@2 f#1 ~@2 f1 ~@2", B: "~@6 f#1 ~@2 f1 ~@5 g1 ~@2 f1 ~@5",
  C: "~@6 f1 ~@3 f#1 ~ g#1 ~@2 g1 ~@3 f#1 ~ f1 ~@2", D: "~@6 f#1 ~@3 f1 ~@4 g1 ~@2 f1 ~@5",
  E: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@2 [g3,c4]@3", // C5
  F: "~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~@2", // C5 A#5
  G: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~@2", // C5 A#5
  H: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@2", // C5
  I: "~@7 f1 ~@2 f#1 ~@2 g#1 ~@2 g1 ~@2 f#1 ~@2 f1 ~", J: "~@7 f#1 ~@2 f1 ~@5 g1 ~@2 f1 ~@4",
  K: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@2", // C5
  L: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 ~ [f3,a#3]@3 ~", // C5 A#5
  M: "~ [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 [g3,c4]@2", // C5
  N: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~ [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~", // C5 A#5
})).s("gm_lead_8_bass_lead").gain(0.54)

// chords · distortion guitar · "Dist. Guitar"
const distortion_guitar = note(`<
  ~@24 A@3 B A@3 B A@3 B A@3 B C D E F C D E F G H I J K H I J L M L N O N O N O N O N O N P Q R@3 S R@3 S R@3 S R@3 S
  R@3 S R@3 S T U T U T U T U T U T U T U T U V W V W V W V W V W V W V W V W ~@16 X@8 T U T U Y U Y U Y U Y U Y U Y Z Y
  Z Y Z Y Z Y Z Y Z AA AB AA AB AA AB ~@4
>`.pickRestart({
  A: "[f1,c2,f2] [g1,d2,g2] ~@2", B: "[f1,c2,f2] [g1,d2,g2] [a1,e2,a2]@2",
  C: "[f1,c2,f2]@6 [g1,d2,g2]@6 ~ f3@11, [f3,c4] c4", D: "[f1,c2,f2]@6 [g1,d2,g2]@6 ~ e3@11, [e3,b3] b3",
  E: "[f1,c2,f2]@6 [g1,d2,g2]@6 ~ d3@11, [c#3,g#3] a3", // F5 G5 C#5
  F: "[f1,c2,f2,c#3,g#3]@6 ~ d3@5 ~ e3@11, ~ [g1,d2,g2,a3] [a1,e2,a2,b3]@2", // C#maj7 Gsus2 Asus2
  G: "~@6 [g1,d2,g2]@6 ~ f3@11, c4!2, [f1,c2,f2] ~@3, ~ f3@12 ~@11", // G5 F5
  H: "~@7 g2@6 [e3,b3]@11, b3 ~, [f1,c2,f2] [g1,d2] ~@2, ~ e3@12 ~@11", // E5 F5 G5
  I: "~@7 g2@6 [d3,a3]@11, g#3 ~, [f1,c2,f2] [g1,d2] ~@2, ~ c#3@12 ~@11", // D5 F5 G5
  J: "~ c#3@5 ~ [g2,d3,a3]@5 ~ [e3,b3]@11, [f1,c2,f2,g#3] [g1,d2] [a1,e2,a2]@2", // Gsus2 E5 Fm G5 A5
  K: "~@7 g2@6 [f3,c4]@11, c4 ~, [f1,c2,f2] [g1,d2] ~@2, ~ f3@12 ~@11", // F5 G5
  L: "[g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3", // C5
  M: "[g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 ~ [f3,a#3]@3 ~@2", // C5 A#5
  N: "[g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~ [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~@2", // C5 A#5
  O: "[g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 [g3,c4]@3", // C5
  P: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@2 [g3,c4]@3", // C5
  Q: "~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~@2", R: "~ [f1,c2,f2]@6 [g1,d2,g2]@6 ~@11",
  S: "~ [f1,c2,f2]@6 [g1,d2,g2]@6 [a1,e2,a2]@11", // F5 G5 A5
  T: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@2", // C5
  U: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~@2", // C5 A#5
  V: "~ [c2,g2,c3]@6 [c2,g2,c3]@6 [c2,g2,c3]@6 ~@5", W: "~ [c2,g2,c3]@6 [c2,g2,c3]@6 [c2,g2,c3]@3 [b1,f#2,b2]@8",
  X: "[~ b1@3 b1@3 c2@3 c#2@3 d2@3 c#2@3 c2@3 b1@6 c2@6 ~@14]/2",
  Y: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@2", // C5
  Z: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~@3 [f3,a#3]@3 ~ [f3,a#3]@3 ~", // C5 A#5
  AA: "~ [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 ~ [g3,c4]@2 [g3,c4]@3 [g3,c4]@2", // C5
  AB: "~ [g3,c4]@3 [g3,c4]@3 [g3,c4]@3 ~ [g3,c4]@3 ~@3 [f3,a#3]@3 [f3,a#3]@3 ~", // C5 A#5
})).s("gm_distortion_guitar").gain(0.54)

// bass · electric bass finger · "Bass 2"
const bass_2 = note(`<
  ~@24 A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A C D E F C D E G H G I J I J I J I J I J I K L M@3 N M@3 N M@3 N M@3 N M@3 N
  M@3 N O P O P O P O P O P O P O P O P Q R Q R Q R Q R Q R Q R Q R Q R ~@16 S@8 O P O P O P O P O P O P O P O P O P O P
  O P O P T U V W T U V W ~@4
>`.pickRestart({
  A: "[c1,f1,a1] [d1,g1,b1] ~@2", B: "[c1,f1,a1] [d1,g1,b1] [e1,a1,c2]@2", C: "[c1,f1,a1]@6 ~ [d1,g1,b1]@6 ~@11",
  D: "[c1,f1,a1]@6 ~ b1@6 ~@11, ~ [d1,g1] ~@2", E: "[c1,f1,a1]@6 ~ [d1,b1]@5 ~ e1@11, ~ g1 [a1,c2]@2",
  F: "[c1,f1,a1]@6 ~ g1@6 ~@11, ~ [d1,b1] ~@2", G: "c3@3 c3@3 c3@3 ~ c3@2 c3@3 c3@3 c3@3 c3@3",
  H: "c3@3 c3@3 c3@3 c3@3 ~@3 a2@3 ~ a2@3 ~@2", I: "c3@3 c3@3 c3@3 ~ c3@3 ~@3 a2@3 a2@3 ~@2",
  J: "c3@3 ~ c3@2 c3@3 ~ c3@2 c3@3 ~ c3@2 c3@3 c3@3", K: "~ c3@3 c3@3 c3@3 c3@3 c3@3 c3@3 c3@2 c3@3",
  L: "~ c3@2 c3@3 ~ c3@3 c3@3 ~@3 a2@3 a2@3 ~@2", M: "~ [c1,f1,a1]@6 [d1,g1,b1]@6 ~@11",
  N: "~ [c1,f1,a1]@6 [d1,g1,b1]@6 [e1,a1,c2]@11", O: "~ c3@3 c3@3 c3@3 c3@3 c3@3 c3@3 c3@3 c3@2",
  P: "~ c3@3 c3@3 c3@3 c3@3 ~@3 a2@3 a2@3 ~@2", Q: "~ g1@6 g1@6 g1@6 ~@5", R: "~ g1@6 g1@6 g1@3 f#1@8",
  S: "[~ f1@3 f1@3 g1@3 g#1@3 a1@3 g#1@3 g1@3 f1@6 g1@6 ~@14]/2",
  T: "~ c3@3 c3@3 c3@3 ~ c3@2 c3@3 c3@3 c3@3 c3@2, ~ [e2,f2]@23", // Fmaj7
  U: "~ c3@3 c3@3 c3@3 c3@3 ~@3 a2@3 a2@3 ~@2, ~ [f2,g2]@23", // Fsus2
  V: "~ c3@3 c3@3 c3@3 ~ c3@2 c3@3 c3@3 c3@3 c3@2, ~ [d2,e2]@23", // Dsus2
  W: "~ c3@3 c3@3 c3@3 c3@3 ~@3 a2@3 a2@3 ~@2, ~ [e2,f2]@23", // Fmaj7
})).s("gm_electric_bass_finger").gain(0.54)

// other · pad halo · "Halo"
const pad_halo = note("<~@120 A B A B A B A B ~@60>".pickRestart({
  A: "~@13 c5@6 ~@5", B: "~@7 c5@6 b4@6 ~@5",
})).s("gm_pad_halo").gain(0.64)

// drums · kick
const kick = s("bd").struct(`<
  ~@8 A B C B A B C B A B C B A B C B D@33 E D E D E D E D E D E D E F G F@25 G F G F G F G F G F G F G F G H I H I H I
  H I H I H I H I H I H J K J H J K J H J K J H J K J H J K J H J K J F G F G F G F G F G F G F G F G F G F G F G F G F
  G F G F G F G ~@4
>`.pickRestart({
  A: "x!2 ~@2", B: "x ~ x!2 ~@4", C: "x!2 ~@6", D: "x", E: "x ~@12 x ~@10", F: "~ x ~@22", G: "~ x ~@11 x ~@10",
  H: "~ x ~@5 x ~@16", I: "~ x ~@5 x ~@8 x ~@7", J: "~ x ~@5 x ~@2 x ~@13", K: "~ x ~@2 x ~@19",
})).gain(0.54)

// drums · snare
const snare = s("sd").struct(`<
  ~@7 A B@41 C@7 D ~ D ~ D ~ D ~ D ~ D ~ D ~ C ~ C@25 ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C E C E C E C E C E C E C E C E C@25
  ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~ C ~@5
>`.pickRestart({
  A: "~ x ~@2", B: "~ x", C: "~@13 x ~@10", D: "~@12 x!2 ~@10", E: "~@13 x ~@8 x ~",
})).gain(0.54)

// drums · hihat
const hihat = s("hh").struct("<A@24 ~@32 B@16 C ~@23 D B@15 E ~@15 F@24 D B@31 E ~@3>".pickRestart({
  A: "x!8", B: "x!24", C: "x", D: "~ x!23", E: "x!2 ~@22", F: "~ x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~",
})).gain(0.54)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@11 A ~@3 A ~@3 A ~@3 A B@32 ~@16 C@24 ~@35 D ~@3 D ~@3 D ~@3 D ~@3 D ~@3 D ~@36
>`.pickRestart({
  A: "~@3 x", B: "~ x ~ x", C: "~@7 x ~@11 x ~@4", D: "~@19 x ~@4",
})).gain(0.54)

// drums · woodblocks
const woodblocks = s("woodblock:5").struct("<~@184 [~ x ~@11 x ~@10]!4>").gain(0.79)

stack(bass, lead_8_bass_lead, distortion_guitar, bass_2, pad_halo, kick, snare, hihat, open_hat, woodblocks)