// For the Good Times — Aaron Neville
// 96 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 81 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(96/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 · acoustic bass · "bass"
const bass = note(`<
  ~ A B C D E F G H I J G K L M N H O M P Q H R O I S K@2 T I U I V W X I G H Y A B C D E F G H I J G K L M N H O M P Q
  H R O I S K@2 T I U I V W X I G H Y O Z AA AB
>`.pickRestart({
  A: "d2@5 ~ d2 ~ d2@5 ~ d2 ~", B: "a2@5 ~ a2@2 a2@5 ~ a2@2", C: "d2@5 ~ d2@2 d2@5 ~ d2 ~",
  D: "e2@4 ~@2 e2@2 a2@5 ~ a2@2", E: "d2@5 ~ d2 ~ a2@3 ~ f#2@3 ~", F: "d2@3 ~@13", G: "e2@5 ~ e2@2 e2@3 ~ e2@3 ~",
  H: "a2@5 ~ a2@2 a2@3 ~ a2@3 ~", I: "d2@5 ~ d2 ~ d2@3 ~ d2@3 ~", J: "d2@5 ~ d2 ~ d2@3 ~ f#2@3 ~",
  K: "a2@5 ~ a2 ~ a2@3 ~ a2@3 ~", L: "d2@5 ~ d2@2 a2@3 ~ f#2@4", M: "d2@5 ~ d2@2 d2@3 ~ d2@2 f#2@2",
  N: "g2@5 ~ g2@2 g2@3 ~ g2@3 ~", O: "d2@5 ~ d2@2 d2@3 ~ d2@3 ~", P: "g2@5 ~ g2@2 g2@3 ~ g2 ~ f#2@2",
  Q: "e2@5 ~ e2@2 e2@3 ~ e2@4", R: "a2 ~@3", S: "a2@5 ~ a2 ~ a2@4 a2 ~ a2 ~", T: "a2@5 ~ a2 ~ a2@4 e2@2 a2@2",
  U: "e2@5 ~ e2@2 a2@3 ~ a2@3 ~", V: "a2@5 ~ a2 ~ d2@3 ~ a2@3 ~", W: "g2@5 ~ g2@2 g2@3 ~ g2@4",
  X: "a#2 ~ g2@4 a#2@2 g2 ~ e2@2 g2 ~ e2@2", Y: "a2@9 ~@7", Z: "e2@5 ~ e2@2 a2@4 e2@4", AA: "d2@5 ~ d2@2 a2@4 f#2@4",
  AB: "d2@5 ~@3",
})).s("gm_acoustic_bass").gain(0.43)

