// They Don't Know — Tracey Ullman
// 125 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 83 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(125/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 · "Bass"
const bass = note(`<
  ~@2 A B A C A C D E A C F G C G H C I J K A@2 B D E A L M G C G A C I J K A N O P Q R S C T U A C H B A C T U A C F E
  A C F G C G V C I J K V C W V B I J K A X V Y Z
>`.pickRestart({
  A: "c2@4 ~@2 c2 ~ c2@5 ~ c2 ~", B: "f2@6 f2 ~ f2 ~ f2@3 ~ f2 ~", C: "f2@4 ~@2 f2 ~ f2@5 ~ f2 ~",
  D: "d2@6 a1@2 d2 ~ d2@2 ~@2 d2 ~", E: "g2@6 g2 ~ g2 ~ g2@3 ~ g2 ~", F: "d2@6 d2 ~ d2 ~ d2@3 ~ d2 ~",
  G: "g2@4 ~@2 g2 ~ g2@5 ~ g2 ~", H: "c2@6 g1@2 c2 ~ c2@2 ~@2 c2 ~", I: "c2@5 ~ c2 ~ d2@5 ~ d2 ~",
  J: "e2@4 ~@2 e2 ~ e2@5 ~ e2 ~", K: "f2@5 ~ f2 ~ d2@5 ~ d2 ~", L: "f2@6 c2@2 f2 ~ f2@2 ~@2 f2 ~",
  M: "d2@4 ~@2 d2 ~ d2@5 ~ d2 ~", N: "a1@5 ~ a1 ~ a1@5 ~ a1 ~", O: "a#1@5 ~ a#1 ~ a#1@5 ~ a#1 ~",
  P: "f2@5 ~ f2 ~ f2@5 ~ f2 ~", Q: "g2@5 ~ g2 ~ g2@5 ~ g2 ~", R: "a1@4 ~@2 a1 ~ a1@5 ~ a1 ~",
  S: "a#1@4 ~@2 a#1 ~ a#1@5 ~ a#1 ~",
  T: "[b1,d2,f#2] ~ [b1,d2,f#2] ~ [b1,d2,f#2] ~ f#2 ~ f#2 ~ [b1,d2,f#2] ~ [b1,d2,f#2] ~ f#2!2", // Bm
  U: "[b1,d2,f#2] ~ [b1,d2,f#2] ~ [b1,d2,f#2] ~@11", V: "c2@6 c2 ~ c2 ~ c2@3 ~ c2 ~", W: "g2@6 d2@2 g2 ~ g2@2 ~@2 g2 ~",
  X: "f2@5 ~ f2 ~ a#1@5 ~ a#1 ~", Y: "f2@5 ~ f2 ~ a#1@2 ~ a#1 ~@2 a#1 ~", Z: "c2@11 ~@5",
})).s("gm_fretless_bass").gain(0.48)

