// This World Today is a Mess — Donna Hightower
// 145 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 4 piano (copy of ch 6 electric guitar clean)
// note: Full arrangement: all 90 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(145/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, A@4 for four bars: edit a riff to change every repeat.

// chords · flute · "This worl"
const flute = note("<~@3 A@2 ~ B@2 ~@2 C D ~@19 B@2 ~@2 E F ~@53>".pickRestart({
  A: "[g5 a5 g5 a5 g5 a5 g5 a5 g5 [a5,a#5] g5 a5 g5 a5 a#5 ~ c6@3 ~@13, ~@15 b5@2 ~@15]/2", // A#maj7
  B: "~@5 [c5,d#5] [d5,f5] [d#5,g5]", C: "~@5 [b4,d5] [c5,d#5] [d5,f5]", D: "~@5 d5 [c5,d#5] [d5,f5], ~@10 b4 ~@5",
  E: "~@5 [b4,d5] c5 [d5,f5], ~@12 d#5 ~ d#5 ~", F: "~@5 [b4,d5] [c5,d#5] [d5,f5], ~@14 d#5 ~",
})).s("gm_flute").gain(0.3)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  A B C@2 D@5 E F@3 G D@3 F@4 D H I J D H K L M@2 N D@2 F@4 D@4 F@4 D H K J D H K J O P N D@2 F@3 Q@6 F@3 D R@2 D F@4 S
  D@3 F@4 T U@2
>`.pickRestart({
  A: "g3 [g2,g3] g2 g3 [g2,g3] g2 g3 [g2,g3] g2 g3 [g2,g3] ~ [g2,g3] g2 g3 g2", // G
  B: "[g3,b3] g2!2 ~ g2 [g3,b3] [g2,g3,b3] g2 b3 g2!2 ~ g2!2 ~@2, ~ [g3,b3]@3 ~@4 g3@7 ~, ~@9 b3@5 ~@2", // G
  C: "[[g2,g3,b3,d4] ~ [g2,g3,c4,e4]@2 ~@2 [g3,b3,d4,f4]@8 g2 ~ g2@5 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~, ~@6 g2@5 ~@3 g3@15 ~@3, ~@4 [d4,g4]@3 ~]/2", // G C G7 G5
  D: "~@2 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~", // Cm
  E: "~@2 [g3,b3,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~", // G7
  F: "~@2 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~", // G7
  G: "~@2 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~ d#4 ~ [g3,c4,d#4] ~", // Cm
  H: "~@2 [g#3,c4,f4] ~@3 [g#3,c4,f4] ~@3 [g#3,c4,f4] ~@3 [g#3,c4,f4] ~", // Fm
  I: "~@2 [a#3,d4,f4] ~@3 [a#3,d4,f4] ~@3 [a#3,d4,f4] ~@3 [a#3,d4,f4] ~", // A#
  J: "~@2 [g3,a#3,d#4] ~@3 [g3,a#3,d#4] ~@3 [g3,a#3,d#4] ~@3 [g3,a#3,d#4] ~", // D#
  K: "~@2 [g#3,a#3,d4,f4] ~@3 [g#3,a#3,d4,f4] ~@3 [g#3,a#3,d4,f4] ~@3 [g#3,a#3,d4,f4] ~", // A#7
  L: "~@2 [g3,a#3,d#4] ~@3 [g3,a#3,d#4] ~@3 [g3,a#3,c#4,d#4] ~@3 [g3,a#3,d#4] ~", // D# D#7 D#
  M: "[[g3,b3,d4,g4] ~ [g3,b3,d4,g4] ~@3 [g3,g4]@12 f3@2 ~@2 [d#3,d#4]@2 ~@2 [d3,d4]@2 ~@2 [g2,g3]@2, ~@6 [b3,d4]@19 ~@7, ~@3 f4@7 ~@6]/2", // G D# D G Bm
  N: "c3 ~ [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~", // Cm
  O: "[b3,d4,g4] ~ [b3,d4,g4] ~@3 [b3,d4,g4]@9 ~", P: "[g3,g4] [f3,f4] ~ [d#3,d#4] ~ [d3,d4] ~ [g2,g3]",
  Q: "[~@2 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,f4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~ d#4 ~ [g3,c4,d#4] ~ d#4 ~ [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,b3,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~@3 [g3,b3,d4,f4] ~, ~@14 d4@69 ~@13]/6", // G7 Cm G7
  R: "[~@2 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,d#4] ~@3 [g3,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~, ~@7 c4@2 ~@7]/2", // Cm
  S: "~@2 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~ [g3,c4,d#4] ~ [g3,c4,d#4] ~", // Cm
  T: "~@2 [g3,c4,d#4] ~ c3 ~ [g3,a#3,c4,d#4] ~@3 [g3,c4,d#4] ~@3 [g3,c4,d#4] ~", // Cm Cm7 Cm
  U: "[~@2 a#3 ~ g3 ~ [g3,a#3,c4]@9 ~ [g3,a#3] g3 a#3 g3 a#3 ~ a#3@10, ~@3 [c3,d#4]@13, ~@21 g3@11]/2", // C7 Gm Cm
})).s("gm_electric_guitar_clean").gain(0.4).pan(0.6)

// other · string ensemble 1
const string_ensemble_1 = note(`<
  A@2 B C D ~@9 E F G H@4 I J K L@3 K M N ~@9 E O G P@4 Q J K R@2 J K M N ~@9 S@2 G H@4 Q T U V W X Y Z T@3 AA X@3 AB T
  AC ~
