// White Wedding — Billy Idol
// 150 bpm, 4/4, key B minor. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 9 "DISTORTION" distortion guitar (copy of ch 3 "OVERDRIVE" overdriven guitar)
// note: Full arrangement: all 126 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(150/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, A@4 for four bars: edit a riff to change every repeat.

// bass · fretless bass · "FRETLESS"
const bass = note(`<
  ~ A@6 B C A@2 C B D@6 E F D@2 E F D@2 E@2 D G E F D G B C D G B H D@4 E F D@2 E F D@2 E@2 D@2 E F D G B C D@2 B H D@4
  I@2 B C I@2 C B D@2 F J D G K B D@2 E F D@15 G B C D G C B D@2 B C D@2 B C D@2 B L M
>`.pickRestart({
  A: "b1!2 d2 e2 f#2!2 e2 d2", B: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2@2",
  C: "d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2@2", D: "b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~",
  E: "a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~", F: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~",
  G: "b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1@2", H: "d2@7 ~", I: "b1 ~ b1@2 d2@2 e2@2 f#2 ~ f#2@2 e2@2 d2@2",
  J: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1@2", K: "d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~ d2 ~",
  L: "d2@4 ~@2 a1 ~ a1 ~ a1 ~ a1 ~ a1@2", M: "b1@3 ~@13",
})).s("gm_fretless_bass").gain(0.4)

// chords · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note(`<
  ~@5 A@2 B C A@2 D E A@2 ~@16 F B A@2 B D A@2 B D ~@2 G H G H G H G H G H G H G I J K L@2 M N O@2 M D G H G H A@2 B C
  A@2 D E P@2 Q@2 R@2 S T U@2 V T W@2 ~@14 B D O@2 D B O@2 B D O@2 B D O@2 B D X
>`.pickRestart({
  A: "[[b2,f#3]@31 ~]/2", B: "[e3,b3]", C: "~@3 [d4,f#4] ~ [d4,f#4] ~ [d4,f#4], [d3,a3]", D: "[d3,a3]",
  E: "~@3 d4 ~ d4 ~ d4, [e3,b3]", F: "[a2,e3]", G: "~@2 [a3,d4] ~@2 [a3,d4] ~@2",
  H: "[a3,d4] ~ [a3,d4] ~ [a3,c#4] d4 c#4 d4, ~@3 a3", I: "[a3,d4] ~ [a3,d4] ~ [a3,c#4] d4 [a3,c#4] d4",
  J: "~@2 [a3,d4] ~@2 [a3,d4] ~@2, [a2,e3]", K: "d4 ~ [a3,d4] ~ [a3,c#4] d4 c#4 d4, [e3,b3]@15 ~, ~@3 a3",
  L: "[~@2 [a3,d4] ~@2 [a3,d4] ~@2 [a3,d4] ~ [a3,d4] ~ [a3,c#4] d4 [a3,c#4] d4, [b2,f#3]@31 ~]/2", // D5 A B5
  M: "~@2 [a3,d4] ~@2 [a3,d4] ~@2, [e3,b3]@15 ~", N: "[a3,d4] ~ [a3,d4] ~ [a3,c#4] d4 c#4 d4, d3@15 ~, ~@3 a3",
  O: "[~@2 [a3,d4] ~@2 [a3,d4] ~@2 [a3,d4] ~ [a3,d4] ~ [a3,c#4] d4 c#4 d4, [b2,f#3]@31 ~, ~@7 a3]/2", // D5 A B5
  P: "[~@9 c#4 d4 ~ [a3,d4] ~ d4 c#4, [b2,f#3]@31 ~, ~@9 a3@2 ~@3 a3@2]/2", // D5 B5
  Q: "[d4@7 ~@2 c#4 d4 ~ [a3,d4] ~ d4 c#4, [e3,b3]@15 ~, ~@9 a3@2 ~@3 a3@2]/2", // D5 E5
  R: "[d4@17 ~ c#4@2 d4@2 ~@2 [a3,d4]@2 ~@2 d4@2 c#4@2, [b2,f#3]@15 ~, ~@9 a3@2 ~@3 a3@2]/2", S: "[d3,a3,d4]",
  T: "[e3,b3,e4]@15 ~", U: "[[b2,f#3,b3]@15 ~]/2", V: "[a2,e3,a3]", W: "[b2,f#3,b3]/2", X: "[b2,f#3] ~@7",
})).s("gm_overdriven_guitar").gain(0.29).pan(0.1)

// other · electric guitar clean · "CLEAN GTR"
const electric_guitar_clean = note(`<
  A@4 ~ B C D ~ E@2 F@2 ~@26 G@2 ~@24 G@2 ~@4 H I J@2 H K L M H I H I H I N O P@2 ~@5 Q@3 ~ R@3 ~ S@5 ~@19
