// The Enemy Within — Rush
// 150 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 168 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(150/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 · distortion guitar · "Guitar"
const distortion_guitar = note(`<
  A B C D A B C D E F E F E F E F E F E F E F E F E F E F E F E F G H I@2 G H I@2 G H I@2 J K L@2 J K M@2 E F E F E F E
  F E F E F E F E F G H I@2 G H I@2 G H I@2 J K L@2 J K M@2 N O P Q R S T U A B C D A B C D A B C V G H I@2 G H I@2 G H
  I@2 G H I@2 J K L@2 J K L@2 N O W X Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z Y Z
>`.pickRestart({
  A: "~ d3 b3 b3@2 d4@2 g3", B: "~ a3 b3 d4@2 e4@2 g3", C: "~ b3 d4 f#4@2 a3@2 e3", D: "~ d3 a3 d4@2 c#4 b3@2",
  E: "~@3 [d4,f#4,b4] ~@3 [d4,f#4,b4]", F: "~@3 [b3,d4,g4] ~@3 [c#4,e4,a4]", G: "~ [d4,f#4,b4] ~ [d4,f#4,b4]",
  H: "~ [d4,f#4,b4] [a3,d4]!2", I: "~ [c#4,e4,a4] ~ [c#4,e4,a4]", J: "[f#4,b4,d5]@2 c#5 a4",
  K: "[g3,b3,d4] [a3,c#4,e4], f#4", L: "[[f#4,b4,d5]@2 [f#4,b4,d5] [a4,c#5,e5], f#5]/2",
  M: "[[f#4,b4,d5]@2 [g4,b4,d5] [a4,c#5,e5], f#5]/2", N: "d5 f#5, [f#4,b4]", O: "[b4,d5,e5] [c#5,e5,a5]",
  P: "~ f#4, [d5,f#5,b5]", Q: "[b3,d4,e4] [c#4,e4,a4]", R: "~ f#5, [d4,f#4,b4]", S: "[d4,g4,b4] [a4,c#5,e5]",
  T: "~ a5, [f#4,b4,d5]", U: "[b4,d5] [a4,c#5,e5], b5", V: "[e3,a3,d4] ~ [e3,a3,c#4]@6", W: "[d5,f#5,b5]",
  X: "[g3,b3,d4] [a3,c#4,e4]", Y: "~ [d4,f#4,b4] ~ [d4,f#4,b4] ~ [d4,f#4,b4] ~ [d4,f#4,b4]",
  Z: "~ [b3,d4,g4] ~ [b3,d4,g4] ~ [c#4,e4,a4] ~ [c#4,e4,a4]", // G A
})).s("gm_distortion_guitar").gain(0.28).pan(0.3)

// chords · pad poly · "Synth"
const pad_poly = note(`<
  ~@44 A B C@2 A B D@2 ~@28 A B C@2 A B D@2 E F G H I J K L ~@28 A B C@2 A B C@2 E F M N ~@32
>`.pickRestart({
  A: "[f#4,b4,d5]@2 c#5 a4", B: "[g3,b3,d4] [a3,c#4,e4], f#4", C: "[[f#4,b4,d5]@2 [f#4,b4,d5] [a4,c#5,e5], f#5]/2",
  D: "[[f#4,b4,d5]@2 [g4,b4,d5] [a4,c#5,e5], f#5]/2", E: "d5 f#5, [f#4,b4]", F: "[b4,d5,e5] [c#5,e5,a5]",
  G: "~ f#4, [d5,f#5,b5]", H: "[b3,d4,e4] [c#4,e4,a4]", I: "~ f#5, [d4,f#4,b4]", J: "[d4,g4,b4] [a4,c#5,e5]",
  K: "~ a5, [f#4,b4,d5]", L: "[b4,d5] [a4,c#5,e5], b5", M: "[d5,f#5,b5]", N: "[g3,b3,d4] [a3,c#4,e4]",
})).s("gm_pad_poly").gain(0.32).pan(1)

// bass · lead 8 bass lead · "Synth Bass"
const bass = note(`<
  A B C D A B C D ~@36 E F E F E F E ~@29 E F E F E F E F E F E F E F E F A B C D A B C D A B C ~@17 E F E F E F E F E F
  E F ~@32
>`.pickRestart({
  A: "[b1,b2]", B: "[f#1,f#2]", C: "[e1,e2]", D: "[a1,a2]", E: "b1", F: "g1 a1",
})).s("gm_lead_8_bass_lead").gain(0.5).pan(0)

