// The Unforgiven — Metallica
// 69 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 22, 4/4 at bar 23, 2/4 at bar 27, ...) are rendered on a constant 4/4 grid of one bar per cycle
// note: pitch bends are ignored
// note: Full arrangement: all 106 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(69/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 steel · "Guitar 1"
const acoustic_guitar_steel = note(`<
  ~ A@4 B C B C D E F G H I ~@12 D E F G D E F G H I ~@12 D E F G D E F G H A@7 ~@13 D E F G D E F G J K J L J M J M J M
  ~@2 J M J M J M ~@2
>`.pickRestart({
  A: "b3@2 a3 e3 b3 a3 e3 b3 a3 e3 b3 a3 e3 c4 a3 e3, a2", B: "b3@2 a3 e3 b3 a3 e3 b3 a3 e3 c4 a3 e3 c4 a3 e3, a2",
  C: "b3@2 a3 e3 b3 a3 e3 c4 a3 e3 c4 a3 e3 c4 a3 e3, a2", D: "a2@2 e3@2 a3@2 b3@2 c4@2 c3 e3 c4@2 e3 c4",
  E: "g2 d3 g3@2 g2@2 g3@2 e3@2 e3!2 a3@2 [a3,b3]@2", F: "a3@2 a2 e3 a3@2 b3@2 c4@2 c3 e3 e4@2 c4 e4",
  G: "c4 d4 b3@2 g2@2 d4@2 g#3@2 g#3@2 b3 g#3 a3 b3", H: "~@2 a3 e3 b3 a3 e3 b3 a3 e3 b3 a3 e3 c4 a3 e3, a2",
  I: "b3@2 a3 e3 b3 a3 e3 b3 a3 e3 b3 a3 e3 c4@3, a2",
  J: "[a2,e3,a3,c4,e4]@3 [a2,e3,a3,c4,e4] [a2,e3,a3,c4,e4]@2 [a2,e3,a3,c4,e4]@2 [c3,e3,g3,c4,g4] [c3,e3,g3,c4,g4]@2 [c3,e3,g3,c4,g4] [c3,e3,g3,c4,g4]@2 [c3,e3,g3,c4,g4]!2", // Am C
  K: "[g2,b2,d3,g3,d4,g4]!4 [g2,b2,d3,g3,d4,g4]@2 [g2,b2,d3,g3,d4,g4]!2 [e2,b2,e3,g3,b3,e4]!4 [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]@2", // G Em
  L: "[g2,b2,d3,g3,d4,g4]@2 [g2,b2,d3,g3,d4,g4]!2 [g2,b2,d3,g3,d4,f4]@2 [g2,b2,d3,g3,d4,g4]!2 [e2,b2,e3,g3,b3,e4]!4 [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]!2", // G G7 G Em
  M: "[g2,b2,d3,g3,d4,g4]!4 [g2,b2,d3,g3,d4,g4]@2 [g2,b2,d3,g3,d4,g4]!2 [e2,b2,e3,g3,b3,e4]!4 [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]!2", // G Em
})).s("gm_acoustic_guitar_steel").gain(0.3)

