// White Christmas — Berlin Irving
// 55 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 48 bars on a 32-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(55/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 · "FRETLESS"
const bass = note("<~@24 A B C D E F G H I J K L M N G O P Q ~@6>".pickRestart({
  A: "a3@4 a#3@4 b3@4 a#3@3 ~", B: "a2@8 a#2@8 b2@8 a#2@6 a1 e2", C: "d2@14 a1@2 d2@13 ~ d2 ~",
  D: "d2@16 g#1@4 a1@9 ~ g#1@2", E: "g#2@16 g2@15 ~", F: "f#2@14 e2 d2 g1@16", G: "d2 c#2 c2@2",
  H: "b1@8 b2@8 a#2@13 ~@3", I: "d2@4 c#2@4 b1@8 e2@15 ~", J: "~ b2 e3 b3 a3 g3 f#3 e3", K: "d2@14 a1@2 d2@13 ~@3",
  L: "d2@8 g#1@2 a1@4 ~ g#1", M: "g#2@3 g#2 g2@4", N: "f#2@14 e2 f#2 e2@8 g1@8", O: "b1@2 b2@2 a#2@3 ~",
  P: "d2 c#2 b1@2 e2@2 b1 a1", Q: "d2@13 ~@3 g1@12 ~@4",
})).s("gm_fretless_bass").gain(0.38)

// chords · string ensemble 2 · "SLOWSTRING"
const string_ensemble_2 = note("<~@15 A@5 ~@4 B@3 C@8 D E@6 F G@4 ~>".pickRestart({
  A: "[~@31 a3@8 a#3@8 b3@24 ~ e4@3 d4@4 c4@4 c#4@11 ~ d4@32 a4@30 ~@3]/5",
  B: "[a3@7 a#3@8 b3@8 a#3@8 [a3,a4]@9 [a#3,a#4]@7 [b3,b4]@8 ~ a#4@7 f#3@31 ~@2, ~@55 a#3@7 ~@34]/3", // A A# B
  C: "[~@3 [b3,b4]@5 [e4,e5]@3 [d4,d5]@4 [c#4,c#5]@14 ~@18 [g3,g4]@15 ~ e5@8 d5@8 ~@9 d5@3 e5@4 [d3,f#4,f#5]@8 ~ c#3@7 ~@5 b5@7 a5@4 a4@8 g4@8 ~@4 a5@8 g5@4 d3@5 [c#3,d4]@4 e4@3 f#4@4 ~@4 [f#4,f#5]@4 ~ e4@3 [d4,d5]@4 ~@16 [a3,d4]@13 ~@3 [d5,f#5]@16 [e5,g5]@4 ~ f#5@3 [c#5,f5]@5 [d5,f#5]@4, ~@31 b4@29 ~@23 a4@8 g4@3 ~@9 e4@24 d4@29 ~@19 [g4,g5]@4 ~@77, ~@31 g#4@16 ~@36 [a#3,e4]@12 a3@32 ~@32 [a3,f#5]@16 ~ b3@30 ~@50, ~@31 f#5@8 e5@23 ~@42 f#5@12 ~@11 d5@21 ~@35 e5@4 ~@4 e5@29 ~@23 d5@4 ~@9, ~@32 g#3@16 ~@15 [f#3,a4]@16 g2@17 ~@15 c3@16 ~@49 e3@16 [a2,e4]@29 ~@35]/8", // B E D C# G D Dmaj7 F# …
  D: "[e5,g5]@14 ~@2 [f5,g#5]@3 a5@10 ~@3", // Em Fm
  E: "[~@4 b5@3 c#6@4 d6@4 e6@4 d6@4 ~ c#6@4 b5@3 a5@20 ~@5 d6@3 e6@4 ~ [d3,f#4]@7 c#3@8 ~@5 b6@7 a6@4 a4@8 g4@8 [g2,a#3]@8 ~ d6@3 e6@4 ~ d3@4 c#3@3 b2@8 b6@4 ~@10 [c#4,e4]@2 ~ [d3,f#4]@15 [g2,a#3]@8 ~@9, ~@63 f#6@21 ~@11 d7@21 ~@31 d6@8 ~ c#6@4 ~@32, ~@64 a3@31 ~@32 [a3,f#4,f#6]@16 g4@12 ~@4 d6@16 ~@17, ~@71 e4@23 ~ d4@24 ~@8 e4@8 d4@21 a3@19 ~@17, ~@79 c3@16 b2@17 ~@31 [e3,b3]@9 a2@8 d4@24 ~@8]/6", // D Gm C#m D Gm D E5
  F: "[a2,e4,d6]@5 [d3,d4,c#6]@5 [b2,e3,a3,b3,e4,f#4,b5]@5 d#3 [d#3,a5]@5 e3 [e3,b5]@8 ~@2, [d2,a3,f#4]@10 ~@5 [a3,b3,d#4,f#4]@6 [b3,d4,g4]@8 ~@3, ~@21 a#5@2 ~@9", // Asus4 Dmaj7 Bsus4 D#dim E5 D B7 G
  G: "[~@7 a5 ~@2 a2 a5@9 g5@18 ~@13 [d2,d3,a3]@65 ~@12, ~@10 [e3,b3,c#4,e4]@27 ~@91, ~@11 a2@25 ~@92]/4", // D5 C#m7
})).s("gm_string_ensemble_2").gain(0.17).pan(0.4)