// bass · electric bass finger · "Bass"
const bass_2 = note(`<
  A B C D A B C D E F E F E F E G E F E F E F E F E F E F E F E H I J K L I J K L I J K L M N M N M N M O E F E F E F E
  F E F E F E F E H I J K L I J K L I J K L M N M N M N M N M N M N M N M N A B C D A B C D P Q R S I J K L I J K L I J
  K L I J K L M N M N M N M N M N M T E N E N E N E N E N E N E N E N E N E N E N E N E N E N E N E N
>`.pickRestart({
  A: "[b1,b2]", B: "[f#1,f#2]", C: "[e1,e2]", D: "[a1,a2]", E: "b1!2 d2 b1 f#2!2 e2 d2", F: "g1!2 g2 g1 a1!2 a2 a1",
  G: "g1!2 g2 g1 f#2 e2 d2 e2", H: "g1!2 g2 g1 f#2 e2 d2 c#2", I: "b1!2 ~ a1 b1!2 ~ a1", J: "b1!2 ~ d2!3 ~ e2",
  K: "a1!2 ~ a1!3 ~ a1", L: "c#2!2 b1 c#2 d2 a1!3", M: "b1!8", N: "g1!4 a1!4", O: "g1 g2 f#2 e2!2 d2 c#2 a1",
  P: "b2!4, b1", Q: "f#2!4, f#1", R: "e2!4, e1", S: "[a1,a2] ~ [a1,a2]@3 a2 b2 ~", T: "g1@2 g1 e1 a1@2 a1@2",
})).s("gm_electric_bass_finger").gain(0.8).pan(0.7)

// drums · kick
const kick = s("bd").struct("<~@8 A@23 ~ A@12 B@2 C B@3 C@2 A@15 ~ A@27 ~@13 A@16 ~@12 A@32>".pickRestart({
  A: "~ x", B: "x!2", C: "x",
})).gain(0.8)

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

// drums · low tom
const low_tom = s("lt").struct("<~@2 A B ~@2 C D ~@15 E ~@20 F ~@53 A B ~@2 C D ~@31 G ~@32>".pickRestart({
  A: "~@10 x!3 ~ x ~", B: "~@7 x", C: "~@12 x!4", D: "x ~@9 x!4 ~@2", E: "~@5 x!3", F: "x!2", G: "~@15 x",
})).gain(0.8)

// drums · hihat
const hihat = s("hh").struct("<~@8 A@7 B A@15 C D@12 A@15 E A@7 C D@12 F@15 G ~@8 D@3 H D@16 I@11 J D@32>".pickRestart({
  A: "x!4", B: "x!3 ~", C: "x!2 ~@2", D: "x!8", E: "x ~ x ~ x!4", F: "x!3 ~ x!3 ~", G: "x!3 ~@5", H: "x", I: "x!16",
  J: "x!8 ~@8",
})).gain(0.8)

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

// drums · open hat
const open_hat = s("oh").struct("<~@8 A@7 B A@15 B ~@20 A@7 B A@7 B ~@12 C@15 D ~@72>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~@4", C: "~@3 x ~@3 x", D: "~@3 x ~@4",
})).gain(0.8)

// drums · high tom
const high_tom = s("ht").struct(`<
  ~@3 A ~@3 B ~@15 C ~@11 D ~@9 E@2 ~ F E@2 ~@20 D ~@27 A ~@3 B ~@31 G ~@32
>`.pickRestart({
  A: "~@2 x!3 ~ x ~ x ~@7", B: "~@2 x!4 ~@10", C: "~@5 x!3", D: "~@8 x ~@2 x!4 ~", E: "x", F: "~ x", G: "~@8 x!4 ~@4",
})).gain(0.8)

// drums · crash
const crash = s("cr").struct(`<
  A@9 ~@6 B ~@19 B ~@10 A ~@3 A ~@12 C ~@4 D E D F D E D@3 G H D ~@16 A@9 ~ I J D E D@3 G H D@2 E D@3 G H D ~ A@11 ~@32
>`.pickRestart({
  A: "x", B: "~@7 x", C: "~@5 x ~@2", D: "~ x ~ x", E: "~ x!3", F: "~@2 x ~@3 x!2", G: "~ x ~ x ~@2 x ~",
  H: "~@4 x ~@6 x!2 ~@3", I: "~ x", J: "x ~@2 x",
})).gain(0.8)

stack(distortion_guitar, pad_poly, bass, bass_2, kick, snare, low_tom, hihat, mid_tom, open_hat, high_tom, crash)