// 3-Tage-Bart — Die Arzte
// 110 bpm, 4/4, key G 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 84 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(110/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
const distortion_guitar = note(`<
  ~@3 A B C D E B C D E F G H I F G H I J K L M J K L M B C D E B C D E F G H I F G H I J K L M J K L M B C D E B C D E
  ~@8 N O N P N O N P N O N P Q@2 ~@2
>`.pickRestart({
  A: "[a#2,d#3]!8 [c3,f3]!8", B: "[g3,d4]@10 ~ [g3,d4] ~ [g3,d4]@3, d3", C: "[g3,c#4]@10 ~ [g3,c#4] ~ [g3,c#4]@3, c#3",
  D: "[g3,c4]@10 ~ [g3,c4] ~ [g3,c4]@3, c3", E: "[d#3,a#3,d#4]@4 [f3,c4,f4]@3 ~", F: "[g2,d3]@12 ~ [g2,d3]@3, g3",
  G: "[b2,f#3]@12 ~ [b2,f#3]@3, b3", H: "[c3,g3] ~ [c3,g3]@5 [a2,e3]@3 [a2,e3]@6, c4@7 a3@5 ~@4",
  I: "c3 ~ [c3,g3]@6 [d3,a3,d4]@6 ~@2, c4 ~", J: "~ [c3,g3,c4]@7", K: "~@2 [b2,f#3,b3]@13 ~", L: "[d3,a3,d4]",
  M: "[a2,e3,a3]", N: "[g2,d3,g3] [f2,c3,f3]",
  O: "[c2,c3]!2 [c2,g2,c3] ~ [c2,g2,c3] ~ [c2,c3]!2 [c2,g2,c3] ~ [c2,g2,c3] ~ [c2,c3]!2 [c2,g2,c3] ~", // C C5 C C5 C C5
  P: "[c2,c3]!2 [c2,g2,c3] ~ [c2,g2,c3] ~ [c2,c3]!2 [c2,g2,c3] ~ [c2,g2,c3] ~ [c2,c3]!2 [c2,g2,c3]@2", // C C5 C C5 C C5
  Q: "[[d#2,a#2,d#3]!15 ~ [f2,c3,f3]!16, ~@15 [d#2,a#2,d#3]@16 ~]/2", // D#5 F5 D#5
})).s("gm_distortion_guitar").gain(0.2)

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

// chords · distortion guitar
const distortion_guitar_2 = note(`<
  ~@4 A B C D A B C D E F G H E F G H I J K L I J K L A B C D A B C D E F G H E F G H I J K L I J K L A B C D A B C D
  ~@8 M N M O M N M O M N M O P Q ~@2
>`.pickRestart({
  A: "[g3,d4]@7 ~@4 [g3,d4] ~ [g3,d4]@3", B: "[g3,c#4]@7 ~@4 [g3,c#4] ~ [g3,c#4]@3",
  C: "[g3,c4]@7 ~@4 [g3,c4] ~ [g3,c4]@3", D: "[a#3,d#4]!8 [c4,f4]!8", E: "~@2 [d4,g4]@9 [d4,g4] ~ [d4,g4] ~@2",
  F: "~@2 [b3,f#4]@8 ~ [b3,f#4] ~ [b3,f#4] ~@2", G: "~@2 [g3,c4,e4]@6 ~@2 [a3,c4,e4]@5 ~",
  H: "[g3,c4,e4]@7 ~ f#4@3 g4@3 f#4@2, ~ [a3,d4]", I: "~ [c4,e4]@7", J: "~ [b3,d4]@7",
  K: "~@2 [d4,f#4]@3 [d4,f#4]@3 [d4,g4]@3 [d4,f#4]@5", L: "~@2 [c4,e4]@3 [c4,e4]@3 [d4,e4]@3 [c4,e4]@4 ~",
  M: "[g3,d4] [f3,c4]", N: "c3!2 [e3,c4] ~ [e3,c4]@2 c3!2 [e3,c4] ~ [e3,c4]@2 c3!2 [e3,c4] ~",
  O: "c3!2 [g3,a#3,c4] ~ [g3,c4]@2 c3!2 [g3,c4] ~ [g3,c4]@2 c3!2 [g3,c4]@2", P: "[d#3,a#3]!16", Q: "[f3,c4]!16",
})).s("gm_distortion_guitar").gain(0.28).pan(0.8)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@3 A B@4 C D@3 C E F G C E F G H E I J H E K@7 D@3 C E F G C E F G H E I J H L@8 M N@8 O P Q R Q S Q R Q S Q R Q S
  ~@4