// chords · piano
const piano = note(`<
  ~@2 A B C D A E F G H I J K L K A I M N O H@2 P Q R S T U K L R A E V W X Y Z AA AB AC AD AE D AF AG AH I AI T H T AJ
  AK AH D J R H P AL AM B AN Y T AO AP AQ A I K AI P AR AS AT H AU Y AV AW
>`.pickRestart({
  A: "[g3,c4,e4]@3 ~@3 g4 c5, ~@3 c3@5, ~ c4, ~@5 e4@3", B: "[a3,c4,f4]@7 ~", C: "[g3,c4,e4]@9 ~ c3@2 [g3,c4,e4]@3 ~",
  D: "[a3,c4,f4]@3 ~@3 c5 f5, ~@3 f3@5, ~ f4, ~@5 a4@3", E: "[a3,c4,f4]@12 f4 a4 c5 f5", F: "[a3,d4,f4]@7 ~",
  G: "[g3,b3,d4]@3 ~@3 d4 g4, ~@3 g2@5, ~ g3, ~@5 b3@3", H: "~@5 g4 e4 c4, [g3,c4,e4]@3 ~",
  I: "[a3,c4,f4]@9 ~ f3@2 [a3,c4,f4]@3 ~", J: "~@5 a4 f4 d4, [a3,d4,f4]@3 ~", K: "[g3,b3,d4]@9 ~ g2@2 [g3,b3,d4]@3 ~",
  L: "~@10 f4@4 a4 ~, [a4,c5]@15 ~, f4@5 ~@3, f3!2, ~@6 f2@9 ~", // Am
  M: "[g3,c4,e4] ~ [g3,c4,e4] ~ [a3,d4,f4] ~ [a3,d4,f4] ~, ~ c3@2 ~@2 d3@2 ~", // C Dm
  N: "~@10 e4@4 g4 ~, [g4,b4]@15 ~, e4@5 ~@3, e3!2, ~@6 e2@9 ~", O: "[a3,c4,f4]@8 [a3,d4,f4]@6 f4 a4",
  P: "[f4,a4,c5]@7 f4@2 ~@3 a4@2 c5 ~, f2@7 ~, ~@7 c5@7 ~@2, ~@7 a4@5 ~@4, ~@5 f4@2 ~", // F
  Q: "[a3,d4,f4]@9 ~ d3@2 [a3,d4,f4]@3 ~", R: "[g3,b3,d4]@12 g3 b3 d4 g4",
  S: "[c4,e4,g4]@7 c4@2 ~@3 e4@2 g4 ~, c2@7 ~, ~@7 g4@7 ~@2, ~@7 e4@5 ~@4, ~@5 c4@2 ~", // C
  T: "~@5 c5 a4 f4, [a3,c4,f4]@3 ~", U: "[a3,d4,f4]@12 d4 f4 a4 d5",
  V: "c4@2 ~@2 e4@2 g4 ~ [a3,d4,f4]@2 ~@2 [a3,d4,f4]@2 ~@2, g3@7 ~@3 d3@4 ~@2, e4 ~@3, ~@2 c4@5 ~@9", // Dm
  W: "[g3,b3,e4]@9 ~ e3@2 [g3,b3,e4]@3 ~", X: "[a3,c4,f4]@4 [a3,d4,f4] ~ [a3,d4,f4] ~, ~@5 d3@2 ~",
  Y: "~@10 c4@4 e4 ~, [e4,g4]@15 ~, c4@5 ~@3, c3!2, ~@6 c2@9 ~", // Em
  Z: "[a3,c4,e4]@6 c4 e4 a3@2 ~@2 c4@2 e4 ~, ~@4 e4@3 ~, ~@2 c4 ~, ~@10 a3@5 ~", // Am
  AA: "a#3@2 ~@2 d4@2 f4 ~ [a#3,d4,f4]@6 d4 f4, f4@3 ~@5, d4 ~@3, ~@2 a#3@5 ~@9", // A#
  AB: "[a3,c4,f4]@6 a4 c5 [a3,c4,f4]@2 ~@2 [a3,c4,f4]@2 ~@2, ~@5 f3@2 ~", // F
  AC: "g3@2 ~@2 b3@2 d4 ~ g3@2 ~@2 b3@2 d4 ~, d4@3 ~ d4@3 ~, b3 ~ b3 ~, ~@2 g3@5 ~@3 g3@5 ~",
  AD: "e4@5 e4 c4 a3, [a3,c4]@3 ~", AE: "f4@5 f4 d4 a#3, [a#3,d4]@3 ~",
  AF: "[g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~@5 [g3,b3,d4] ~ [g3,b3,d4]@3 ~", // G
  AG: "[g3,b3,d4]@2 [g3,b3,d4]@2 [g3,b3,d4]@11 ~", AH: "[g3,c4,e4]@7 ~", AI: "[g3,c4,e4]@12 c4 e4 g4 c5",
  AJ: "[g3,b3,d4]@2 [g3,b3,d4]@2 [g3,b3,d4]@6 [g3,b3,d4]@2 [g3,b3,d4]@3 ~", // G
  AK: "[g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~@11", AL: "[a3,d4,f4]@3 ~@3 a4 d5, ~@3 d3@5, ~ d4, ~@5 f4@3",
  AM: "[g4,b4,d5]@7 g4@2 ~@3 b4@2 d5 ~, g2@7 ~, ~@7 d5@7 ~@2, ~@7 b4@5 ~@4, ~@5 g4@2 ~", // G
  AN: "g2@8 ~@2 g3@4 b3 ~, [b3,d4]@15 ~, g3@5 ~@3, ~@8 g2@7 ~", AO: "[g3,c4,e4] [a3,d4,f4]",
  AP: "~@5 b4 g4 e4, [g3,b3,e4]@3 ~", AQ: "[a3,c4,f4]@6 a4 c5 d4@2 ~@2 f4@2 a4 ~, ~@8 a3@7 ~, ~@2 f4 ~, ~@10 d4@5 ~",
  AR: "[g3,c4,e4]@6 e4 g4 [a3,d4,f4]@8", AS: "[g3,b3,e4]@7 ~",
  AT: "f4@2 ~@2 a4@2 c5 ~ [a3,d4,f4]@2 ~@2 [a3,d4,f4]@2 ~@2, [a3,c4]@7 ~@3 d3@4 ~@2, ~@2 f4@5 ~@9", // Dm Am
  AU: "[a3,c4,f4] ~ [a3,c4,f4] ~ [a#3,d4,f4]@4, ~ f3@2 ~@5", // F A#
  AV: "[a3,c4,f4]@8 [f3,a#3,d4]@2 ~ [f3,a#3,d4]@2 ~ [f3,a#3,d4]@2, ~@5 a#2@2 ~", AW: "[g3,c4,e4]@3 ~@5",
})).s("gm_piano").gain(0.41).pan(1)