// other · electric guitar clean · "Guitar 2"
const electric_guitar_clean = note(`<
  ~@5 A@5 B C D E ~@13 F B G D H B G D E ~@13 F B G D H B G D E ~ I J K L M@2 ~@13 F B G D H B G D ~@4 N O C P Q O C P Q
  O C P Q O C P
>`.pickRestart({
  A: "[~@4 a3@2 b3@2 c4@4 c4 b3 a3@6 a3@2 b3@2 c4@4 c4 a3@7 a3@2 b3@2 c4@4 c4 b3 a3@6 a3@2 b3@2 c4@4 c4 a3@7 a3@2 b3@2 c4@4 c4@3 c4, ~@8 b3 ~@15 b3 ~@15 b3 ~@15 b3 ~@15 b3 ~@3 b3 ~@3]/5",
  B: "c4 b3 g3@4 b3@2 e3@4 a3@2 [a3,b3]@2", C: "a3@4 a3@2 b3@2 c4@4 e4@3 e4, ~@8 b3 ~@3 d4 ~@3",
  D: "e4 d4 b3@4 b3@2 g#3@4 b3 g#3 a3 b3", E: "a3", F: "~@4 a3@2 b3@2 c4@4 c4@3 c4", G: "a3@4 a3@2 b3@2 c4@4 e4@3 e4",
  H: "a3@4 a3@2 b3@2 c4@4 c4@3 c4", I: "a3 b3 c4 d4@2 c4 [b3,c4] [a3,b3] b3 g3 a3@6, ~@10 g3 ~@5",
  J: "~ [c4,e4]@2 ~ e4@2 ~ [c4,e4] ~ d4@7, [b3,e4]@2 ~ [d4,e4]@2 ~ [d4,e4]@2 ~ c4 ~@6", // C E5 Dsus2
  K: "~@2 [d4,g4] [e4,a4] [d4,g4]@2 [d4,f#4] ~ [d4,e4] d4 c4 b3 d4 b3 g3@2", // G5 A5 G5 D Dsus2
  L: "~ g2 a2 c3 d3 d#3 e3 g3 c4 g3 a3@6, ~@10 g3 ~@5",
  M: "[~ g4 [f#4,g4] [e4,f#4] f#4 g4 a4 b4 g4@2 b4 g4@2 g4 d5 g4@2 [g4,a4] e5 a4@2 [a4,b4] f#5 b4@2 [b4,c#5] g5 c5 a5@4]/2", // Gmaj7 Esus2 Gsus2 Asus2 Bsus2
  N: "~@4 a3@2 b3@2 c4@4 c4@3 c4, ~@8 b3 ~@7", O: "c4 b3 g3@4 b3@2 g#3@2 g#3@2 a3@2 [a3,b3]@2",
  P: "e4 d4 b3@4 b3@2 g#3@2 g#3@2 a3@2 [a3,b3]@2", Q: "a3@4 a3@2 b3@2 c4@4 c4@3 c4, ~@8 b3 ~@7",
})).s("gm_electric_guitar_clean").gain(0.4)

// chords · distortion guitar · "Guitar 3"
const distortion_guitar = note(`<
  ~@15 A B A B A B A C D E D F G ~@9 A B A B A B A C D E D F G ~@14 H A B A I A B A C D E D F J G ~@8 K L M N ~ O P Q ~
  O P Q ~ O P Q ~@3
>`.pickRestart({
  A: "[a2,e3]@2 [a2,e3]@2 [c3,g3]@2 [e2,b2]@2 [e2,b2]@4 e2!2 [d3,a3]@2", // A5 C5 E5 D5
  B: "[d3,a3]@2 [d3,a3]@2 [d3,a3]@2 [a2,e3]@2 [a2,e3]@4 a2!2 [a2,e3]@2", // D5 A5
  C: "[d3,a3]@2 [d3,a3]@2 [d3,a3]@2 [a2,e3]@2 c4 d3 a2!2 b3 d3 a2!2", D: "a3 d3 a2!2 g3 d3 a2!2 [c3,g3]@5 d3 c3 a2",
  E: "[g2,d3]@8 c4 d3 a2!2 b3 d3 a2!2", F: "[g2,d3] [e2,b2]", G: "[a2,e3]", H: "~@7 c3",
  I: "[d3,a3]@2 [d3,a3]@2 [d3,a3]@2 [a2,e3]@2 a2 b3@5 [a2,e3]@2", J: "[e2,b2]", K: "~@6 a3 [a3,b3]",
  L: "a3@2 a3 b3 c4@2 c4 d4, ~@8 b3 ~@7", M: "e4 d4, d4 ~@15", N: "c4", O: "~@6 a3 b3", P: "g3 e3", Q: "a3",
})).s("gm_distortion_guitar").gain(0.4)

