// Substitute — The Who
// 130 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 33, 4/4 at bar 34, 2/4 at bar 61, ...) are rendered on a constant 4/4 grid of one bar per cycle
// note: Full arrangement: all 126 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(130/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · acoustic guitar steel · "12-String"
const acoustic_guitar_steel = note(`<
  A@4 B@5 C B@3 C B@2 D@8 E F G H G H G H G I@2 J K L B@2 K L B M N@7 O P@2 Q R Q R Q R Q S@2 T U V@2 T U V W D@8 E X
  Y@6 Z@3 J K L B@2 K L B AA@2 AB@6 AC AD AE Q R Q R Q R Q R Q R Q R Q R Q AF@2
>`.pickRestart({
  A: "[[d3,a3,d4,f#4]@2 [d3,a3,d4,f#4]@2 [d3,a3,c#4,e4]@3 [d3,a3,b3,g4]@2 [d3,a3,b3,g4]@2 [d3,a3,d4,f#4] [d3,a3,d4,f#4]@4]/2", // D A G D
  B: "~@2 [d3,a3,d4,f#4] ~@3 [d3,a3,d4,f#4] ~", C: "~@2 [g2,b2,d3,g3,b3,g4] ~@3 [g2,b2,d3,g3,b3,g4] ~",
  D: "e2@4 e3@4 g2@4 a2 b2 d3@2", E: "[a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]@2 ~ [a2,f#3,a3,d4,e4]!3",
  F: "[a2,e3,a3,c#4,e4]", G: "[d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~ [d3,a3,c#4,e4]@3 [d3,a3,b3,g4]",
  H: "~@2 [d3,a3,b3,g4]@2 ~@2 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4]@8", // G D
  I: "[~@2 [d3,a3,b3,g4]@2 ~@2 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4]@24]/2", J: "~@6 [d3,a3,d4,f#4] ~",
  K: "~@2 [d3,a3,d4,f#4] ~@3 [g2,b2,d3,g3,b3,g4] ~", L: "~@2 [g2,b2,d3,g3,b3,g4] ~@3 [d3,a3,d4,f#4] ~",
  M: "~@2 [d3,a3,d4,f#4] ~ e2@2 e3@2", N: "g2@4 a2 b2 d3@2 e2@4 e3@4",
  O: "g2@4 a2 b2 d3@2 [a2,e3,a3,c#4,e4]@4 [a2,e3,a3,c#4,e4]@4", // A
  P: "[~ [a2,f#3,a3,d4,e4]!3 [a2,e3,a3,c#4,e4]@8 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~]/2", // D A D
  Q: "[d3,a3,c#4,e4]@6 [d3,a3,b3,g4]@2 ~@2 [d3,a3,b3,g4]@2 ~@2 [d3,a3,d4,f#4] ~", // A G D
  R: "[d3,a3,d4,f#4]@4 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~", S: "[[d3,a3,d4,f#4]@3 ~]/2",
  T: "[d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~@2 [d3,a3,d4,f#4]!3", // D
  U: "[g2,b2,d3,g3,b3,g4] ~ [g2,b2,d3,g3,b3,g4] ~@2 [g2,b2,d3,g3,b3,g4]!3", // G
  V: "[d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~@2 [g2,b2,d3,g3,b3,g4]!3", W: "[d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~@5",
  X: "[a2,e3,a3,c#4,e4]!8", // A
  Y: "[[d3,g3,d4,f#4,a4]@2 ~@2 [d3,g3,d4,f#4,a4]@2 ~@2 [a2,e3,a3,c#4,e4]@6 [g2,b2,d3,g3,b3,g4]@4 [g2,b2,d3,g3,b3,g4]@2 ~@2 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4]@8]/2", // D A G D
  Z: "[[d3,g3,d4,f#4,a4]@2 ~@2 [d3,g3,d4,f#4,a4]@2 ~@2 [a2,e3,a3,c#4,e4]@6 [g2,b2,d3,g3,b3,g4]@4 [g2,b2,d3,g3,b3,g4]@2 ~@2 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4]@24]/3", // D A G D
  AA: "[~@2 [d3,a3,d4,f#4] ~ [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]@3 [g2,b2,d3,g3,b3,g4] [d3,a3,d4,f#4]!2 [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]@2]/2", // D Em G D Em
  AB: "[[g2,b2,d3,g3,b3,g4]!2 [d3,a3,d4,f#4]!2 [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]@3 [g2,b2,d3,g3,b3,g4] [d3,a3,d4,f#4]!2 [e2,b2,e3,g3,b3,e4]@2 [e2,b2,e3,g3,b3,e4]@2]/2", // G D Em G D Em
  AC: "[g2,b2,d3,g3,b3,g4]!2 [d3,a3,d4,f#4]!2 [a2,e3,a3,c#4,e4]@2 [a2,e3,a3,c#4,e4]@2", // G D A
  AD: "[a2,e3,a3,c#4,e4] [d3,a3,d4,f#4] [d3,a3,d4,f#4]@2 [a2,g3,c#4,e4]@4", // A D A7
  AE: "[a2,g3,c#4,e4]@2 [a2,g3,c#4,e4]@2 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4] ~", AF: "[d3,a3,d4,f#4]/2",
})).s("gm_acoustic_guitar_steel").gain(0.48)

