// Twilight Zone — Golden Earring
// 120 bpm, 4/4, key B minor. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 102 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(120/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 · "E.Guitar"
const overdriven_guitar = note(`<
  ~@3 A B C D E@2 F G H I J K L M N O P Q R S T@2 U V W X Y Z AA AB U AC W X Y AD AE AF AG@4 AH@4 F G H I J K L M N O P
  Q R S T@2 U V W X Y Z AA AB U AC W X Y AD AE AF AG@4 AI@4 AJ AK@2 AL@7 ~@3
>`.pickRestart({
  A: "[e4,g4,b4]@11 ~@5", B: "~@6 [e4,g4,b4]!2 [e4,g4,b4]@3 ~ [e4,g4,b4]@3 ~",
  C: "[f#4,a4,c#5]!2 [f#4,a4,c#5]@3 ~@5 [f#4,a4,c#5]!2 [f#4,a4,c#5]@3 ~", // F#m
  D: "[f#4,a4,c#5] ~@5 [f#4,a4,c#5]@3 ~ [f#4,a4,c#5]@3 ~ [b3,d4,f#4]@2", E: "[~ b3@12 ~@3]/2",
  F: "[d4,f#4,b4]@3 ~ [d4,f#4,b4]@3 ~ [d4,f#4,b4]@4 ~@2 b4 ~", // Bm
  G: "[d4,f#4,b4] ~ [d4,f#4,b4]@3 ~ [f#4,b4,d5]@3 ~ [f#4,b4,d5]@5 ~", // Bm
  H: "[e4,g4,b4] b4 [e4,g4,b4]@3 ~ [e4,g4,b4]@3 ~ [e4,g4,b4]@3 ~ a4 ~", // Em
  I: "[e4,g4,b4]@3 ~ [e4,g4,b4]@3 ~ [e4,g4,b4]@5 ~@3", // Em
  J: "[f#4,a4,c#5] c#5 [f#4,a4,c#5]@3 ~ b4 [f#4,a4,c#5]@2 ~ f#4@3 ~ f#4 ~", // F#m
  K: "[f#4,a4,c#5] ~ b4 ~ b4 ~ [c#4,f#4,b4]@3 ~ [c#4,f#4,a4]@3 ~ [b3,d4,f#4,a4]@2", L: "~@2 b3@11 ~@3",
  M: "~@10 [e4,f#4,b4] ~ [e4,f#4,b4] ~ a4 ~", N: "[d4,f#4,b4]@3 ~ [d4,f#4,b4] ~ a4 [d4,f#4,b4]@6 ~@3",
  O: "[d4,f#4,b4] ~ b4 ~ b4!2 [f#4,b4,d5]@6 ~@2 a4 ~", P: "[e4,g4,b4] ~ b4 ~ a4 ~ [e4,g4,b4]@3 ~ b4 ~ [e4,g4,b4]@3 ~",
  Q: "[e4,g4,b4] ~ b4 ~ b4 ~ [e4,g4,b4,d5]@6 ~@2 b4 ~", R: "[f#4,a4,c#5] ~ c#5 ~ b4 ~ [f#4,a4,c#5]@3 ~ f#4@3 ~ f#4 ~",
  S: "[f#4,a4,c#5,f#5] ~ [f#4,a4,c#5,f#5]@3 ~ [f#4,a4,c#5,e5]@3 ~ d5 ~ e5 d5 [f#4,b4,e5]@2", // F#m F#m7 Esus2
  T: "[~ d5 [d4,f#4,b4]@25 ~@5]/2", U: "~@2 [d4,f#4,b4]@3 ~ b4 ~ [f#4,b4,d5] d5!2 ~ e5 ~ e5 ~",
  V: "[f#4,b4,d5,f#5] ~ e5@3 ~ [f#4,b4,e5]@3 ~ d5@3 d5 [a4,c#5,e5]@2", // Bm Esus2 A
  W: "~@2 e5 ~ d5 ~ [a4,c#5,e5]@3 ~ [a4,c#5,e5]@3 ~ [a4,c#5,e5]@2", // A
  X: "~@2 e5 ~ [a4,c#5,e5] ~ d5 ~ [a4,c#5,f#5]@4 ~@2 e5 ~", // A F#m
  Y: "[g4,b4,e5] ~ d5@3 ~ e5 ~ [g4,b4,f5]@3 ~ [g4,b4,f5] ~ f5 ~", Z: "[a4,c#5,e5] ~ d5@3 ~ [g4,b4,f5]@7 ~@3",
  AA: "[f#4,c#5] ~ c#5 ~ c#5!2 [f#4,c#5]@3 ~ c#5 ~ d5 ~ c#5 ~", AB: "[f#4,d5]@3 ~ c#5 ~ [f#4,d5]@3 ~ [f#4,c#5]@5 ~",
  AC: "[f#4,b4,d5,f#5] ~ e5@3 ~ [f#4,c#5,e5]@3 ~ d5@3 d5 [a4,c#5,e5]@2", AD: "[g4,b4,e5] ~ d5@3 ~ [g4,b4,f5]@7 ~@3",
  AE: "[f#4,c#5,f#5] ~ f#5 ~ f#5!2 [f#4,c#5,f#5]@3 ~ e5 ~ e5 ~ d5 ~", // F#5
  AF: "[f#4,c#5,e5]@3 ~ d5 ~ [f#4,c#5,f#5]@3 ~ b4 ~ d5 ~ d5 ~", // F#7 F#5
  AG: "[[g4,b4,e5]@3 ~ d5 ~ e5 d5 b4@4 ~@2 [g3,b3,e4]@6 ~@2 d5!2 [e4,g4,d5] ~ b4 ~ b4 a4 [d4,f#4,b4]@27 ~ b4 ~ d5 ~ d5 ~]/4", // Em Em7 Bm
  AH: "[[g4,b4,e5]@3 ~ d5 ~ e5 d5 b4@4 ~@2 [g3,b3,e4]@6 ~@2 d5!2 [e4,g4,d5] ~ b4 ~ b4 a4 [d4,f#4,b4]@26 ~@4 b4@3 ~]/4", // Em Em7 Bm
  AI: "[[g4,b4,e5]@3 ~ d5 ~ e5 d5 b4@4 ~@2 [g3,b3,e4]@6 ~@2 d5!2 [e4,g4,d5] ~ b4 ~ b4 a4 [d4,f#4,b4]@22 ~@2 f#5!2 [f#4,b4,f#5] ~ e5 ~ e5 d5 [g4,b4,e5]@2]/4", // Em Em7 Bm B5 Em
  AJ: "~ d5 [d4,g4,b4]@7 ~ b4 ~ f#5 ~ [g4,b4,e5]@2", AK: "[~@6 b4!2 [e4,g4,d5] ~ b4 ~ b4 a4 [d4,f#4,b4]@18]/2",
  AL: "[~@6 f#5!2 [f#4,f#5] ~ e5 ~ e5 d5 [g4,b4]@3 d5 b4@8 ~@2 f#5 ~ b4@8 b4 ~ [e4,d5] ~ b4@2 ~ a4 ~@24 f#5!3 ~ e5@2 ~ d5 b4@2 ~ d5 ~@10 f#5 ~@11 [e4,d5] ~@4 a4 ~@2, ~@8 b4@6 e5@16 e5@44 ~@2 e5@5 ~@31, ~@18 g4@12 g4@10 g4@65 ~@7, ~@26 b4@4 ~@9 b4@3 ~@2 b4@2 [f#4,b4]@26 b4@6 ~@2 b4@29 ~@3]/7", // F# G E7 B5
})).s("gm_overdriven_guitar").gain(0.31).pan(0.8)