// other · overdriven guitar
const overdriven_guitar = note(`<
  ~@15 A B A B A B A C ~@14 A B A B A B A C ~@20 D E F@3 G H I J@2 K@2 L ~@10 M N O ~ P Q R ~ P Q R ~ P Q R ~@3
>`.pickRestart({
  A: "d4 c4 b3 [b3,c4] g3@2 ~ g4", B: "g4 f#4!2 c4 c4@2 ~ d4", C: "g4 f#4!2 c4 ~@4",
  D: "[d4,f#4]@2 [d4,f#4]@2 a3@3 a3, ~@8 c4 ~@7", E: "g3 e3 d3 c3 d3 c3 a2 g2 a2@2 c3@3 ~ a3 c4",
  F: "[d4 [c4,d4] [d4,e4]!2 f#4 [e4,f#4] g4 [f#4,g4] e5@2 d5 e5@2 a4 c5 a4@2 a4 d5 a4@2 c5 g5@14 g5@2 e5 d6@5 d6@4]/3", // Csus2 Dsus2 Esus2 Gmaj7
  G: "d6@2 a5!2 [a5,c6] g5 a5 g5@5 g4@2 e4@2", // Am
  H: "d5 [b4,c#5] c5 [a4,b4] g4 [e4,f#4] f#4 [d4,e4] c4 [c4,d4] b3 [b3,c4] a3@3 a4", // Bsus2 Asus2 Esus2 Dsus2 Csus2 Cmaj7
  I: "c5 e5 c5 a4 e5 c5 a4 e5 c5 a4 e5 c5 a4 e5 c5 a4",
  J: "[e5 c5 a4 e5 c5 a4@3 d5@4 d5@2 c5 g5@3 g5@4 a5 b5 c6 b5 a5 b5 [a5,b5] ~ a5 [e5,g5], ~@29 [g5,a5]@2 ~]/2", // Asus2 Em Gsus2
  K: "[~ g5 e5 d5 ~ c5 ~ c5 d5@4 d5@2 c5 g5@7 [f5,g5] f5 e5@8, d5 ~ d5!2 ~@12]/2", L: "f5 e5@15",
  M: "~@2 c4 d4 e4@2 e4 g4, ~@8 d4 ~@7", N: "a4 b4, g4 ~@15", O: "c5", P: "~@3 e4", Q: "d4 b3", R: "a3",
})).s("gm_overdriven_guitar").gain(0.4)

// bass · electric bass pick · "Bass"
const bass = note(`<
  ~@9 A B C D E@2 F G F H F G F I J K J L A M N O A M N M E@2 F G F H F G F I J K J L A M N O A M N M E@7 P F G F H F Q
  F I J R S T U A M N O A M N M C V W X Y Z AA AB AC AD AE AF AG AH AI AJ Y AK AL AM
>`.pickRestart({
  A: "a1@3 b1 c2@4", B: "g1@3 g1 e1@3 b1, ~@14 a1 ~", C: "a1@2 a1 b1 c2@4",
  D: "g1@6 g1@2 e1@2 e1@2 b1@2 a1 b1, ~@12 a1 ~@3", E: "a1", F: "a1!2 c2 e2 [e1,e2]!3 d2", G: "d2!3 [a1,a2]!5",
  H: "d2@2 d2!2 d2@2 a1@2 a1@2 [a1,a2]@2 [a1,a2]@2 a1 g1", I: "d2@2 d2@2 d2@2 a1@2 a1@2 a1!2 b2 d2 a1!2",
  J: "a2 d2 a1!2 g2 d2 a1!2 c2@5 [c2,d2] c2 a1", K: "g1@4 g1 g1@3 a1@2 a1!2 b2 d2 a1!2", L: "g1@4 g1 g1@3 e1@4 e2@4",
  M: "g1@2 g2 g1 e1@3 b1, ~@14 a1 ~", N: "a1@2 a1 b1 c2@2 c2@2", O: "g1@4 g2@2 g1@2 e1@4 b1@2 a1 b1, ~@12 a1 ~@3",
  P: "a1@7 a2@2 a2!5 a2@2", Q: "d2@2 d2!2 d2@2 a1@2 a1@2 g1@2 a1 ~ a1 g1", R: "g1@8 a1@2 a1!3 c2 e2 g2",
  S: "a2 c3 a2 g2 e2 d2 a1 b1 c2@5 [c2,d2] c2 a1", T: "g1@4 g1 g1@3 e1@8", U: "e1",
  V: "g1@4 g2@2 g1@2 e1@4 ~ g1 a1 b1, ~@6 b1 ~", W: "a1@4 a1@2 b1@2 c2@4 c3@2 c2 d2",
  X: "g1@3 g1 e1@2 b1!2, ~@12 a1 ~ a1 ~", Y: "a1@3 a1 a1@2 b1@2 c2@4 c2@2 c2 d2",
  Z: "g1@4 g2@2 g1!2 e1@4 b1@2 a1 b1, ~@12 a1 ~@3", AA: "a1@4 a1@2 b1@2 c2@6 c2 d2",
  AB: "g1@3 g1 g2@2 g1@2 e1@2 e1@2 a1@2 b1@2, ~@14 a1 ~", AC: "a1@4 a1@2 b1@2 c2@6 d2 e2",
  AD: "g2@2 g2!4 g1 f#1 e1!4 b1@2 b1@2, ~@12 a1 ~ a1 ~", AE: "a1 a1@2 a1 a1@2 b1@2 c2@4 c2@2 d2 e2",
  AF: "g2@2 g2@2 g2!2 a2 g2 e2@4 e2 b2!3", AG: "a2@3 a2!2 g2 e2 d2 c2@2 c2!2 c2@3 c2",
  AH: "g1@2 g1!2 g2@2 g1 f#1 e1@2 e1!2 b1@2 b1@2, ~@12 a1 ~ a1 ~", AI: "a1@3 a2 a2@2 b1@2 c2@4 c2@3 d2",
  AJ: "g1@3 g2 g2@2 g2@2 e2@2 e1!2 e2 b1 a1 b1", AK: "g2@2 g1!2 g2@2 g2 f#2 e2@4 b1@2 b1@2, ~@12 a1 ~ a1 ~",
  AL: "a1@3 a2!2 g2 e2 d2 c2@4 c2@2 d2 e2", AM: "g2@4 g2@2 a2 g2 e2@4 e2 d2 a1 b1",
})).s("gm_electric_bass_pick").gain(0.4)