>`.pickRestart({
  A: "[a#2,d#3]!8 [c3,f3]!8", // D#5 F5
  B: "[[g3,d4]!15 g3 [g3,c#4]!15 g3 [g3,c4]!15 ~ [a#3,d#4]!7 ~ [c4,f4]!8, ~@15 d4@49, ~@31 c#4@33, ~@47 g3@17, ~@47 c4@8 [a#3,d#4]@8 ~]/4", // G5 Gdim C5 D#5 F5 D#5
  C: "[g3,d4]!16", // G5
  D: "[[g3,c#4]!15 g3 [g3,c4]!15 ~ [a#3,d#4]!7 ~ [c4,f4]!8, ~@5 c#4@11, ~@31 g3@17, ~@31 c4@8 [a#3,d#4]@8 ~]/3", // Gdim C5 D#5 F5 D#5
  E: "[b3,f#4]!16", F: "[g3,e4]!7 e4 [a3,e4]!8, ~@7 g3@9",
  G: "[g3,e4]!7 ~ [c4,f#4]!2 c4 [c4,g4]!2 c4 [c4,f#4]!2, ~@7 [g3,e4]@9, ~@10 f#4@3 g4@3", H: "~@2 [g3,e4]!14",
  I: "[a3,f#4]!7 a3 [a3,g4]!2 a3 [a3,f#4]!5, ~@7 f#4@3 g4@6", J: "[a3,e4]!7 a3 [a3,d4]!2 a3 [a3,e4]!5, ~@7 e4@3 d4@6",
  K: "[[a3,f#4]!7 a3 [a3,g4]!2 a3 [a3,f#4]!4 a3 [a3,e4]!7 a3 [a3,d4]!2 a3 [a3,e4]!4 ~ [g3,d4]!15 g3 [g3,c#4]!15 g3 [g3,c4]!15 ~ [a#3,d#4]!7 ~ [c4,f4]!8 [g3,d4]!16, ~@7 f#4@3 g4@69 [g3,c4]@8 [a#3,d#4]@8 ~@17, ~@15 f#4@97, ~@23 e4@3 d4@5 [a3,e4]@81, ~@47 d4@16 c#4@49]/7", // D A7 D A5 D5 A5 G5 Gdim …
  L: "[[b3,f#4]!15 f#4 [a3,f#4]!7 a3 [a3,g4]!2 a3 [a3,f#4]!4 a3 [a3,e4]!7 a3 [a3,d4]!2 a3 [a3,e4]!4 a3 [g3,d4]!15 g3 [g3,c#4]!15 g3 [g3,c4]!15 ~ [a#3,d#4]!7 ~ [c4,f4]!8 [g3,d4]!16, ~@15 b3@48 d4@16 c#4@16 [g3,c4]@8 [a#3,d#4]@8 ~@17, ~@23 f#4@3 g4@102, ~@31 f#4@97, ~@39 e4@3 d4@5 e4@81]/8", // B5 D A7 D A5 D5 A5 G5 …
  M: "[g3,c#4]!16", // Gdim
  N: "[[g3,c4]!15 ~ [a#3,d#4]!7 ~ [c4,f4]!8 b4@12 ~@4 [g4,c5]@11 ~@5 [d5,g5]@11 ~@5 f#5@12 ~@4 [b4,e5]@13 ~@3 c5@11 ~@4 [a4,d5], ~@15 g3@113, ~@15 c4@8 [a#3,d#4]@7 b3@14 ~@3 [c4,e4]@12 ~@52 [c4,e4,g4]@11 ~@6, ~@31 [e4,g4]@13 ~@19 [g4,b4]@12 ~@4 [f#4,a4,d5]@13 ~@3 [e4,g4]@13 ~@18 f#4@2]/8", // C5 D#5 F5 C5 G5 E5 D5 D#5 …
  O: "[a4,d5,f#5]!16", P: "[a4,d5,g5]!16", Q: "[g2,d3,g3] [f2,c3,f3]", R: "[c3,g3,c4]", S: "[c3,g3,c4]@15 ~",
})).s("gm_electric_guitar_clean").gain(0.22)

// other · tenor sax
const tenor_sax = note(`<
  ~@4 A B C D A B C D ~@16 A B E D A B E D ~@16 A B E D A B E D ~@8 F G H I J K L M J K L M N O ~@2
