// Unison — Celine Dion
// 129 bpm, 4/4, key C# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: ch 5 "Slap Bass" named as a bass, played on slap bass 1 (its electric guitar clean patch is not one); ch 9 "Bass Pick" named as a bass, played on electric bass pick (its electric guitar muted patch is not one)
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 172 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(129/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 · slap bass 1 · "Synth Bas"
const bass = note(`<
  ~@2 A B C D E F A G A G A G A G A H I J G K I L M N A B C D E F A G A G A G A G A H I J G K I L O N A B C D E F A G A
  B C D E F A G A P Q R B S Q T U S Q V B S W V A@2 I J G K I L O N A B C D E F A G A B C D E F A G A B C D E F A G A B
  C D E F A G A B C D E F A G A B C D E F A G A B C D E F A G A B C D E F A G A B C D E F A G A B C D E F A G
>`.pickRestart({
  A: "~ c#2 g#2 c#2 f#2 c#2 ~ c#2", B: "~ c#2 f#2 c#2 e2 c#2 ~ a1", C: "~ a1 g#2 a1 f#2 a1 ~ a1",
  D: "~ a1 f#2 a1 e2 a1 ~ a1", E: "~ a1 g#2 a1 f#2 a1 ~ b1", F: "~ b1 f#2 b1 e2 b1 ~ c#2",
  G: "~ c#2 f#2 c#2 e2 c#2 ~ c#2", H: "~@2 c#2@2 f#2@2 c#2@2 e2@2 c#2@2 ~@2 f#2 ~", I: "~ f#2 c#3 f#2 b2 f#2 ~ f#2",
  J: "~ f#2 c#3 f#2 b2 f#2 ~ c#2", K: "~ c#2 g#2 c#2 f#2 c#2 ~ f#2", L: "~ f#2 c#3 f#2 b2 f#2 ~ g#2",
  M: "g#2 ~ g#2@2 c3@2 g#2@2 c#3@2 g#2@2 d#3@2 g#2@2", N: "~ g#2 d#3 g#2 c#3 g#2 d#3 c#2",
  O: "~ g#2 c3 g#2 c#3 g#2 d#3 g#2", P: "~ c#2 f#2 c#2 e2 c#2 ~ b1", Q: "~ b1 g#2 b1 f#2 b1 ~ b1",
  R: "~ b1 a2 b1 f#2 b1 ~ c#2", S: "~ a1 f#2 a1 e2 a1 ~ b1", T: "~ b1 g#2 b1 f#2 b1 c2@2",
  U: "c#2 ~ c#2@2 g#2@2 c#2@2 f#2@2 c#2@2 ~@2 a1@2", V: "~ b1 g#2 b1 f#2 b1 ~ c#2", W: "~ b1 g#2 b1 e1 a1 ~ b1",
})).s("gm_slap_bass_1").gain(0.28)

// bass · slap bass 1 · "Slap Bass"
const bass_2 = note(`<
  ~ A ~ B C ~@2 D E ~@3 F ~@8 F ~@4 F@2 G ~@5 F ~ F ~@3 F ~@4 F ~@4 F@2 G ~@5 F@2 G ~@9 H ~ B ~@3 I ~@3 I J ~@5 F ~@4
  F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5 F@2 G ~@5
>`.pickRestart({
  A: "f#2 g#2 b2@2 g#2 f#2 e2@2 c#2@2 b1@2 ~@2 c#2@2", B: "~@5 b2 ~@2", C: "~@10 a2 ~@5", D: "~@7 c#3",
  E: "~@7 c#3 ~@8", F: "~@5 c#3 ~@2", G: "~@5 a2 ~@2", H: "~@10 c#3 ~@5", I: "~@10 b2 ~@5", J: "~@10 b2@2 ~@2 c#3 ~",
})).s("gm_slap_bass_1").gain(0.33)

// chords · epiano2 · "E.Piano"
const epiano2 = note(`<
  ~@9 A@3 B@4 C@8 D E F@4 G H I@4 B@4 C@8 D E F@4 G H J@2 F@4 G H J@2 K@3 L@4 H M@3 H N@4 O@8 D E F@4 G H J@2 F@4 G H
  J@2 F@4 G H J@2 F@4 G H J@2 F@4 G H J@2 F@4 G H J@2 F@4 G H J@2 F@4 G H J@2 F@4 G H J@2 F@4 G H J@2
>`.pickRestart({
  A: "[~@7 [e4,g#4,b4]@16 ~]/3", B: "[[c#4,e4,g#4]@15 [e4,g#4,b4]@13 [c#4,f#4,a#4]@4]/4",
  C: "[[c#4,e4,g#4]@30 [c#4,f#4,a4]@32 [c#4,e4,g#4]@13 ~ [c#4,f#4,a#4] ~ [c#4,e4,g#4]@16 [c#4,f#4,a4]@32 ~@2]/8", // C#m F#m C#m F# C#m F#m
  D: "[c#4,d#4,g#4]@5 [c#4,d#4,g#4] ~@2", E: "[c4,d#4,g#4]", F: "[[g#3,c#4,e4]@15 [a3,c#4,e4]@16 ~]/4",
  G: "[a3,c#4,e4]", H: "[f#3,b3,d#4]", I: "[[g#3,c#4,e4]@15 [e4,g#4,b4]@16 ~]/4", J: "[[g#3,c#4,e4]@15 ~]/2",
  K: "[[g#3,c#4,f4]@5 [f#3,b3,d#4]@3]/3", L: "[[f#3,b3,d#4]@7 [g#3,c#4,e4]@8 [g#3,c#4,e4]@8 [f#3,b3,d#4]@9]/4",
  M: "[[g#3,c#4,f4]@7 [g#3,c#4,e4]@8 [f#3,b3,d#4]@9]/3", // C# C#m B
  N: "[[g#3,c#4,e4]@7 [g#3,c#4,e4]@8 [f#3,b3,d#4]@7 ~ [f#3,b3,d#4]@9]/4", // C#m B
  O: "[[c#4,e4,g#4]@12 [c#4,f#4,a#4]@2 [c#4,e4,g#4]@6 [a#3,d#4,f#4]@4 ~@6 [f#4,a4]@32 [c#4,e4,g#4]@13 ~ [c#4,f#4,a#4] ~ [c#4,e4,g#4]@16 [c#4,f#4,a4]@32 ~@2, ~@3 [g#3,c#4,e4] ~@12]/8", // C#m F# C#m D#m F#m C#m F# C#m …
})).s("gm_epiano2").gain(0.18)

// chords · slap bass 1 · "Slap Bass"
const slap_bass_1 = note(`<
  ~@7 A ~@19 B ~ C ~@2 D E ~@2 F G ~@2 H@2 ~@9 B ~ C I@2 D E ~ B ~ C I@2 D E ~@27 B ~ C ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C
  ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C ~@2 D E ~ B ~ C ~@2 D
  E
>`.pickRestart({
  A: "~@2 f#3 g#3 b3@2 c#4@2 ~@8", B: "~@6 f#3 g#3 b3 ~@2 b3 ~@2 b3 ~", C: "~@6 f#3 g#3 b3 ~@2 c#4 ~@4",
  D: "~@6 f#3 g#3 b3 ~@2 b3 ~@2 c#4 ~",
  E: "~@2 [c#4,f#4,b4] [c#4,f#4] [c#4,f#4,b4] [c#4,f#4] ~@2 [c#4,f#4,b4] ~@2 [c#4,f#4,b4] ~@2 [c#4,f#4,b4] ~", // F#sus4 F#5 F#sus4 F#5 F#sus4
  F: "~@14 f#3 g#3", G: "b3@5 ~ b3@8 ~@2", H: "[~@12 b3@7 ~ [b3,b4]@7 ~@5]/2", I: "[~@3 [f#3,f#4]@2 ~@3]/2",
})).s("gm_slap_bass_1").gain(0.19)

// other · string ensemble 1 · "Symphonic"
const string_ensemble_1 = note(`<
  ~@7 A@3 ~@7 B@7 C D ~@5 A@3 ~@8 E@6 C D ~@5 F@3 ~@5 F@3 G@2 H@2 D I@3 G@2 J K D L J M N@8 C D ~@5 F@3 ~@5 F@3 ~@5 F@3
  ~@5 F@3 ~@5 F@3 ~@5 F@3 ~@5 F@3 ~@5 F@3 ~@5 F@3 ~@5 F@3
>`.pickRestart({
  A: "[~@2 [b5,c#6,g#6]@21 ~]/3", B: "[~@7 a5@16 g#5@16 a5@13 c#6@4]/7", C: "g#5@3 d#6", D: "[g#5,g#6]",
  E: "[a5@15 g#5@16 a5@13 c#6@4]/6", F: "[~ [b5,c#6,g#6]@11]/3", G: "[g#5,g#6]/2", H: "[f#5,f#6]/2",
  I: "[[b5,b6]@8 [e5,e6]@7 ~ f#5@24 [e5,e6]@4 [d#5,d#6]@4, ~@5 f#6@8 ~@3]/3", J: "[f#5,f#6]",
  K: "[b5,b6] [a5,a6] [g#5,g#6] [f#5,f#6]", L: "[c#5,c#6] [g#5,g#6]", M: "[d#5,d#6]@2 [e5,e6] [d#5,d#6]",
  N: "[[c#5,c#6]@15 a5@16 g#5@16 a5@13 c#6@4]/8", // C#
})).s("gm_string_ensemble_1").gain(0.32)

// other · electric bass pick · "Bass Pick"
const electric_bass_pick = note(`<
  ~@26 A@2 ~@22 A@2 ~@6 A@2 ~@32 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6 A@2 ~@6
>`.pickRestart({
  A: "c#4!16",
})).s("gm_electric_bass_pick").gain(0.13)

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

// drums · snare
const snare = s("sd").struct("<~ [~@3 x] [~ x ~ x]!31 [~@2 x ~@4 x] [~ x ~ x]!138>").gain(0.45)

// drums · hihat
const hihat = s("hh").struct(`<
  A ~ A B A@3 B A@3 B A@3 B A@3 B A@3 B A@11 B A@3 B A@3 B A@3 B A@19 B A@3 B A@3 B A@3 B A@3 B A B A@3 B A@82
>`.pickRestart({
  A: "x!4", B: "x ~@3 x ~@3 x ~@3 x!2 ~@2",
})).gain(0.3)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@2 [~ x ~ x ~ x ~ x]!170>").gain(0.15)

// drums · low tom
const low_tom = s("lt").struct("<~@33 [~@8 x ~@2 x ~@4] ~@49 [~@7 x] ~@88>").gain(0.4)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@11 A ~@3 A ~@3 A ~@3 A ~@19 A ~@3 A ~@3 A ~@3 A ~@3 A ~ A ~@3 A ~@82
>`.pickRestart({
  A: "~@15 x",
})).gain(0.45)

// drums · mid tom
const mid_tom = s("mt").struct("<~@9 [~@2 x!3 ~@11] ~@73 [~@10 x!3 ~@3] ~@88>").gain(0.45)

// drums · high tom
const high_tom = s("ht").struct("<~@33 [~@3 x] ~@49 [~@2 x!3 ~@11] ~@88>").gain(0.35)

// drums · crash
const crash = s("cr").struct(`<
  ~@10 A ~@15 A ~@7 A ~@15 A ~@7 A ~@7 A ~@7 A ~@17 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7
>`.pickRestart({
  A: "x",
})).gain(0.35)

// drums · congas
const congas = s("conga:13").struct("<~@9 A ~@15 B ~@6 A C ~@15 B ~@7 D ~@7 E ~@7 F ~@17 G ~@80>".pickRestart({
  A: "~@8 x ~@2 x ~@4", B: "x ~@2 x ~@6 x!2 ~@4", C: "x ~@2 x ~@4 x ~@2 x ~@4", D: "~@2 x!2 ~@2 x ~ x ~ x ~@5",
  E: "x ~@2 x ~@2 x ~ x ~@7", F: "x ~@2 x ~@10 x ~", G: "~@12 x!2 ~@2",
})).gain(1.11)

// drums · congas
const congas_2 = s("conga:18").struct("<~@9 A ~@15 B ~@6 C D ~@15 B ~@7 E ~@7 F ~@7 G ~@17 H ~@80>".pickRestart({
  A: "~@3 x", B: "~@2 x!2 ~@2 x!2", C: "~@7 x", D: "~@3 x ~@3 x", E: "~@4 x!2 ~@6 x ~ x ~", F: "x ~@2 x ~@10 x ~",
  G: "~@8 x ~@2 x ~@4", H: "~@5 x ~@2",
})).gain(1.11)

// drums · congas
const congas_3 = s("conga:33").struct("<~@65 [~@11 x!2 ~@3] ~@106>").gain(1.11)

stack(
  bass, bass_2, epiano2, slap_bass_1, string_ensemble_1, electric_bass_pick, kick, snare, hihat, hihat_soft, low_tom,
  open_hat, mid_tom, high_tom, crash, congas, congas_2, congas_3
)