// other · tubular bells · "Bells"
const tubular_bells = note("<~@2 A B C D ~@41 E B F B C D ~@30>".pickRestart({
  A: "~ g4@5 c5@4 ~ g4@4 ~", B: "g4 f4 e4 c4@3 ~@2", C: "g4@6 c5@5 ~ g4@3 ~", D: "g4 f4 e4 c4@5", E: "g4@6 ~ c5@5 g4@4",
  F: "g4@6 ~ c5@5 g4@3 ~",
})).s("gm_tubular_bells").gain(0.14)

// chords · overdriven guitar · "Lead"
const overdriven_guitar = note("<~@46 A@2 B C D E F G H ~@28>".pickRestart({
  A: "[~@15 c5@5 g4@8 c5@4]/2", B: "a4@3 a#4 a4 g4 f4@2", C: "e4 f4 g4 c4@4 ~", D: "a4@2 a4@4 a#4@2 a4@7 ~",
  E: "[c5,e5]@2 [c5,e5]@3 ~ d5@2 e5@2 d5@2 c5@4", F: "[f5,a5]@4 ~ g5@3 [d5,f5]@3 ~ [c5,e5]@4, ~ e5 ~@2",
  G: "[d5,g5]@2 [d5,g5]@2 [d5,g5]@3 ~@3 [d5,g5]@2 [d5,g5]@2 ~@2", H: "[d5,g5]@2 [d5,g5]@2 ~ [d5,g5]@2 ~@9",
})).s("gm_overdriven_guitar").gain(0.39)