// chords · acoustic guitar nylon · "guitar"
const acoustic_guitar_nylon = note(`<
  ~@7 A B C D E F G@2 H I J K L M N O P Q R@2 S T Q U V W X Y Z AA AB AC ~@6 A B C D E F G@2 H I J K L M N O P Q R@2 S T
  Q U V W X Y Z AA AB AC AD AE AF AG
>`.pickRestart({
  A: "~ [b3,d4]@6 ~ [e3,g3,b3,d4] [g3,b3,d4] ~@6, [e3,g3]@7 ~@9", // Bm Em7 G Em
  B: "[e3,g3,a3,c#4]@7 ~ [e3,g3,a3,c#4]!2 ~@2 [e3,g3,a3,c#4] ~ [e3,g3,a3,c#4] ~", // A7
  C: "[f#3,a3,d4]@7 ~ [f#3,a3,d4] [a3,d4] ~ [f#3,a3,d4] ~ [f#3,a3,d4] ~ f#3", // D D5 D
  D: "[f#3,a3,d4]@7 ~ [f#3,a3,d4]!2 ~@2 [f#3,a3,d4] [a3,d4] ~@2", // D D5
  E: "~@4 [e3,g3,b3,d4] [g3,b3,d4] ~@2 [e3,g3,b3,d4] ~@2 [e3,g3,b3,d4]@4 ~", // Em7 G Em7
  F: "~@4 [e3,g3,a3,c#4]!2 ~@2 [e3,g3,a3,c#4] ~@2 [e3,g3,a3,c#4]@4 ~", // A7
  G: "[~@4 [f#3,a3,d4] [a3,d4] ~@2 [f#3,a3,d4] ~@2 [f#3,a3,d4]@7 ~@2 [f#3,a3,d4]!2 ~@2 [f#3,a3,d4] ~@2 [f#3,a3,d4]@3 ~@2]/2", // D D5 D
  H: "[g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4]@4 ~ [g3,b3,d4] ~@2 [g3,b3,d4]@2 ~@2", // G
  I: "[e3,g3,a3,c#4] ~ [e3,g3,a3,c#4] ~ [e3,g3,a3,c#4]@4 ~ [e3,g3,a3,c#4] ~@2 [e3,g3,a3,c#4]@2 ~@2", // A7
  J: "[f#3,a3,d4] ~ [f#3,a3,d4] ~ [f#3,a3,d4]@4 ~ [f#3,a3,d4] ~@2 [f#3,a3,d4]@3 ~", // D
  K: "[f#3,a3,d4]@6 f#3 a3 d4 f#4 d4 a3 f#3 a3 ~@2", // D
  L: "g3 ~ g3 ~ [g3,b3,d4,g4]@4 ~ [g3,b3,d4,g4] ~@2 [b3,d4,g4]@2 ~@2, ~@11 g3@3 ~@2", // G
  M: "e3 ~ e3 ~ [e3,g3,b3,d4]@4 ~ [g3,b3,d4] ~@2 [g3,b3,d4]@3 ~, ~@11 e3@4 ~", // Em7 G
  N: "e3 ~ e3 ~ [e3,g3,a3]@4 ~ [e3,g3,a3] ~ e3 [g3,a3]@2 e3 ~", O: "[e3,g3,a3]@3 ~@13",
  P: "[f#3,a3,d4]@3 [f#3,a3,d4] ~@2 [f#3,a3,d4]@5 ~ [f#3,a3,d4]!2 ~@2", // D
  Q: "[f#3,a3,d4] ~@2 [f#3,a3,d4] ~@2 [f#3,a3,d4]@5 ~ [f#3,a3,d4]!2 ~@2", // D
  R: "[e3,g3,c#4] ~@2 [e3,g3,c#4] ~@2 [e3,g3,c#4]@5 ~ [e3,g3,c#4]!2 ~@2", // C#dim
  S: "[e3,g3,c#4] ~@2 [e3,g3,c#4] ~@2 [e3,g3,c#4]@5 ~ [e3,g3,c#4] [g3,c#4] ~@2", // C#dim Gdim
  T: "[e3,g3,c#4] ~@2 [e3,g3,c#4] ~@2 [e3,g3,c#4]@5 ~ [e3,g3,b3] [g3,b3] ~@2", // C#dim Em G
  U: "[g3,b3,d4] ~@2 [g3,b3,d4] ~@2 [g3,a3,c#4]@3 ~ e3 g3 a3 c#4 ~@2", // G A7
  V: "[f#3,a3,d4] ~@2 [f#3,a3,d4] ~@2 [f#3,a3,d4]@3 ~ [f#3,a3,d4] ~ [f#3,a3,d4] [a3,d4] ~@2", // D D5
  W: "[e3,g3,c4] ~@2 [e3,g3,c4] ~@2 [a3,c4]@2 f#3 ~ [f#3,a3,c4] [a3,c4] ~ [f#3,a3,c4]@2 ~, ~@6 e3 ~@9", // C Am F#dim Am F#dim
  X: "~@4 [b3,d4,g4]!2 ~ [b3,d4,g4] ~ [b3,g4]@3 [d4,g4] ~ [b3,d4,g4] ~, ~@9 d4@2 ~@5", // G Em G5 G
  Y: "~@4 [a#3,d4,g4]!2 ~ [a#3,d4,g4] ~ [a#3,g4]@3 [d4,g4] ~ [a#3,d4,g4] ~, ~@9 d4@2 ~@5", // Gm D# G5 Gm
  Z: "[f#3,a3,d4]@2 ~ [f#3,a3,d4] ~@2 [f#3,a3,d4]@2 ~ [f#3,a3,d4]@2 ~ [f#3,a3,d4] ~ [f#3,a3,d4] ~", // D
  AA: "[e3,g3,b3,d4]@2 ~ [e3,g3,b3,d4] ~@2 [e3,g3,b3,d4]@3 [e3,g3,b3,d4]@2 ~ [e3,g3,b3,d4] ~ [e3,g3,b3,d4] ~", // Em7
  AB: "~@2 [a3,c#4]@6 ~@2 [g3,c#4]@3 a3 e3 c#3, e3@7 ~ c#3@5 ~@3, ~ g3@7 ~ e3@4 ~@3", // A Gdim
  AC: "~@2 [e3,g3]@11 ~@3, a#2@3 ~, ~ c#3@11 ~@4", // Em
  AD: "[d3,d4,f#4,a4]@7 ~ [d3,d4,f#4,a4] [d4,f#4,a4] ~@2 [d3,d4,f#4,a4]@2 ~@2", // D
  AE: "[e3,b3,d4,e4,g4]@6 ~@2 [e3,b3,d4,e4,g4] ~@3 [a3,c#4]@4, ~@6 [e4,a4] ~", // Em7 A A5
  AF: "[d3,d4,f#4]@7 ~ [d3,d4,f#4]@2 ~@2 f#4 ~ a4@2, ~@3 a3", AG: "[d3,d5]@5 ~@3",
})).s("gm_acoustic_guitar_nylon").gain(0.27).pan(0.6)

