// Down in the Park — Marilyn Manson
// 145 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: ch 1 "Fuzzy Guitar" named as a guitar, played on distortion guitar (its lead 2 sawtooth patch is not one)
// note: duplicate parts dropped: ch 5 "Right Guitar" overdriven guitar (copy of ch 2 "Left Guitar" overdriven guitar)
// note: Full arrangement: all 183 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(145/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · "Fuzzy Guitar"
const distortion_guitar = note(`<
  ~@4 A B C D A B E@2 ~@8 F G H I F G H@2 F G H I F G H@2 ~@8 J K L M J K L@2 J K L M J K L@2 ~@24 A B C D A B E@2 ~@64
  N@2 O P O P O P O P O Q@16
>`.pickRestart({
  A: "c3", B: "d3", C: "b2", D: "g#2", E: "b2/2", F: "c3 ~ c3 ~ c3 ~ c3 ~ c3 ~ c3 ~ c3 ~ c3 ~",
  G: "d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~", H: "b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~",
  I: "g#2 ~ g#2 ~ g#2 ~ g#2 ~ g#2 ~ g#2 ~ g#2 ~ g#2 ~",
  J: "[a2,f3] ~ [a2,f3] ~ [a2,f3] ~ [a2,f3] ~ [a2,f3] ~ [a2,f3] ~ [a2,f3] ~ [a2,f3] ~", // Dm
  K: "[b2,g3] ~ [b2,g3] ~ [b2,g3] ~ [b2,g3] ~ [b2,g3] ~ [b2,g3] ~ [b2,g3] ~ [b2,g3] ~", // Em
  L: "[g#2,e3] ~ [g#2,e3] ~ [g#2,e3] ~ [g#2,e3] ~ [g#2,e3] ~ [g#2,e3] ~ [g#2,e3] ~ [g#2,e3] ~", // C#m
  M: "[f2,c#3] ~ [f2,c#3] ~ [f2,c#3] ~ [f2,c#3] ~ [f2,c#3] ~ [f2,c#3] ~ [f2,c#3] ~ [f2,c#3] ~", N: "[f2,c3]/2",
  O: "[g2,d3]", P: "[f2,c3]", Q: "[f2,c3]@3 ~",
})).s("gm_distortion_guitar").gain(0.45)

// chords · overdriven guitar · "Left Guitar"
const overdriven_guitar = note(`<
  ~@12 A B C D A B E@2 ~@6 F@2 G H I J G H K@2 E@4 L@4 G H I J G H K@2 A B C D A B E@6 L@4 E@4 L@4 M N O P M N O@2 M N O
  P M N O@2 ~@8 A B C D A B E@6 L@4 E@4 L@4 E@4 L@4 E@4 L@4 E@4 L@4 E@4 L@4 ~@27
>`.pickRestart({
  A: "[a2,e3]", B: "[b2,f3]", C: "[g#2,e3]", D: "[g2,d3]", E: "[g2,d3]/2", F: "[a2,e3] ~", G: "c3", H: "d3", I: "b2",
  J: "g#2", K: "b2/2", L: "[f2,c3]/2", M: "[a2,f3]!4", N: "[b2,g3]!4", O: "[g#2,e3]!4", P: "[f#2,d3]!4",
})).s("gm_overdriven_guitar").gain(0.45).pan(0.2)

// bass · electric bass finger · "Bass"
const bass = note("<~@20 A B C D A B E@2 A B C D A B E@2 ~@8 A B C D A B E@2 A B C D A B E@2 ~@123>".pickRestart({
  A: "c3", B: "d3", C: "b2", D: "g#2", E: "b2/2",
})).s("gm_electric_bass_finger").gain(0.3)

// drums · kick
const kick = s("bd").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 C D C D C D C D A B A B A B A B A B A B A B A
  B C D C D C D C D C D C D C D C D E@16 A B A B A B A B A B A B A B A B C D C D C D C D C D C D C D C D C D C D C D C D
  C D C D C D C D C D C D C D C D C D C D C D C D ~@27
>`.pickRestart({
  A: "x ~@2 x ~ x ~ x", B: "~@2 x ~@2 x ~@2", C: "x!2 ~@2", D: "x!4 ~@4", E: "x",
})).gain(0.3)

// drums · snare
const snare = s("sd").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 C@8 A B A B A B A B A B A B A B A B C@32 A B A
  B A B A B A B A B A B A B C@7 D C@40 ~@27
>`.pickRestart({
  A: "~ x!2 ~", B: "~ x ~ x ~@2 x ~", C: "~ x", D: "~@2 x!2",
})).gain(0.3)

// drums · open hat
const open_hat = s("oh").struct("<~@116 [~ x]!16 [x!2]!8 [x!4]!16 ~@27>").gain(0.3)

// drums · crash
const crash = s("cr").struct("<~@148 [x!4]!8 ~@27>").gain(0.3)

// drums · ride
const ride = s("rd").struct("<[x!8]!36 ~@8 [x!8]!16 ~@16 [~ x ~@3 x ~@2]!16 [x!8]!16 ~@75>").gain(0.3)

// drums · vibraslap
const vibraslap = s("vibraslap:0").struct("<~@92 [~ x]!8 ~@83>").gain(3.53)

stack(distortion_guitar, overdriven_guitar, bass, kick, snare, open_hat, crash, ride, vibraslap)