>`.pickRestart({
  A: "[~@2 g3@8 ~@6 b4@15 ~, g4@31 ~, ~@2 f3 ~@13 d5@5 ~@11]/2", B: "[g4,b4,d5] ~ [g4,c5,e5]@2 ~@2 [g4,b4,d5,f5]@8 ~@2",
  C: "[b4,d5,g5]@10 ~@2 g5 a5 a#5 [a#5,b5], g4@3 ~", D: "c6 ~@7", E: "[g4,g5]", F: "c5, c4@7 ~", G: "[g4,g5] [c4,c5]",
  H: "[b3@31 ~@17 f4@14 ~@2, b4, ~ [g3,d4]]/4", I: "[c3,c5]@15 ~, [d#4,g4]@13 ~@3", J: "[f3,f5], g#4@13 ~@3",
  K: "[d5,a#5]@7 ~, a#3", L: "[d#4@15 ~ c4@16 [f3,f5]@15 ~, [g4,d#5]@31 ~ g#4@13 ~@3, ~@8 c5@15 ~]/3",
  M: "[d#4,g4,d#5]@15 ~", N: "[g3,b4,g5]@11 ~@5", O: "[c4,c5]",
  P: "[b3@31 ~@16 f4@14 ~@3, b4, ~@31 g3@33, ~@31 d4@31 ~@2]/4", Q: "[c3,d#4,g4,c5]@13 ~@3",
  R: "[d#4@15 ~ [c4,c5]@16, [g4,d#5]@31 ~]/2", S: "[[g4,g5]@15 ~ c5@16, ~@15 c4@16 ~]/2",
  T: "[d#5,d#6] ~ [d#5,d#6]@3 ~ [c5,c6]@3 ~@7", U: "[d#5,d#6] ~ [d#5,d#6]@3 ~ [c5,c6]@5 ~@5",
  V: "[d#5,d#6] ~ [d#5,d#6]@2 [d5,d6]@2 c5@2 [d#5,d#6] ~ [d#5,d#6] ~ d5@2 c5@2, ~@6 c6 ~@5 d6 ~ c6 ~", // D# D D#
  W: "[d5,d6] ~ [d5,d6]@3 ~ [b4,b5]@4 ~@6", X: "[d5,d6] ~ [d5,d6]@3 ~ [b4,b5]@3 ~@7",
  Y: "[d5,d6] ~ [d5,d6]@2 ~@2 [b4,b5]@5 ~@5", // D B
  Z: "[d5,d6] ~ [d5,d6] ~ [c5,c6]@2 [b4,b5] ~ [d5,d6] ~ [d5,d6] ~ c5@2 [b4,b5] ~, ~@12 c6 ~@3", // D C B D B
  AA: "[d#5,d#6]@4 [d5,d6]@2 [c5,c6] ~ [d#5,d#6]@3 ~ d5@2 [c5,c6]@2, ~@12 d6 ~@3", // D# D C D# C
  AB: "[d5,d6]@4 [c5,c6] ~ [b4,b5] ~ [d5,d6]@3 ~ c5@2 [b4,b5] ~, ~@12 c6 ~@3", // D C B D B
  AC: "[c5,d#5,g5,c6] ~@3 [a#4,d5,f5,a#5] ~ [c5,d#5,c6]@3 ~@7", // Cm A# Cm
})).s("gm_string_ensemble_1").gain(0.4)

// chords · trumpet
const trumpet = note(`<
  A@2 B C ~@10 D E ~@2 F@2 ~@3 G ~ H ~ G ~ I J K ~@7 E@2 ~@2 F@2 ~@3 L ~ M ~ L ~ I J K ~@7 D E ~@2 N@2 ~@2 E@2 ~@2 O F
  ~@2 E@2 ~@2 F@2 ~@2 P ~
