// Long Hard Road Out of Hell — Marilyn Manson
// 123.5 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: duplicate parts dropped: ch 7 "Bass L" acoustic bass (copy of ch 6 "Bass R" electric bass finger); ch 11 "Guitar R" overdriven guitar (copy of ch 9 "Guitar L" overdriven guitar); ch 13 "Guitar Harmonics L" guitar harmonics (copy of ch 15 "Guitar Harmonics R" guitar harmonics); ch 15 "Guitar Harmonics R" guitar harmonics (copy of ch 14 "Guitar Harmonics M" guitar harmonics)
// note: Full arrangement: all 135 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(123.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.

// other · taiko drum · "Synth 1"
const taiko_drum = note(`<
  A@8 B@3 C B@3 C B@3 C B@3 C B@3 C ~@24 A@4 B@3 C B@3 C B@3 C B@3 C ~@20 B@3 C ~@39
>`.pickRestart({
  A: "~@4 c1 ~ c1 ~@9", B: "c1 ~@2 c1!2 ~ c1 ~", C: "c1 ~@2 c1!2 ~@3",
})).s("gm_taiko_drum").gain(0.45)

// bass · electric bass finger · "Quiet Bass"
const bass = note("<A B C A@2 B C A@2 B C A ~@40 A B C A ~@32 A B C A@2 B C A ~@39>".pickRestart({
  A: "e1!4", B: "g1!4", C: "f1!4",
})).s("gm_electric_bass_finger").gain(0.3)

// chords · acoustic guitar nylon · "Acoustic Guitar"
const acoustic_guitar_nylon = note("<~@4 A@2 B@2 A@2 B@2 ~@8 C D E C@2 D E C ~@60 A@2 F@2 A@2 F@2 ~@39>".pickRestart({
  A: "[~@3 e3@13, c3]/2", B: "[~@13 b2@3, c3, ~@3 e3@13, ~@3 a#2@5]/2", C: "[e2,b2,e3]!8", D: "[g2,d3,g3]!8",
  E: "[f2,c3,f3]!8", F: "[~@3 b2, c3, ~@3 e3@13, ~@3 a#2@5]/2",
})).s("gm_acoustic_guitar_nylon").gain(0.45)

// bass · electric bass finger · "Bass R"
const bass_2 = note(`<
  ~@12 A B C A@2 B C A@2 B C A@2 B C A@2 B C A@2 B C A@2 B C A@2 B C A@2 B C A@2 B C A ~@4 A B C A@2 B C A@2 B C A@2 B C
  A@2 B C A@2 B C A@2 B C A@2 B C A ~@8 A B C A@2 B C A@2 B C A@2 B C A@2 B C A@2 B C A D E D E D E D E D E D E ~@3
>`.pickRestart({
  A: "e1!4", B: "g1!4", C: "f1!4", D: "e1@2 e1@2 d1@2 e1@3 ~ e1 ~ e1!4", E: "e1!2 d1 d#1@2 b0 c1 b0",
})).s("gm_electric_bass_finger").gain(0.64).pan(0.8)

// chords · overdriven guitar · "Guitar L"
const overdriven_guitar = note(`<
  ~@36 A B C A@2 B C A@2 B C A@2 B C A ~@28 A B C A@2 B C A ~@16 A B C A@2 B C A@2 B C A@2 B C A D E D E D E D E D E D E
  ~@3
>`.pickRestart({
  A: "[e2,b2,e3]!4", B: "[g2,d3,g3]!4", C: "[f2,c3,f3]!4",
  D: "[e2,b2,e3]@2 [e2,b2,e3]@2 [d2,a2,d3]@2 [e2,b2,e3]@2 ~@2 [e2,b2,e3] ~ [e2,b2,e3]!4", // E5 D5 E5
  E: "[e2,b2,e3]!2 [d2,a2,d3] [d#2,a#2,d#3]@2 [b1,f#2,b2] [c2,g2,c3] [b1,f#2,b2]", // E5 D5 D#5 B5 C5 B5
})).s("gm_overdriven_guitar").gain(0.64).pan(0.2)