// chords · rock organ · "Organ"
const rock_organ = note(`<
  ~@2 A@2 B@2 C D E F G H I J K F L@2 M@2 N C O P I Q A@2 I Q K R@3 S Q T U@2 V W X Y Z W AA AB AC AD AE W AF W AG AH AI
  AJ AK AL A@2 E AM@2 AN@2 AO AP Q AQ C AR AS@2 AT AU AV AW AX AY C AZ BA
>`.pickRestart({
  A: "[[e4,g4]@7 ~ [f4,a4]@7 ~, c5@15 ~]/2", B: "[[e4,g4]@15 ~ [f4,a4]@14 ~@2, c5@31 ~]/2", C: "[e4,g4,c5]@15 ~",
  D: "[f4,a4]@7 ~", E: "[d4,f4,a4]@15 ~", F: "[g4,b4]@15 ~, d4@13 ~@3", G: "[e4,c5]@15 ~", H: "[f4,a4,c5]@7 ~",
  I: "[d4,f4,a4]@7 ~", J: "[d4,g4,b4]@7 ~", K: "[f4,a4,c5]@15 ~", L: "[e4@15 ~ [f4,a4]@14 ~@2, c5@31 ~]/2",
  M: "[[e4,g4]@8 [d4,f4,a4]@4 [f4,a4]@3 ~ [g4,b4]@13 ~@3, ~@12 d4@17 ~@3]/2", // Em Dm F G
  N: "[f4,a4,c5]@4 [a4,c5]@3 ~ [d4,f4,a4]@3 ~ [d4,f4,a4]@3 ~", O: "[e4,g4,c5]", P: "[a4,c5]@11 ~ [a4,c5]@3 ~, f4@15 ~",
  Q: "[g4,b4]@7 ~", R: "[d4@14 ~@2 e4@15 ~ [f4,a4]@14 ~@2, g4@31 ~@17, b4@11 ~@5 c5@31 ~]/3",
  S: "[e4,c5]@4 [e4,c5]@3 ~ [d4,f4,a4]@4 [d4,f4,a4]@3 ~, g4@7 ~@9", T: "[f4,a4]@7 ~ [d4,f4,a4]@4 [f4,a4]@3 ~, c5 ~@3",
  U: "[[e4,g4,c5]@14 ~@2 [f4,a4]@7 ~ [e4,a4,c5]@6 ~@2, ~@15 c5@7 ~@10]/2", V: "[f4,a#4,d5]@7 ~ [f4,a#4,d5]@6 ~@2",
  W: "[f4,a4,c5]@7 ~ [f4,a4,c5]@6 ~@2", X: "[d4,g4,b4]@7 ~ [d4,g4,b4]@7 ~", Y: "[e4,a4,c5]@7 ~ [e4,a4,c5]@6 ~@2",
  Z: "[f4,a#4,d5]@7 ~ a#4@7 ~", AA: "[d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4]@2 ~@4 [d4,g4,b4] ~ [d4,g4,b4] ~@3",
  AB: "[d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~@11", AC: "~@5 [e4,g4,c5]@10 ~", AD: "[f4,a4,c5]@7 ~ [f4,a4,c5]@7 ~",
  AE: "[e4,g4,c5]@7 ~@2 [e4,g4,c5]@6 ~", AF: "[e4,g4,c5]@7 ~ [e4,g4,c5]@7 ~",
  AG: "[d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4] ~@5 [d4,g4,b4] ~ [d4,g4,b4]@2 ~@2, ~@2 b4 ~@5", // G G5 G
  AH: "b4 [d4,g4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~@10", AI: "[g4,c5]@12 c5@3 ~, e4@7 ~",
  AJ: "[f4,a4,c5]@3 ~ f4@3 ~, ~@7 [a4,c5]@6 ~@3", AK: "[d4,f4,a4]@7 ~ [d4,f4,a4]@7 ~", AL: "[g4,b4]@15 ~",
  AM: "[[d4,b4]@14 ~@2 e4@5 ~@3 [f4,a4]@6 ~@2, g4@21 ~@11, ~@8 c5@7 ~]/2", // G F
  AN: "[[d4,b4]@7 ~ e4@7 ~, g4@31 ~, ~@8 c5@3 ~@5]/2", AO: "a4@7 [a4,c5]@5 ~ c5@2 ~, f4@6 a4 ~",
  AP: "[e4,g4,c5]@4 [e4,g4,c5]@3 ~ [d4,f4,a4]@3 ~ [d4,f4,a4]@3 ~", // C Dm
  AQ: "[a4,c5]@3 ~ [a4,c5]@3 ~ [d4,f4,a4]@4 f4@3 ~, f4@7 ~@9", AR: "[a4,c5]@7 ~ [a4,c5]@3 ~ [a4,c5]@2 ~@2, f4@15 ~",
  AS: "[[d4,g4]@7 ~@9 e4@15 ~, b4@15 ~ c5@6 ~@10, ~@7 g4@23 ~@2]/2", AT: "a4@6 ~ c5@8 ~, f4@7 ~, ~@7 a4@5 ~@4",
  AU: "[e4,g4,c5]@4 [e4,g4,c5]@3 ~ [d4,f4,a4]@3 ~ [d4,f4]@3 ~", AV: "[g4,b4]@13 ~@3",
  AW: "[f4,a4,c5]@3 ~ [f4,a4,c5]@3 ~ [d4,g4,b4]@4 [g4,b4]@3 ~", AX: "[e4,g4,c5]@7 ~",
  AY: "[a4,c5]@5 [a4,c5]@2 ~ [a#4,d5]@3 ~ [f4,a#4,d5]@3 ~, f4@3 ~", // Am A#
  AZ: "[f4,a4,c5]@4 [a4,c5]@3 ~ [a#4,d5]@4 [a#4,d5]@3 ~, ~@4 f4@11 ~", BA: "[e4,g4,c5]@9 ~@7",
})).s("gm_rock_organ").gain(0.12).pan(0)