// bass · electric bass finger · "1st Bass"
const bass = note(`<
  ~ A@2 B@2 C D A@2 E@2 F@2 G H E@4 F@2 G H E@3 I J@2 K@2 G@2 E I J@2 K@2 G@2 L M E@2 L M E@4 F@2 G H E@4 F@2 G H E@3 I
  J@2 K@2 G@2 E I J@2 K@2 G@2 L M E@2 L M E I N O E I N O E I N O E P@2
>`.pickRestart({
  A: "b2 ~ d3 ~ e3 ~ d3 ~ b2 ~ d3 e3@2 e3 d3!2", B: "e2 ~ b2 ~ e3 ~ d3 ~ e2 ~ b2 e3@2 e3 d3!2",
  C: "f#2 ~ f#3 ~ a3 ~ f#3 ~ f#2 ~ f#3 a3@2 a3 f#3!2", D: "f#2 ~ f#3 ~ a3 ~ f#3 ~ f#2 ~ f#3 a3 ~ a3 f#3!2",
  E: "b1 ~ b2 ~ b1 ~ b2 ~ b1 ~ b2 ~ b1 ~ b2 ~", F: "e1 ~ e2 ~ e1 ~ e2 ~ e1 ~ e2 ~ e1 ~ e2 ~",
  G: "f#1 ~ f#2 ~ f#1 ~ f#2 ~ f#1 ~ f#2 ~ f#1 ~ f#2 ~", H: "f#1 ~ f#2 ~ f#1 ~ f#2 ~ f#1 ~ f#2 ~ f#1 ~@3",
  I: "b1 ~ b2 ~ b1 ~ b2 ~ b1 ~ b2 ~ b1 ~@3", J: "a1 ~ a2 ~ a1 ~ a2 ~ a1 ~ a2 ~ a1 ~ a2 ~",
  K: "g1 ~ g2 ~ g1 ~ g2 ~ g1 ~ g2 ~ g1 ~ g2 ~", L: "g1 ~ g2 ~ g1 ~ g2 ~ g1 ~ g2 ~ g1 ~ e1@2",
  M: "~@2 e2 ~ e1 ~ e2 ~ e1 ~ e2 ~ e1 ~@3", N: "g1 ~ g2 ~ g1 ~ g2 ~ g1 ~ g2 ~ g1 ~@3",
  O: "e1 ~ e2 ~ e1 ~ e2 ~ e1 ~ e2 ~ e1 ~@3", P: "[b1@27 ~@5]/2",
})).s("gm_electric_bass_finger").gain(0.27).pan(0.2)

