// Highway To Hell — AC DC
// 116 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 89 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(116/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 · overdriven guitar · "Guitar"
const overdriven_guitar = note(`<
  A B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 E F G H@6 I J@2 B@2 C D B@2 C D B@2 C D B@2 E F G H@6 K L M@2 N O P Q R
  S T U@2 V ~ W ~ X Y Z AA AB AC AD AE AF AG AH AI AJ ~
>`.pickRestart({
  A: "~@5 [a2,e3,a3,d4]!3", B: "~@5 [f#2,d3,a3,d4]!2 [g2,d3,g3,d4]",
  C: "~ [f#2,d3,a3,d4]!2 [g2,d3,g3,d4] ~ [f#2,d3,a3,d4] ~ [a2,e3,a3,c#4]", D: "[a2,e3,a3,c#4] ~@4 [a2,e3,a3,c#4]!3",
  E: "~ [f#2,d3,a3,d4]!2 [g2,d3,g3,d4] ~ [f#2,d3,a3,c#4] ~ e2", F: "[e2,b2,e3] e2 [e2,b2]!6", G: "[e2,b2,e3]!8",
  H: "[[a2,e3,a3,c#4]@6 [a2,e3] [d3,a3,d4]@2 [d3,a3,d4]!2 [d3,g3,b3] [g2,d3,g3,d4]@2 [d3,a3,d4]@2]/2", // A A5 D5 G G5 D5
  I: "[a2,e3,a3,c#4]@6 [a2,e3] [d3,a3,d4]", J: "[[d3,a3,d4]@12 [d3,a3,d4] [a2,e3,a3,c#4]!3]/2",
  K: "[a2,e3,a3,c#4]@4 [a2,e3,a3,c#4]@2 [a2,e3] [d3,a3,d4]", L: "[d3,a3,d4]",
  M: "[[d3,a3,d4,f#4]!3 [d3,g3,d4,g4] [g3,d4,g4]!2 [d3,a3,d4,f#4]@10]/2", // D G5 D
  N: "[d3,a3,d4,f#4]!3 [d3,g3,d4,g4] [g3,d4,g4]!2 [d3,a3,d4,f#4]@2", // D G5 D
  O: "[d3,a3] [d3,g3,b3,g4]!3 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4] d4", // D5 G D
  P: "e4@2 e4@2 [e4,a4]@2 d4!2 e4@2 [e4,a4]@2 d4!2 e4@2", Q: "e4@2 d4!2 e4@2 [e4,a4]@2 d4!2 e4@2 [e4,a4]@2 [d4,f#4]!2",
  R: "[d4,f#4]@3 [d4,f#4] [c4,e4] a3 d4 c#4", S: "c#4 a2 f#3!3 e3 c3 a2",
  T: "a3@2 b3!2 a4 [e4,a4] b3!2, ~@2 c#4 [e4,a4]", U: "[a3@2 f#3 e3 [e4,a4] g3 [c4,e4]@4 a3@2 g3 a2 a3 a4]/2",
  V: "e4 c4 a3 c#4 a4@2 a4!2", W: "~@2 g4 a4 g4@2 g4@2 e4@2 c#4@2 a3@2 a3@2", X: "~ [c4,e4] [c4,e4]@2 [c4,e4]@2 a3 f#3",
  Y: "a3@4 a3 ~@3", Z: "~ d4!4 g4 d4!2", AA: "d4@2 d4 ~", AB: "~@2 [c4,e4]@3 ~ c4 a3", AC: "a3 ~@3",
  AD: "~@2 [c4,e4]@2 [c4,e4]@2 c4 a3", AE: "a3@2 e4@3 c4 a3 c#4", AF: "b3@2 c4 ~ [d4,e4]@2 [d4,e4]!2",
  AG: "[d4,e4] d4!3 [c4,e4]!2 a3 f#3", AH: "a3@2 c4!2 e4@2 ~ g4", AI: "g4", AJ: "g4 ~@3",
})).s("gm_overdriven_guitar").gain(0.64).pan(0.7)

