// Nightrain — Guns N' Roses
// 148 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 133 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(148/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.

// bass · fretless bass · "Duff"
const bass = note(`<
  A@3 ~@2 B@2 C@2 D@2 E@2 F@2 G@2 H@2 I J K L@2 M@3 N@2 O P Q@2 ~@2 R@2 S@2 N@2 O P Q@2 ~@4 T@2 U@2 V@8 W@8 X@8 Y Z@3
  AA@2 AB@2 AC@2 AD@2 AE@2 AF@7 AG AH@7 AI@8 AJ@16 AK@3
>`.pickRestart({
  A: "[a1@4 ~ a2 ~@2]/3", B: "[~@5 e1 a1 g1@2 g1 g1@2 ~@4]/2", C: "[~@5 e1 g1 a1@2 a1 a1@2 ~@4]/2",
  D: "[~@5 f#2 g2 a1@2 a1 a1@2 ~@4]/2", E: "[~@5 e1 g1 f1@2 f1 f1@2 ~@4]/2", F: "[~@5 e1 f1 g1@2 g1 g1@2 ~@4]/2",
  G: "[~@5 e1 g1 a1@3 ~@6]/2", H: "[a2 g2 e2 d#2 d2 a1 c2 a1@2 a1 a1@2 a1 e1 g1 a1]/2", I: "a1@2 a1 e1 a1 e1 g1 a1",
  J: "e1 a1!2 e1 a1!2 c1 a1", K: "a1 e1 f1 f2 f#1 f#2 g1 g2", L: "[a1@2 a1@2 a1 e1 g1 a1@2 a1@2 g1 a1 e1 g1 a1]/2",
  M: "[e1 a1@3 a1@2 e1 a1@2 a2!2 d2 a2 g2 e2 a1@2 a1 c2@2 a1 e1 g1 a1]/3",
  N: "[a1!2 c2!2 a1 e1 g1 a1@3 c2!2 a1 e1 g1 a1]/2", O: "a1!2 c2!2 a1 e1 g1 a1", P: "a1@2 c2!2 a1 e1 g1 a1",
  Q: "[e1 a1 c2!2 a1 c2 c#2 d2@9]/2", R: "[~@8 c2@2 a1@2 g1@2 a1@16 g2 g#2]/2",
  S: "[a2!5 g2 e2 a1@2 a1 c2@2 a1 e1 g1 a1]/2", T: "[~@5 f2 f#2 g2@9]/2", U: "[g2@4 ~ f2 d2 g1@2 g1!7]/2",
  V: "[g2@2 g2@2 g2@2 g2@2 g2@2 e1@2 g1@2 a1@4 a1@2 a1@2 e1@2 a1@2 a1@2 e1@2 a1@4 a1@2 a1@2 e1@2 a1@2 e1@2 g1@2 a1@4 a1@2 a1@2 e1@2 a1@2 a1@2 e1@2 a1@4 a1@2 a2@2 a2@2 d2 e2 a2@2 e2 d2 a1@4 a1@2 a1@2 e1@2 a1@2 a1@2 e1@2 a1@4 a1@2 a1@2 a1@2 a1@2 a1@2 g1@2 f1@4 e1@2 f1@2 e1@2 f1@2 e1@2 f1@2 g1@2]/8",
  W: "[~@2 g1@2 g1@2 f1@2 g1@2 f1@2 g1@2 a1@4 a1@2 a1@2 e1@2 a1@2 a1@2 e1@2 a1@4 a1@2 a1@2 e1@2 a1@2 e1@2 g1@2 a1@4 a1@2 a1@2 e1@2 a1@2 a1@2 e1@2 a1@4 a1@2 a2@2 a2@2 d2 e2 a2@2 e2 d2 a1@4 a1@2 a1@2 e1@2 a1@2 a1@2 e1@2 a1@4 a1@2 a1@2 a1@2 a1@2 g2@2 e2@2 d2@18]/8",
  X: "[~@7 b1@2 a1 b1 f#1 a1 b1 a1 b1@2 b1!2 a1 b1 e1 f1 f#1@2 f1 f#1 e1 f1 f#1 e1 f#1@2 e1 f#1 e1 f#1@2 ~ b1@2 b1!2 a1!2 b1 a1 b1@2 a1 b1 a1 b1 e1 f1 f#1@2 e1 f#1 e1!2 f#1@2 e1]/8",
  Y: "~ f#1@2 g1@2 g#1@2 a1",
  Z: "[d2@4 d2@3 d2 d2@2 d2@2 d2@2 d2@4 d2@2 d2@2 d2@2 d2@2 d2@2 a1@2 f#1@4 f#1@4 e1@2 f#1@2 f#1@2 e1@2 f#1@2]/3",
  AA: "[e1@2 f#1@2 f#1@2 e1@2 f#1@2 f#1@2 e1@2 d2@4 d2@2 d2@2 d2!2 d2@2 d2@2 d2@2 d2@2]/2",
  AB: "[a1@2 d2@2 d2@2 a1!2 d2@2 d2@2 a1@2 f#1@4 f#1@2 f#1@2 e1@2 f#1@2 f#1@2 e1@2 f#1@2]/2",
  AC: "[e1@2 e2 f2 f#2@2 f#2@2 d2@2 b1@2 c#2@2 d2@4 d2@2 d2@2 a1!2 d2@2 d2@2 d2@2 d2!2]/2",
  AD: "[a1 d2!2 a1 d2!2 a1 f#1@2 f#1!2 e1 f#1!2 e1 f#1]/2", AE: "[e1 f#1!2 e1 f#1!2 e1 d2@2 d2!2 a1 d2!2 a1 d2]/2",
  AF: "[g#1 d2!2 a1 d2 e1 f1 f#1@2 f#1 f#2@2 f#2 f#1 f1 e1@2 e1 e1@2 e1!2 f1 f#1@2 f#1 f#2@2 f#1!2 f1 e1@2 e1 e1@2 e1!2 f1 f#1@2 f#1 f#2@2 f#2 f#1 f1 e1@2 e1 e2@2 ~@2 e2@2]/7",
  AG: "d2!8",
  AH: "[d2@2 d2@2 d2@2 d2@2 d2@2 g1@2 g#1@2 a1@6 a1@4 ~@6 [a1,a2]@6 [a1,a2]@4 ~@6 [f1,f2]@6 [f1,f2]@4 ~@2 d2!2 e2!2 f2@6 f2@4 ~@2 f1@2 f#1@2 g1@6 g1@4 ~@6 g1@6 g1@4 ~@6 a1@2]/7", // A F
  AI: "[~@2 a1@2 ~@3 c2@6 e1 g1 a1@2 a1!2 e1 a1!2 e1 a1@2 a1!2 e1 a1!2 g1 f1@2 f1 ~ e1 f1 e1 f1 f1@2 f1 ~ e1 f1 e1 f1 g1@2 g1 ~ f1 g1!2 f1 g1@2 g1 ~ f1 g1!2 f1 a1]/8",
  AJ: "[~ a1!2 e1 a1!2 e1 a1@2 a1!2 e1 a1!2 e1 a1@2 a1!2 e1 a1!2 e1 a1@2 a1!2 e1 a1!2 g1 f1@2 f1 ~ e1 f1 e1 f1 f1@2 f1 ~ e1 f1 e1 f1 g1@2 g1 ~ f1 g1!2 f1 g1@2 g1 ~ f1 g1!2 f1 a1]/8",
  AK: "[~ a1!2 e1 a1!2 e1 a1@2 a1!2 e1 a1!2 e1 a1@2 ~@7]/3",
})).s("gm_fretless_bass").gain(0.22).pan(0.2)

