// Sylvia's Mother — Dr. Hook
// 85 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 6 string ensemble 2 (copy of ch 8 choir aahs)
// note: Full arrangement: all 77 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(85/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 · fretless bass
const bass = note(`<
  ~ A B C D@2 E D F G H D I D E D E G C D J G K D E L M N D@2 E D C G O D F D E D E G P D Q G O D E R S N D@2 E D T G U
  D V D E D E G O D W G K D@5 ~
>`.pickRestart({
  A: "c3@15 g2", B: "c2", C: "c3@3 c2 ~@2 c2@7 ~ g2!2", D: "g2@15 d3", E: "g3@15 d3", F: "c2@15 g2", G: "f2@15 c3",
  H: "c2@5 g2@3 c3@4 c2@3 ~", I: "c2@6 ~ c2 c3!2 g2 ~ f2 d#2 ~ c2", J: "c2@3 c2 c3@2 c2@2 c3 ~@2 c3@5",
  K: "c2@6 c3@9 g2", L: "c2@3 c2 g2@2 c3@8 g2!2", M: "c2@2 ~ c2 g2@2 c3@10", N: "c2@6 g2@7 ~ g2!2",
  O: "c2@6 c2@4 ~ c2 a2 c2 g2@2", P: "c2@3 g2 e3 c2 g2 c3@9", Q: "c2@6 g2!2 c3@3 g2 c2 d2 e2@2", R: "c2@3 g2 c3@2 g2@2",
  S: "c2@6 g2@2 c3@4 g2@3 ~", T: "c2@6 ~ c2 c3!2 g2 f#2 f2 e2 ~@2", U: "c2@6 c3@7 c2 g2!2", V: "c2@3 c3@5",
  W: "c2@3 g2 e3 g2 c2 c3 f2@4 g2@2 ~@2",
})).s("gm_fretless_bass").gain(0.42)

// chords · epiano1
const epiano1 = note(`<
  ~ A B C D E F G H I C G C E F E F J K L M N O P@2 Q@2 R S P@2 T U N V W X P@4 Y Z W AA AB V P@2 AC Z AD D AE AF D H AG
  C G H E F E F N V AH AI N V L@5 ~
>`.pickRestart({
  A: "[c4,e4,g4]@13 ~ [c4,e4,g4] ~", B: "[c4,e4,g4]", C: "[c4,e4,g4,c5]@15 ~", D: "[d3,g3,b3]@9 ~ [d3,g3,b3]@6",
  E: "[b3,g4,d5]@13 ~ [b3,g4,d5] ~", F: "[b3,g4,d5]", G: "[b3,g4,d5]@15 ~", H: "[g3,c4,e4]@9 ~ [g3,c4,e4]@6",
  I: "[a3,f4,c5]@15 ~", J: "a4@4 g4 a4@3, [c4,f4,c5]", K: "g4 f4 g4@14, [g3,c4,e4,c5]",
  L: "~@7 a4, [d3,g3,b3], ~ d4, ~@5 e4@3, ~@3 g4", // G
  M: "~@3 e4 g4 f4 e4@2, [e3,g4] [e3,g3,c4], ~ g3@3 ~@4, ~ [c4,d4] ~@2", // Em C Csus2
  N: "~@7 g5, [c4,f4,a4], ~ c5, ~@5 d5@3, ~@3 f5", O: "~@4 [e4,g4,c5]@3 ~ [e4,g4,c5] ~ [e4,g4,c5]@6",
  P: "[[g3,b3,d4]@31 ~]/2", Q: "[[g3,c4,e4]@31 ~]/2", R: "~@2 d5@2 c5@11 ~, [g3,c4,e4,g4,e5]", S: "[g3,b3,d4]",
  T: "[g3,b3,d4]@7 ~ [g3,b3,d4] ~ [g3,b3,d4]@6", U: "e4@4 d4 e4@3, [g3,c4,g4]", V: "[g3,c4,e4]",
  W: "~@5 d4@3, [d3,g3,b3], ~ g4", X: "[g3,c4,e4]@4 ~@3 c4, ~ c5, ~@5 g4@3, ~@3 e4", Y: "[a3,c4,f4]",
  Z: "[c4,e4,g4,c5]", AA: "~@3 e4 [a#3,c4,e4,g4]@4, [e3,g3,c4] ~, ~ c5@3 ~@4, ~ g4 ~@2",
  AB: "~@5 c5@3, [c4,f4,a4], ~ f5", AC: "[c4,e4,g4,c5]@13 ~ [c4,e4,g4,c5] ~", AD: "[c4,e4,g4]@15 ~",
  AE: "[b3,d4,g4]@13 ~ [b3,d4,g4] ~", AF: "[b3,d4,g4]", AG: "[a3,c4,f4]@15 ~", AH: "b3@4 a3 b3@3, [d3,g3,d4]",
  AI: "[g3,c4,e4]@4 ~@3 e4, ~ [e3,g3,c4], ~@5 c5@3, ~@3 g4", // C
})).s("gm_epiano1").gain(0.3)