>`.pickRestart({
  A: "[~@8 b4@7 ~, [g3,g4]@29 ~@3]/2", B: "[b4,d5]@2 [c5,e5]@3 ~ [d5,f5]@9 ~", C: "g5@6 c6 d6 g6@7 ~, g4@7 ~",
  D: "~@10 [d#5,g5]@2 [d5,f5]@2 [c5,d#5] ~", E: "~@5 [d#5,g5] [d5,f5] [c5,d#5]", F: "~@5 [d5,f5] [c5,d#5] [b4,d5]",
  G: "~@2 [d5,f5]@3 ~ [d#5,g5]@3 ~ [f5,g#5]@4 ~@2", H: "~@2 [c5,d#5]@3 ~ [d5,f5]@3 ~ [d#5,g5]@5 ~",
  I: "[g4,g5] ~ [g4,g5]@2 ~@2 [g4,g5]@7 ~@3", J: "g4@2 f4@3 ~ d#4@2 ~@2 d4@3 ~ g3@2", K: "c4 ~@7",
  L: "~@5 [d5,f5] [d#5,g5] [f5,g#5]", M: "~@5 [c5,d#5] [d5,f5] [d#5,g5]", N: "~@10 [d5,f5]@2 [c5,d#5] ~ [b4,d5] ~",
  O: "~@10 [d5,f5]@2 [c5,d#5,f5] ~ d5@2, ~@14 b4 ~", P: "c5@2 ~@2 a#4 ~ c5@2 ~@8",
})).s("gm_trumpet").gain(0.4)

// bass · electric bass finger
const bass = note(`<
  A@2 B C D E F D@2 G@4 E D@3 G@3 H I J K L M J K N O P D@3 G@4 E D@3 G Q G@2 M R S T M U V W X P D@3 G Y G@2 E D F D
  G@2 Z G E D@3 G Q H@2 AA D AB D G AC G@2 AB AD@2
