// Gallows Pole — Led Zeppelin
// 84 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 9, 4/4 at bar 10, 2/4 at bar 15, ...) are rendered on a constant 4/4 grid of one bar per cycle
// note: duplicate parts dropped: ch 3 "voice" pad sweep (copy of ch 1 "voice" bagpipe)
// note: Full arrangement: all 94 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): mandolin.
setcpm(84/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 · fiddle · "backing"
const fiddle = note("<~@84 [~@2 f#4@2 a4!2 ~@2]!9 ~>").s("gm_fiddle").gain(0.32)

// other · acoustic guitar nylon · "mandolin"
const acoustic_guitar_nylon = note("<~@24 A B C D ~@15 E F G H ~ I ~@9 E F G J ~@32>".pickRestart({
  A: "~@6 a5 ~@3 e5 ~@5", B: "~@6 e5 ~@8 g5", C: "~@10 e5 ~@5", D: "~@2 f#5 e5 ~@2 c5 b4 ~@8", E: "~@6 a4 ~@3 e4 ~@5",
  F: "~@6 e4 ~@5 g4 ~@2 g4", G: "~@10 e4 ~@5", H: "~@2 f#4 a4 ~@2 c4 b3 ~@8", I: "~@12 g3 ~@3",
  J: "~@2 f#4 e4 ~@2 c4 b3 ~@8",
})).s("gm_acoustic_guitar_nylon").gain(0.32).pan(1)

// other · banjo
const banjo = note(`<
  ~@48 A B C D E F G H I J K L M N O P Q C D E F R@2 S T U V W X Y Z AA AB AC@4 AD@8 ~
>`.pickRestart({
  A: "~@8 c#4 e4 a3 c#4!2 e4 a3 c#4", B: "c#4 e4 a3 c#4!2 e4 a3 c#4 f#4 a4 e4 f#4@2 e4 a3!2",
  C: "d4 f#4 d4 f#4 e4 c#4 a3!2 a4!2 e4 f#4@2 e4 a3!2", D: "d4 f#4 a3 f#4 e4 c#4 a3!2 a4!2 e4 f#4@2 e4 a3!2",
  E: "d4 f#4 a3 f#4 e4 d4!2 e4 d4 b3 g3 d4!2 a3 f#3 d4", F: "d4 c#4 a3 e4 a3 c#4 a4 e4!2 c#4 a3 f#4 e4 c#4 d4 e4",
  G: "d4 c#4 a3 e4@2 c#4 a3 e4@2 e4 c#4!2 e4 c#4 c#4@2", H: "e4 c#4 a3 f#4 a3 e4 a3 c#4 d4 b3 d4!3 a3!2 b3",
  I: "c#4 ~ a3 ~ e4 a3 e4 f#4 e4 c#4!2 e4 c#4 a3!2 e4", J: "f#4 e4!2 c#4 d4 e4 a4 f#4 a4!3 f#4@2 e4@2 c#4",
  K: "[a3,c#4,e4,a4]@4 [g3,b3,d4,g4]@4 [a3,d4,f#4,a4]@4 [g3,b3,d4,g4]@2 [g3,b3,d4,g4]!2", // A G D G
  L: "[a3,c#4,e4,a4]@4 [a3,d4,f#4,a4]@4 [g3,b3,d4,g4]@2 [g3,b3,d4,g4]@3 [g3,b3,d4,g4]!3", // A D G
  M: "[a3,c#4,e4,a4]@3 ~ [b3,d4,g4]@4 [a3,d4,f#4,a4]@4 [g3,b3,d4,g4]@4, ~@3 g3@4 ~@9", // A G D G
  N: "~ e4 d4 e4 a4 a3 g3 e4 g4 a3 e4 a3 g4 a3 e4 a3", O: "g4 e4 a3 e4 a4 e4 a3 c#4 d4 e4 a3 e4 g4 a3 e4 a3",
  P: "b4 a4!2 b4@2 c#5@2 b4 a4@2 e4!2 a4 e4!3", Q: "c4 c#4!2 e4@2 e4@2 e4 a4@2 e4@2 a4 e4!3",
  R: "[e4 c#4 a3 e4 e4@2 a3@2 b4 a4!2 b4@2 c4@2 e4@2 c#4 a3 f#4 a3 e4 a3 c#4 d4 b3 d4!3 b3!2 d4]/2",
  S: "a4@2 e4 f#4@2 e4 a3!2 d4 f#4 d4 f#4 e4 c#4 a3!2", T: "a4@2 e4 f#4@2 e4 a3!2 d4 f#4 a3 d4 e4 a3 e4!2",
  U: "d4 b3 g3 d4 f#4 d4 a3 c#4@3 e4!2 c#4 e4 a3!2", V: "c#4 e4 a3 e4 f#4 a3 e4 c#4!2 e4 a3 e4 c#4 e4 a3 e4",
  W: "a4!3 f#4@2 e4@2 e4 c#4 e4 a3 e4 c#4 e4 a3 e4", X: "c#4 e4 a3 b3 c#4 e4 c#4 e4 a4 e4 a4 e4 a4 e4 a4 e4",
  Y: "c#4 e4 a3 e4 c#4 e4 a3 e4 c#4 e4 a3 b3 c#4 e4 c#4 e4", Z: "e4 f#4 e4 b4 a4@3 b4 a4 e4 b4 c#5@2 c#4 e4!2",
  AA: "c#4 a3 e4 a3 a4 e4 a4 e4 g3 c#4 e4 a3 g3 e4 a3 e4", AB: "c#4 e4 a3 e4 f#4 e4 a4 e4 g3 c#4 e4 a3 g3 e4 a3 e4",
  AC: "a4 e4 a4 e4 a4 e4 a4 e4 g3 e4 c#4 e4 f#3 e4 a3 e4", AD: "a4 e4!2 a4!2 e4!2 a4 a4@2 e4!2 a4 e4!2 a4",
})).s("gm_banjo").gain(0.32)

// chords · acoustic guitar steel · "12 string"
const acoustic_guitar_steel = note(`<
  A B C D@4 E F@3 G@2 H I J H I K D@2 E F G L M L N O P@3 Q R@5 S P T R@2 L M L N O U@4 V W@2 X W@2 L M L N O P Y@3 V
  Z@5 AA Y@2 V Z AB@15 ~
>`.pickRestart({
  A: "~@10 [e3,g3,c#4] [e3,g3,b3] [e3,g3,c#4]@2 [e3,g3,c#4]!2, ~ a2", // C#dim Em C#dim
  B: "[e3,g3,c4,e4]@3 [g3,c4,e4]@2 [g3,c4,e4] [e3,g3,c#4] [f#3,d4] ~ e3 [e3,g3,c#4,e4] [g3,c#4,e4] [g3,c#4,e4]@2 [g3,c#4,e4]!2, ~@4 [f#3,g3,d4] ~@3", // C C#dim D C#dim Gmaj7
  C: "[g3,c4,e4]@3 [g3,c4,e4]@2 [e3,g3,c4] ~ a4 ~@2 [e3,g3,c#4,e4] [g3,c#4,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4] [g3,c#4,e4], e3@5 ~ [f#3,d4]@2 a2@8", // C C#dim D
  D: "[g3,c4,e4]@3 [g3,c4,e4]@2 [e3,c#4] ~ a4 ~@2 [e3,g3,c#4,e4] [g3,c#4,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4] [g3,c#4,e4], e3@5 ~ [f#3,g3,d4]@2 a2@8", // C C#m C#dim Gmaj7
  E: "[g3,c4,e4]@3 [g3,c4,e4]@2 [e3,c#4] [f#3,g3,d4]!2 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]!2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2, e3@5 ~@11", // C C#m Gmaj7 G D
  F: "~@2 [e3,g3,c#4,e4] [g3,c#4,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4] [g3,c#4,e4] [g3,c4,e4]@3 [g3,c4,e4]@2 [e3,c#4] ~ a4, a2@8 e3@5 ~ [f#3,g3,d4]@2", // C#dim C C#m Gmaj7
  G: "~@2 [e3,g3,c#4,e4] [g3,c#4,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4] [g3,c#4,e4] [g3,c4,e4]@3 [g3,c4,e4]@2 [e3,c#4] [f#3,g3,d4]!2, a2@8 e3@5 ~@3", // C#dim C C#m Gmaj7
  H: "[g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]!2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2 e3@2 [e3,g3,c#4,e4]@3 [g3,b3,e4] [e3,g3,c#4,e4]@2, ~ a2", // G D C#dim Em C#dim
  I: "[g3,c4,e4]@3 [g3,c4,e4]@2 e3 ~ a4 ~@2 [e3,g3,c#4,e4] [g3,c#4,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4] [g3,c#4,e4], e3@5 ~ [f#3,g3]@2 a2@8", // C C#dim Gmaj7
  J: "[g3,c4,e4]@3 [g3,c4,e4]@2 [e3,c#4] [f#3,g3,d4] [f#3,g3,a4] ~@2 [e3,g3,c#4,e4] [g3,b3,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4]!2, e3@5 ~@3 a2@8", // C C#m Gmaj7 F#m C#dim Em C#dim
  K: "[g3,c4,e4]@3 [g3,c4,e4]@2 [e3,c#4] [f#3,g3,d4] [f#3,g3,a4] ~@2 [e3,g3,c#4,e4] [g3,c#4,e4] [e3,g3,c#4,e4]@2 [e3,g3,c#4,e4] [g3,c#4,e4], e3@5 ~@3 a2@8", // C C#m Gmaj7 F#m C#dim
  L: "[a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]!2 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]!2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2 [g2,b2,d3,g3,b3,g4]@2 [g2,b2,d3,g3,b3,g4]!2", // A G D G
  M: "[a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]!2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2 [g2,b2]@2 [g2,b2,d3,g3,d4,g4]@3 [g2,b2,d3,g3,d4,g4] [g2,b2,d3,g3,d4,g4]@2", // A D G
  N: "[g2,b2,d3,g3,d4,g4]@2 [g2,b2,d3,g3,d4,g4]!2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2 g2 ~ [a2,e3]@2 g2@2 [a2,e3] ~", // G D A5
  O: "[a2,e3,a3]!8 g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3] ~", // A5
  P: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3] ~", // A5
  Q: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 [g2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4", // A5 G D
  R: "g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3] ~ [a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2", // A5
  S: "[g2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4 g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3] ~", // G D A5
  T: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 [c3,e3,g3,c4,e4]@4 [d3,a3,d4,f#4]@4", // A5 C D
  U: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 g2 ~ [a2,e3,a3] ~ [a2,e3,a3]!2 [a2,e3,a3]@2", // A5
  V: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 [g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4", // A5 G D
  W: "g2 ~ [a2,e3,a3] ~ [a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2", // A5
  X: "g2 ~ [a2,e3,a3] ~ [a2,e3,a3]!2 [a2,e3,a3]@2 [g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4", // A5 G D
  Y: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3]@2", // A5
  Z: "g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2", // A5
  AA: "[g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4 g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3]@2", // G D A5
  AB: "[g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4 g2 ~ [a2,e3,a3] ~ g2 ~ [a2,e3,a3] ~", // G D A5
})).s("gm_acoustic_guitar_steel").gain(0.36).pan(0)

// chords · acoustic guitar steel · "g2"
const acoustic_guitar_steel_2 = note(`<
  ~@24 A B A C D@4 E D@5 F D G D@2 A B A C D H I D@2 J D@2 K D@2 A B A C L@2 M@3 J N@5 O M@2 J N P@15 ~
>`.pickRestart({
  A: "[a2,e3,a3,c#4,e4]@2 [g2,b2,d3,g3,b3,d4,g4]@2 [d3,a3,d4,f#4]@2 [g2,b2,d3,g3,b3,d4,g4] ~", // A G D G
  B: "[a2,e3,a3,c#4,e4]@4 [d3,a3,d4,f#4]@4 [g2,d3]@2 [g2,b2,d3,g3,b3,d4,g4]@3 [b2,d3,b3,d4] [g2,b2,d3,g3,b3,d4,g4]@2", // A D G5 G Bm G
  C: "[g2,b2,d3,g3,b3,g4]@2 [d3,a3,d4,f#4]@2 [g2,d3,g3] [a2,e3,a3] [g2,d3,g3] [a2,e3,a3]", D: "[a2,e3,a3]!16",
  E: "[a2,e3,a3]!8 [g2,b2,d3,g3,b3,g4]@2 [g2,d3,g3] [d3,g3,b3,g4] [d3,a3,d4,f#4]@2 [d3,a3,d4] [a3,d4,f#4]", // A5 G G5 G D D5 D
  F: "[g2,b2,d3,g3,b3,g4]@2 [g2,d3,g3] [d3,g3,b3,g4] [d3,a3,d4,f#4]@2 [d3,a3,d4] [a3,d4,f#4] [a2,e3,a3]!8", // G G5 G D D5 D A5
  G: "[a2,e3,a3]!8 [c3,e3,g3,c4]@2 [c3,e3,g3,c4]!2 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2", // A5 C D
  H: "[a2,e3,a3]!8 g2 ~ [a2,e3,a3] ~ [a2,e3,a3]!2 [a2,e3,a3]@2", // A5
  I: "[a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!2 [a2,e3,a3]@2 [a2,e3,a3]!8", // A5
  J: "[a2,e3,a3]!8 [g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4", // A5 G D
  K: "g2 ~ [a2,e3,a3] ~ [a2,e3,a3]!2 [a2,e3,a3]@2 [g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4", // A5 G D
  L: "[a2,e3,a3]!8 [g2,d3,g3]@2 [a2,e3,a3]@2 [g2,d3,g3]@2 [a2,e3,a3]@2", // A5 G5 A5 G5 A5
  M: "[a2,e3,a3]!8 [g2,d3,g3] ~ [a2,e3,a3] ~ [g2,d3,g3] ~ [a2,e3,a3]@2", // A5 G5 A5 G5 A5
  N: "[g2,d3,g3] ~ [a2,e3,a3] ~ [g2,d3,g3] ~ [a2,e3,a3]@2 [a2,e3,a3]!8", // G5 A5 G5 A5
  O: "[g2,b2,d3,g3,b3,g4]@4 [d3,a3,d4,f#4]@4 [g2,d3,g3] ~ [a2,e3,a3] ~ [g2,d3,g3] ~ [a2,e3,a3]@2", // G D G5 A5 G5 A5
  P: "[g2,b2,d3,g3]@4 [d3,a3,d4]@4 [g2,d3,g3] ~ [a2,e3,a3] ~ [g2,d3,g3] ~ [a2,e3,a3] ~", // G D5 G5 A5 G5 A5
})).s("gm_acoustic_guitar_steel").gain(0.32).pan(1)

// bass · electric bass finger · "bass"
const bass = note(`<
  ~@29 A B@2 C D@5 E B F D@2 G H I J K B L@3 C M@2 N M@2 G H I J K B@4 C D@5 E B@2 C D@2 O@2 P@12 ~
>`.pickRestart({
  A: "~@8 g1 ~ a1 ~ g1 ~ a1 ~", B: "a1 ~ a1 ~ a1 ~ a1 ~ g1 ~ a1 ~ g1 ~ a1 ~", C: "a1 ~ a1 ~ a1 ~ a1 ~ g2@4 d2@4",
  D: "g1 ~ a1 ~ g1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~", E: "g2@4 d2@4 g1 ~ a1 ~ g1 ~ a1 ~", F: "a1 ~ a1 ~ a1 ~ a1 ~@9",
  G: "a2@4 g2@2 a2 b2 d2@2 e2 f#2 g2@4", H: "a2@4 d2@2 e2 f#2 g2@6 b2 g2", I: "a2@4 g2@3 b2 d2@2 e2 f#2 g2@4",
  J: "g2@2 f#2 e2 d2@2 c2 b1 g1 ~ a1 ~ g1 ~ a1 ~", K: "a1 ~@2 a1 ~ a1 ~@2 g1 ~ a1 ~ g1 ~ a1 ~",
  L: "a1 ~ a1 ~ a1 ~ a1 ~ g1 ~ a1 ~ a1 ~ a1 ~", M: "g1 a1!7", N: "g1@2 a1@2 a1@2 a1@2 g2@2 g2!2 d2@2 d2@2",
  O: "[a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ g2@2 f#2 e2 d2 c2 b1 a1 g1 ~ a1 ~ g1 ~ a1 ~, ~@15 g3@3 ~@14]/2",
  P: "g2@2 f#2 e2 d2 c2 b1 a1 g1 ~ a1 ~ g1 ~ a1 ~",
})).s("gm_electric_bass_finger").gain(0.32).pan(0.4)

// drums · kick
const kick = s("bd").struct("<~@48 A B@2 C D E@5 F G H B I@5 J K@4 L M I@2 N O K P Q I@12 ~>".pickRestart({
  A: "~@5 x ~ x", B: "~@2 x ~@3 x!2 ~@2 x ~@3 x ~", C: "~@2 x ~@3 x!2 ~@2 x ~@3 x!2",
  D: "~@2 x!2 ~@2 x ~ x ~@3 x ~ x!2", E: "~@2 x ~@3 x ~@3 x!2 ~@2 x ~", F: "~@2 x ~@3 x ~@2 x!3 ~@3 x",
  G: "~@2 x ~@2 x!3 ~@2 x ~@4 x", H: "~@2 x ~@2 x ~ x ~ x!3 ~ x!3", I: "~ x!3 ~ x!3 ~@2 x ~@3 x ~",
  J: "~ x!3 ~ x!4 ~@3 x ~ x!2", K: "~@2 x ~@3 x ~@2 x!3 ~ x!3", L: "~@2 x ~@3 x ~@2 x!3 ~@4",
  M: "x ~@3 x ~ x!2 ~@2 x ~@3 x ~", N: "~ x!3 ~ x!3 ~@2 x ~ x ~ x ~", O: "~ x!3 ~@2 x ~@2 x!3 ~ x!3",
  P: "~ x!3 ~@2 x ~@3 x ~@3 x ~", Q: "~@2 x!2 ~ x!3 ~@2 x ~@3 x ~",
})).gain(0.32)

// drums · snare
const snare = s("sd").struct("<~@48 [~@2 x!2] [x!4]!44 ~>").gain(0.32)

// drums · hihat
const hihat = s("hh").struct("<~@48 A B@3 C B@14 C B@5 D B@19 ~>".pickRestart({
  A: "~@8 x ~ x ~ x!4", B: "x!16", C: "x!8 ~@5 x!3", D: "~@5 x!11",
})).gain(0.32)

// drums · crash
const crash = s("cr").struct("<~@52 [~@2 x!2] ~@14 [~@2 x!2] ~@5 [x!2 ~@2] ~@20>").gain(0.32)

stack(
  fiddle, acoustic_guitar_nylon, banjo, acoustic_guitar_steel, acoustic_guitar_steel_2, bass, kick, snare, hihat, crash
)