// Fais Ce que Tu Voudras — Celine Dion
// 65 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 38, 4/4 at bar 38) are rendered on a constant 4/4 grid of one bar per cycle
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 61 bars on a 32-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(65/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 · epiano2 · "Right Hand (Chorused Piano)"
const epiano2 = note("<A B@2 C@2 B@2 C@2 B@2 D ~@6 A B@2 C@2 B@2 E@3 ~@7 F@2 G H I@2 G H J@2 ~@16>".pickRestart({
  A: "~@7 d#3 ~@7 d#3, e2@5 b3 g#3@2 ~@2 f#3@3 b2 d#4@2, b3@3 b2@5 b2@3 b2 c#4@4, ~ e3@7 ~ f#2@7, ~ g#3 c#4@2 b3@4",
  B: "[~@7 g#2 ~@7 c#3 ~@7 b2 ~@6 b2@2, [c#2,e4]@6 c#4@2 ~@2 e3@4 c#4@4 b2 e3 [b2,c#4]@2 b3@2 b3@4 a3@4, ~ c#3@3 f#4@4 e4@8 b3@5 e3@3 b2@3 d#3@5, ~@2 g#3@6 ~ c#3@2 c#3@2 c#3 e3@2 ~ e3 g#3@6 ~@2 f#3@6, ~@3 g#2@2 c#3@3 a2@4 [a2,d#4]@4 e2@8 ~ f#2@7]/2", // C#m Bsus2 Adim
  C: "[~@23 d#3 ~@7 d#3, a2@11 e4 a4 g#4 f#4@2 ~ e3@3 c#4 b3 g#3@2 b3@5 b2 d#4@2, e4@3 c#4@2 g#4@5 c#4@5 e4@9 ~@2 f#3@6, ~ e3@15 e2@8 ~ f#2@7, ~@2 a3@2 a4@3 e4@2 a3@7 b3@2 g#3 b2@5 b2@3 b2 c#4@4]/2",
  D: "~@15 e4, a2@11 e4 a4 g#4 f#4@2, e4@3 c#4@2 g#4@5 c#4@6, ~ e3@15, ~@2 a3@2 a4@3 e4@2 a3@7",
  E: "[~@15 e4@32 ~, a2@11 e4 a4@32 ~@4, e4@3 c#4@2 g#4@5 c#4@32 ~@6, ~ e3@12 g#4@32 ~@3, ~@2 a3@2 a4@3 e4@2 a3@5 f#4@32 ~@2]/3",
  F: "[~@14 d#4@2 ~@15 d#3, ~@10 b3@10 g#4@4 [e2,b3,b4] e3 g#3 b2 c#4 b3 g#3@2, ~@6 c#4@5 a4@5, ~ d#4, ~@9 f#4@7]/2", // E5
  G: "~@7 d#3 ~@7 g#2, b3@5 b2 d#4@2 ~@3 g#2@2 c#3 c#4@2, b2@2 f#3@6 ~ c#3@3 f#4@4, ~ f#2@7 [c#2,e4]@8, ~@3 b2 c#4@4 ~@2 g#3@6", // C#m
  H: "~@7 c#3 ~@7 b2, e4@8 b3@5 e3 b3@2, a2 [a2,d#4] e2@2, ~ c#3@2 c#3@2 c#3 e3@2 ~ e3 g#3@6, ~@2 e3@4 c#4@4 b2 e3 [b2,c#4]@4", // Adim Bsus2
  I: "[~@6 b2@2 ~@23 d#3, b3@4 a3@4 e4@3 c#4@2 g#4@5 c#4 e4 a4 g#4 f#4@2 ~ e3@3 c#4 b3 g#3@2, b2@3 d#3@5 ~ e3@14 e4@9, ~ f#2@7 a2@16 e2@8, ~@2 f#3@6 ~@2 a3@2 a4@3 e4@2 a3@7 b3@2 g#3 b2@5]/2",
  J: "[~@12 b2@4 ~@30 e4@3 ~@15, b3@4 a3@4 e4@3 c#4@2 g#4@5 c#4 e4 a4 g#4 f#4@2 ~@8, b2@3 d#3@5 ~ e3@15 ~@8, ~ f#2@7 a2@16 ~@8, ~@2 f#3@6 ~@2 a3@2 a4@3 e4@2 a3@7 ~@8]/2",
})).s("gm_epiano2").gain(0.26)

// other · rock organ · "Organ Solo"
const rock_organ = note("<~@36 A B C D E F G H I ~@16>".pickRestart({
  A: "~@16 g#4@12 e4 ~@2 a4, ~@29 f#4@2 ~, ~@15 g#4",
  B: "b4@12 a4 g#4 f#4 a4 g#4@12 ~@2 d#4 b3, ~@14 f#4 ~, ~@29 e4@2 ~",
  C: "c#4@6 d#4@2 e4@3 ~ g#4@3 ~ g#4@12 ~ f#4 ~ e4, ~@11 f#4@3 ~ a4@2 ~@11 e4@2 g#4@2",
  D: "f#4@11 ~@3 f#4 g#4 e4@5 ~ d#4 ~ e4@3 f#4 e4@3 d#4, ~@6 d#4 ~@9, ~@13 e4@2 ~@17",
  E: "e4@11 d#4 ~ f#4 g#4 a4 g#4@12 ~@3 a4, ~@6 e4 ~@7 e4 g#4, ~@29 f#4@2 ~",
  F: "b4@12 ~ g#4 f#4 a4 g#4@12 f#4 e4 d#4 b3, ~@6 a4 ~@9",
  G: "c#4@6 d#4 ~ e4@3 ~ g#4@3 ~ g#4@12 e4 f#4 ~ e4, ~@11 f#4@2 ~@2 a4@2 ~@13 g#4@2",
  H: "f#4@11 ~@3 f#4 ~ e4@6 ~@2 e4@3 ~ e4@3 d#4, ~@12 d#4@2 ~@9 d#4@2 ~@7, ~@13 e4@2 g#4@2 ~@10 f#4@2 ~@3", I: "e4 ~",
})).s("gm_rock_organ").gain(0.46)

// chords · string ensemble 1 · "Chords (String Ensemble)"
const string_ensemble_1 = note("<~@32 A B A C D E F G@2 E F H@2 I@2 J@2 K@2 L@4 M@2 N@2 O ~>".pickRestart({
  A: "[b3,d4,g4] [b3,e4,g4]", B: "[c4,e4,g4] [d4,f#4,a4]", C: "[c4,e4,g4] [b3,d#4,f#4]", D: "[b3,d#4,f#4] [b3,e4,g#4]",
  E: "[d#4,f#4,b4] [c#4,e4,g#4]", F: "[e3,a3,c#4] [b3,e4,g#4]", G: "[[b3,d#4,f#4] [a3,c#4,e4]@2 [b3,e4,g#4]]/2",
  H: "[[b3,d#4,f#4] [a3,c#4,e4]@2 [g#3,b3,e4]]/2", I: "[[c#4,e4] b3@2 b3]/2", J: "[[c#4,e4] b3@2 [e3,a3]]/2",
  K: "[[c#4,e4] [b3,d#4,f#4]@2 [g#3,b3,e4]]/2", L: "[[e3,g#3,c#4] [d#3,g#3,b3]@2 [e3,g#3,b3]]/2",
  M: "[[e3,g#3] [d#3,g#3,b3]@2 e3]/2", N: "[[e3,g#3,c#4] [d#3,g#3,b3]@2 [e3,b3]]/2", O: "e3 ~",
})).s("gm_string_ensemble_1").gain(0.2)

// chords · string ensemble 1 · "Chords (String Ensemble)" · soft notes
const string_ensemble_1_soft = note("<~@45 A@2 B@2 C ~@5 D E ~ F G@2>".pickRestart({
  A: "[g#3 [g#3,d#4]@2 [g#3,e4]]/2", B: "[g#3 [g#3,d#4]@2 c#4]/2", C: "a#3 ~", D: "c#4 ~", E: "~ [g#3,b3]", F: "~ g#3",
  G: "[[g#3,c#4] [d#3,g#3,b3]@2 ~]/2", // C#5 G#m
})).s("gm_string_ensemble_1").gain(0.1)

// chords · pad warm · "Chords (Warm Pad)"
const pad_warm = note("<~@12 A B A B C D ~@8 A B A B C D ~@12 E F G F H I J K@8 L@2>".pickRestart({
  A: "[g#4,b4,e5] [g#4,c#5,e5]", B: "[g#4,b4,d#5]!2", C: "[a4,c#5,e5]!2", D: "[f#4,b4,d#5]!2", E: "~ [g#4,b4,e5]",
  F: "[g#4,c#5,e5] [g#4,b4,d#5]", G: "[g#4,b4,d#5] [g#4,b4,e5]", H: "[g#4,b4,d#5] [a4,c#5,e5]",
  I: "[a4,c#5,e5] [f#4,b4,d#5]", J: "[f#4,b4,d#5] [g#3,b3,e4]", K: "[[e3,g#3,c#4] [d#3,g#3,b3]@2 [e3,g#3,b3]]/2",
  L: "[[e3,g#3,c#4] [d#3,g#3,b3]@2 ~]/2", // C#m G#m
})).s("gm_pad_warm").gain(0.2)

// chords · pad new age · "Chords (Fantasia)"
const pad_new_age = note("<~@12 A B A B C D ~@8 A B A B C D ~@29>".pickRestart({
  A: "[g#4,b4,e5] [g#4,c#5,e5]", B: "[g#4,b4,d#5]!2", C: "[a4,c#5,e5]!2", D: "[f#4,b4,d#5]!2",
})).s("gm_pad_new_age").gain(0.2)

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

// drums · rim
const rim = s("rim").struct("<~@12 [x!2]!6 ~@43>").gain(0.26)

// drums · snare
const snare = s("sd").struct("<~@18 [~ x ~ x]!42 [~ x ~@2]>").gain(0.31)

// drums · low tom
const low_tom = s("lt").struct("<~@17 A ~@7 B ~@10 C ~@3 D ~@3 E ~@16>".pickRestart({
  A: "~@12 x!3 ~", B: "~@11 x ~@3 x", C: "~@3 x ~@4", D: "~@10 x ~@3 x!2 ~@16", E: "~@12 x ~ x!2 ~@16",
})).gain(0.41)

// drums · hihat
const hihat = s("hh").struct("<~@18 [x!16]!42 [x!8 ~@8]>").gain(0.31)

// drums · mid tom
const mid_tom = s("mt").struct("<~@21 A ~@3 B ~@5 C D ~@3 E ~@3 F ~@3 G ~@5 H ~@10>".pickRestart({
  A: "~@26 x!3 ~ x ~", B: "~@24 x ~ x!3 ~@3", C: "~@26 x!3 ~ x!2", D: "x", E: "~@2 x!3 ~ x ~@3 x ~@21", F: "~ x ~@2",
  G: "~@5 x ~@10", H: "~@5 x!3 ~@8",
})).gain(0.41)

stack(
  epiano2, rock_organ, string_ensemble_1, string_ensemble_1_soft, pad_warm, pad_new_age, kick, rim, snare, low_tom,
  hihat, mid_tom
)