// chords · string ensemble 2 · "SLOWSTRING" · soft notes
const string_ensemble_2_soft = note("<~@25 A@2 ~ B@2 C@2 D E ~ F ~@7 G@5>".pickRestart({
  A: "[~@31 [d4,a4]@31 ~@2]/2", B: "[~@31 f#4@16 ~@17]/2", C: "[~@31 b2@16 g2@16 ~, ~@47 a#3@13 ~@4]/2",
  D: "~@8 b2@7 d4@9 ~@8", E: "~@15 a4@13 ~@4", F: "~@19 e5@10 ~@3",
  G: "[~@10 g3@27 ~@77 [d6,a6]@36 ~@10, ~@5 [d5,a5]@7 ~@4]/5", // D5
})).s("gm_string_ensemble_2").gain(0.07).pan(0.4)

// chords · pad warm · "WARM PAD"
const pad_warm = note("<~@7 A B@2 ~@2 C@3 D B@2 ~@2 E@3 F ~ A B@2 ~@2 C@3 D B@2 ~@2 E@3 G ~@6>".pickRestart({
  A: "a3 a#3 b3 a#3", B: "[a3@31 b3@16 ~@17]/2",
  C: "[e4@4 d4@4 c#3@7 c3@16 a4@9 g4@7 a#3@14 ~@2 d3@5 ~@4 b2@7 g4@4 ~ f#4@4 ~@4 d4@4, a3@28 ~@3 [b2,b3]@16 ~@32 e3@16 ~, [d3,f#4]@8 e4@22 ~ d4@31 ~ e4@4 ~ d4@20 e4@8, ~@15 c4@12 ~@36 [a3,f#4]@16 b3@13 ~@4]/3", // B D
  D: "~@16 [a2,a3,a4]@15 ~, [d4,e4]@31 ~", // A Dsus2
  E: "[e4@4 d4@4 c#3@7 c3@16 a4@9 g4@7 a#3@14 ~@2 d3@5 ~@4 b2@7 [e3,b3,g4]@7 ~ e3 b2@4 [a2,c#4]@4, a3@28 ~@3 [b2,b3]@16 ~@49, [d3,f#4]@8 e4@22 ~ d4@31 ~ e4@4 ~ d4@11 d4 ~@16, ~@15 c4@12 ~@36 [a3,f#4]@16 ~@8 [b3,d4,g4]@4 ~@5]/3", // Em A B D G
  F: "c#4 ~@2 d4@11 ~@2 [a2,a3,d4,e4]@12 ~@4, [d3,a3] ~", G: "c#4 ~@2 d4@11 ~@18, [d3,a3] ~",
})).s("gm_pad_warm").gain(0.21).pan(0.4)

// chords · pad warm · "WARM PAD" · soft notes
const pad_warm_soft = note("<~@13 A ~@7 A B C ~@7 A ~@7 A B D ~@6>".pickRestart({
  A: "~@15 a#2@16 ~", B: "~@28 a3@3 ~, ~@27 e4@4 ~", C: "~ d4 ~@30, f#3@7 ~@9", D: "f#3@7 ~@9",
})).s("gm_pad_warm").gain(0.11).pan(0.4)