// other · distortion guitar
const distortion_guitar = note(`<
  ~@13 A B C D E F G H E I J@2 ~@3 K ~@3 L ~@4 D@2 C M E N O H E N P@2 ~@2 Q R ~@8 S T@2 U E N O H E N V@3 W X@2
>`.pickRestart({
  A: "d5@15 ~, e5 ~@15", B: "d5@7 ~", C: "d5@7 ~ d5@6 ~@2", D: "d5@15 ~", E: "c7", F: "a6@3 g6@13",
  G: "e6@2 ~ c6 ~@12, ~ d6@7", H: "c6", I: "a6 g6@13 ~@2", J: "[~@4 c7@3 b6@15 ~@10]/2", K: "e6@2 d6@13 ~",
  L: "~@4 d5 e5@3, ~@5 f5 ~@2", M: "d5@3 ~", N: "g6", O: "d6", P: "[c7@2 b6@11 ~@3]/2", Q: "~@11 f5@2 ~ g5@2",
  R: "e5@3 f5@4 g5@9", S: "d5", T: "[d5@15 d5@7 ~@2 d5@7 ~]/2", U: "d5 e5",
  V: "[c7@4 b6@18 ~ g6@2 ~ f6@2 ~ g6@2 g6@15 ~@2]/3", W: "~@8 e6@2 e6@3 f6@2 ~", X: "g6/2",
})).s("gm_distortion_guitar").gain(0.1)

