// Sweet Sweet Smile — Carpenters
// 196 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 123 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(196/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, A@4 for four bars: edit a riff to change every repeat.

// chords · piano
const piano = note(`<
  A B C@3 B D E F E F G H I J K F L M N O P Q E F N R N R I S T Q L R U V I S T Q L W N R X Y Z@2 L W N AA AB AC E F N R
  AD AE P AF T Q N R AD AE P AF T AG E F N O AH AI@2 F L W N AJ P AK E AL AM@3 R P AF T AN AO@3 O AP AF AQ AN L W N R P
  AI@2 F T Q E AR AS AT E AU AV AW
>`.pickRestart({
  A: "~@10 d4@3 ~ d#4 ~",
  B: "[g3,e4]@2 ~@2 [g3,b3] ~@3 [g3,b3,e4] ~ [g3,e4]@2 ~@2 [g3,c#4,f#4] ~, b3 ~@3 e4@2 ~@4 b3 ~@5", // C G Em C F#
  C: "[~@2 [g3,c#4] ~@2 [g3,c#4,f#4] ~ [g3,c#4,f#4]@2 ~@2 [g3,c#4]@2 ~@2 [f#3,a3,d4]@24 ~@3 d4@2 ~@2 d#4 ~, ~ f#4@2 ~@8 f#4 ~@36]/3", // Gdim F# Gdim D
  D: "~ [g3,c#4,f#4]@5 ~ [g3,c#4] ~@3 [g3,c#4,e4] ~@4, ~@7 f4@2 ~@7", // F# Gdim C#dim
  E: "~@4 [f#3,a3,d4] ~@5 [f#3,a3,d4] ~@3 [f#3,a3,d4] ~", F: "~ [f#3,a3,d4]@3",
  G: "~@4 [f#3,a3,b3,d4] ~@5 [f#3,a3,b3,d4] ~@3 [f#3,a3,b3,d4] ~", H: "~ [f#3,a3]@3, ~@3 [b3,d4]@13",
  I: "~@4 [g3,b3,d4] ~@5 [g3,b3,d4] ~@3 [g3,b3,d4] ~", J: "~ [a3,c#4]@3, ~@2 [g3,e4]@5 ~", K: "[f#3,a3,d4]",
  L: "~@4 [a3,d4,f#4] ~@5 [a3,d4,f#4] ~@3 [a3,d4,f#4] ~", M: "~@3 [a3,d4,f#4]@13",
  N: "~@4 [a3,b3,d4,f#4] ~@5 [a3,b3,d4,f#4] ~@3 [a3,b3,d4,f#4] ~", O: "~@3 [a3,b3,d4,f#4]@13",
  P: "~@4 [b3,d4,g4] ~@5 [b3,d4,g4] ~@3 [b3,d4,g4] ~", Q: "~ [g3,a3,c#4,e4]@3", R: "~ [a3,b3,d4,f#4]@3",
  S: "~ [g3,b3,d4]@3", T: "~@4 [g3,b3,d4,e4] ~@5 [g3,b3,d4,e4] ~@3 [g3,b3,d4,e4] ~",
  U: "~@4 [a3,b3,d4] ~@5 [b3,d4,f#4] a3 ~@2 [a3,b3,d4,f#4] ~, ~@2 f#4 ~@5", V: "~ [a3,b3,d4]@3, ~@3 f#4@12 ~",
  W: "~ [a3,d4,f#4]@3", X: "~@4 [g3,b3,d4] ~@4 d4 [g3,b3] ~@2 [g3,b3] ~@2, ~@13 d4@2 ~",
  Y: "~@3 [g3,b3,d4,e4] ~@6 [c#4,e4]@2 ~@2 [g3,e4] a3, ~@10 [g3,a3] ~@3 c#4@2", // Em7 C#m C Gsus2
  Z: "[~@4 [f#3,a3,d4] ~@5 [f#3,a3,d4] ~@3 [f#3,a3,d4]@18]/2", AA: "~@2 a3@5 ~, ~@3 [b3,d4,f#4]@11 ~@2",
  AB: "[b3,d4,g4] ~ [b3,d4,g4] ~@3 [b3,d4,g4] ~@3 [b3,d4,g4]@4 ~ [g3,b3,d4,e4]", // G Em7
  AC: "~@3 [g3,d4]@2 ~@5 [g3,a3,c#4,e4]@6, ~@3 [b3,e4] ~@12", // G5 A7 E5
  AD: "~@2 [a3,b3,d4,f#4] ~@3 [a3,b3,d4,f#4] ~ [a3,b3,d4,f#4] ~ [a3,b3,d4] ~@2 [a3,b3,d4,f#4] ~@2, ~@5 f#4 ~@2", // Bm7
  AE: "~ [a3,b3,d4,f#4]@7", AF: "~ [b3,d4,g4]@3", AG: "~@5 [g3,a3,c#4,e4]@11",
  AH: "~@4 [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4]@5 ~", // G
  AI: "[~@4 [g3,b3,d4] ~@5 [g3,c#4,e4]@8 ~@2 [f#3,a3,d4] ~@5 [f#3,a3,d4] ~@3 [f#3,a3,d4] ~, ~@2 e4 ~@2 a3@3 ~@8]/2", // G C#dim D
  AJ: "~ a3@3, ~@3 [b3,d4,f#4]@13", AK: "~@2 [g3,b3,d4,e4]@5 ~ [g3,a3,c#4] ~@3 [g3,a3,c#4,e4]@4, ~ a3 ~@2 e4 ~@3",
  AL: "~ [f#3,a3]@3, ~@3 d4@12 ~", // F#m
  AM: "[~@3 [a3,b3,d4,f#4] ~@5 f#4 [a3,b3,d4] ~@2 [a3,b3,d4,f#4]@20 ~@3 [a3,b3,d4,f#4] ~@5 [a3,b3,d4,f#4] ~@3 [a3,b3,d4,f#4] ~]/3", // Bm7
  AN: "~@3 [g3,a3,c#4,e4]@13", // A7
  AO: "[~@4 [a3,b3,d4,f#4] ~@5 [a3,b3,d4,f#4] ~@3 [a3,b3,d4,f#4]@19 ~@3 [a3,b3,d4] ~@5 [a3,b3,d4,f#4] ~@2 d4 [a3,b3,f#4] ~, ~@18 f#4 ~@5]/3", // Bm7 B7
  AP: "~@3 [b3,d4] ~@6 [b3,d4,g4] ~@3 [b3,d4,g4] ~, ~@3 g4@2 ~@11", // Bm G
  AQ: "~@3 d4 [g3,b3,e4] ~@4 d4 [g3,b3,e4] ~@2 [g3,b3,d4,e4] ~@2", AR: "~@3 [f#3,a3,d4]@12 ~",
  AS: "~@4 [g3,b3,d4,e4] ~@5 [b3,d4,e4] ~@2 [g3,b3,d4,e4] ~@2, ~@9 g3@2 ~@5", // Em7 E7 Em7
  AT: "~@3 [g3,a3,c#4,e4] ~@6 [g3,a3,c#4,e4]@6", AU: "~@3 [f#3,a3,d4]@7 ~@5 d5", AV: "~ a4 ~ b4 ~ d5 ~@7 [f#4,a4,d5]@3",
  AW: "[f4,g4]@2 e4 [c4,d4] [a3,b3] [f3,g3] e3 [c3,d3] [a2,b2] g2 [e2,f2] d2 ~@4", // Fsus2 Csus2 Asus2 Fsus2 Csus2 Asus2 Fmaj7
})).s("gm_piano").gain(0.56)