// chords · epiano1 · "E.PIANO 1"
const epiano1 = note("<~@24 A B@3 C@2 D E F@3 G H I J@2 K L ~@3 M@3>".pickRestart({
  A: "[a4,a5] [a#4,a#5] [b4,b5] [a#4,a#5]", // A A# B A#
  B: "[[a4,a5]@8 [a#4,a#5]@8 [b4,b5]@8 [a#4,a#5]@7 ~ [d5,f#5]@16 [b4,d5,g5]@4 [a4,d5,f#5]@4 ~@4 [d5,f#5]@4 [e4,b4,d5,g5]@14 ~@2 [d#5,g#5]@4 [e5,a5]@12, ~@31 d4@34 ~@31, ~@31 a4@16 ~@9 [a4,c#5,f5]@8 ~@15 c5@5 ~@12]/3", // A A# B A# D G D Em7 …
  C: "[~@15 e5, ~ d4@11 c#6@3 e6 a5@9 e4 a4@2 d5@4, ~@3 b4@61, ~@3 d5@5 c#6@4 d6@4 e6@4 d6@44, ~ b5@15]/2",
  D: "[a4,f#5]@2 f#5@2 ~@3 a5, d4, ~@2 a4 ~ [a4,f#5]@4, ~@5 [d5,b5]@3", // D G
  E: "~@2 d5@2 [a#4,d5] ~@2 g5, g3, d5 b4@3, ~ d4@2 ~@2 [d5,a5]@3", // A# D5
  F: "[[d4,a4,f#5]@8 [b3,d5,f#5]@8 ~@8 g4@4 ~@28 e6@7 ~ [d5,f#5]@16 [b4,d5,g5]@4 [a4,d5,f#5]@4 [a4,c#5,f5]@4 [a4,d5,f#5]@4, ~ [e4,b4,g5]@3 ~@2, ~@20 f#5@28 [a3,d5]@15 d4@33, ~@20 a4@12 e5@31 ~@33, ~@24 e5@4 d5@12 a4@23 a4@17 ~@16]/3", // D Bm D G D Aaug D Em …
  G: "[e4,b4,d5,g5]@15 ~ [d#5,g#5]@4 [c#5,e5,a5]@12, ~@15 c5@5 ~@12", // Em7 G#5 A
  H: "~@7 b5, ~ b3@11 c#6@4, ~ [b4,d5,f#5]@7, ~ b5@4 d6@3, ~@2 c#6 d6 e6@4", I: "d5@2 d5@2 ~@3 e5, [f#4,a5] a3, ~@3 d5",
  J: "[~@4 a4@4 [c#4,f#5]@8 ~@12 a5@3 ~@29 e5@4, [d4,d5,f#5] ~ [b3,f#5]@2 d6@4, ~@20 b5@11 g5@13 ~@4 a#4@8 d5@8, ~@36 d4@27 ~, ~@5 b4@3]/2", // F#5 D B5
  K: "~ c#4 [b3,a4,f#5]@2 ~ d5 ~ c#5, [d4,a4,f#5] ~ b5 d5", L: "[d4,a4]@13 ~@19, d5 ~@31",
  M: "[~@24 a5@19 ~@5, ~@3 b5@64 ~@29, ~@19 a5@27 d5@40 ~@10, ~@45 d4@41 ~@10, ~@47 e5@39 ~@10]/3",
})).s("gm_epiano1").gain(0.3).pan(0.4)

// chords · epiano1 · "E.PIANO 1" · soft notes
const epiano1_soft = note("<~@27 A B@2 C D E@2 ~@4 F@2 ~ G ~@2 H@4>".pickRestart({
  A: "~@5 c#5@3", B: "[~ f#5@15]/2", C: "~@13 a4@3 ~@16", D: "~@5 a#4@3, ~@13 d4@19",
  E: "[~@8 a4@8 ~@44 a6@3 ~, ~@28 g4@35 ~, ~@52 a5@11 ~]/2", F: "[~@11 g5@5, ~@31 g3@32 ~]/2",
  G: "~@2 d5@11 ~@19, f#4@13 ~@19", H: "[~@27 a#5@15 ~@18 a4@18 a4@40 ~@10, ~@18 a5@33 ~@77, ~@21 a#5@32 ~@11]/4",
})).s("gm_epiano1").gain(0.15).pan(0.4)