>`.pickRestart({
  A: "g1@3 ~ g1@3 ~ g1@3 ~ g1@3 ~", B: "g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~", C: "g1 g2 g1 g2 g1 g2 g1 g2",
  D: "c2@3 ~ g1@3 ~ c2@3 ~ g1@3 ~", E: "c2@3 ~ g1@3 ~ c2@2 g1@2 a#1@2 b1@2", F: "c2@2 ~@2 g1@3 ~ c2@3 ~ g1@2 ~@2",
  G: "d2@3 ~ g1@3 ~ d2@3 ~ g1@3 ~", H: "d2@3 ~ g1@3 ~ d2@2 ~@2 g1@3 ~", I: "c2@2 ~@2 g1@3 ~ c2 ~ c2@2 d2@2 d#2@2",
  J: "f2@3 ~ c2@3 ~ f2@4 c2 ~ f2 ~", K: "a#1@3 ~ f1@3 ~ a#1@4 c2@2 d2@2", L: "d#2@3 ~ a#1@3 ~ d#2@4 a#1@2 d#2@2",
  M: "c2@4 g1@4 c2 ~ c2@2 d2@2 d#2 ~", N: "d#2@3 ~ a#1@3 ~ d#2@4 a#1@2 ~@2", O: "g1 ~ g1@2 ~@2 g1@10, ~@6 f#1 ~@9",
  P: "g2@2 f2@3 ~ d#2@3 ~ d2@3 ~ g1@2", Q: "d2@3 ~ g1@3 ~ d2@3 ~ g1@3 ~, ~@12 a#1 ~@3",
  R: "f2@3 ~ c2@3 ~ f2@4 c2@2 f2@2", S: "a#1@2 ~@2 f1@3 ~ a#1@4 c2@2 d2@2", T: "d#2@3 ~ a#1@3 ~ d#2@3 ~ a#1@3 ~",
  U: "f2@4 c2@3 ~ f2@3 ~ c2@3 ~", V: "a#1@3 ~ f1@3 ~ a#1@4 c2@2 d2 ~", W: "d#2@3 ~ a#1@3 ~ d#2@3 ~ a#1@2 ~@2",
  X: "g1 ~ g1@2 ~@2 g1@9 ~", Y: "d2@2 ~@2 g1@3 ~ d2@2 ~@2 g1@3 ~", Z: "d2@2 ~@2 g1@2 ~@2 d2@3 ~ g1@2 ~@2, ~@12 a#1 ~@3",
  AA: "c2@2 ~@2 g1@3 ~ c2@3 ~ g1@2 a#1@2", AB: "c2@3 ~ g1@3 ~ c2@4 g1 ~ a#1 ~",
  AC: "d2@3 ~ g1@3 ~ d2@4 g1@3 ~, ~@12 a#1 ~@3", AD: "[c2@2 a#1 ~ g1 ~ c2@18 ~@8]/2",
})).s("gm_electric_bass_finger").gain(0.5)

// drums · kick
const kick = s("bd").struct("<A@29 B C A@23 B C A@32 D ~>".pickRestart({
  A: "x!4", B: "x!2 ~ x ~@4", C: "~@7 x", D: "x ~@2 x ~@4",
})).gain(0.5)

// drums · snare
const snare = s("sd").struct(`<
  ~@3 A B C B@7 D B@7 E B@7 ~ F B@7 G B@7 E B@3 D B@3 ~ F B@7 H B@7 E B@7 I B@7 I J ~
>`.pickRestart({
  A: "~@2 x!5 ~", B: "~ x ~ x", C: "~@4 x ~@3 x!3 ~ x ~ x!2", D: "~@2 x ~@2 x!3", E: "~@4 x ~@5 x!6", F: "~@3 x",
  G: "~@2 x ~@3 x!2", H: "~@2 x ~@2 x!2 ~", I: "~@4 x ~@5 x ~ x ~ x!2", J: "~@2 x!3 ~@11",
})).gain(0.5)

// drums · hihat
const hihat = s("hh").struct("<A@29 B ~ A@23 B ~ A@32 C ~>".pickRestart({
  A: "x!8", B: "x!2 ~ x ~@4", C: "x!4 ~@4",
})).gain(0.4)

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

stack(flute, electric_guitar_clean, string_ensemble_1, trumpet, bass, kick, snare, hihat, crash)