// Dried Up, Tied and Dead to the World — Marilyn Manson
// 92 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 92 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(92/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 nylon · "guitar 1"
const acoustic_guitar_nylon = note("<A@2 B C ~@48 D E D E D E D E ~@32>".pickRestart({
  A: "[~ e2@13 e2!2]/2", B: "e2@7 ~", C: "e2", D: "[e3,b3]!3 [d3,a3]!2 [e3,b3]!2 ~@3 [g3,d4]!2 [a3,e4]!4",
  E: "[e3,b3]!3 [d3,a3]!2 [e3,b3]!2 ~@5 [g2,d3]!4", // E5 D5 E5 G5
})).s("gm_acoustic_guitar_nylon").gain(0.8)

// bass · electric bass pick · "bass"
const bass = note(`<
  ~@2 A@4 B@8 C@2 B@8 D E F G D E F G C@4 B@8 D E F G D E F G C@8 D E F G D E F G D E F G D E F G H@16
>`.pickRestart({
  A: "[e0,e1]!5 ~@2 [e0,e1]!6 ~@3", B: "e1@2 ~ e1 e2@2 e1 ~@2 e1 d2 e2!5", C: "[e0,e1]!3 ~@4 [e0,e1]!4 ~@5",
  D: "e1@7 e1", E: "d1@7 d1", F: "b1@7 b1", G: "a1@3 g1", H: "e1!2 ~ e1!2 ~ e1!2 ~ e1 ~@6",
})).s("gm_electric_bass_pick").gain(0.8)

// chords · distortion guitar · "guitar 2"
const distortion_guitar = note(`<
  ~@10 A@4 B C D E D E D E D E F G H I F G H I B C B C ~@4 A@4 F G H I F G H I ~@4 D J D J F G H I F G H I K L M N K L M
  N O@16
>`.pickRestart({
  A: "~@2 [b3,e4] [a3,d4] ~@2 [d4,g4]@2", B: "~ [e5,e6] [f5,f6] [e5,e6] ~ [e5,e6] [f5,f6] [e5,e6]",
  C: "~ [e5,e6] [f5,f6] [e5,e6]!2 [f5,f6] [g5,g#6]@2", D: "[e3,b3]!3 [d3,a3]!2 [e3,b3]!2 ~@3 [g3,d4]!2 [a3,e4]!4",
  E: "[e3,b3]!3 [d3,a3]!2 [e3,b3]!2 ~@3 [g2,a2]@6", F: "[e3,b3,e4]", G: "[d3,a3,d4]", H: "[b2,f#3,b3]",
  I: "[a2,e3,a3]@3 [g2,d3,g3]", J: "[e3,b3]!3 [d3,a3]!2 [e3,b3]!2 ~@5 [g2,d3]!4",
  K: "e4@2 [e4,e5] [d4,d5] ~ [g4,g5]@3, [e3,b3]", L: "~@2 [e4,e5] [d4,d5] ~ [g4,g5]@3, [d3,a3], d4@3 ~@5",
  M: "~@2 [e4,e5] [d4,d5] ~ [g4,g5]@3, [b2,f#3,b3]", // E D G B5
  N: "~@2 [e4,e5] [d4,d5] ~@2 [g2,d3,g3]@2, [a2,e3,a3]@3 ~, ~@5 [g4,g5]@3", // E D G5 A5 G
  O: "[e2,b2,e3]!2 ~ [e2,b2,e3]!2 ~ [e2,b2,e3]!2 ~ [e2,b2,e3] ~@2 e6@4", // E5
})).s("gm_distortion_guitar").gain(0.8)

// other · string ensemble 1 · "strings"
const string_ensemble_1 = note("<~@60 A@8 ~@16 B C D E B C D E>".pickRestart({
  A: "e6/8", B: "e4@3 f4", C: "f#4", D: "b4", E: "a#4",
})).s("gm_string_ensemble_1").gain(0.8)