// chords · acoustic guitar nylon
const acoustic_guitar_nylon = note(`<
  ~ A B C D E F G H I J K J L M E F N H O P Q C R S T U V W E F K X Q C G V L M E F Q C D Y Z AA E F AB AC V O L M AD C
  Q C W H L M L M I AA AE AF Q AG O@5 ~
>`.pickRestart({
  A: "~ e3 g3 e3 e4 g3 e3 g3, c3@5 ~@3", B: "~ e3 g3 e3 e4 g3 e3 g3, c3@9 ~@7",
  C: "~@7 g3, c3, ~ e3@2 e3@2 g3@2 ~, ~ g3 e4 e3", D: "~@7 g4, g2@2 b3@3 b3@3, ~ g3@2 d4@2 ~ d4@2, ~@2 g4 ~",
  E: "~@3 g4@2 ~ g4@2, g2@7 ~, ~ g3@7, ~@2 b3@2 ~ b3@2 ~", F: "~@6 g4 ~ g4@2 ~@2 g4@4, g2, ~ g3@7, ~@2 b3@2 ~ b3@3",
  G: "~@3 b3 ~@3 d4, g4@5 d4@2 ~, g2 g3!2 b3, ~ b3@2 ~ b4@4",
  H: "~@7 [g3,g4], [c4,e4] ~, c3 e3 [c3,e4] [e3,e4], ~ g3@2 g3@2 [g3,f4]@2 ~", // G C E G7
  I: "f2 a3 f3 a3 f2 a3 ~ [a3,f4], [c4,f4]@6 f3 ~, ~@13 g4@2 ~", // Dm F5
  J: "c3 g3 e3 g3 c3 g3 ~ [g3,e4], [c4,e4]@6 e3 ~, ~@13 f4@2 ~", K: "~@3 g4@2 ~ g4!2, g2, ~ g3@7, ~@2 b3@3 b3@3",
  L: "~ g3 b3 g3 g4 b3 g3 b3, g2@5 ~@3", M: "~ g3 b3 g3 g4 b3 g3 b3, g2@9 ~@7",
  N: "~@7 [a3,a4], [c4,f4]@2 ~ [f3,f4], f2 f3 [f2,f4] ~, ~ a3@2 a3@2 [a3,g4]@2 ~", // A F5 F A7
  O: "~@7 [b3,b4], [d4,g4]@2 ~ [g3,g4], g2 g3 [g2,g4] ~, ~ b3@2 b3@2 [b3,a4]@2 ~", // B G5 G B7
  P: "c3 g3 e3 g3 c3 g3 e3 g3, [c4,e4] [a#3,e4]", Q: "~@7 f4, f2@2 a3@3 a3@3, ~ f3@2 c4@2 ~ c4@2, ~@2 f4 ~",
  R: "~@3 b4@2 ~ b4@2, g2, ~ b3@4 [b3,d4]@3, ~@2 d4@3 ~@3", S: "~@3 b4@2 ~ b4@2, g2, ~ b3@7, ~@2 d4@3 d4@3",
  T: "~@3 g4@2 ~ g4@2, c3, ~ g3@4 [g3,c4]@3, ~@2 c4@3 ~@3", U: "~@3 g4@2 ~ g4@2, c3, ~ g3@7, ~@2 c4@3 c4@3",
  V: "~@7 e4, c3@2 g3@3 g3@3, ~ e3@2 c4@2 ~ c4@2, ~@2 e4 ~",
  W: "~ b3 ~ b3 [g2,g4] ~ [g3,g4] [b3,b4], [d4,g4]@3 ~@2 [b3,a4]@2 ~, g2 [g3,b4] ~@2", // G B G5 B7 G
  X: "~@3 g3 ~@3 c4, e4@5 c4@2 ~, c3 e3!2 g3, ~ g3@2 ~ g4@4",
  Y: "c3@2 g3@2 ~@3 g4 c3@2 g3@2 ~@3 g4, g4@2 [e3,e4] [g3,e4] ~@2 [e3,c4] [g3,e4], ~@5 f4@2 ~ g4@5 d4@2 ~", // E C
  Z: "~ a3 ~ a3 [f2,f4] ~ [f3,f4] [a3,a4], [c4,f4]@3 ~@2 [a3,g4]@2 ~, f2 [f3,a4] ~@2", // F A F5 A7 F
  AA: "~@3 e4@2 ~ e4!2, c3, ~ e3@7, ~@2 g3@3 g3@3", AB: "~@3 e4@2 ~ e4@2, c3@7 ~, ~ e3@7, ~@2 g3@2 ~ g3@2 ~",
  AC: "~@6 e4 ~ e4@2 ~@2 e4@4, c3, ~ e3@7, ~@2 g3@2 ~ g3@3",
  AD: "g2 b3 g3 b3 g2 b3 ~ [b3,g4], [d4,g4]@6 g3 ~, ~@13 a4@2 ~", AE: "~@7 b3, g2, ~ g3@2 g3@2 b3@2 ~, ~ b3 g4 g3",
  AF: "~@3 g3 c3 g3 e3 g3, e4 ~, c3 e3 ~@2, ~ g3@2 ~ [a#3,e4]@4", // A#dim
  AG: "~ g3 ~ g3 [c3,e4] ~ [e3,e4] [g3,g4], [c4,e4]@3 ~@5, c3@2 [e3,g4]@2 ~ [g3,f4]@2 ~", // C E G C Em G7
})).s("gm_acoustic_guitar_nylon").gain(0.36)