// chords · string ensemble 1 · "strings"
const string_ensemble_1 = note(`<
  ~ A B@5 ~ C D@4 E@2 F@2 G@6 H@2 I@6 J K@7 A B@5 ~ C D@4 E@2 F@2 G@6 H@2 I@6 J K@7 L M N@2
>`.pickRestart({
  A: "d5@4 d5@4 e5@4 f#5@3 ~, [f#4,a4]@15 ~", // F#m
  B: "[~@12 b5@2 c#6@2 c#6 d6@2 a5@8 ~@2 f#5@2 ~ b3@7 ~@9 [d4,f#4,f#5]@17 ~@15, [e4,b4]@15 ~ [d4,f#4]@14 ~@2 [e4,g4]@16 ~@32, a5@8 ~@2 a5@2 ~@16 g5@2 ~ e5@14 d5@20 ~@15, ~@2 g4@13 ~@25 c#4@8 ~@32, ~@11 a4@20 ~@49]/5", // D E5 D Em
  C: "e4@15 ~", D: "[f#4@31 ~ b3@16 g3 ~ g3@14, d4@47 ~ c#4@16, ~ e4]/4", E: "[d3@3 a3 f#3@4, f#4]/2",
  F: "[b3@15 ~@13 a3@4, g3@7 ~, ~ [c#4,e4]]/2", // C#m
  G: "[[d3,f#4]@32 g3@16 [e3,b3]@16 [a3,c#4]@21 ~@11, d4@21 ~@11, ~@8 g4@13 ~@3, ~@32 b3@14 ~@2 e4@37 ~@11]/6", // D E5 A
  H: "[[d3,a4], [d4,f#4]@15 ~]/2", // D5 D
  I: "[g4@16 a4@8 ~@4 e3@3 ~ [d3,f#4]@8 [e3,b3]@4 [a3,c#4,g4]@4, a3@5 ~, [c#4,e4]@8 d4@3 ~, ~@3 g4 ~ e4]/6", // D E5 A7 C#m
  J: "[d3,a4], f#4@7 ~", // D5
  K: "[~@8 d3@7 ~@17 a#3@16 [d3,f#4]@16 [e3,b3]@16 a3@16 a#3@15 ~, c4@15 ~ d4@64 [c#4,g4]@31 ~, [a3,e4,g4]@5 ~@3 g3@16 ~@32, ~@8 a4@12 g4@27 ~@17 e4@48, ~@16 b3@15 ~@81]/7", // D E5 C#dim A7
  L: "[f#4,a4,d5]", M: "[e4,g4]@3 ~ [c#4,e4,a4]@2 [b3,e4,g4]@2, b4 ~", N: "[[a3,d4,f#4]@3 ~]/2",
})).s("gm_string_ensemble_1").gain(0.36).pan(0.9)

// chords · string ensemble 1 · "strings" · soft notes
const string_ensemble_1_soft = note("<~@7 A B ~@4 C@4 ~@14 D ~@13 A B ~@4 C@4 ~@14 D ~@11>".pickRestart({
  A: "[b3,e4,g4]", B: "[c#4,g4]", C: "[~ g4, d4@47 ~@17]/4", D: "d4@15 ~",
})).s("gm_string_ensemble_1").gain(0.22).pan(0.9)

// drums · kick
const kick = s("bd").struct("<~ [x ~@2 x!2 ~@3]!5 x [x ~@2 x!2 ~@3]!37 x [x ~@2 x!2 ~@3]!35 x>").gain(0.36)

// drums · rim
const rim = s("rim").struct("<~@6 x ~@37 x ~@35 x>").gain(0.26)

// drums · snare
const snare = s("sd").struct("<~ [~ x ~ x]!5 x [~ x ~ x]!37 x [~ x ~ x]!35 ~>").gain(0.31)

// drums · hihat
const hihat = s("hh").struct("<[x!4] [x!8]!5 x [x!8]!37 x [x!8]!35 x>").gain(0.46)

// drums · open hat
const open_hat = s("oh").struct("<~ [~@15 x]!5 ~ [~@15 x]!37 ~ [~@15 x]!35 ~>").gain(0.46)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@23 [x!8]!16 ~@22 [x!8]!16 ~@4>").gain(2.34)

stack(bass, acoustic_guitar_nylon, string_ensemble_1, string_ensemble_1_soft, kick, rim, snare, hihat, open_hat, cabasa)