>`.pickRestart({
  A: "[~@2 f#4@5 ~, ~@15 [b3,d4]@41 ~@8]/4", B: "~@2 b3 f#3, f#4@3 ~, ~ d4@2 ~", C: "~@2 f#4 d4, b3, ~@4 d4@7 ~@5",
  D: "e4", E: "[~@2 b3 f#3 ~ d4 f#4 d4, f#4@5 ~@3, ~ d4@3 b3@4]/2", F: "[a4@7 ~ [g#4,b4]@8, ~@15 e4@17]/2",
  G: "[~@16 f#4@15 ~, ~@15 [a3,d4]@17]/2", H: "f#4 d4 b3 f#3", I: "b3 d4 f#4 d4", J: "[e4@21 ~@11]/2",
  K: "~ d4 f#4 d4, b3 ~", L: "a4", M: "b4@7 ~", N: "f#4 d4 b3 a3", O: "g#3 b3 e4 d4", P: "[c#4@4 a3@4 f#3@4 b3@19 ~]/2",
  Q: "[~@8 f#4@15 ~, ~@15 [b3,d4]@32 ~]/3", R: "[~@8 [d4,f#4]@15 ~, ~@5 b3@10 ~]/3",
  S: "[~@4 f#4@7 ~ f#4@7 ~, ~@15 [b3,d4]@30 ~@2 [b3,d4]@29 ~@4]/5", // Bm
})).s("gm_electric_guitar_clean").gain(0.4).pan(0.9)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  ~@5 A@3 B C@2 B D@7 E@8 F@2 G@2 H I C@2 I B C@2 I B C@2 J@2 K@2 J@2 L@4 M@2 J@2 N O P@2 O Q P@2 O Q R@6 O S@3 Q O T@7
  U@3 V W@8 ~@9 O S@3 Q U@3 O Q X@3 Q X@3 Y Z
>`.pickRestart({
  A: "[[d4,f#4]@2 [e4,g#4], b3]/3", B: "[a3,d4,f#4]", C: "[b3,d4,f#4]/2", D: "[[e4,g#4] f#4@6, b3, ~ d4@4 ~@2]/7",
  E: "[a3 ~ f#4@2, e4 ~, ~ b3@3]/4", F: "[a3,e4]/2", G: "[b3,f#4]/2", H: "[a3,c#4,e4]", I: "[b3,e4,g#4]",
  J: "[b4,d5,f#5]/2", K: "[[a4,c#5] [g#4,b4], e5]/2", L: "[[a4,c#5] g#4 [d5,f#5]@2, e5 ~, ~ b4@3]/4",
  M: "[a4,c#5,e5]/2", N: "[a4,c#5,e5]", O: "[e4,g#4,b4]", P: "[d4,f#4,b4]/2", Q: "[d4,f#4,a4]", R: "[d4,f#4,b4]/6",
  S: "[[d4,a4] [d4,b4]@2, f#4]/3", T: "[[d4,f#4]@2 [e4,g#4]@2 ~@2 a4, b4@6 ~, ~@4 [d4,f#4]@3]/7",
  U: "[[e4,g#4]@16 [d4,f#4]@31 ~, b4@47 ~]/3", V: "[c#4,e4,a4]", W: "[[e4,g#4] [d4,f#4]@7, b4]/8",
  X: "[[d4,f#4]@2 [e4,g#4], b4]/3", Y: "[d4,f#4,a4]@3 ~@13", Z: "b2 ~@7",
})).s("gm_string_ensemble_1").gain(0.29).pan(0.3)