// chords · rock organ · "Organ" · soft notes
const rock_organ_soft = note(`<
  ~@7 A ~@2 B ~@5 C D@2 ~ E ~@4 F ~@2 G@2 ~ H ~@3 I J ~@6 K ~@11 L ~@2 I ~@6 M@2 ~ I N ~@2 O P Q R S T ~@5
>`.pickRestart({
  A: "c5@13 ~@3", B: "g4@7 ~", C: "g4@15 ~", D: "[~@15 c5@7 ~@10]/2", E: "~@4 f4@3 ~@9", F: "d4@7 ~",
  G: "[~@15 d4@14 ~@3]/2", H: "~@11 b4@3 ~@2", I: "d4@13 ~@3", J: "~@2 c5 ~@3 d4 ~", K: "~@8 [f4,d5]@7 ~",
  L: "~@6 g4 ~", M: "[~@6 c5@16 ~@7 f4@2 ~]/2", N: "~@12 [d4,a4]@3 ~", O: "~@7 d4@6 ~@3", P: "~@7 c5@4 ~ c5@3 ~",
  Q: "c5@3 ~@3 a4 ~", R: "~@12 a4@3 ~", S: "d4@7 ~@9", T: "~@6 d4 ~",
})).s("gm_rock_organ").gain(0.06).pan(0)

// bass · piano · "Piano Bass"
const bass_2 = note(`<
  ~@2 A ~ B C ~ D ~@16 E ~@4 F G ~ A D H I H J ~@2 K ~@3 C ~@3 L ~@7 C ~@4 M ~@2 N J ~@4 A L F ~@4 H ~ O J P ~
>`.pickRestart({
  A: "~@3 c2@5", B: "~@5 c2 ~@2", C: "~@7 f4, ~@3 f2@5", D: "~@15 f4", E: "~@5 d2 ~@2", F: "~@5 g1 ~@2",
  G: "~ f2, f2 ~, ~@6 f1@9 ~", H: "~@5 d2@2 ~", I: "~@5 e2 ~@2", J: "~ c2, c2 ~, ~@6 c1@9 ~", K: "~@5 f2@2 ~",
  L: "~@5 f2 ~@2", M: "~@3 d2@5", N: "g1@8 g1@7 ~", O: "~ f2@2 ~@5", P: "~@8 f2@2 ~ f2@2 ~ f2@2, ~@5 a#1@2 ~",
})).s("gm_piano").gain(0.4)

// bass · piano · "Piano Bass" · soft notes
const bass_soft = note("<~@23 A ~@2 B ~@33 A ~ C ~@11 A ~@8>".pickRestart({
  A: "f1@7 ~", B: "c1@7 ~", C: "g1@7 ~",
})).s("gm_piano").gain(0.24)

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

// drums · rim
const rim = s("rim").struct("<A B C@3 D C@15 ~ C@15 D C@7 ~@2 C@6 ~@2 C@26 D ~>".pickRestart({
  A: "x!2", B: "x!4", C: "~ x ~ x", D: "~ x ~@2",
})).gain(0.39)

// drums · snare
const snare = s("sd").struct("<~@5 A ~@15 B ~@15 C ~@7 D E ~@6 D E ~@26 F G>".pickRestart({
  A: "~@6 x!2", B: "~@3 x!2 ~@11", C: "~@10 x ~ x!2 ~@2", D: "x!3 ~@2 x!2 ~", E: "x!3 ~@5", F: "~@8 x ~@2 x ~@2 x ~",
  G: "~ x ~@14",
})).gain(0.39)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@2 A B A C A@3 B A B A@5 B A@3 D A@13 B A C A@7 B E A@6 B E B A@3 B A F A@7 B A@11 G H
>`.pickRestart({
  A: "x!8", B: "x ~ x ~ x ~ x ~ x ~ x ~ x ~ x!2", C: "x!7 ~", D: "~ x!7", E: "x!3 ~@5",
  F: "x ~ x ~ x ~ x!3 ~ x ~ x ~ x ~", G: "x ~ x ~ x ~@3 x ~@2 x ~@2 x ~", H: "~ x ~@14",
})).gain(0.29)

// drums · open hat
const open_hat = s("oh").struct("<~@5 A ~@7 B ~@13 C ~ B ~@7 A ~@3 C ~@39 D E>".pickRestart({
  A: "~@7 x", B: "~@7 x ~@7 x", C: "~@15 x", D: "~@11 x ~@4", E: "~ x ~@14",
})).gain(0.29)

// drums · crash
const crash = s("cr").struct("<~@2 A ~@3 A ~@14 A@2 ~@15 A ~@43 B>".pickRestart({
  A: "x", B: "~ x ~@14",
})).gain(0.34)

stack(
  bass, piano, tubular_bells, overdriven_guitar, rock_organ, rock_organ_soft, bass_2, bass_soft, kick, rim, snare,
  hihat, open_hat, crash
)