// bass · electric bass finger · "Extra Bass"
const bass_3 = note(`<
  ~@36 A B C A@2 B C A@2 B C A@2 B C A ~@28 A B C A@2 B C A ~@16 A B C A@2 B C A@2 B C A@2 B C A D E D E D E D F D E D E
  ~@3
>`.pickRestart({
  A: "e1!4", B: "g1!4", C: "f1!4", D: "e1@2 e1@2 d1@2 e1@3 ~ e1 ~ e1!4", E: "e1!2 d1 c#1@2 b0 c1 b0",
  F: "e1!2 d1 d#1@2 b0 c1 b0",
})).s("gm_electric_bass_finger").gain(0.64).pan(0.6)

// chords · guitar harmonics · "Guitar Harmonics M"
const guitar_harmonics = note("<~@124 A@7 B@2 C ~>".pickRestart({
  A: "[a#3 b3 a#3 c#4@2 ~@3 a#3 b3 a#3 c#4@2 ~@3 a#3 b3 a#3 c#4@2 ~@3 a#3 b3 a#3 c#4@2 ~@3 a#3 b3 a#3 c#4@2 ~@3 a#3 b3 a#3 c#4@2 ~@3 a#3 b3 a#3 c#4@2 a3@3, ~@5 a3@5 ~@3 a3@5 ~@3 a3@5 ~@3 a3@5 ~@3 a3@5 ~@3 a3@5 ~@6]/7",
  B: "[a#3@2 b3@2 a#3@2 c#4@4 ~@6 c4@3 c4@2 g3@3 d4@3 d4@5, ~@5 a3@6 ~@5]/2", C: "~ c4@2 c4@3 g3@3 d4@3 d4@4",
})).s("gm_guitar_harmonics").gain(0.64)

// drums · kick
const kick = s("bd").struct("<~@28 A@8 B@16 ~@20 A@8 B@8 ~@4 A@12 B@16 C@12 ~@3>".pickRestart({
  A: "x!4", B: "x ~ x ~@2 x ~@2 x ~ x ~@2 x ~@2", C: "x!2 ~ x ~@4",
})).gain(0.64)

// drums · snare
const snare = s("sd").struct(`<
  ~@35 A B@3 C B@3 D B@3 C B@3 D ~@27 A B@3 C B@3 D ~@15 E B@3 C B@3 D B@3 C B@3 D F G F G F G F G F G F G ~@3
>`.pickRestart({
  A: "~@8 x!8", B: "~@4 x ~@2 x ~@4 x ~@2 x", C: "~@4 x ~@2 x ~@4 x!4", D: "~@4 x!4 ~@8", E: "x!8 ~@8",
  F: "~@4 x ~@5 x ~ x!4", G: "~@2 x ~@2 x ~@2",
})).gain(0.64)

// drums · low tom
const low_tom = s("lt").struct("<~@43 A ~@7 A ~@35 A ~@15 A ~@7 A ~@7 A ~@15>".pickRestart({
  A: "~@12 x!4",
})).gain(0.64)

// drums · hihat
const hihat = s("hh").struct("<[x!2]!28 ~@24 [x!2]!20 ~@16 [x!2]!8 ~@39>").gain(0.64)

// drums · mid tom
const mid_tom = s("mt").struct("<~@43 A ~@7 A ~@35 A ~@15 B ~@7 A ~@7 A ~@15>".pickRestart({
  A: "~@10 x!2 ~@4", B: "~@8 x!4 ~@4",
})).gain(0.64)

// drums · open hat
const open_hat = s("oh").struct("<~@120 [~@3 x ~@4]!12 ~@3>").gain(0.64)

// drums · crash
const crash = s("cr").struct("<~@36 [x!4]!16 ~@28 [x!4]!8 ~@16 [x!4]!16 [x!3 ~@2 x ~@2]!12 ~@3>").gain(0.64)

// drums · ride
const ride = s("rd").struct("<A@28 B@8 ~@16 A@20 B@8 ~@8 A@8 B@8 ~@31>".pickRestart({
  A: "x!8", B: "x!16",
})).gain(0.64)

stack(
  taiko_drum, bass, acoustic_guitar_nylon, bass_2, overdriven_guitar, bass_3, guitar_harmonics, kick, snare, low_tom,
  hihat, mid_tom, open_hat, crash, ride
)