// chords · distortion guitar · "Slash"
const distortion_guitar = note(`<
  A@7 B@8 C@5 D@8 E@7 F@5 G@8 H@3 I@2 J@8 K@6 L@3 ~@22 M@6 N O@3 P@8 Q@16 R@7
>`.pickRestart({
  A: "[[a2,e3,a3]@12 ~@3 [a3,e4,g4]@2 [a3,e4,g4] [a3,d4,f#4] ~ [a3,d4,f#4] e4 [g3,c4,e4]@9 [g3,c4,e4]@2 [g3,c4,e4] [g3,b3,d4] ~ [g3,b3,d4] c4 [g3,c4] [a3,c4,f4]@8 [g3,b3,d4]@2 [g3,b3,d4] c4 ~ [g3,c4]@2 [g3,b3]@2]/7", // A5 A7 D C G C5 F G …
  B: "[[g3,c4]@2 [g3,b3]@2 [e3,a3]@2 [d3,g3] [a2,e3,a3]@13 ~@3 [a3,e4,g4]@2 [a3,e4,g4] [a3,d4,f#4] ~ [a3,d4,f#4] e4 [g3,c4,e4]@9 [g3,c4,e4]@2 [g3,c4,e4] [g3,b3,d4] ~ [g3,b3,d4] c4 [g3,c4] [a3,c4,f4]@8 [g3,b3,d4]@2 [g3,b3,d4] c4 ~ [g3,c4]@2 [g3,b3]@2]/8", // C5 G A5 G5 A5 A7 D C …
  C: "[[g3,c4]@2 [g3,b3]@2 [e3,a3]@2 [d3,g3] [a2,e3,a3]@15 ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]]/5", // C5 G A5 G5 A5
  D: "[~ [a2,e3,a3] [a2,e3,a3]@2 ~ [a2,e3,a3] ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@2 [e3,a3] [e3,a3]@2 ~ [e3,a3] ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]]/8", // A5
  E: "[~ [a2,e3,a3] [a2,e3,a3]@2 ~ [a2,e3,a3] ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 ~@3 [a3,d4,f#4]@16 [e4,g4]@3 [d4,f#4] c4 [d4,f#4] [c4,e4]!2 [b3,d4]]/7", // A5 D Em D C Bm
  F: "[[c4,e4]@2 [b3,d4]@2 c4 a3 g3 [a2,e3,a3]@16 [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]]/5", // C Bm A5
  G: "[~ [a2,e3,a3] [a2,e3,a3]@2 ~ [a2,e3,a3] ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3]@2 ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a2,e3,a3] e2 g2 [a2,e3,a3]@3 [a2,e3,a3]@2 ~@3 [a3,d4,f#4]@16 [a3,e4,g4]@2 [a3,e4,g4] [a3,d4,f#4] ~ [a3,d4,f#4] e4 [g3,c4,e4]@9 [g3,c4,e4]]/8", // A5 D A7 D C
  H: "[~ [g3,c4,e4] [g3,b3,d4] ~ [g3,b3,d4] c4 [g3,c4] [a3,c4,f4]@8 [g3,b3,d4]@2 [g3,b3,d4] c4 ~ [g3,c4]@2 [g3,b3]@2]/3", // C G C5 F G C5 G
  I: "[[g3,c4]@2 [g3,b3]@2 [e3,a3]@2 [g2,d3,g3] [g2,d3,g3]@2 [g2,d3]!7]/2", // C5 G A5 G5
  J: "[d3!5 e3 g3 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 f2@2 f2 c3 b2 c3 b2 a2 g2]/8", // A5
  K: "[~ g2 c3 b2 c3 b2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]]/6", // A5
  L: "[~ a2 c3 a2 c3 a2 ~ [a3,d4]@15 ~@2]/3", // D5
  M: "[~@5 [c#3,f#3] [c3,f3] [b2,e3]@2 [c#3,e3] [b3,e4]@2 ~ [b2,e3] [c3,f3] [c#3,f#3]@2 [c#3,f#3] [c#4,f#4]@2 ~ [c#3,f#3] [c3,f3] [b2,e3]@2 [c#3,e3] [b3,e4]@2 ~ [b2,e3] [c3,f3] [c#3,f#3]@2 [c#3,f#3] [c#4,f#4]@2 ~ [c#3,f#3] [c3,f3] [b2,e3]@2 [c#3,e3] [b3,e4]@6]/6", // F#5 F5 E5 C#m E5 F5 F#5 F5 …
  N: "[d3,a3,d4]!8", // D5
  O: "[[d3,a3,d4]!4 [d3,a3,d4]@2 ~ [a2,e3,a3]@3 [a2,e3,a3]@2 [a3,d4] c4 [a3,d4] [g3,c4]@5 ~@3 [a3,c4]]/3", // D5 A5 D5 C5 Am
  P: "[~@2 [g3,b3] ~ [g3,b3]@2 [f3,a3] [f3,c4,f4]@7 ~ [g3,d4,g4]@3 [g3,d4,g4] ~ [g3,c4]@2 [g3,b3] [d3,g3,c4]@3 [d3,g3,b3]@2 [e3,a3]@2 [d3,g3] [a2,e3,a3]@3 [a2,e3,a3]@2 ~@3 [c3,g3,c4]@6 e3 g3 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 f2]/8", // G F F5 G5 C5 G Csus2 G …
  Q: "[~ f2 c3 b2 c3 b2 a2 f2@2 f2 c3 b2 c3 b2 a2 g2@2 g2 c3 b2 c3 b2 a2 g2@2 g2 c3 b2 c3 b2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 f2]/8", // A5
  R: "[~ f2 c3 b2 c3 b2 a2 f2@2 f2 c3 b2 c3 b2 a2 g2@2 g2 c3 b2 c3 b2 a2 g2@2 g2 c3 b2 c3 b2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 a2 c3 a2 c3 a2 g2 [a2,e3,a3]@2 ~@7]/7", // A5
})).s("gm_distortion_guitar").gain(0.25).pan(0.6)