// other · guitar harmonics
const guitar_harmonics = note(`<
  ~@13 A B C D E F G H E I J@2 ~@3 K ~@3 L ~@4 D@2 C M E N O H E N P@2 ~@2 Q R ~@8 S T@2 U E N O H E N V@3 W X@2
>`.pickRestart({
  A: "d4@15 ~, e4 ~@15", B: "d4@7 ~", C: "d4@7 ~ d4@6 ~@2", D: "d4@15 ~", E: "c6", F: "a5@3 g5@13",
  G: "e5@2 ~ c5 ~@12, ~ d5@7", H: "c5", I: "a5 g5@13 ~@2", J: "[~@4 c6@3 b5@15 ~@10]/2", K: "e5@2 d5@13 ~",
  L: "~@4 d4 e4@3, ~@5 f4 ~@2", M: "d4@3 ~", N: "g5", O: "d5", P: "[c6@2 b5@11 ~@3]/2", Q: "~@11 f4@2 ~ g4@2",
  R: "e4@3 f4@4 g4@9", S: "d4", T: "[d4@15 d4@7 ~@2 d4@7 ~]/2", U: "d4 e4",
  V: "[c6@4 b5@18 ~ g5@2 ~ f5@2 ~ g5@2 g5@15 ~@2]/3", W: "~@8 e5@2 e5@3 f5@2 ~", X: "g5/2",
})).s("gm_guitar_harmonics").gain(0.1)

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

// drums · rim
const rim = s("rim").struct("<~ [~ x ~ x]!75 ~>").gain(0.48)

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

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

// drums · clap
const clap = s("cp").struct("<~ [~ x ~ x]!75 ~>").gain(0.36)

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

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

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@3 A ~@6 A@3 ~ A ~@2 A@2 ~ B ~@3 B ~@10 A ~@2 A ~ B ~ A ~@5 B ~ A ~ A ~@4 A ~ A@2 ~ A ~@4 A ~ A ~@7
>`.pickRestart({
  A: "~@14 x!2", B: "~@12 x!2 ~@2",
})).gain(0.36)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@4 A ~ A ~ A ~@4 A ~@6 A@2 ~@2 A B ~@2 A@3 ~@9 A@2 ~@3 A@4 ~@2 A ~@13 B A ~@4 A@5 ~
>`.pickRestart({
  A: "~ x ~@6", B: "~@7 x",
})).gain(0.36)

// drums · high tom
const high_tom = s("ht").struct("<~@20 A ~@3 A ~@15 A ~@7 A ~@28>".pickRestart({
  A: "~@10 x!2 ~@4",
})).gain(0.36)

// drums · crash
const crash = s("cr").struct("<~@25 x ~@39 x ~@11>").gain(0.42)

// drums · tambourine
const tambourine = s("tb").struct("<~ [x ~@2 x!2 ~@2 x]!75 ~>").gain(0.42)

// drums · congas
const congas = s("conga:13").struct("<~ A@2 B A@6 B@3 A B A@35 B A B A@4 B A B@2 A B A@13 ~>".pickRestart({
  A: "x ~ x!3 ~ x!3 ~ x!3 ~ x!2", B: "x!5 ~ x!3 ~ x!3 ~ x!2",
})).gain(1.15)

stack(
  bass, epiano1, distortion_guitar, acoustic_guitar_nylon, guitar_harmonics, kick, rim, snare, snare_soft, clap,
  low_tom, hihat, mid_tom, open_hat, high_tom, crash, tambourine, congas
)