// chords · acoustic guitar nylon · "NYLON GTR"
const acoustic_guitar_nylon = note(`<
  ~@6 A@2 B C@2 D E F G H B C@2 D E F I J A@2 B K@2 D E F G H B K@2 D E F I L ~@6
>`.pickRestart({
  A: "[~@15 e4, d3@2 f#4@3 d3 b4@12 f#4@2 a#3 d3 b4@6 [a#3,g4] f#4@3, ~ a3@2 a3@9 a#3 f#4 e4@2 d3 a3@15, ~@3 d3 a#3@3 d3 [b3,a4]@11 d3 e4@5 d3 f#4 d3@5, ~@4 e4@5 d3 f#4 d3 g4@11 d3 [b3,a4]@8]/2", // D# B7
  B: "~@7 f#4, d3@2 d4@7 a3@7, ~ a3@7 d3@2 d4@6, ~@3 d3@2 d3 f#4@7 d3@3, ~@4 e4@7 d3 e4@4",
  C: "[~@12 g4@4 ~@6 a3@2 ~@4 [g#2,f#3,a#3,c4]@3 g#2 ~@12 g#2@4 ~@8 [b3,e4]@7 ~, d3@4 e4@12 ~@16 f#4@16 ~ f#4@15, ~@2 b3@14 ~@2 e3@6 ~@7 g#3@13 ~@4 [g3,b3]@8 ~@8, ~@6 d3@4 d3@6 a2@13 ~@7 g#2@8 ~@4 g2@4 g2@8 ~@4, ~@8 f#4@8 ~@4 a4@9 ~@3 b3@8 [b3,e4]@8 ~@6 g3@9 ~]/2", // G#7 E5 G E5
  D: "~@2 [a3,d4]@2 ~ [d4,e4,a4] d4 [d4,g4], e4@17 ~@7 [e4,a4]@8, a3 ~@3, ~ f#2@2 ~ g2@4", // D5 Dsus2 G5 A5
  E: "~@2 a3 ~ c#3 ~ [a3,a4]@2 c3 ~@5 [c3,a3]@2, [d2,f#4]@4 ~ c#3@2 ~@2 c3@3 ~ a4@3, a3 ~ e4@2 ~ a3@2 ~, ~ d3@3 a3@2 ~@2 [a3,e4]@3 e4@5", // A F D A5
  F: "b2@2 ~@10 b2@3 ~@5 [a#3,d4]@8 [a#3,d4,g4]@4, a4@15 ~@5 a4@12, d4@8 [d4,g4]@7 ~@17, ~ b2@2 b2@3 ~@3 a#2@3 ~@4, ~@4 b3@11 ~ [a#3,d4]@4 ~@12", // A# Gm G5 A#
  G: "a3@4 c#3@4 [b2,a3,d4,f#4]@7 ~ [g3,b3,g4]@4 [f#3,a3,f#4]@4 [e3,a3,e4]@4 [b2,a3,d4]@4, [d3,f#4] ~@3", // Bm7 G F#m A5 Bm7 D
  H: "~@12 b4@4 ~@12 [g3,e4]@3 ~, [e2,a3,e4]@16 [a2,c#4,a4]@15 ~, ~@4 e3@12 ~@8 [a3,f#4]@7 ~, ~@8 d4@8 ~@4 [b3,g4]@11 ~", // C A5 A D Em
  I: "a3@4 c#3@4 [b2,a3,d4,f#4]@7 ~@5 d4@4 [b2,b3,d4]@4 [a2,a3,c#4]@4, [d3,f#4] ~ [e3,g4,b4] ~", // Bm7 Bm A D Em
  J: "a3@6 ~@6 a4@3 ~@9 a4@5 ~@3, [d2,f#3,d4]@15 ~ a2@13 ~@3, ~@6 a3@6 ~@6 e3@11 ~@3, ~@8 f#4@7 ~@5 a3@9 ~@3, ~@22 e4@7 ~@3", // D
  K: "[~@12 g4@4 ~@6 a3@2 ~@4 [g#2,f#3,a#3,c4]@3 g#2 ~@12 g#2@4 ~@8 [b3,e4]@7 ~, d3@4 e4@12 ~@16 f#4@16 ~ f#4@15, ~@2 b3@14 ~@15 g#3@13 ~@4 [g3,b3]@8 ~@8, ~@6 d3@4 d3@6 ~@16 b3@8 [b3,e4]@8 ~@6 g3@9 ~, ~@8 f#4@8 ~@4 a4@9 ~@7 g#2@8 ~@4 g2@4 g2@8 ~@4]/2", // G#7 E5 G E5
  L: "a3@6 ~@6 a4@3 ~@17, [d2,f#3,d4]@15 ~@17, ~@3 a3@3 ~@10, ~@8 f#4@7 ~@17", // D
})).s("gm_acoustic_guitar_nylon").gain(0.23).pan(0.4)