// chords · overdriven guitar · "Slash"
const overdriven_guitar = note("<~@69 A@2 B@2 C@2 D E F G@3 H@3 I@2 J K@4 L@2 ~@40>".pickRestart({
  A: "[~@7 [f#3,b3,f#4]@2 f#4!6 [f#4,b4]]/2", // B5
  B: "[f#4!7 [f4,a4]@2 [e4,g#4] [f4,a4] [e4,g#4] [f4,a4] [e4,g#4] [d4,f#4] [e4,g#4]]/2", // F E F E F E D E
  C: "[[d4,f#4] [e4,g#4] [d4,f#4]@4 ~ d5@2 c#5 b4 a4 g#4 f#4 e4 f4]/2", D: "~ e4 d4@2 d4@2 e4@2 d4@2 b3@2 a3@2 b3@2",
  E: "a3!2 g#3!2 f#3!2 e3!2", F: "d3 [f#2,c#3,f#3]@2 [g2,d3,g3]@2 [g#2,d#3,g#3]@2 [a2,e3,a3]",
  G: "[[f#4,a4,d5]@2 [f#4,a4,d5]@2 [f#4,a4,d5] e4 d4 [f#4,a4,d5]@3 [f#4,a4,d5]@2 [f#4,b4,d5] e4 d4 f#4@2 a4 c#5 f#5 [b4,f#5] e5@2 b4, ~@14 f4 ~@33]/3", // D Bm B5
  H: "[c#5@2 b4 a4 f#4@2 f#4@4 f#4@2 e4@2 [a4,d5]@4 [a4,d5]@2 g#4@2 e4@2 f#4@2 [d4,a4,d5]@4 [c5,f#5]@4 d5@2 a4@2 g4 f#4 g4@2 f#4@2 d4@2 f#5@2]/3", // D5 Cdim
  I: "[~ f#5 e5 d5 c#5 b4 a4 f#4 b4 a4 f#4 e4 c#4 b3 a#3@4 a3 a#3 b3!2 a#3@6 ~@4]/2",
  J: "[a3,f#4]@2 [a3,f#4] [g#3,f4] [a3,f#4]@2 [a3,f#4] [g#3,f4]", // D C# D C#
  K: "[[a3,f#4]@2 [a3,f#4]@2 [a3,f#4] [b3,g#4]@2 [c#4,a4]@3 [b3,g#4]@2 [b3,g#4] [a3,f#4] ~ [g#3,e4]@3 [f#3,d#4]@2 [e3,c#4]@2 ~ c4@3 c#5 a4 f#4 e4 c#4 e4]/4", // D E F#m E D C#m D#m C#m
  L: "[c#4@2 b3 a3 b3@2 a3@2 c#4@2 a3 g#3 f#3@2 f#3@12 ~@6]/2",
})).s("gm_overdriven_guitar").gain(0.4).pan(0.6)