>`.pickRestart({
  A: "b3 ~ b3 ~ g3@6 ~ b3 ~ a3 g3 ~", B: "a3 ~ b3 ~ g3@6 ~ b3 ~ a3 g3@2", C: "a3 ~ b3 ~ g3@7 ~ [e3,e4] g3@2 ~",
  D: "a#3@7 ~ a3@6 ~@2", E: "a3 ~ b3 ~ g3@7 ~ e3 g3@2 ~", F: "~@2 g3 ~ g3 ~ g3 ~ f3 g3 ~ g3@4 ~",
  G: "e3 ~ g3 ~ g3 ~ a3 ~ [e3,b3] ~ [d3,a3] [c3,g3]@3 ~@2", H: "b3@2 g3 ~ g3 ~ g3 ~ f3 g3@2 g3@3 ~@2",
  I: "e3@2 g3 ~ g3 ~ a3@2 [e3,b3]@2 [d3,a3] [c3,g3]@3 ~@2", J: "b3@4 g3@3 ~ b3@3 ~ g3@3 ~",
  K: "e3 ~ g3@3 ~ g3@2 e3@2 d3 ~ c3 ~ d3 ~", L: "d3@3 ~ g3@3 ~ b3@3 ~ g3@3 ~, b3 ~@15",
  M: "e3 ~ g3@3 ~ g3@3 ~ g3 ~ g3 ~ g3 ~", N: "g3", O: "a3@15 ~",
})).s("gm_tenor_sax").gain(0.44)

// other · electric guitar muted
const electric_guitar_muted = note(`<
  ~@3 A ~@8 B C D E B C D E F C G H F C G H ~@8 B C D E B C D E F C G H F C G H ~@12 I@4 J K J K J K J K J K J K L M ~@2
>`.pickRestart({
  A: "d#2!8 f2!8", B: "g2!16", C: "b2!16", D: "c3!7 a2!9", E: "c3!8 d3!3 e3!3 d3!2", F: "~@2 c3!14",
  G: "d3!8 e3!3 d3!5", H: "a2!8 b2!3 a2!5", I: "d2!16", J: "g2!8 f2!8", K: "c3!16", L: "[d#2,a#2]!16", M: "[f2,c3]!16",
})).s("gm_electric_guitar_muted").gain(0.42)

// drums · kick
const kick = s("bd").struct("<~@4 A@16 B A@23 B A@15 C@3 D C@4 A@14 ~@2>".pickRestart({
  A: "x!4", B: "~ x!3", C: "x!2", D: "x ~@3 x ~@2 x",
})).gain(0.49)

// drums · snare
const snare = s("sd").struct(`<
  ~@3
  [~@7 x!9]
  [~ x ~ x ~ x ~ x]!56
  [~ x ~ x]!7
  [~@4 x ~@7 x!4]
  [~ x ~ x ~ x ~ x]!14
  ~@2
>`).gain(0.43)

// drums · hihat
const hihat = s("hh").struct(`<
  A@4 B C@2 B@2 C@2 B C@8 B C@3 B C@6 B C@3 B C@4 B C@3 B C@3 B C@3 B C@2 B C@3 B@2 C@3 B C@3 B C@2 B C B C B C@3 B C@2
  ~@2
>`.pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x!7", C: "x!8",
})).gain(0.43)

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

stack(
  distortion_guitar, bass, distortion_guitar_2, electric_guitar_clean, tenor_sax, electric_guitar_muted, kick, snare,
  hihat, crash
)