// chords · electric guitar clean · "Guitar 2"
const electric_guitar_clean = note(`<
  ~@3 A B C B C D E B C D E B C F@8 G H I@7 J@2 K L M N O L M N P Q@7 R S T I@6 U@3 V@6 W X F@8 G H ~@4 Y@2 Z@4 L M N O
  L M N P Q@7 R S T I@14 AA@3
>`.pickRestart({
  A: "~@5 a2 b2 d3", B: "d3@2 b2 d3 d3@2 b2 d3", C: "d3 a2 b2 d3!2 a2 b2 d3", D: "d3@2 b2 d3 d3@2 b2!2",
  E: "g2@2 g2!2 d3 a2 b2 a2", F: "e2@4 e2@2 e2@2 g2@4 a2 b2 d3@2", G: "[a2,e3]!4 [a2,f#3]!4", H: "[a2,e3]!8",
  I: "[d3,a3,d4]!8", J: "[[d3,a3,d4]!3 [d3,a3,d4]@13]/2", K: "~@4 d3@2 b2 d3", L: "d3@2 b2!2 g2@2 g2!2",
  M: "d3 a2 b2 a2 d3@2 b2 d3", N: "d3@2 b2 d3!2 a2 b2 d3", O: "d3 a2 b2 d3 d3@2 b2 d3", P: "d3 a2 b2 d3 e2@2 e2!2",
  Q: "g2@4 a2 b2 d3@2 e2@4 e2@2 e2@2", R: "g2@4 a2 b2 d3@2 [a2,e3]@2 [a2,e3]@2 [a2,e3]@2 [a2,e3]@2",
  S: "[a2,f#3]!4 [a2,e3]!4", T: "[a2,e3]!4 [d3,a3,d4]!4", U: "[[d3,a3,d4]!7 [d3,a3,d4]@13 ~@4]/3", V: "g4!4", W: "g4!2",
  X: "g4", Y: "[[d3,a3,d4] ~ [d3,a3,d4] ~ [d3,a3,d4]@3 [d3,a3,d4]@2 [d3,a3,d4]@2 [d3,a3,d4] [d3,a3,d4]@4]/2",
  Z: "[[d3,a3,d4] ~ [d3,a3,d4] ~ [d3,a3,d4]@3 [d3,a3,d4]@2 [d3,a3,d4]@2 [d3,a3,d4] [d3,a3,d4]@13 a2 b2 d3 d3@2 b2 d3]/4", // D5
  AA: "[[d3,a3,d4]!7 [d3,a3,d4]@17]/3", // D5
})).s("gm_electric_guitar_clean").gain(0.36)

// bass · electric bass finger · "Bass"
const bass = note(`<
  ~@3 A B C B C D E B C D E B C F@8 G@2 H@7 I@3 J K L M J K L N O@7 P G Q H@7 R S T U T@3 U T@2 F@8 G@2 ~@4 V@2 W@4 J K
  L M J K L N O@7 P G Q H@15 X@2
>`.pickRestart({
  A: "~@5 a1 b1 d2", B: "d2@2 b1 d2 d2@2 b1 d2", C: "d2 a1 b1 d2!2 a1 b1 d2", D: "d2@2 b1 d2 d2@2 b1!2",
  E: "g1@2 g1!2 d2 a1 b1 a1", F: "e1@2 e1@2 e1@2 e1@2 g1@2 g1@2 a1 b1 d2@2", G: "a1!8", H: "d2!8",
  I: "[d2!4 d2@13 a1 b1 d2 d2@2 b1 d2]/3", J: "d2@2 b1!2 g1@2 g1!2", K: "d2 a1 b1 a1 d2@2 b1 d2",
  L: "d2@2 b1 d2!2 a1 b1 d2", M: "d2 a1 b1 d2 d2@2 b1 d2", N: "d2 a1 b1 d2 e1!4",
  O: "g1@2 g1@2 a1 b1 d2@2 e1@2 e1@2 e1@2 e1@2", P: "g1@2 g1@2 a1 b1 d2@2 a1@2 a1@2 a1@2 a1@2", Q: "a1!4 d2!4",
  R: "d2@2 ~@2 d1!2 ~@2", S: "d1!2 ~@4 a1@2", T: "d1!2 g1 d1 f#1 d1 g1 f#1", U: "g1!2 c2 g1 b1 g1 c2 b1",
  V: "[d1@2 ~@2 d1@2 ~@2 d1@6 g1@4 g1@4 g1 ~ d1@8]/2",
  W: "[d1@2 ~@2 d1@2 ~@2 d1@6 g1@4 g1@4 g1 ~ d1@26 a1@2 b1@2 d2@2 d2@4 b1@2 d2@2]/4", X: "d2/2",
})).s("gm_electric_bass_finger").gain(0.43)