// other · tremolo strings · "Strings"
const tremolo_strings = note("<a4 ~@105>").s("gm_tremolo_strings").gain(0.02)

// drums · kick
const kick = s("bd").struct(`<
  ~@9 A B C D E@2 B@7 F G F G H I B C B C B C J E@2 B@7 F G F G H I B C B C B C J E@8 B@3 K L M B N B F O B P I B C B C
  B C J A B C E O Q R S T U V W X Y Z AA W AB AC AD
>`.pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x!2", C: "x ~@2 x ~@2 x ~ x ~@7", D: "x ~@2 x!2 ~@2 x", E: "x", F: "x ~ x!2", G: "x!3 ~",
  H: "x ~@3 x!2 ~ x", I: "x ~@2 x!3 ~@2", J: "x ~@3 x ~@2 x", K: "x ~@7 x ~ x!2 ~ x ~@2", L: "x ~ x!2 ~@4 x ~@7",
  M: "x ~@7 x ~@3 x!2 ~@2", N: "~@2 x!2", O: "~ x", P: "x ~@4 x ~ x", Q: "x ~@7 x ~@2 x ~@4",
  R: "~ x ~ x ~@2 x ~ x ~@7", S: "x ~@8 x ~ x ~@4", T: "~ x ~ x ~ x ~@2 x ~@7", U: "x ~ x!2 ~ x ~@2 x ~ x!2 ~@4",
  V: "~ x ~ x ~ x ~ x ~@8", W: "~@13 x ~ x", X: "~@8 x ~ x!2 ~@4", Y: "x ~ x!2 ~@4 x ~ x!2 ~@4",
  Z: "~ x ~ x ~ x ~ x ~@5 x ~ x", AA: "~@5 x ~@10", AB: "~ x ~@3 x ~ x ~@5 x ~ x", AC: "~@11 x ~ x ~ x",
  AD: "~@5 x ~ x ~@5 x ~ x",
})).gain(0.4)

// drums · snare
const snare = s("sd").struct(`<
  ~@9 A@4 ~@2 A@3 B A@3 C D E D F A@8 ~ G A@3 B A@3 C D E D F A@8 ~@7 H A@5 I J K D E D E G A@11 L M A N O N A P Q R A S
  T U S V S
>`.pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@5 x ~ x ~ x!2", C: "~ x ~@2", D: "~@12 x!2 ~@2", E: "~@4 x!2 ~@10", F: "~@4 x!2 ~@6 x ~@3",
  G: "~@3 x", H: "~@2 x ~ x ~ x!2 ~ x!2 ~ x!3 ~", I: "~@2 x ~@2 x ~ x", J: "~@4 x ~@7 x ~@2 x", K: "x!4 ~@4",
  L: "~@4 x ~@2 x!2 ~@4 x!2 ~", M: "~ x!2 ~ x!3 ~@5 x ~@3", N: "x!2 ~ x", O: "~ x!3", P: "x ~@3 x ~@3 x ~@3 x ~@2 x",
  Q: "x ~ x ~@2 x!2 ~ x ~@3 x ~@3", R: "x ~@2 x!3 ~@6 x ~@3", S: "x!4", T: "x ~@3 x ~@2 x!2 ~@3 x!2 ~@2",
  U: "x ~@2 x!2 ~@3 x ~@3 x ~@3", V: "x ~@2 x ~ x ~@2 x ~@3 x ~@3",
})).gain(0.4)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<A B C D C D C D ~@98>".pickRestart({
  A: "x!16", B: "x!5 ~@11", C: "~@13 x!3", D: "x",
})).gain(0.25)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@9 A B@2 C ~@2 D E B F G E B H I J I K A L B L M L B C ~@2 D E B F G E B H I J I K A L B L M L B C ~@8 G N O B P Q P
  R S T R K ~ A L B L M L B C A L N U V P W H X B Y Z AA P H F R H AB J