// drums · kick
const kick = s("bd").struct("<~@2 A@3 B C@8 A@2 C@8 D@7 E A@4 C@7 F D@7 E A@7 G D@7 E D@7 E H@16>".pickRestart({
  A: "x ~ x!3 ~ x!2 ~ x!4 ~ x!2", B: "x ~ x!3 ~ x!2 ~ x!4 ~@3", C: "x ~@2 x ~@2 x ~@2 x!3 ~@2 x ~",
  D: "x!3 ~@3 x!2 ~ x!2 ~@5", E: "x!3 ~@3 x!2 ~ x!2 ~@2 x!2 ~", F: "x ~@2 x ~@2 x ~@9", G: "x ~ x!3 ~ x!2 ~ x!7",
  H: "x!2 ~ x ~@2 x!2 ~ x!2 ~@5",
})).gain(0.51)

// drums · snare
const snare = s("sd").struct(`<
  ~@6 A@8 ~@2 A@7 B A@3 C A@3 D ~@4 A@7 E A@3 C A@3 D ~@7 F A@3 C A@3 D A@3 C A@3 D A@16
>`.pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@7 x!2 ~ x", C: "~@4 x ~@3 x ~@3 x ~ x!2", D: "~ x!3", E: "~@4 x ~@3 x!8",
  F: "~@8 x ~@2 x ~@2 x!2",
})).gain(0.51)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@3 [~@11 x!2 ~ x ~] [~@6 x!2 ~ x ~@6] [x!2 ~ x ~@4 x!2 ~ x ~@4] ~@86>").gain(0.2)

// drums · hihat
const hihat = s("hh").struct("<~@6 A@8 ~@2 A@8 ~@12 A@8 ~@12 A@4 ~@32>".pickRestart({
  A: "x!16",
})).gain(0.51)

// drums · low tom
const low_tom = s("lt").struct("<~@3 [~@7 x] [~@9 x ~@6] [~@3 x ~@7 x ~@4] ~@86>").gain(0.2)

// drums · open hat
const open_hat = s("oh").struct("<~@24 [x!8]!8 ~@12 [x!8]!8 ~@8 [x!8]!32>").gain(0.51)

// drums · crash
const crash = s("cr").struct(`<
  ~@6 A ~@7 A ~ A ~@7 A ~@2 B A ~@2 B ~@4 A ~@7 A ~@2 B A ~@2 B A ~@7 A ~@2 B A ~@2 B A ~@2 B A ~@2 B ~@16
>`.pickRestart({
  A: "x", B: "~@2 x!2",
})).gain(0.51)

// drums · tambourine
const tambourine = s("tb").struct("<~@6 A@8 ~@2 A@8 ~@12 A@8 ~@12 A@4 ~@32>".pickRestart({
  A: "~ x ~ x ~ x ~ x",
})).gain(0.51)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<A B C@3 D ~@8 C@2 ~@16 C@4 ~@16 C@8 ~@32>".pickRestart({
  A: "~ x", B: "x", C: "x!3 ~@4 x!4 ~@5", D: "x!3 ~@4 x!4 ~@3 x ~",
})).gain(2.6)

// drums · guiro
const guiro = s("guiro:0").struct("<~@2 A B A C ~@8 A@2 ~@16 A@4 ~@16 A@8 ~@32>".pickRestart({
  A: "~@5 x!2 ~@6 x!3", B: "x ~@4 x!2 ~@6 x!3", C: "~@5 x!2 ~@9",
})).gain(10.82)

// drums · guiro
const guiro_2 = s("guiro:4").struct("<~@2 A@3 B ~@8 A@2 ~@16 A@4 ~@16 A@8 ~@32>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2",
})).gain(10.82)

// drums · shaker
const shaker = s("sh").struct("<~@2 A@3 B ~@8 A@2 ~@16 A@4 ~@16 A@8 ~@32>".pickRestart({
  A: "~@3 x!4 ~@4 x!5", B: "~@3 x!4 ~@4 x!2 ~ x ~",
})).gain(0.51)

stack(
  acoustic_guitar_nylon, bass, distortion_guitar, string_ensemble_1, kick, snare, snare_soft, hihat, low_tom, open_hat,
  crash, tambourine, cabasa, guiro, guiro_2, shaker
)