// Beautiful Sunday — Daniel Boone
// 122 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 91 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(122/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 · piano · "BeauSunda"
const bass = note("<c#-1 ~@90>").s("gm_piano").gain(0.05)

// chords · string ensemble 1
const string_ensemble_1 = note(`<
  ~@3 A@4 B@4 C D@7 E F@3 G@2 H@2 I@6 J@2 K L M N B@4 O P Q@6 E P R@4 S@2 T@2 B@4 U@2 O V W@2 X@2 Y@2 Z@2 AA@4 AB@2 AC
  AD AE@3 AF AG ~
>`.pickRestart({
  A: "[[a3,f#4]@24 [g3,b3]@4 [a3,c#4,e4]@3 ~, d4@7 ~]/4", B: "[[a3,d4,f#4]@63 ~]/4", C: "[b3,d4,g4]",
  D: "[[c#4,e4]@16 [d4,f#4]@95 ~, a3@111 ~]/7", E: "[b3,d4,g4]@15 ~",
  F: "[[c#4,e4]@15 ~ f#4@31 ~, a3@47 ~, ~@15 d4@31 ~@2]/3", G: "[[a3,d4,f#4]@31 ~]/2", H: "[[b3,d4,g4]@31 ~]/2",
  I: "[[c#4,e4]@32 [d4,f#4]@63 ~, a3@47 ~]/6", J: "[[g#3,b3,d4,e4]@31 ~]/2", K: "[g3,d4], [b3,g4]@7 ~",
  L: "[a3,c#4,e4]@5 ~@11", M: "[a3,d4,f#4]@15 ~", N: "[g3,d4]@8 [a3,c#4,e4]@7 ~, b3@3 ~@5", O: "[g3,b3,d4,g4]@15 ~",
  P: "[a3,c#4,e4]@15 ~", Q: "[[a3,d4,f#4]@95 ~]/6", R: "[[a3,d4,f#4]@31 ~]/4", S: "[[b3,d4,g4]@15 ~]/2",
  T: "[[a3,c#4,e4]@31 ~]/2", U: "[[g#3,b3,d4,e4]@15 ~]/2", V: "[a3,c#4,e4]@3 ~@5", W: "[[a3,d4,f#4]@7 ~]/2",
  X: "[[b3,e4,g#4]@15 ~]/2", Y: "[[c#4,e4]@31 ~, a4@29 ~@3]/2", Z: "[[b3,d#4,f#4]@31 ~]/2", AA: "[[b3,e4,g#4]@63 ~]/4",
  AB: "[[a#3,c#4,e4,f#4]@15 ~]/2", AC: "[c#4,e4,a4]@7 ~, a3", AD: "[b3,d#4,f#4]@7 ~@9", AE: "[[b3,e4,g#4]@47 ~]/3",
  AF: "[a3,c#4,e4]@7 ~ [b3,d#4,f#4]@7 ~", AG: "[g#3,b3,e4]",
})).s("gm_string_ensemble_1").gain(0.25)

// chords · electric guitar muted
const electric_guitar_muted = note(`<
  ~@3 A@3 B A@4 C D A@6 C D A@4 C@2 E D A@4 F@2 C G A H I A@3 C D A@6 C D A@4 C@2 E D A@4 F@2 C G A J F@2 E@2 K@2 F@3 L
  M@2 E N F@3 O P ~
>`.pickRestart({
  A: "[d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~", // D5
  B: "[g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~", // G5 A5
  C: "[g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~", // G5
  D: "[a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3]@2", // A5
  E: "[a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~", // A5
  F: "[e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~", G: "[a2,e3]@5 ~@3",
  H: "[g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [g2,d3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3]@3 ~", // G5 A5
  I: "~@2 [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~", // D5
  J: "[d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3]@3 ~", // D5
  K: "[b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~", // B5
  L: "[e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ b3@2 e3 ~, ~@12 e3 ~@3", // E5
  M: "[f#3,c#4] ~ [f#3,c#4] ~ [f#3,c#4] ~ [f#3,c#4] ~ [f#3,c#4] ~ [f#3,c#4] ~ [f#3,c#4] ~ [f#3,c#4] ~", // F#5
  N: "[b2,f#3]@11 ~@5", O: "[a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [a2,e3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~ [b2,f#3] ~",
  P: "[e3,b3]@7 ~", // E5
})).s("gm_electric_guitar_muted").gain(0.4).pan(0.6)