>`.pickRestart({
  A: "~@2 x!6", B: "x!8", C: "x!7 ~", D: "~ x ~ x!5", E: "x!6 ~ x", F: "x!4 ~@4", G: "~ x!7", H: "x!4 ~ x!3",
  I: "x!3 ~@2 x!3", J: "~ x!3 ~ x!3", K: "~ x!3 ~@4", L: "x ~ x ~ x ~ x ~ x ~ x ~ x ~ x!2", M: "x!2 ~ x!5",
  N: "x!6 ~@2", O: "x!5 ~ x!2", P: "x!2 ~ x!3 ~ x", Q: "x!2 ~ x!2 ~ x ~", R: "~@5 x!3", S: "x ~@4 x!3",
  T: "~ x!3 ~ x!2 ~", U: "x!2 ~ x ~@4", V: "~@6 x!2", W: "~ x ~@4 x!2", X: "x!4 ~@2 x!2", Y: "~ x!3 ~@2 x!2",
  Z: "~@2 x ~@2 x ~ x", AA: "~ x ~@6", AB: "x!2 ~@3 x!3",
})).gain(0.4)

// drums · low tom
const low_tom = s("lt").struct("<~@73 [~@6 x!2 ~@8] ~ [~@4 x!4 ~@8] ~@30>").gain(0.4)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@22 A B A B ~@10 C ~@7 A B A B ~@16 D ~@7 A E A ~@14 F G ~@7 H ~@2 I B ~ J ~
>`.pickRestart({
  A: "~@9 x ~@3 x ~@2", B: "~ x ~@3 x ~@10", C: "~@7 x", D: "~@11 x ~@3 x", E: "~ x ~@14", F: "~@5 x ~@2",
  G: "~@3 x ~@3 x ~@8", H: "~@6 x!2 ~@8", I: "~@5 x ~ x", J: "~@2 x!2 ~@4",
})).gain(0.4)

// drums · high tom
const high_tom = s("ht").struct("<~@23 A ~ A ~@19 A ~ A ~@25 B C D ~@26 E ~@3>".pickRestart({
  A: "~@6 x!2 ~@8", B: "~@2 x!4 ~@10", C: "~@14 x!2", D: "x!4 ~@12", E: "~@3 x ~@4",
})).gain(0.4)

// drums · crash
const crash = s("cr").struct(`<
  ~@9 A ~@2 B A@2 C D ~ E A D ~ E@2 F E F A ~@3 G ~@2 B A@2 C D ~ E A D ~ E@2 F E F A ~@3 G ~@2 B A@9 D ~@2 H I H E@2 F
  E F A@2 ~@3 G ~@2 B A ~ D G E H J E@2 ~ F K L H E ~ E@3 F
>`.pickRestart({
  A: "x", B: "~@7 x", C: "x!2 ~@2", D: "~@3 x", E: "~ x", F: "x!2", G: "~ x ~@2", H: "~ x ~ x", I: "~@2 x ~@2 x ~ x",
  J: "x ~ x!3 ~@3", K: "~ x ~@2 x ~ x ~", L: "x ~@3 x!3 ~",
})).gain(0.4)

stack(
  acoustic_guitar_steel, electric_guitar_clean, distortion_guitar, overdriven_guitar, bass, tremolo_strings, kick,
  snare, snare_soft, hihat, low_tom, mid_tom, high_tom, crash
)