// bass · acoustic bass
const bass = note(`<
  ~ A B C D A E F G F H I J K L M G F H I J K L F H I N I O K P A Q I N I R K S A T F H I J K U F G F H I J V@2 F W I N
  I J K P A X I N Y@3 P A Z AA H I AB K U F G F H I AC K U F AD@2 N I AE K P A AF I N I AG@2 P AH@2 F AI I J K U F AJ A
  AK F AJ AL@2 F AM@3
>`.pickRestart({
  A: "e2 b1", B: "a1@7 e2@5 a1@4", C: "d2@4 ~@3 d2 ~ a1@3 c#2@4", D: "d2@4 ~@3 d2@2 a1@7", E: "a1@7 ~ a1@4 b1@4",
  F: "d2 a1", G: "d2 a1 b1 c#2", H: "d2@8 a1@4 d2 ~@3", I: "b1 f#1", J: "b1@2 f#1 b1", K: "g2 d2", L: "a2@2 e2 a2",
  M: "d2@5 ~ d2@2 a1@4 c#2@4", N: "b1 f#1 a1 a#1", O: "b1@5 ~@3 e2@4 f#2@4", P: "g2@2 d2 g2",
  Q: "e2@5 ~@3 a1@2 ~@2 a1@2 a#1@2", R: "b1@4 f#1 ~ f2 f#2, ~@11 e2@2 ~@3", S: "~@7 d2@5 g2@4, g2@9 ~@7",
  T: "e2 a1 b1 c#2", U: "e2 a1", V: "[g2@7 d2@8 e2@9 a1@8]/2", W: "d2@2 a1 a#1", X: "e2@2 a1 a#1",
  Y: "[b1@8 f#1@7 b1@8 f#1@4 b1@2 ~@2 g2@9 d2@8]/3", Z: "~ e2@4 a1@4 ~@3 c#2@4, ~@9 b1@5 ~@2", AA: "~ d2@8 a1@7",
  AB: "b1@7 f#1@4 ~ b1@4", AC: "~@7 f#1@4 b1@4 ~, b1@9 ~@7", AD: "[d2@8 a1@4 d2 ~@2 b1@8 ~ f#1@8]/2",
  AE: "b1@4 f#1@2 b1 ~", AF: "e2@4 a1 ~@2 a1@5 a#1@4", AG: "[~@7 f#1@4 ~ b1 ~@2 g2@9 d2@8, b1@9 ~@23]/2",
  AH: "[e2@8 b1@7 e2@4 a1@5 b1@4 c#2@4]/2", AI: "d2@4 a1@2 d2 ~", AJ: "d2@2 a1 d2", AK: "a1@5 ~@3 a1@2 b1@2 c#2@4",
  AL: "[e2@8 b1@7 a1@8 ~ e2@8]/2", AM: "[d2@7 a1@4 c#2@4 d2@2 a1@3 b1@2 d2@2 ~@5 d2@12 ~@7]/3",
})).s("gm_acoustic_bass").gain(0.72)