// drums · kick
const kick = s("bd").struct(`<
  ~@3 A B C B D B C B D B C B E B C B F B C B G B C B F B C B G B@2 C H B I C J B I K L B I C I B I M N B I O H B I O H
  C B G P D Q@2 G D F A B C B D B C B A B G B F B P B D B R C J B I C I B I K N B I M N B I C I B I O H B I C I B I C I
  B I M N B C S
>`.pickRestart({
  A: "x!2 ~ x ~ x ~ x", B: "x ~@2 x!2 ~@2 x", C: "x ~@2 x!3 ~ x", D: "x!2 ~ x!3 ~ x", E: "~@7 x", F: "~ x ~@6",
  G: "x!2 ~ x ~@4", H: "~@4 x ~@2 x", I: "x!2 ~ x!2 ~@2 x", J: "~ x ~ x!2 ~@2 x", K: "x ~@2 x ~@4",
  L: "~ x ~@6 x ~@5 x ~", M: "x ~@2 x ~ x!2 ~", N: "x!2 ~@2 x ~@2 x", O: "x ~@2 x ~ x ~@2", P: "~@9 x ~@6",
  Q: "~ x!2 ~ x!2 ~@2", R: "~ x!2 ~ x ~@2 x", S: "~ x ~ x ~@2 x ~",
})).gain(0.46)

// drums · snare
const snare = s("sd").struct(`<
  ~@3 A B@3 C B@3 C B@3 D B@3 E B@3 F B@3 E B@3 F B@3 G B@3 H B@2 I J B@2 K L B@2 M N B@2 M O B@2 M O B@2 F P C Q@2 F C
  E A B@3 C B@3 A B F B E B P B C B R B H B@2 K L B@2 S B@3 M N B@2 K L B@2 M O B@2 K L B@2 K L B@2 M N B@2 T
>`.pickRestart({
  A: "~ x!3", B: "~ x ~ x", C: "~@2 x!6", D: "x!14 ~@2", E: "x ~@2 x ~@2 x!2", F: "~@4 x ~@3 x!5 ~ x ~",
  G: "x!5 ~ x ~@5 x ~@3", H: "x!2 ~ x", I: "~@4 x ~@3 x!2 ~ x!2 ~ x!2", J: "~@2 x!3 ~@7 x ~@3", K: "~@2 x ~@3 x!2",
  L: "x!4 ~@2 x ~", M: "~@2 x ~ x ~@2 x", N: "~@3 x ~@2 x ~", O: "~@2 x!2 ~@2 x ~", P: "x!2 ~ x!2 ~ x!2 ~@2 x!3 ~@3",
  Q: "x ~@2 x ~@3 x", R: "x ~@2 x ~@2 x ~", S: "~@4 x ~@3 x!3 ~ x ~ x ~", T: "x ~ x!2 ~@4",
})).gain(0.52)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@7 A ~@3 A ~@22 B ~@8 C ~@2 D E ~@2 B F ~@11 G A H@2 ~ A ~@5 A ~@9 G ~ A ~@6 D E ~@7 F ~@2 G E ~@6 G E ~@2 G E ~@3 F
  ~@3
>`.pickRestart({
  A: "~@3 x!5", B: "~ x ~@6", C: "~@3 x ~@4", D: "~ x ~@5 x", E: "x!4 ~@4", F: "~ x ~@2", G: "~@7 x", H: "~@3 x",
})).gain(0.46)

// drums · low tom · soft notes
const low_tom_soft = s("lt").struct(`<
  ~@7 A ~@3 A ~@34 B ~@17 A ~@3 A ~@5 A ~@11 A ~@6 B ~@11 B ~@7 B ~@3 B ~@8