// other · electric guitar muted · "MUTED GTR"
const electric_guitar_muted = note(`<
  ~ A@6 B C A@2 C B D@6 E F D@2 E F D@2 E@2 D G E F D G B C D G B H D@4 E F D@2 E F D@2 E@2 D@2 E F D G B C D@2 B H D@4
  I@2 B C I@2 C B D@2 F J D G K B D@2 E F D@15 G B C D G C B D@2 B C D@2 B C D@2 B L M
>`.pickRestart({
  A: "b2!2 d3 e3 f#3!2 e3 d3", B: "e3 ~ e3 ~ e3 ~ e3 ~ e3 ~ e3 ~ e3 ~ e3@2",
  C: "d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3@2", D: "b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~",
  E: "a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~", F: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~",
  G: "b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2 ~ b2@2", H: "d3@7 ~", I: "b2 ~ b2@2 d3@2 e3@2 f#3 ~ f#3@2 e3@2 d3@2",
  J: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2@2", K: "d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~ d3 ~",
  L: "d3@4 ~@2 a2 ~ a2 ~ a2 ~ a2 ~ a2@2", M: "b2@3 ~@13",
})).s("gm_electric_guitar_muted").gain(0.27).pan(0.8)

// drums · kick
const kick = s("bd").struct("<~ [x!2]!39 x [x!2]!25 x [x!2]!57 x ~>").gain(0.45)

// drums · snare
const snare = s("sd").struct("<~ A@7 B A@31 C A D A@3 D A@3 D A@5 E A@9 C A@2 B F A@7 B A@45 G H>".pickRestart({
  A: "~ x ~ x", B: "~@2 x ~@3 x!2", C: "~@5 x!3", D: "~@2 x ~@2 x!2 ~", E: "~@2 x ~@2 x!3",
  F: "~@4 x ~ x ~ x ~ x!3 ~ x ~", G: "~ x!7", H: "x",
})).gain(0.45)

// drums · hihat
const hihat = s("hh").struct(`<
  ~ A B A B A B A@3 B A B A B A B A@3 B A@3 B A@6 B A@2 B A B A B A ~ A B A B A B A B A B A B A B A@2 B A@2 B A B A B A
  ~ A B A@3 B A B A B A@3 B A B A@3 B A B A B A B A@3 B A@3 B A@3 B A@2 B@2 A B A@3 B A@3 B A@3 B A ~ C
>`.pickRestart({
  A: "x!8", B: "x!7 ~", C: "~ x ~@6",
})).gain(0.35)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@14 A ~ A ~@13 B ~@7 A ~@17 C ~@7 A ~@23 A ~@3 A ~@17 A ~@3 A ~@3 A ~@3 A ~@3
>`.pickRestart({
  A: "~ x ~@2 x ~ x!2", B: "~@7 x", C: "~@5 x!3",
})).gain(0.4)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@2 A ~ A ~ A ~@3 A ~ A ~ A ~ A ~@3 A ~@3 A ~@6 A ~@2 A ~ A ~ A ~@3 A ~ A ~ A ~ A ~ A ~ A ~ A ~@2 A ~@2 A ~ A ~ A ~@3
  A ~@3 A ~ A ~ A ~@3 A ~ A ~@3 A ~ A ~ A ~ A ~@3 A ~@3 A ~@3 A ~@2 A@2 ~ A ~@3 A ~@3 A ~@3 A ~@2 B
>`.pickRestart({
  A: "~@7 x", B: "x",
})).gain(0.35)

// drums · mid tom
const mid_tom = s("mt").struct("<~@30 [~@5 x!2 ~] ~@25 [~@3 x!2 ~@3] ~@69>").gain(0.4)

// drums · crash
const crash = s("cr").struct(`<
  ~ A ~@6 B ~@22 A ~@8 A@2 ~@15 A ~@8 A@2 ~ B ~ A ~@6 B ~@6 A@2 ~@2 A ~@16 A@2 ~@11 A ~@3 A@2 ~
>`.pickRestart({
  A: "x", B: "~@7 x",
})).gain(0.4)

// drums · high tom
const high_tom = s("ht").struct("<~@30 [~ x!4 ~@3] ~@25 [x!3 ~@5] ~@69>").gain(0.35)

stack(
  bass, overdriven_guitar, electric_guitar_clean, string_ensemble_1, electric_guitar_muted, kick, snare, hihat, low_tom,
  open_hat, mid_tom, crash, high_tom
)