// Shoop Shoop Song — Cher
// 120 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 88 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(120/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 · brass section · "BRASS"
const brass_section = note(`<
  ~@3 A B A C D@4 E F G ~ H@2 I@3 F J ~ K@2 L@2 M@2 N@2 O ~ D@4 E F G ~ H@2 I@3 F J ~ P@2 Q@2 R@2 S@2 T@2 L@2 M@2 N@2 O
  ~ D@4 E F U ~ E F V@2 E F V@2 E F W X Y
>`.pickRestart({
  A: "[g3,g4,b4,d5]@2 ~@10 [g3,g4,b4,d5]@3 ~", B: "[f3,f4,a4,c5]@3 ~@9 [f3,f4,a4,c5]@2 ~@2", C: "[g3,g4,b4,d5]@3 ~@13",
  D: "d3/4", E: "c3 a3", F: "f3 g3", G: "c3@3 ~@5", H: "[d3@31 ~]/2", I: "[~@4 c3 a3, d3@17 ~@7]/3", J: "c3@9 ~@7",
  K: "[~@8 [c4,f4,a4]@2 [c4,f4,a4]@3 ~ [c4,e4,g4]@18]/2", L: "e2/2", M: "a2/2", N: "d2/2", O: "[d5,g5,b5] ~@7",
  P: "[~@8 [c4,f4,a4] ~ [c4,f4,a4]@3 ~ [d4,g4,b4]@7 ~@11]/2", Q: "[d2,d3]/2", R: "[c2,c3]/2", S: "[d2,d3] [g2,g3]",
  T: "[[c2,c3]@15 ~]/2", U: "~@4 [c4,g4] ~@3 [c4,f4,a4]@2 [c4,f4,a4]@3 ~ [d4,g4,b4]@2, c3@3 ~@5, ~@2 e4 ~@5",
  V: "[~@2 [c4,e4,g4] ~ [c4,f4,a4]!2 ~ [d4,g4,b4]@2 ~@7, c3@3 ~@13]/2", // C F G
  W: "~@2 [e4,g4] ~ [c4,f4,a4]!2 ~ [d4,g4,b4], c3@3 ~@5, ~@4 c4 ~@11", X: "c3 ~", Y: "[g4,c5,e5] ~@3",
})).s("gm_brass_section").gain(0.3).pan(0.7)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note("<~@23 A@2 B C D E F G H ~@19 I J K L ~@3 M B C D E F G H ~@22>".pickRestart({
  A: "[~@8 [c4,f4,a4]@2 [c4,f4,a4]@3 ~ [c4,e4,g4]@5 ~ c4@4 d4@4 d#4@4]/2", B: "~ g#4, e4", C: "[e4,g#4,b4]@15 ~",
  D: "~ c4, a3", E: "[a3,c4,e4]", F: "~@8 f#4@7 ~, d4", G: "[d4,f#4,a4]", H: "[d4,g4,b4]@3 ~@13", I: "~@12 g5 ~ g5 ~",
  J: "f5 ~ e5@3 ~ d5@8 ~@2", K: "~@6 c5 d5", L: "e5@2 d5@2 c5@2 g5@9 ~", M: "~ c4 d4 d#4",
})).s("gm_string_ensemble_1").gain(0.35).pan(0.2)

// chords · string ensemble 1 · "STRINGS" · soft notes · Dm G C
const string_ensemble_1_soft = note(`<
  ~@55
  [[d5,f5,a5] ~@3 [d5,f5,a5] ~@3 [d5,g5,b5] ~@3 [d5,g5,b5] ~@3]!2
  [[c5,e5,g5]@3 ~@13]
  ~@30
>`).s("gm_string_ensemble_1").gain(0.1).pan(0.2)