// chords · distortion guitar · "Guitar 2"
const distortion_guitar = note("<~@25 A B@2 C@4 D E@2 ~@16 A C@6 D F G@2 H I C@14 J K C@8 ~>".pickRestart({
  A: "[e2,b2,e3]!8", // E5
  B: "[a2@4 a2@2 [a2,e3] [a2,d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2 [d3,g3,b3] [g2,d3,g3,d4]@2 [d3,a3,d4]@2, [e3,a3,c#4]@6 ~@6 g4 ~ [f#2,f#4] ~]/2", // A5 D G G5 D5 A F#
  C: "[[a2,e3,a3,c#4]@6 [a2,e3] [a2,d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]!2 [d3,g3,b3] [g2,d3,g3,d4]@2 [d3,a3,d4]@2, ~@12 g4 ~ [f#2,f#4] ~]/2", // A A5 D G G5 D5 F#
  D: "[a2,e3,a3,c#4]@4 [a2,e3,a3,c#4]@2 [a2,e3] [a2,d3,a3,d4,f#4]", E: "[[a2,d3,a3,d4,f#4]@12 [a2,d3,a3,d4,f#4] ~@3]/2",
  F: "[a2,d3,a3,d4,f#4]", G: "[[d3,a3,d4,f#4] ~ d3 [d3,g3,b3,g4] [g3,b3,g4]!2 [a2,d3,a3,d4,f#4]@10]/2",
  H: "[d3,a3,d4,f#4] ~ d3 [d3,g3,b3,g4]!2 [d3,g3] [d3,a3,d4,f#4]@2", // D G G5 D
  I: "[d3,a3] [d3,g3,b3,g4]!2 [d3,g3] [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4] ~", // D5 G G5 D
  J: "[a2,e3,a3,c#4]@6 [a2,e3] [a2,d3,a3,d4,f#4]", K: "~@2 [g2,d4] [d3,a3,d4], ~@4 g4 ~ [f#2,f#4] ~",
})).s("gm_distortion_guitar").gain(0.4).pan(0.3)

// bass · electric bass pick · "Bass"
const bass = note(`<
  ~@24 A B C D C D C E F G@2 ~@15 A B C D C E C H F G I G J K C D C L C M C N C L C M C L O P C D C E C D Q G R
>`.pickRestart({
  A: "e2@4 e2!4", B: "e2!8", C: "a1!4", D: "a1!2 g2 f#2", E: "a1!2 g2 a2", F: "a1@2 a1@2 a1@2 a1 d2", G: "d2",
  H: "a1 e1 f#1 e1 g1@2 f#1@2", I: "d2!6 d2@2", J: "d2!8", K: "d2!5 f#1 g1 g#1", L: "a1@4 a1@2 d2 e2 g2@4 f#2@4",
  M: "a1@4 a1@2 d2 e2 g2@4 a2@4", N: "a1 e1 g1 e1 g1@2 f#1@2", O: "a1@2 a1@2 a1@2 a1!2", P: "~@2 g2 d2",
  Q: "a1@2 a1@2 a1@2 c#2 d2", R: "a1",
})).s("gm_electric_bass_pick").gain(0.64)

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

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

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@34 [~@3 x] ~@54>").gain(0.64)

// drums · crash
const crash = s("cr").struct(`<
  ~@27 A ~ A ~ A ~ B ~@19 A ~ A ~ A ~ B C ~ C D ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~
>`.pickRestart({
  A: "~@2 x!2", B: "x", C: "x ~@2 x ~@2 x ~", D: "x ~ x!2",
})).gain(0.64)

// drums · high tom
const high_tom = s("ht").struct("<~@34 [~@5 x ~@2] ~@54>").gain(0.64)

// drums · ride
const ride = s("rd").struct("<~@63 [~@3 x ~@4] ~@25>").gain(0.64)

stack(overdriven_guitar, distortion_guitar, bass, kick, snare, hihat, mid_tom, crash, high_tom, ride)