// chords · overdriven guitar
const overdriven_guitar = note(`<
  ~@3 A B C B ~@6 A B ~@6 C B ~@6 C B ~@6 C D ~@6 A B ~@6 C B ~@6 C B ~@6 C E ~@6 F G ~@6 H G I J K ~
>`.pickRestart({
  A: "[d5,f#5]@5 ~ [b4,e5] ~ [a4,d5]@3 ~ [b4,e5]@4", // D E5 D5 E5
  B: "[d5,f#5] ~ [d5,f#5] ~ [d5,f#5]@2 [b4,e5] ~ [a4,d5]@4 [b4,e5]@3 ~", // D E5 D5 E5
  C: "[d5,f#5]@5 ~ [b4,e5] ~ [a4,d5]@4 [b4,e5]@4", // D E5 D5 E5
  D: "[d5,f#5] ~ [d5,f#5] ~ [d5,f#5] ~ [b4,e5] ~ [a4,d5]@4 [b4,e5]@3 ~", // D E5 D5 E5
  E: "[d5,f#5] ~ [d5,f#5] ~ [d5,f#5]@2 [b4,e5] ~ [a4,d5]@2 [b4,e5]@2 [d5,f#5]@3 ~", // D E5 D5 E5 D
  F: "[e5,g#5]@5 ~ [c#5,f#5]@2 [b4,e5]@4 [c#5,f#5]@4", // E F#5 E5 F#5
  G: "[e5,g#5] ~ [e5,g#5] ~ [e5,g#5]@2 [c#5,f#5] ~ [b4,e5]@4 [c#5,f#5]@3 ~", // E F#5 E5 F#5
  H: "[e5,g#5]@5 ~ [c#5,f#5] ~ [b4,e5]@4 [c#5,f#5]@4", I: "[e5,g#5]@5 ~ [c#5,f#5]@2 [b4,e5]@4 [c#5,f#5]@3 ~",
  J: "[e5,g#5] ~ [e5,g#5] ~ [e5,g#5] ~ [c#5,f#5] ~ [b4,e5]@4 [c#5,f#5]@3 ~", K: "[e5,g#5] ~",
})).s("gm_overdriven_guitar").gain(0.35)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~@3 A B C D E F G H I J K G L@4 M N H L H@2 O P J Q R S T H U@2 V W R X E F G H I J K G L@4 M N H L H@2 O P J Q R S T
  H U@2 V W H Y Z@2 AA N AB AC AD AE@2 Z AF AG AA AH AI AJ@2 AK AL ~