// chords · electric guitar clean · "Izzy"
const electric_guitar_clean = note(`<
  A B C D E F G H@2 B C I J F G H@2 A K L K L K L K L K L K L K M N@2 ~ O@2 P K L K L K M Q@2 C D E F G R@2 S K L K L K
  T@3 K L K L K U@2 V@2 ~@62
>`.pickRestart({
  A: "[a3,e4,a4]@2 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]@2 [a3,e4,a4]", // A5
  B: "[a3,e4,a4]@2 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]@2 [a3,a4,e5,g5]", // A5 A7
  C: "[a3,a4,e5,g5]!2 [a3,a4,d5,f#5]@2 [a3,a4,d5,f#5]@2 [a3,g4,c5,e5]@2", D: "[a3,g4,c5,e5]!6 [a3,g4,c5,e5]@2",
  E: "[a3,g4,c5,e5]@2 [g4,b4,d5]!5 [f4,a4,c5]", F: "[f4,a4,c5]@2 [f4,a4,c5]@2 [f4,a4,c5] [f4,a4,c5]@2 [g4,b4,d5]",
  G: "[g4,b4,d5]!2 [g4,c5,d5] [g4,c5,d5]@2 [g4,c5,d5] [g4,b4,d5]@2", // G Gsus4 G
  H: "[[g4,c5,d5]@2 [g4,b4,d5]@2 [a3,e4,a4]@2 [g3,d4,g4] [a3,e4,a4]@3 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]@2 [a3,e4,a4]]/2", // Gsus4 G A5 G5 A5
  I: "[a3,g4,c5,e5]!7 [f4,c5,e5]", J: "[f4,c5,e5]@2 [f4,b4,d5]!5 [f4,a4,c5]",
  K: "[a3,e4,a4]@2 [a3,e4,a4]!4 [a3,e4,a4]@2", L: "[a3,e4,a4]@2 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]!3",
  M: "[a3,e4,a4]@2 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]!2 [d4,a4,d5,f#5]", // A5 D
  N: "[[d4,a4,d5,f#5]@2 [d4,a4,d5,f#5] [d4,a4,d5,f#5]@2 [d4,a4,d5,f#5]@2 [d4,a4,d5,f#5]@3 [d4,a4,d5,f#5]@3 [d4,a4,d5,f#5]!2 ~]/2", // D
  O: "[~@7 [a3,e4,a4]@3 [a3,e4,a4]!6]/2", P: "[a3,e4,a4]!3 [a3,e4,a4]@2 [a3,e4,a4]!3",
  Q: "[[d4,a4,d5,f#5]@2 [d4,a4,d5,f#5] [d4,a4,d5,f#5]@2 [d4,a4,d5,f#5]@2 [d4,a4,d5,f#5]@3 [d4,a4,d5,f#5]@3 [d4,a4,d5,f#5]!2 [a3,a4,e5,g5]]/2", // D A7
  R: "[[g4,c5,d5]@2 [g4,b4,d5]@2 [a3,e4,a4]@2 [g3,d4,g4] [g3,d4,g4]@3 [g3,d4,g4] [g3,d4,g4]@2 [g3,d4,g4]@2 [g3,d4,g4]]/2", // Gsus4 G A5 G5
  S: "[g3,d4,g4]@2 [g3,d4,g4] [g3,d4,g4]@2 [g3,d4,g4]@2 [a3,e4,a4]", // G5 A5
  T: "[[a3,e4,a4]@2 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]!2 [f3,c4,f4]@3 [f3,c4,f4]@2 [f3,c4,f4]!3 [g3,d4,g4]@3 [g3,d4,g4]@2 [g3,d4,g4]!3 [a3,e4,a4]]/3", // A5 F5 G5 A5
  U: "[[a3,e4,a4]@2 [a3,e4,a4] [a3,e4,a4]@2 [a3,e4,a4]!2 [d4,a4,d5]@3 [d4,a4,d5]@2 [d4,a4,d5]@2 [d4,a4,d5]@2]/2", // A5 D5
  V: "[[d4,a4,d5]!7 [b3,f#4,b4]@3 ~@6]/2", // D5 B5
})).s("gm_electric_guitar_clean").gain(0.04).pan(0.4)

stack(bass, distortion_guitar, overdriven_guitar, electric_guitar_clean)