>`.pickRestart({
  A: "~ x ~@2", B: "~@3 x",
})).gain(0.26)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@3 A B@9 C D ~ B@3 E B C B F B@3 G B C B A B@2 H I B@2 J I B K L M B@6 N O B K P I B K P I Q B R S B E@2 R B E F B@7
  R B R B G B T B@3 I J I B@2 U B@2 K N I B@2 N O B V B@4 P I B@9 V P I B@2 ~
>`.pickRestart({
  A: "x!2 ~ x ~@4", B: "x!8", C: "x!7 ~", D: "x!3 ~ x ~ x ~ x ~@3 x ~ x ~", E: "~@5 x ~@2", F: "x!2 ~@3 x ~@2",
  G: "~@3 x ~@4", H: "x ~ x!4 ~@2", I: "~@4 x!4", J: "x!6 ~@2", K: "x!3 ~ x!4", L: "x!5 ~ x ~", M: "x ~ x ~ x!4",
  N: "x!4 ~@4", O: "~ x ~@2 x!4", P: "x!4 ~@3 x", Q: "x!6 ~ x", R: "x!2 ~@6", S: "x!4", T: "x ~ x!3 ~ x ~",
  U: "x ~ x!6", V: "x ~ x ~ x ~@3 x!3 ~ x ~ x ~",
})).gain(0.46)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@19 A ~@7 A ~@15 B ~@6 C D ~@3 E ~@3 E ~@3 F ~ G@2 ~@2 A ~@12 A ~ F ~@3 H ~@12 C D ~@7 E ~@10 C D ~@3
>`.pickRestart({
  A: "~@4 x!2 ~@2", B: "~@5 x ~@10", C: "~@7 x", D: "~ x ~@2", E: "x!2 ~@6", F: "~@13 x ~@2", G: "~@3 x ~@2 x ~",
  H: "~@3 x ~@4",
})).gain(0.52)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@3 A ~@2 B ~@6 C D ~@6 C ~ A ~@5 C ~ A ~@2 E ~@2 F G ~@2 H ~@11 I J ~@2 H ~@2 E ~ A ~@4 A ~@2 A ~@6 B A ~ A ~@8 E ~@6
  H ~@7 H J ~@14 H J ~@4
>`.pickRestart({
  A: "~ x ~@2", B: "~ x ~@13 x", C: "~@7 x", D: "~@10 x ~@4 x", E: "~@3 x", F: "~@9 x ~@6", G: "~@7 x ~@4 x ~@3",
  H: "~@3 x ~@4", I: "~@6 x ~@2 x ~@6", J: "~@7 x ~@8",
})).gain(0.39)

// drums · high tom
const high_tom = s("ht").struct(`<
  ~@19 A ~@7 A ~@22 B ~@3 C ~@3 C ~@6 D@2 ~@2 A ~@12 A ~@5 D ~@12 B ~@7 C ~@11 B ~@4
>`.pickRestart({
  A: "~ x ~@2", B: "~ x", C: "~@3 x", D: "x",
})).gain(0.46)

// drums · crash
const crash = s("cr").struct(`<
  ~@4 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@2 B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~ A ~@9 A ~@3 A ~@3 A ~ A ~
  A ~ A ~ A B ~ B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~ A C
>`.pickRestart({
  A: "x", B: "~ x", C: "~@3 x ~@4",
})).gain(0.46)

// drums · tambourine
const tambourine = s("tb").struct(`<
  ~@7 A ~@3 A ~@34 B C ~@16 A ~@3 A ~@5 A ~@11 A ~@6 B C ~@10 B C ~@6 B C ~@2 B C ~@7
>`.pickRestart({
  A: "x!8", B: "~@4 x!4", C: "x!4 ~@4",
})).gain(0.52)

// drums · cabasa
const cabasa = s("cabasa:4").struct(`<
  ~@7 A ~@3 A ~@34 B C ~@16 A ~@3 A ~@5 A ~@11 A ~@6 B C ~@10 B C ~@6 B C ~@2 B C ~@7
>`.pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~@5 x ~ x", C: "~ x ~ x ~@4",
})).gain(2)

// drums · shaker
const shaker = s("sh").struct(`<
  ~@7 A ~@3 A ~@34 B C ~@16 A ~@3 A ~@5 A ~@11 A ~@6 B C ~@10 B C ~@6 B C ~@2 B C ~@7
>`.pickRestart({
  A: "x!4", B: "~@2 x!2", C: "x!2 ~@2",
})).gain(0.52)

stack(
  acoustic_guitar_steel, electric_guitar_clean, bass, kick, snare, low_tom, low_tom_soft, hihat, mid_tom, open_hat,
  high_tom, crash, tambourine, cabasa, shaker
)