// bass · slap bass 2 · "2nd Bass"
const bass_2 = note("<~ A@2 B@2 C@2 A@2 ~@72 D E F@2 D E F@2 D E F@2 D E F@2 D E F G@2>".pickRestart({
  A: "b2@3 ~ b2@3 ~ b2@3 ~ b2@3 ~", B: "e2@3 ~ e2@3 ~ e2@3 ~ e2@3 ~", C: "f#2@3 ~ f#2@3 ~ f#2@3 ~ f#2@3 ~",
  D: "g3@3 ~ g3@3 ~ g3@3 ~ g3@3 ~", E: "e3@3 ~ e3@3 ~ e3@3 ~ e3@3 ~", F: "b3@3 ~ b3@3 ~ b3@3 ~ b3@3 ~",
  G: "[b3@27 ~@5]/2",
})).s("gm_slap_bass_2").gain(0.27)

// other · lead 2 sawtooth · "Saw Wave"
const lead_2_sawtooth = note(`<
  ~@41 A@2 B C D@2 E F@2 ~@7 G H I@2 J K H@2 L@2 M@2 N@2 O@2 L@2 M@2 N@2 P@2 Q@2 L@2 Q@2 R S N@2 T R N@2 U R N@2 V W@2
>`.pickRestart({
  A: "[[g4,b4,e5]@13 ~ [g3,b3,e4]@13 ~@5]/2", B: "[d4,f#4,b4]", C: "d4@3 ~ f#4@3 ~ b4@3 ~ f#5@3 ~",
  D: "[[g4,b4,e5]@11 ~@3 [g3,b3,e4]@13 ~@5]/2", E: "b2 ~ d3 ~ e3 ~ d3 ~ b2 ~ d3 e3@2 e3 d3!2",
  F: "[b3 ~ d4 ~ e4 ~ d4 ~ b3 ~ d4 e4@2 e4 d4 d4@12 ~@5]/2", G: "b3 ~ d4 ~ e4 ~ d4 ~ b3 ~ d4 e4!3 d4!2",
  H: "b3 ~ d4 ~ e4 ~ d4 ~ b3 ~ d4 e4@2 e4 d4!2", I: "e3 ~ b3 ~ e4 ~ d4 ~ e3 ~ b3 e4@2 e4 d4!2",
  J: "f#3 ~ f#4 ~ a4 ~ f#4 ~ f#3 ~ f#4 a4!3 f#4!2", K: "f#3 ~ f#4 ~ a4 ~ f#4 ~ f#3 ~ f#4 a4@2 a4 f#4!2",
  L: "[[d4,f#4,b4]@27 ~@5]/2", M: "[[a3,c#4,e4]@27 ~@5]/2", N: "[[g3,b3,e4]@27 ~@5]/2", O: "[[f#4,a4,c#5]@27 ~@5]/2",
  P: "[[f#3,c#4,f#4]@27 ~@5]/2", Q: "[[g3,b3,e4]@4 ~@3 [g3,b3,e4]@6 ~@3]/2", R: "[d4,f#4,b4]@11 ~@5",
  S: "~@2 d4 f#4 [d4,f#4,b4]@9 ~@3", T: "d4@3 ~ f#4@3 ~ b4@3 ~ f#5@4", U: "d4!4 f#4@3 ~ b4!4 f#5@4",
  V: "d4!4 f#4!4 b4!4 f#5!4", W: "[[d4,f#4,b4]@13 ~@3]/2",
})).s("gm_lead_2_sawtooth").gain(0.24)

// drums · kick
const kick = s("bd").struct(`<
  A@2 B A B A B A@9 B A@7 ~ A@7 C A@9 D A@3 D A E A@7 B A@7 ~ A@7 C A@9 D A@3 D A@13 D ~
>`.pickRestart({
  A: "x!2", B: "x ~@3 x ~@2 x", C: "x ~@2 x!2 ~@3", D: "x", E: "x!3 ~ x ~ x!2",
})).gain(0.27)

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

// drums · open hat
const open_hat = s("oh").struct(`<
  A@8 B A@7 C A@15 D A@8 B E A@2 B E A F A@7 C A@15 D A@8 B E A@2 B E A@13 D ~
>`.pickRestart({
  A: "x!4", B: "x!3 ~", C: "x!8", D: "x", E: "~@3 x", F: "~@2 x!2",
})).gain(0.27)

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

stack(overdriven_guitar, bass, bass_2, lead_2_sawtooth, kick, snare, open_hat, crash)