// Working Man — Rush
// 150 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 115 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 A C A B A C A B A C A D A E A D A E F@2 G@2 H I A D A E A D A E A B A C A B A C A D A E A D A E F@2 G@2 H I J K J
  K J K J L M@2 N@2 O@2 P@2 Q R D A E A D A E A B A C A B A C A D A E A D A E F@2 G@2 H I A D A E A D A E S@3 T
>`.pickRestart({
  A: "[b2,e3]@3 [b2,e3] [b2,e3]@2 [b2,e3]@2", B: "d4 a3", C: "c4@4 c4 d4@3", D: "[a3,d4] [e3,a3]", E: "[g3,c4] [a3,d4]",
  F: "e4 b3 e4 b3", G: "d4 a3 d4 a3", H: "g3 d4 g3 d4", I: "a3@2 e4@2 e3 b3 a3 e4",
  J: "e3@2 e3@2 e3 d3 b2@2 e3@2 e3@2 e3 d3 b2@2", K: "e3 d3 b2 g3@3 e3 d3", L: "e3 d3 e2 g2@3 e2@2", M: "[g#3,b3,e4]/2",
  N: "[[g#3,d4,e4]@3 [g#3,d4,e4]]/2", O: "[[g#3,c#4,e4]@3 [g#3,c#4,e4]]/2", P: "[[g#3,b3,e4]@3 [g#3,b3,e4]]/2",
  Q: "~@4 [e3,b3]!4", R: "[e3,b3,e4] ~ [e3,b3,e4] ~ [e3,b3,e4] ~ [e3,b3,e4] ~", S: "[~ e3@2, [g#3,d4,e4]]/3",
  T: "[g#3,d4,e4] ~@3, e3", // E7
})).s("gm_distortion_guitar").gain(0.36).pan(0.3)

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

// drums · kick
const kick = s("bd").struct("<~@14 A@6 ~@6 A@24 ~@6 B@16 C ~@2 A@22 D@4 E@2 A@7 ~@5>".pickRestart({
  A: "~@2 x!2 ~@4", B: "~ x ~@3 x ~@2", C: "~ x ~@6", D: "x!8", E: "x!16",
})).gain(0.8)

// drums · snare
const snare = s("sd").struct("<~@14 A@6 B@2 ~@4 A@24 C@2 ~@4 D@16 E F ~ A@35 ~@3 G ~>".pickRestart({
  A: "~ x", B: "x!2", C: "x!2 ~@2 x!2 ~@2", D: "~ x ~ x", E: "~@2 x ~ x!4", F: "x!8", G: "~@11 x!5",
})).gain(0.8)

// drums · low tom
const low_tom = s("lt").struct("<~@22 A@2 ~ B ~@26 C ~ D E ~@56 F ~@2>".pickRestart({
  A: "~ x ~ x", B: "x!2 ~@6", C: "x!16", D: "x!4 ~@12", E: "x!3 ~@13", F: "~@12 x!4",
})).gain(0.8)

// drums · hihat
const hihat = s("hh").struct("<~@4 A@9 B C@6 ~@6 C@24 ~@6 D@17 ~@2 C@35 ~@5>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "x!8", D: "x!4",
})).gain(0.8)

// drums · mid tom
const mid_tom = s("mt").struct("<~@13 A ~@6 B@2 C@2 D E ~@17 A ~@5 F G@2 ~ H I J ~@34 A ~@20 K L M ~>".pickRestart({
  A: "~@6 x!2", B: "~ x ~ x", C: "x!2", D: "x!8", E: "~@2 x!3 ~ x ~", F: "~@12 x!4", G: "~@2 x!2 ~@2 x!2", H: "x!16",
  I: "~@4 x!12", J: "~@3 x!6 ~@7", K: "x ~ x!11 ~ x ~", L: "x!4 ~@4 x!4 ~@4", M: "~@3 x!2 ~@2 x!4 ~@5",
})).gain(0.8)

// drums · open hat
const open_hat = s("oh").struct("<~@56 [~ x ~ x ~ x ~ x]!17 ~@42>").gain(0.8)

// drums · high tom
const high_tom = s("ht").struct("<~@13 A ~@11 B ~@17 C ~@5 C ~@5 D ~@24 E ~@9 C ~@21 F G ~>".pickRestart({
  A: "~@8 x!4 ~@4", B: "~@5 x ~ x", C: "~@4 x!2 ~@2", D: "~@9 x!6 ~", E: "~@6 x!2", F: "~@2 x!2 ~@4",
  G: "~ x!2 ~@2 x!2 ~@9",
})).gain(0.8)

// drums · crash
const crash = s("cr").struct("<~@19 A ~@6 B ~@25 C D C E ~@18 F ~@6 B ~@20 G ~@7 F H I ~ B>".pickRestart({
  A: "~@3 x", B: "x", C: "x!2 ~@2 x!2 ~@2", D: "x!2 ~@6", E: "x ~ x ~@12 x", F: "x!2", G: "~@15 x", H: "x ~@3 x!2 ~@2",
  I: "~ x ~ x",
})).gain(0.8)

// drums · ride
const ride = s("rd").struct("<~@53 [~@4 x!2 ~@2] ~@48 [~@15 x] ~@9 [~@3 x] x ~>").gain(0.8)

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