// chords · piano
const piano = note(`<
  ~@3 A B A C D@3 E F G H I J D K E L M N O ~@10 D@3 E F G H I J D K E L M N O ~@2 E P Q R S T U ~@9 D@3 E F G H I F G H
  I F G H I F G H I V
>`.pickRestart({
  A: "[g2,g3,b3,d4]@2 ~@10 [g2,g3,b3,d4]@3 ~", B: "[f2,f3,a3,c4]@3 ~@9 [f2,f3,a3,c4]@2 ~@2", C: "[g2,g3,b3,d4]@3 ~@13",
  D: "~@2 d4@2 f4@3 d4 ~@2 b3@2 ~@2 b3@2, a3@7 ~ g3@7 ~, ~@3 d4",
  E: "~@2 d4@2 f4@3 d4 ~@2 b3@2 ~@2 b3 ~, a3@7 ~ g3@7 ~, ~@3 d4", F: "~ e4 ~ e4 ~ c4 ~ c4, c4@6 ~@2 a3@7 ~, ~ g4 ~ e4",
  G: "~@2 a3@2 ~@2 a3@2 ~@2 b3@2 ~@2 b3 ~, f3@7 ~ g3@6 ~@2, ~@4 c4@5 ~@3 d4@4",
  H: "~@2 e4@2 [c4,e4,g4]@3 ~ [c4,f4,a4]@2 [c4,f4,a4]@3 ~ [d4,g4,b4]@2, c4 ~@3", // C F G
  I: "~@2 [d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~", // G
  J: "~@2 d4@2 f4@3 d4 ~@2 b3@2 ~@2 b3@2, a3@7 ~ g3@6 ~@2, ~@3 d4",
  K: "~@2 d4@2 f4@3 d4 ~@2 b3@2 ~@2 b3@2, a3@6 ~@2 g3@7 ~, ~@3 d4", L: "~ e4 ~ e4 ~ c4 ~ c4, c4@3 ~ a3@3 ~, ~ g4 ~ e4",
  M: "~@2 a3@2 ~@2 a3@2 ~@2 b3@2 ~@2 b3 ~, f3@7 ~ g3@6 ~@2, ~ c4 ~ d4",
  N: "c4@2 e4@2 [c4,e4,g4]@3 ~ [c4,f4,a4]@2 [c4,f4,a4]@3 ~ [c4,e4,g4]@2", // C F C
  O: "~@2 [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,g4] ~ [b3,d4,g4] ~, ~@6 d4 ~", // G Em G
  P: "~@2 d4@2 f4@2 d4 ~@3 b3@2 ~@2 b3 ~, a3@7 ~ g3@7 ~, ~@3 d4", Q: "~ e4 ~ e4 ~ e4 ~ e4, c4@7 ~ c4@7 ~, ~ g4 ~ g4",
  R: "~ e4 g4 e4 ~ e4 ~ e4, c4@7 ~ c4@6 ~@2, ~@3 g4", S: "~ d4 ~ d4 ~ b3 ~ b3, a3@6 ~@2 g3@7 ~, ~ f4 ~ d4",
  T: "~@2 d4@2 ~@2 d4@2 ~@2 b3@2 d4@2 b3 ~, a3@3 ~ g3@4, ~ f4 ~@2", U: "[g3,c4,e4]@3 ~@5", V: "[c3,g3,c4,c5] ~",
})).s("gm_piano").gain(0.5).pan(0.2)

