// Sunny — Boney M.
// 100 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: ch 12 "BASS" named as a bass, played on electric bass finger (its piano patch is not one)
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 100 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(100/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 · electric bass finger · "BASS"
const bass = note(`<
  ~@2 A B C D A B C D E F C G H I J K A B C D A B C D E F L M H N J O A B C D A B C D E F C M P N J K A B C D A B C D E
  F C G H I J K A B C D A B C D E F L M H N J O A B C D A B C D E F C M P N J K ~@2
>`.pickRestart({
  A: "a2@2 ~ a2 a2@2 ~ a2", B: "c3@2 ~ c3 c3@2 ~ c3", C: "f2@2 ~ f2 f2@2 ~ f2", D: "b2@2 ~ b2 e3@2 ~ e3",
  E: "a2@2 ~ a2 e2@2 ~ e2", F: "g2@2 ~ g2 c3@2 ~ c3", G: "a#2@2 ~ a#2 f3@2 ~ f3", H: "b2@2 ~ b2 b2@2 ~ b2",
  I: "e3@2 ~ e3 e3@2 ~ e3", J: "a2@2 ~ a2 e3@2 ~ e3", K: "b2@2 ~ b2 e3@2 g#2@2", L: "f2@2 ~ f2 c3@2 ~ c3",
  M: "a#2@2 ~ a#2 a#2@2 ~ a#2", N: "e3@2 ~ e3 b2@2 ~ b2", O: "b2@2 ~ b2 e3@2 c3@2", P: "b2@2 ~ b2 f#2@2 ~ f#2",
})).s("gm_electric_bass_finger").gain(0.36)

// chords · alto sax · "BASS"
const alto_sax = note(`<
  ~@2 A B C D C E F G H I J K L M H N O P Q R C S T U C V C W X Y H Z C B AA AB AC B AD AB AE AF AG AH AI Y C AJ@2 B C D
  C E F G H I J K L M H N O P Q R C S T U C V C W X Y H Z C B AA AB AC B AD AB AE AF AG AH AI Y C AK@3
>`.pickRestart({
  A: "[c4,e4,g4,a4]@4 ~ c4 e4 g4", B: "a#3@5 ~@2 e4, g4, e4@7 ~, d4@3 d4, ~@5 a#3@3",
  C: "c4@5 ~@2 g4, a4, g4@7 ~, e4@3 e4, ~@5 c4@3",
  D: "a3@2 ~ b3 ~@2 b3 [e3,b3,d4,e4,g#4], [b2,d4,f#4]@4 ~ e3@2 ~, b3@3 ~ [d4,e4,g#4]@3 ~, ~ a3 b3 ~", // E7 Bm E7
  E: "~@4 c4@3 ~, [a#3,d4,e4,g4]@15 ~", F: "f3@3 ~ f3!2 [c4,e4,g4,a4]@2, [c4,e4,g4,a4]@6 f3 ~",
  G: "b2 ~ d4 [d4,f#4,a4,b4] [b3,d4,g#4]@4, [f#4,a4,b4]@3 ~ e4@3 ~, d4 ~@3, ~ b2@3 ~@4", H: "[c4,e4,g4,a4]@15 ~",
  I: "f4@2 ~ g4 a#3@2 ~ c4, [a#4,d5]@2 ~ a#3, g4@3 ~ c4@3 ~, ~ f4 [c3,e4,g4]@2", // A# C
  J: "c4@5 ~@2 g4, a4, g4@7 ~, e4@3 e4, f3@7 ~@3 c4@4 ~@2", K: "~@8 a#3@7 ~, [a3,c4,d4,f4]@15 ~",
  L: "~@3 [f#4,a4,b4], [d4,f#4,a4,b4]@6 d4 ~, ~ b3, ~@5 b2@3", M: "[b3,e4]@4 ~@3 e4, g#4, d4@3 d4, ~@5 b3@3",
  N: "~@2 a3 d4 e3 ~ b3 [b3,d4,e4,g#4], [b3,d4,f4]@6 b3 ~ [d4,e4,g#4]@6 ~@2, a3@2 ~ [a3,f4]@5, ~ b2@3 b3@2 ~@2, ~@5 e3@3", // E7 Bdim E7 Dm
  O: "~@5 a2 [a2,c4,e4,g4,a4]@2, [c4,e4,g4,a4]@3 ~", P: "~@7 e4, [c3,g4], e4@3 d4, d4@5 a#3@3, a#3@4 c4@3 ~",
  Q: "f3@3 ~@4 g4, a4, g4@3 e4, e4@5 c4@3, c4@4 f3@3 ~",
  R: "a3@2 ~ b3 [e3,b3,d4,g#4]@4, [d4,f#4]@4 e4@3 ~, b3@3 ~@5, ~ a3 ~@2", // E7 D
  S: "a#3@5 ~@2 e4, [c3,g4], e4@7 ~, d4@3 d4, ~@5 a#3@3", T: "~@3 [c4,e4,g4,a4], [c4,e4,g4,a4]@3 ~, ~@5 f3@2 ~",
  U: "~@3 b3 ~@2 b3 [b3,d4,e4,g#4], [d4,f#4]@4 [d4,e4,g#4]@3 ~, b3@3 ~ b3@2 ~@2, a3@2 a3@2 ~ e3@3, ~ b2@3 ~@4", // E7 D E7
  V: "a#3@2 ~@2 c3 ~ a#3 [c3,a#3,c4,e4,g4], [f4,g4]@2 a#3 ~, d4@3 d4@5, ~@2 a#3@2 [c4,e4,g4]@3 ~, ~@5 c3@2 ~", // C7 Fsus2 C
  W: "[d4,f4,a4,c5]@15 ~", X: "[d4,f#4,a4,b4]@15 ~", Y: "[b3,d4,g#4]@15 ~, e4@7 ~@9",
  Z: "a3@4 ~@2 b3 ~@5 b3@2 [b3,d4,e4,g#4]@2, [d4,f4]@4 [d4,e4,g#4]@3 ~, b3@3 ~ b3@2 ~@2, ~@2 a3@2 ~ e3@3", // E7 Dm E7
  AA: "~@7 g4, a4, g4@3 e4, e4@5 c4@3, c4@4 f3@3 ~",
  AB: "d4@4 ~@3 d4, [b2,a3,f#4], b3@3 ~ g#4@4, ~@2 [d4,e4] b3, ~@4 b3 e3@3", // B7 Dsus2
  AC: "~@3 [c4,e4,g4,a4], [c4,e4,g4,a4]@3 ~, ~@5 a2@3", AD: "f3@3 ~@3 [c4,e4,g4,a4]@2, [c4,e4,g4,a4]@3 ~, ~@5 f3@2 ~",
  AE: "~@4 a3@3 ~, [c4,e4,g4,a4]@15 ~", // Am7
  AF: "~@2 f4 [f4,g4,a#4,d5] [a#3,c4,e4,g4]@4, [g4,a#4,d5]@3 ~@5, f4 ~@3, ~ g3@3 ~@4", // Gm7 C7 Gm
  AG: "f3@8 f3@7 ~, [c4,e4,g4,a4]@15 ~", AH: "a#2@5 ~ [d4,f4,a4,c5]@2, [d4,f4,a4,c5]@3 ~, ~@5 a#2@3",
  AI: "b3@7 ~ b3@7 ~, [b2,a3,d4,f#4]@15 ~", // Bm7
  AJ: "[d4@4 ~@4 c4@5 ~@2 g4, [f4,b4]@7 d4 [e4,g4,a4]@5 c4 e4@2, a4@3 b3@5, ~ g#4@3, ~@4 [b3,d4,e4] e3@11]/2", // Fdim A7 E7
  AK: "[d4@4 ~@3 d4@16 ~, [f4,a4,b4]@2 ~, ~ g#4@4 ~, ~@2 [d4,e4] b3@8 ~, ~@4 b3 e3@16 ~@3]/3", // Bm7b5 Dsus2
})).s("gm_alto_sax").gain(0.26)

// chords · alto sax · "BASS" · soft notes
const alto_sax_soft = note(`<
  ~@2 A B C ~ D E F G H@2 I J@2 K L@2 D E F M D B N ~ O P Q R@5 D B S T D B U T V@2 W@2 X@3 Y D B C ~ D E F G H@2 I J@2
  K L@2 D E F M D B N ~ O P Q R@5 D B S T D B U T V@2 W@2 X@3 Z@3
>`.pickRestart({
  A: "~ g#3 ~@4 a3@2 a3@5 ~ a3@2, a3@5 ~@11", B: "c4@3 c4 c4@3 c4", C: "f3@3 f3 f3@3 f3", D: "a3@3 a3 a3@3 a3",
  E: "c4@3 c4 ~@3 c4", F: "~@3 f3 ~@3 f3", G: "b3@3 b3 ~@3 e4",
  H: "[a3@7 a3 a3@6 e4 ~ g3@7 g3@7 ~ e3, ~@15 e3@9 ~@6 g3@2]/2", I: "~@7 f3 ~@7 b3, ~ f3, ~@7 c4",
  J: "[a#3@7 a#3 ~@6 c#4 ~ b3@7 ~@8 d#4, ~@15 a#3@17, ~@23 f#3@9, ~@15 d4]/2", K: "~@8 e4@6 ~ g#3, ~@7 b3@3 ~@6",
  L: "[a3@7 a3 a3@6 a3 a#3@8 b3 ~@7 g#3]/2", M: "~@7 e4", N: "f3@3 f3!2 ~@2 f3", O: "a3@7 ~ a3@6 ~ e3, ~@7 e3@7 a3@2",
  P: "g3@7 ~@8 e3, ~@7 c#4@9, ~@7 g3", Q: "f3@7 f3 ~@7 a3, ~ f3, ~@7 g#3",
  R: "[a#3@7 a#3 a#3@6 c#4 ~ b3@7 ~ b3@6 d4 ~@8 e4 e4@6 b3 ~ a3@7 ~ a3@6 a3 a#3@8 b3 ~@7 g#3, ~@15 c4@16 d#4@16 ~@8 e3@8 ~@17, ~@23 f#3@8 ~@16 g#3@16 ~@17]/5",
  S: "f3@3 f3 ~@3 f3", T: "~@3 b3 ~@3 e4", U: "~@3 f3!2 ~@2 f3",
  V: "[a3@7 a3 ~@6 a3 ~ g3@2 ~@5 b3 ~@6 g3 e3, ~@15 g#3@9 ~@8]/2",
  W: "[~@7 c3@7 g#3 ~ a#3@7 ~@8 c4, ~@15 a3@17, ~@23 f3@9, ~@3 a#3, ~@15 c#4]/2",
  X: "[~@7 b3 ~@6 f#4 ~@8 e4 e4@6 e4 ~ a3@7 a3 a3@6 ~ a#3, ~@15 f4@16 g#3@17, ~@23 a3]/3", Y: "b3@5 ~@2 b3 ~@6 e4@2",
  Z: "[b3@5 ~@2 b3 ~@6 e4@32 ~@2]/3",
})).s("gm_alto_sax").gain(0.1)

// drums · kick
const kick = s("bd").struct(`<
  ~@2 A B A B A B A@3 B A B A B A@3 B A@3 B A@3 B A B A B A@3 B A B A B A@3 B A B A B A@3 B A B A B A@3 B A B A B A@3 B
  A@3 B A@3 B A B A B A@3 B A B A B A@3 B A B A B A@2 ~@2
>`.pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "x ~@2 x!3 ~ x",
})).gain(0.41)

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

