// 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: edit a riff to change every repeat.

// chords · flute · "This worl"
const flute = note("<~@3 A@2 ~ B C ~@2 D E ~@19 B@2 ~@2 F G ~@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 [c5,d#5] [d5,f5] d#5, ~@14 g5 ~", D: "~@5 [b4,d5] [c5,d#5] [d5,f5]",
  E: "~@5 d5 [c5,d#5] [d5,f5], ~@10 b4 ~@5", F: "~@5 [b4,d5] c5 [d5,f5], ~@12 d#5 ~ d#5 ~",
  G: "~@5 [b4,d5] [c5,d#5] [d5,f5], ~@14 d#5 ~", // Bm Cm Dm
})).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 R K S@2 R K T N ~@9 U@2 G V@4 W X Y Z AA@2 AB AC AD AE AD AF
  AG@3 AH AD AI ~
>`.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@16 ~@8 f4@7 ~, b4, ~ [g3,d4]]/4", I: "[c3,c5]@15 ~, [d#4,g4]@13 ~@3", J: "[f3,f5]@15 ~, g#4@13 ~@3",
  K: "[d5,a#5]@7 ~, a#3", L: "[d#4@15 ~ c4@16 [g#4,f5]@14 ~@2, [g4,d#5]@31 ~ f3@16, ~@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: "[f3,f5], g#4@13 ~@3",
  S: "[d#4@15 ~ [c4,c5]@16, d#5@31 ~, g4@29 ~@3]/2", T: "[d#4,d#5], g4@7 ~", U: "[[g4,g5]@15 ~ c5@16, ~@15 c4@16 ~]/2",
  V: "[b3@31 ~@17 f4@14 ~@2, b4, ~ g3, ~@16 d4@15 ~]/4", W: "[c3,d#4,g4,c5]@3 ~",
  X: "[d#5,d#6] ~ [d#5,d#6]@3 ~ [c5,c6]@4 ~@6", Y: "[d#5,d#6] ~ [d#5,d#6]@3 ~ [c5,c6]@5 ~@5",
  Z: "[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#
  AA: "[d5,d6] ~ [d5,d6]@3 ~ [b4,b5]@4 ~@6", AB: "[d5,d6] ~ [d5,d6]@2 ~@2 [b4,b5]@5 ~@5",
  AC: "[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
  AD: "[d#5,d#6] ~ [d#5,d#6]@3 ~ [c5,c6]@3 ~@7", AE: "[d#5,d#6] ~ [d#5,d#6]@2 ~@2 [c5,c6]@3 ~@7",
  AF: "[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
  AG: "[d5,d6] ~ [d5,d6]@3 ~ [b4,b5]@3 ~@7", // D B
  AH: "[d5,d6]@4 [c5,c6] ~ [b4,b5] ~ [d5,d6]@3 ~ c5@2 [b4,b5] ~, ~@12 c6 ~@3", // D C B D B
  AI: "[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 G ~@3 H ~ I ~ J ~ K L M ~@7 E@2 ~@2 N@2 ~@3 O ~ P ~ O ~ K Q M ~@7 D R ~@2 S@2 ~@2 T@2 ~@2 U V
  ~@2 W X ~@2 Y@2 ~@2 Z ~
>`.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: "~@10 [d5,f5]@2 [c5,d#5]@2 [b4,d5] ~", G: "~@5 [d5,f5] [c5,d#5] b4, ~@14 d5 ~",
  H: "~@2 [d5,f5]@3 ~ [d#5,g5]@3 ~ [f5,g#5]@4 ~@2", I: "~@2 [c5,d#5]@3 ~ [d5,f5]@3 ~ [d#5,g5]@5 ~",
  J: "~@2 [d5,f5]@3 ~ [d#5,g5]@2 ~@2 [f5,g#5]@4 ~@2", K: "[g4,g5] ~ [g4,g5]@2 ~@2 [g4,g5]@7 ~@3",
  L: "g4@2 f4@3 ~ d#4@2 ~@2 d4@3 ~ g3@2", M: "c4 ~@7", N: "~@5 [d5,f5] [c5,d#5] [b4,d5]",
  O: "~@5 [d5,f5] [d#5,g5] [f5,g#5]", P: "~@5 [c5,d#5] [d5,f5] [d#5,g5]", Q: "g4@2 f4@3 ~ d#4@2 ~@2 d4@2 ~@2 g3@2",
  R: "~@5 [d#5,g5] f5 c5, ~@12 d5 ~ d#5 ~", S: "~@10 [d5,f5]@2 [c5,d#5] ~ [b4,d5] ~",
  T: "~@10 g5@2 [d5,f5]@2 [c5,d#5] ~, ~@10 d#5 ~@5", U: "~@10 [d5,f5]@2 [c5,d#5,f5] ~ d5@2, ~@14 b4 ~",
  V: "~@5 [d5,f5] d#5 [b4,d5], ~@12 c5 ~@3", W: "~@10 [d#5,g5]@2 f5@2 [c5,d#5] ~, ~@12 d5 ~@3",
  X: "~@5 g5 [d5,f5] c5, ~@10 d#5 ~@3 d#5 ~", Y: "~@10 [d5,f5]@2 d#5@2 [b4,d5] ~, ~@12 c5 ~@3",
  Z: "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 G H I J@2 I K H G H J L@2 I M N O P Q R S T U V W G X Y Z@3 AA AB H AB AC AD Z@2 AE AF AG AH AI AJ AK AL
  AM V H AN H I J@2 Z AO H AP H AQ AR AS AT AU W D W Z AD AV I AW AX AY AB AC AZ Z I BA BB@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@2 ~@2 g1@3 ~ c2@3 ~ g1@2 ~@2", E: "c2@3 ~ g1@3 ~ c2@2 g1@2 a#1@2 b1@2", F: "c2 ~ g1 ~ c2 ~ g1 ~",
  G: "c2@3 ~ g1@2 ~@2 c2@3 ~ g1@3 ~", H: "c2@3 ~ g1@3 ~ c2@3 ~ g1@3 ~", I: "d2@3 ~ g1@3 ~ d2@2 ~@2 g1@3 ~",
  J: "d2@2 ~@2 g1@3 ~ d2@2 ~@2 g1@3 ~", K: "c2@2 ~@2 g1@3 ~ c2@2 g1@2 a#1@2 b1@2", L: "d2@2 ~@2 g1@3 ~ d2@3 ~ g1@3 ~",
  M: "c2@2 ~@2 g1@3 ~ c2 ~ c2@2 d2@2 d#2@2", N: "f2@3 ~ c2@3 ~ f2@4 c2 ~ f2 ~", O: "a#1@3 ~ f1@3 ~ a#1@4 c2@2 d2@2",
  P: "d#2@3 ~ a#1@3 ~ d#2@4 a#1@2 d#2@2", Q: "c2@4 g1@4 c2 ~ c2@2 d2@2 d#2 ~", R: "f2@3 ~ c2@3 ~ f2@4 c2@2 f2@2",
  S: "a#1@3 ~ f1@3 ~ a#1@4 c2@2 d2 ~", T: "d#2@3 ~ a#1@3 ~ d#2@4 a#1@2 ~@2", U: "g1 ~ g1@2 ~@2 g1@10, ~@6 f#1 ~@9",
  V: "g2@2 f2@3 ~ d#2@3 ~ d2@3 ~ g1@2", W: "c2@3 ~ g1@3 ~ c2@3 ~ g1@2 ~@2", X: "c2@4 g1@3 ~ c2@4 g1@3 ~",
  Y: "d2@3 ~ g1@3 ~ d2@4 g1@3 ~", Z: "d2@3 ~ g1@3 ~ d2@3 ~ g1@3 ~", AA: "c2@3 ~ g1@3 ~ c2@2 g1@2 a#1@2 b1 ~",
  AB: "c2@4 g1@3 ~ c2@3 ~ g1@3 ~", AC: "d2@4 g1@3 ~ d2@3 ~ g1@3 ~", AD: "d2@3 ~ g1@3 ~ d2@3 ~ g1@3 ~, ~@12 a#1 ~@3",
  AE: "c2@4 g1@3 ~ c2 ~ c2@2 d2@2 d#2 ~", AF: "f2@3 ~ c2@3 ~ f2@4 c2@2 f2 ~", AG: "a#1@2 ~@2 f1@3 ~ a#1@4 c2@2 d2@2",
  AH: "d#2@3 ~ a#1@3 ~ d#2@3 ~ a#1@3 ~", AI: "c2@3 ~ g1@4 c2 ~ c2@2 d2@2 d#2 ~", AJ: "f2@4 c2@3 ~ f2@3 ~ c2@3 ~",
  AK: "a#1@3 ~ f1@3 ~ a#1@3 ~ c2@2 d2 ~", AL: "d#2@3 ~ a#1@3 ~ d#2@3 ~ a#1@2 ~@2", AM: "g1 ~ g1@2 ~@2 g1@9 ~",
  AN: "c2@3 ~ g1@2 ~@2 c2@2 ~@2 g1@3 ~", AO: "c2@3 ~ g1@3 ~ c2@2 g1@2 a#1 ~ b1@2",
  AP: "c2@2 ~@2 g1@3 ~ c2@2 ~@2 g1@2 ~@2", AQ: "d2@3 ~ g1@2 ~@2 d2@2 ~@2 g1@3 ~", AR: "d2 ~ g1 ~ d2 ~ g1 ~",
  AS: "d2@2 ~@2 g1@2 ~@2 d2@3 ~ g1@2 ~@2, ~@12 a#1 ~@3", AT: "d2@3 ~ g1@3 ~ d2@3 ~ g1@2 ~@2",
  AU: "c2@3 ~ g1@3 ~ c2@2 g1@2 a#1 ~ b1 ~", AV: "d2@2 ~@2 g1@3 ~ d2@2 ~@2 g1@2 ~@2",
  AW: "c2@2 ~@2 g1@3 ~ c2@3 ~ g1@2 a#1@2", AX: "c2@3 ~ g1@3 ~ c2@4 g1@3 ~", AY: "c2@3 ~ g1@3 ~ c2@4 g1 ~ a#1 ~",
  AZ: "d2@3 ~ g1@3 ~ d2@4 g1@3 ~, ~@12 a#1 ~@3", BA: "c2@3 ~ g1@3 ~ c2@4 g1@2 a#1 ~",
  BB: "[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)