// bass · fretless bass · "BASS"
const bass = note(`<
  ~@3 A B A C D E@2 F G H I J K E L M N H O P Q@2 R S T U V W X Y D E@2 F G H I J K E L M N H O P Z J AA AB AC AD AE AF
  AG AH R S T U V W X Y D E@2 F G H I J G H I J G H I J G H I AI AJ
>`.pickRestart({
  A: "g1 ~@5 g1 ~", B: "f1 ~@5 f1 ~", C: "g1 ~@9 g1 ~ a1 ~ b1 ~", D: "d2@5 ~ d2 ~ g1@3 ~ a1 ~ g1@2",
  E: "d2@4 ~@2 d2 ~ g1 ~ g1 ~ a1 ~ g1 ~", F: "d2@5 ~ d2 ~ g1 ~ g1 ~ a1 ~ b1 ~", G: "c2@4 ~@2 c2 ~ a1@4 ~@2 a1@2",
  H: "f1@4 ~@2 f1 ~ g1@3 ~ a1 ~ b1 ~", I: "c2@5 ~ c2 ~ f1 ~ f1@3 ~ g1@2", J: "~@2 g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ a1 ~ b1 ~",
  K: "d2@5 ~ d2 ~ g1@3 ~ a1 ~ g1 ~", L: "d2@4 ~@2 d2@2 g1 ~ g1@2 a1 ~ g1 ~", M: "d2@5 ~ d2 ~ g1 ~ g1@2 a1 ~ b1 ~",
  N: "c2@4 ~@2 c2 ~ a1@4 ~@2 a1 ~", O: "c2@4 ~@2 c2 ~ f1 ~ f1@3 ~ c2@2", P: "~@2 g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~",
  Q: "[c2@4 ~@2 c2 ~ f1 ~ f1@3 ~ c2@4 ~@2 c2@3 ~ d2@3 ~ d#2@2 ~@2]/2", R: "e1@4 ~@2 e1 ~ e1@6 ~@2",
  S: "e1@4 ~@2 e1 ~ e1@3 ~ f1 ~ g1 ~", T: "a1@4 ~@2 a1 ~ a1@6 ~@2", U: "a1@5 ~ a1 ~ a1@3 ~ b1 ~ c2 ~",
  V: "d2@4 ~@2 d2 ~ d2@6 ~@2", W: "d2@5 ~ d2 ~ d2@3 ~ b1 ~ a1 ~", X: "g1 ~@7", Y: "~@10 g1 ~ a1 ~ b1 ~",
  Z: "c2@4 ~@2 c2 ~ f1 ~ f1@3 ~ g1@2", AA: "d2@4 ~@2 d2 ~ g1@4 ~@2 g1 ~", AB: "d2@4 ~@2 d2 ~ g1 ~ g1 ~ a1 ~ b1 ~",
  AC: "c2@4 ~@2 c2 ~ g1 ~ g1@2 ~@2 g1 ~", AD: "c2@4 ~@2 c2 ~ g1 ~ g1 ~ a1 ~ b1 ~", AE: "d2@4 ~@2 d2 ~ g1@4 ~@2 g1@2",
  AF: "d2@4 ~@2 d2 ~ g1@3 ~ a1 ~ b1 ~", AG: "c2 ~@3", AH: "~@4 c2@3 ~ d2@3 ~ d#2@2 ~@2",
  AI: "~@2 g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1@2 g1@2", AJ: "c2 ~",
})).s("gm_fretless_bass").gain(0.5)

// drums · rim
const rim = s("rim").struct("<[x!2] [x!4] ~@86>").gain(0.3)

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

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

// drums · low tom
const low_tom = s("lt").struct("<~@6 [~@7 x] ~@25 [~@6 x!2] ~@33 [~@6 x!2] ~@21>").gain(0.5)

// drums · hihat
const hihat = s("hh").struct("<~@7 A@16 B A@7 ~@2 A@16 B A@7 ~ A@7 ~@2 A@7 ~ A@12 ~>".pickRestart({
  A: "x!8", B: "x!4 ~@4",
})).gain(0.35)

// drums · mid tom
const mid_tom = s("mt").struct("<~@6 [~@5 x!2 ~] ~@25 [~@4 x!2 ~@2] ~@33 [~@4 x!2 ~@2] ~@21>").gain(0.5)

// drums · high tom
const high_tom = s("ht").struct("<~@6 [~@2 x!2 ~@4] ~@25 [~ x!3 ~@4] ~@33 [~ x!3 ~@4] ~@21>").gain(0.5)

// drums · tambourine
const tambourine = s("tb").struct("<~@7 x ~@80>").gain(0.5)

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

stack(
  brass_section, string_ensemble_1, string_ensemble_1_soft, piano, bass, rim, kick, snare, low_tom, hihat, mid_tom,
  high_tom, tambourine, crash
)