>`.pickRestart({
  A: "~@2 [a3,d4,f#4,a4,d5]@2 ~@2 [a3,d4,f#4,a4,d5] ~@3 [a3,d4,f#4,a4,d5]@2 ~@2 [a3,d4,f#4,a4,d5] ~", // D
  B: "~@2 [a3,d4,f#4,a4,d5]@2 ~@2 [a3,d4,f#4,a4,d5] ~@3 [a3,d4,f#4,a4,d5]@3 ~ [a3,d4,f#4,a4,d5] ~", // D
  C: "~@2 [a3,d4,f#4,a4,d5]@2 ~@2 [a3,d4,f#4,a4,d5] ~@3 [a3,d4,f#4,a4,d5] ~@3 [a3,d4,f#4,a4,d5] ~", // D
  D: "~@2 [g3,d4,g4,b4,d5]@2 ~@2 [g3,d4,g4,b4,d5] ~@3 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~", // G A
  E: "~@2 [d4,a4,d5,f#5]@2 ~@2 [d4,a4,d5,f#5] ~@3 [d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~", // D
  F: "~@2 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5]@2", // D
  G: "~@2 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5] ~", // D
  H: "~@2 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5] ~", // D
  I: "~@2 [g3,d4,b4,d5,g5]@3 ~ [g3,d4,b4,g5] ~@3 [g3,d4,b4,g5]@3 ~ [g3,d4,b4,g5] ~", // G
  J: "~@2 [a3,e4,a4,c#5,e5]@3 ~ [a3,e4,a4,c#5,e5] ~@3 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~", // A
  K: "~@2 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@2", // D
  L: "~@2 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~", // D
  M: "~@2 [g3,d4,b4,g5]@3 ~ [g3,d4,b4,g5] ~@3 [g3,d4,b4,g5]@3 ~ [g3,d4,b4,g5] ~", // G
  N: "~@2 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~@3 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~", // A
  O: "~@2 [g3,d4,b4,d5,g5]@3 ~ [g3,d4,b4,d5,g5] ~@3 [g3,d4,b4,d5,g5]@2 ~@2 [g3,d4,b4,d5,g5] ~", // G
  P: "d4 ~ [g3,d4,b4,d5,g5]@2 ~@2 [g3,d4,b4,d5,g5] ~@3 [g3,d4,b4,d5,g5]@2 ~@2 [g3,d4,b4,d5,g5] ~", // G
  Q: "~@2 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~@3 [a3,e4,a4,c#5,e5] ~@3 [a3,e4,a4,c#5,e5] ~", // A
  R: "~@2 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5] ~", // D
  S: "~@2 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5] ~", // D
  T: "~@2 [a3,d4,a4,d5,f#5]@3 ~ [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~", // D
  U: "~@2 [b3,e4,g#4,b4,d5,e5]@2 ~@2 [b3,e4,g#4,b4,d5,e5] ~@3 [b3,e4,g#4,b4,d5,e5]@2 ~@2 [b3,e4,g#4,b4,d5,e5] ~", // E7
  V: "~@2 [g3,d4,b4,d5,g5]@2 ~@2 [g3,d4,b4,d5,g5] ~@3 [g3,d4,b4,g5]@2 ~@2 [g3,d4,b4,g5] ~", W: "[a3,e4,a4,c#5,e5]@3 ~",
  X: "~@2 [g3,d4,g4,b4,d5,f#5]@2 ~@2 [g3,d4,g4,b4,d5,f#5] ~@3 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~", // Gmaj7 A
  Y: "~@2 [a3,d4,a4,d5,f#5]@2 ~@2 [a3,d4,a4,d5,f#5] ~@3 [a3,d4,a4,d5,f#5]@5 ~", // D
  Z: "~@2 [b3,e4,g#4,b4,e5]@3 ~ [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5]@3 ~ [b3,e4,g#4,b4,e5] ~", // E
  AA: "~@2 [a3,e4,a4,c#5,e5]@2 ~@2 [a3,e4,a4,c#5,e5] ~@3 [a3,e4,a4,c#5,e5]@3 ~ [a3,e4,a4,c#5,e5] ~", // A
  AB: "~@2 [b3,f#4,b4,d#5]@2 ~@2 [b3,f#4,b4,d#5] ~@3 [b3,f#4,b4,d#5]@3 ~ [b3,f#4,b4,d#5] ~", // B
  AC: "~@2 [b3,f#4,b4,d#5]@3 ~ [b3,f#4,b4,d#5] ~@3 [b3,f#4,b4,d#5]@3 ~ [b3,f#4,b4,d#5] ~", // B
  AD: "~@2 [e4,g#4,b4,e5]@3 ~ [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5]@2 ~@2 [b3,e4,g#4,b4,e5] ~", // E
  AE: "~@2 [b3,e4,g#4,b4,e5]@3 ~ [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5]@2 ~@2 [b3,e4,g#4,b4,e5] ~", // E
  AF: "~@2 [c#4,f#4,a#4,c#5,f#5]@2 ~@2 [c#4,f#4,a#4,c#5,e5,f#5] ~@3 [c#4,f#4,a#4,c#5,e5,f#5]@3 ~ [c#4,f#4,a#4,c#5,e5,f#5] ~", // F# F#7
  AG: "~@2 [c#4,f#4,a#4,c#5,e5,f#5]@2 ~@2 [c#4,f#4,a#4,c#5,e5,f#5] ~@3 [c#4,f#4,a#4,c#5,f#5]@3 ~ [c#4,f#4,a#4,c#5,f#5] ~", // F#7 F#
  AH: "[b3,f#4,b4,d#5]@3 ~", // B
  AI: "~@2 [e4,g#4,b4,e5]@3 ~ [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5] ~", // E
  AJ: "~@2 [b3,e4,g#4,b4,e5]@2 ~@2 [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5] ~@3 [b3,e4,g#4,b4,e5] ~", // E
  AK: "~@2 [a3,e4,a4,c#5,e5]@3 ~ [a3,e4,a4,c#5,e5] ~@3 [b3,f#4,b4,d#5]@2 ~@2 [b3,f#4,b4,d#5] ~", AL: "[e4,g#4,b4,e5]",
})).s("gm_acoustic_guitar_steel").gain(0.3).pan(0.3)

// bass · electric bass finger
const bass_2 = note(`<
  ~@3 A B A C D E F G H I A B D@3 G J I B A D K L M N@2 O P D K Q R S T A U E@2 F G H I A B D@3 G J I B A D K L M N@2 O
  P D K Q R S T O V W X Y Z AA AB AC AD AE W AF AG I AH AI AJ AK AL AM ~