// drums · snare · soft notes
const snare_soft = s("sd").struct(`<
  ~@6 A ~@9 A ~@2 B C ~@8 A ~@2 A ~@2 D C ~@6 D C ~@6 D C ~@6 E ~ A ~@5 D C ~@2 B C ~@2 E ~ A ~@2 A ~@2 D C ~@15
>`.pickRestart({
  A: "~ x!2 ~@13", B: "~@15 x", C: "~ x ~ x ~@12", D: "~@13 x ~ x", E: "~@3 x ~@4",
})).gain(0.26)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@13 A ~@11 B ~@3 C ~@3 B ~@3 D ~@7 C ~@3 B ~@11 A ~@11 B ~@3 C ~@3 B ~@3 D ~@7 C ~@3 B ~@2
>`.pickRestart({
  A: "~ x ~@6", B: "~@7 x", C: "~ x ~@3 x ~@2", D: "~@5 x ~@2",
})).gain(0.41)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@17 A ~@7 B ~@7 B ~@7 A ~@7 B ~@15 A ~@7 B ~@7 B ~@7 A ~@7 B ~@2>".pickRestart({
  A: "~@12 x!4", B: "~@3 x ~ x!2 ~",
})).gain(0.41)

// drums · open hat
const open_hat = s("oh").struct("<~@2 A@11 B A@11 B@2 A@2 B A@27 C A@15 C B A@2 B A@11 C D ~@3 D ~@5>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~@2", C: "~ x ~ x ~@4", D: "~@7 x",
})).gain(0.2)

// drums · high tom
const high_tom = s("ht").struct("<~@25 A ~@7 A ~@15 A ~@23 A ~@7 A ~@15 A ~@2>".pickRestart({
  A: "~ x",
})).gain(0.41)

// drums · crash
const crash = s("cr").struct(`<
  ~@2 A ~@3 B ~@3 C ~@7 B ~@3 B ~@2 D B ~@7 B ~@3 A ~@3 C ~@7 A ~@3 B ~@2 D C ~@7 B ~@3 B ~@2 D B ~@7 B ~@3 A ~@2 E B
  ~@9
>`.pickRestart({
  A: "x", B: "x!2 ~@2", C: "~ x ~@2", D: "~@8 x ~@2 x ~@2 x ~", E: "~@2 x!2",
})).gain(0.41)

// drums · ride
const ride = s("rd").struct("<~@2 A@23 B C A@30 D E A@14 D F A@14 B ~@10>".pickRestart({
  A: "x!8", B: "x!4 ~@4", C: "~@3 x!5", D: "x", E: "~@2 x!6", F: "~ x!7",
})).gain(0.41)

// drums · cowbell
const cowbell = s("cb").struct("<[x!2] [x!4] ~@98>").gain(0.46)

stack(
  bass, alto_sax, alto_sax_soft, kick, snare, snare_soft, low_tom, hihat, mid_tom, open_hat, high_tom, crash, ride,
  cowbell
)