// chords · acoustic guitar nylon · "NYLON GTR" · soft notes
const acoustic_guitar_nylon_2 = note(`<
  ~@9 A B C D E F ~@2 A B C D E F G ~@3 A B C D E F ~@2 A B C D E F G ~@6
>`.pickRestart({
  A: "~@24 [e3,a3]@5 ~@3", B: "~@3 g#3 ~@3 g2", C: "f#3@2 ~ f#2 ~ a#3!3, f#2@2 ~@6 f#3@9 ~@15",
  D: "~@3 a3 ~@3 c#3 ~@4 c3@2 ~@2", E: "~@8 a#2 ~@4 a#3 ~ a#2, ~@12 a#2@3 ~", F: "~ a3 ~@6",
  G: "~@4 d3@6 ~@2 a3@3 ~@17, ~@10 d3@5 ~@17",
})).s("gm_acoustic_guitar_nylon").gain(0.11).pan(0.4)

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

// drums · kick · soft notes
const kick_soft = s("bd").struct("<~@6 [~@7 x ~@8]!36 ~@6>").gain(0.2)

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

// drums · snare · soft notes
const snare_soft = s("sd").struct(`<
  ~@6 A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A ~@7
>`.pickRestart({
  A: "~@11 x ~@6 x ~@8 x ~@4", B: "~@9 x ~@6",
})).gain(0.13)

// drums · pedal hat
const pedal_hat = s("hh").struct("<~@6 A B A B A B A B A@2 C D A B A@3 D A B E ~@21>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~@2", C: "~@3 x ~ x ~ x", D: "~ x ~ x ~@3 x", E: "~ x ~@6",
})).gain(0.33)

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

// drums · ride
const ride = s("rd").struct("<~@14 [~ x!2 ~@5] ~@2 [~@4 x!2 ~@2] ~@2 [x!8]!3 [x!4 ~@4] ~@24>").gain(0.2)

// drums · tambourine
const tambourine = s("tb").struct("<~@14 [~@3 x ~@3 x] [~@3 x ~@4] ~@32>").gain(0.26)

// drums · splash
const splash = s("cr").struct("<~@14 x [~@7 x] ~@10 x ~@21>").gain(0.26)

// drums · triangle
const triangle = s("triangles:35").struct("<[~@11 x!3 ~@2] [x!3 ~@3 x!4 ~ x ~@4] ~@46>").gain(0.57)

// drums · jingle bells
const jingle_bells = s("sleighbells:4").struct(`<
  ~
  [~@14 x ~ x ~ x ~ x ~ x ~ x ~@2 x ~ x ~ x]
  [~@2 x ~ x ~ x ~ x ~@2 x ~ x ~ x ~ x ~@14]
  ~@14
  [~@3 x]
  ~@5
  [~@6 x!3 ~@7]
  ~@24
>`).gain(0.28)

// drums · bell tree
const bell_tree = s("marktrees:0").struct("<~@5 [~@15 x] ~@9 [~@15 x] ~@7 [~@27 x ~@4] ~@24>").gain(1.95)

stack(
  bass, string_ensemble_2, string_ensemble_2_soft, pad_warm, pad_warm_soft, epiano1, epiano1_soft,
  acoustic_guitar_nylon, acoustic_guitar_nylon_2, kick, kick_soft, snare, snare_soft, pedal_hat, open_hat, ride,
  tambourine, splash, triangle, jingle_bells, bell_tree
)