>`.pickRestart({
  A: "d2@3 ~ d2@2 b1@2 a1@4 b1@4", B: "d2 ~ d2 b1 a1@2 b1@2", C: "g1 ~ g1 b1 a1@2 b1@2",
  D: "d2@2 ~@2 d2@3 ~ d2@2 ~@2 d2@3 ~", E: "d2 ~ d2 ~ d2 ~ d2 ~", F: "d2@2 ~@2 d2@2 ~@2 d2@2 ~@2 d2@3 ~",
  G: "d2 ~ d2 ~ d2 ~ d2@2", H: "g1@2 ~@2 g1@3 ~ g1@2 ~@2 g1@3 ~", I: "a1@2 ~@2 a1@3 ~ a1@2 ~@2 a1@4",
  J: "g1@3 ~ g1@3 ~ g1@2 ~@2 g1@4", K: "d2@2 ~@2 d2@3 ~ d2@2 ~@2 d2@4", L: "g1@2 ~@2 g1@3 ~ g1 ~@3 g1@3 ~",
  M: "g1 ~@3 g1@2 ~@2 g1@2 ~@2 g1@4", N: "a1@2 ~@2 a1@3 ~ a1@2 ~@2 a1@3 ~", O: "d2@3 ~ d2@2 b1@2 a1@3 ~ b1@4",
  P: "d2@2 ~@2 d2@2 b1@2 a1@3 ~ b1@4", Q: "e2@3 ~ e2@3 ~ e2@2 ~@2 e2@3 ~", R: "e2 ~ e2 ~ e2 ~ e2@2",
  S: "g1@2 ~@2 g1@3 ~ g1@2 ~@2 g1@4", T: "a1 ~", U: "g1@2 ~@2 g1 ~ b1@2 a1@3 ~ b1@2 ~@2",
  V: "d2 ~ d2 ~ d2 ~ b1@2 a1@4 b1@2 ~@2", W: "e2@2 ~@2 e2@3 ~ e2@2 ~@2 e2@3 ~", X: "e2@2 ~@2 e2@3 ~ e2@2 ~@2 e2@4",
  Y: "a1@2 ~@2 a1@3 ~ a1@2 ~@2 a1@2 ~@2", Z: "a1 ~ a1 ~ a1 ~ a1@2", AA: "b1@2 ~@2 b1@3 ~ b1@2 ~@2 b1@3 ~",
  AB: "b1 ~@3 b1@3 ~ b1 ~@3 b1@3 ~", AC: "e2@3 ~ e2@2 c#2@2 b1@4 c#2@4", AD: "e2 ~ e2 ~ e2@2 c#2@2 b1@3 ~ c#2@4",
  AE: "e2@2 ~@2 e2@3 ~ e2 ~@3 e2@3 ~", AF: "f#2@2 ~@2 f#2@2 ~@2 f#2@2 ~@2 f#2@3 ~",
  AG: "f#2@2 ~@2 f#2@3 ~ f#2@2 ~@2 f#2@4", AH: "b1@7 ~@9", AI: "e2@3 ~ e2@2 c#2@2 b1@3 ~ c#2@4",
  AJ: "e2 ~ e2 ~ e2@2 c#2@2 b1@4 c#2@3 ~", AK: "e2@3 c#2 b1@2 c#2@2", AL: "a1 ~ a1 ~ a1@2 c#2@2 b1@4 c#2@4", AM: "e2",
})).s("gm_electric_bass_finger").gain(0.5)

// drums · kick
const kick = s("bd").struct("<~@3 A@19 B A@12 B C A B A@15 B A@12 B C A B A@12 B C A@3 B C ~>".pickRestart({
  A: "x!4", B: "x!3 ~", C: "x",
})).gain(0.5)

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

// drums · low tom
const low_tom = s("lt").struct("<~@36 A ~@31 A ~@15 A ~@3 B ~@2>".pickRestart({
  A: "~@14 x!2", B: "~@7 x",
})).gain(0.35)

// drums · hihat
const hihat = s("hh").struct("<~@3 A@33 B A C A@29 B A C A@13 B A@4 B ~>".pickRestart({
  A: "x!8", B: "x", C: "x!5 ~@3",
})).gain(0.3)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@23 A@2 ~@2 A@2 ~@2 A@2 ~@3 B ~@18 A@2 ~@2 A@2 ~@2 A@2 ~@3 B ~@2 A@2 ~@2 A@2 ~@2 A@2 ~@3 B ~@3 C ~@2
>`.pickRestart({
  A: "~ x ~ x", B: "~@3 x", C: "~@5 x!2 ~",
})).gain(0.4)

// drums · high tom
const high_tom = s("ht").struct("<~@36 A ~@31 A ~@15 A ~@3 B ~@2>".pickRestart({
  A: "~@5 x ~@2", B: "~@3 x!2 ~@3",
})).gain(0.4)

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

stack(
  bass, string_ensemble_1, electric_guitar_muted, overdriven_guitar, acoustic_guitar_steel, bass_2, kick, snare,
  low_tom, hihat, mid_tom, high_tom, crash
)