// chords · synth strings 1
const synth_strings_1 = note(`<
  ~@25 A@4 B@4 C@2 D@2 E@4 ~@16 A@4 B@4 C@2 D@2 E@4 ~@16 A@4 B@4 C@2 D@2 E@4 ~@18
>`.pickRestart({
  A: "[[a3,d4,f#4]@15 [a3,d4,f#4]@16 ~]/4", B: "[[d4,g4]@31 ~ g4@13 ~@2 [g3,f#4]@15 ~@2, ~@31 [b3,d4,e4]@13 ~@20]/4",
  C: "[a3,d4,f#4]/2", D: "[[a3,c#4,d4,f#4]@31 ~]/2", E: "[[d4,g4]@31 [b3,d4,e4]@15 ~ [g3,c#4,e4]@11 ~@6]/4",
})).s("gm_synth_strings_1").gain(0.12)

// chords · synth strings 1 · soft notes
const synth_strings_1_soft = note("<~@29 A@2 B@2 ~@4 C@3 ~@21 A@2 B@2 ~@4 C@3 ~@21 A@2 B@2 ~@4 C@3 ~@19>".pickRestart({
  A: "[b3@31 ~]/2", B: "[~@15 c#4@15 ~@2]/2", C: "[b3@31 g3@15 ~@2]/3",
})).s("gm_synth_strings_1").gain(0.02)

// drums · kick
const kick = s("bd").struct("<~ [x ~@6 x!2 ~@7]!120 [~@3 x] ~>").gain(0.56)

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

// drums · low tom
const low_tom = s("lt").struct("<~@40 A ~@15 A ~@39 A ~@7 A ~@16 B ~>".pickRestart({
  A: "~@3 x", B: "~ x ~ x ~@4",
})).gain(0.72)

// drums · hihat
const hihat = s("hh").struct("<~ [~@2 x!2 ~@2 x!2]!120 ~@2>").gain(0.56)

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

// drums · open hat
const open_hat = s("oh").struct("<~ [x!2]!120 x ~>").gain(0.64)

// drums · high tom
const high_tom = s("ht").struct("<~@40 A ~@15 A ~@39 A ~@7 A ~@16 B ~>".pickRestart({
  A: "x!2 ~@6", B: "x",
})).gain(0.8)

// drums · crash
const crash = s("cr").struct("<~@32 A ~@7 B ~@15 B ~@7 C ~@23 D ~@7 B ~@7 B ~@7 C ~@8 B ~>".pickRestart({
  A: "~ x", B: "~@3 x", C: "~@5 x ~@2", D: "~@11 x ~@4",
})).gain(0.8)

stack(
  piano, bass, synth_strings_1, synth_strings_1_soft, kick, snare, low_tom, hihat, mid_tom, open_hat, high_tom, crash
)