// Question d'equilibre — Cabrel Francis
// 137 bpm, 4/4, key F minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 126 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(137/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.

// other · pad choir · "Voix accomp."
const pad_choir = note("<~@24 A@3 ~ B@2 C ~@27 A@3 ~ B@2 C ~@37 A@3 ~ B@2 C ~@17>".pickRestart({
  A: "[~@3 c5 g5!2 f5 e5@3 d5 f5@2 e5!2 e5@2 f5!4 c5@3]/3", B: "[~@4 f5!2 g5 a5@3 f5 f5@2 c5 c5@2]/2", C: "eb5 eb5@7",
})).s("gm_pad_choir").gain(0.19)

// chords · acoustic guitar nylon · "Guitare 1"
const acoustic_guitar_nylon = note(`<
  A@2 B@2 A@2 C D E F E F E F G H E F E F E F I J@2 K L@2 M N O P Q R@2 S T U V@2 W D X Y X Y X Y Z AA X Y X Y X Y AB
  AC@2 K L@2 M N O P Q R@2 S T AD AE AF AG AH AI AH AJ AK AG AK AL AM AN AO E F E F E F G H E F E F E F I J@2 K L@2 M N
  O P Q R@2 S T U V@2 AP@2 V@2 AQ@4
>`.pickRestart({
  A: "[f3!4 [g3,bb4,eb5] g3!2 ab3 ab3!4 [g3,bb4,eb5] g3!3, [ab4,eb5]@2 [ab4,eb5]@2 ~ [bb4,eb5]@2 [c5,eb5]@3 [c5,eb5]@2 ~ [bb4,eb5]@3]/2", // Eb Ab5 Eb5 Cm Eb5
  B: "[f3!4 [g3,bb4,eb5] g3!2 ab3 ab3!3 g3!2 f5 eb5 bb4, [ab4,eb5]@2 [ab4,eb5]@2 ~ [bb4,eb5]@2 [c5,eb5]@2 [c5,eb5]@2 [bb4,eb5]@2 ~@3]/2", // Eb Ab5 Eb5 Cm Eb5
  C: "f3!4 [g3,bb4,eb5] g3!2 f3, [ab4,eb5]@2 [ab4,eb5]@2 ~ [bb4,eb5]@3", D: "f4 bb4 c5 f5 c5 bb4 a4 f4",
  E: "bb3 f4 ab4 db5@2 ab4 f4 ab4", F: "ab3 eb4 ab4 c5@2 ab4 eb4 ab4", G: "eb4 bb4 eb5 g5 f5 eb5 bb4 ab4",
  H: "g4 ab4 f4 eb4 bb3 c4 eb4 f4", I: "eb4 bb4 eb5 g5 f5 eb5@3",
  J: "[c5 f5 bb5@2 f4 eb4 d4 c4@2 g4 c5 c4 g4 c5 g4 c5]/2", K: "g3 g4 c5 g3 g4 c5 g4 c5", L: "f3 g4 c5 f3 g4 c5 g4 c5",
  M: "bb3 f4 c5 bb3 f4 c5 f4 c5", N: "d4 f4 c5 d4 f4 c5 f4 c5", O: "ab3 eb4 c5 ab3 eb4 c5 eb4!2",
  P: "ab3 eb4!2 ab3 eb4!4", Q: "c4 g4 c5 c4 g4 c5 g4 c5", R: "bb3 g4 c5 bb3 g4 c5 g4 c5",
  S: "g3 f4 bb4 g3 f4 bb4 f4 bb4", T: "bb3 e4 a4 bb3 e4 a4 e4 a4", U: "bb3 e4 a4 e4 a4 ~@3",
  V: "[[ab4,eb5]@2 [ab4,eb5]@2 [bb4,eb5] [bb4,eb5]@2 [c5,eb5]@3 [c5,eb5]@2 [bb4,eb5] [bb4,eb5]@3]/2", // Ab5 Eb5 Cm Eb5
  W: "[ab4,eb5]@2 [ab4,eb5]@2 [bb4,eb5] [bb4,eb5]@3", // Ab5 Eb5
  X: "[bb3,f4,ab4,db5,f5]@2 [bb3,f4,ab4,db5,f5] [bb3,f4,ab4,db5,f5]@2 [bb3,f4,ab4,db5,f5]!3", // Bbm7
  Y: "[ab3,c4,eb4,ab4,c5,ab5]@2 [ab3,c4,eb4,ab4,c5,ab5] [ab3,c4,eb4,ab4,c5,ab5]@2 [ab3,c4,eb4,ab4,c5,ab5]!3", // Ab
  Z: "eb4 bb4 eb5 f5 g5 f5 eb5 bb4", AA: "ab4 g4 f4 eb4 bb3 c4 eb4 f4",
  AB: "[eb4,bb4,eb5,g5]@2 [eb4,bb4,eb5,g5] [eb4,bb4,eb5,g5]@2 [eb4,bb4,eb5,g5]!3", // Eb
  AC: "[[c5,f5,bb5]!3 [c5,f5,a5]@3 ~ c4@2 g4 c5 c4 g4 c5 g4 c5]/2", AD: "a3 e4 a4@2 g3 e4 bb4@2",
  AE: "[f3,c4,f4,bb4]@3 [f3,c4,f4,bb4]@3 [f3,c4,f4,bb4]@2", AF: "[f3,c4,f4,a4]", AG: "[bb3,f4]!8", AH: "[b3,g4]!8",
  AI: "[c4,g4]!8", AJ: "[ab3,eb4]!8", AK: "[a3,f4]!8", AL: "[gb3,db4]!8", AM: "[g3,eb4]!8", AN: "[ab3,eb4]!7 [f3,c4]",
  AO: "[f3,c4,f4,bb4]@3 [f3,c4] [f3,c4,f4,a4,c5]@4", // Fsus4 F5 F
  AP: "[[ab4,eb5]@2 [ab4,eb5]@2 [bb4,eb5] [bb4,eb5]@2 [c5,eb5]@2 [c5,eb5]@2 [c5,eb5]@2 f5 eb5 bb4]/2", // Ab5 Eb5 Cm
  AQ: "[[ab4,eb5]@4 [ab4,eb5]@4 [bb4,eb5]@2 [bb4,eb5]@4 ~ [c5,eb5]@4 [c5,eb5]@5 [c5,eb5]@13 [f3,c4,f4,ab4,eb5,f5]@24 ~@3]/4", // Ab5 Eb5 Cm Fm7
})).s("gm_acoustic_guitar_nylon").gain(0.31)

// other · overdriven guitar · "Guitare 2"
const overdriven_guitar = note(`<
  ~@3 A@5 B@3 ~@4 C D E D E D E F G@2 H I J H K L M N O P Q O R@5 S ~@6 C D E D E D E L G@2 H I J H K L M N O P Q O T U
  V W X Y Z AA AB AC AD AE AF AG AH B@3 ~@4 C D E D E D E F G@2 H I J H K L M N O P Q O AI@5 AJ@4 AK@2
>`.pickRestart({
  A: "[~@5 eb4 bb4 ab4@13 ~ eb4 bb4 ab4@6 eb4 bb4 bb4@5 a4@4]/5", B: "[ab4@5 ~]/3", C: "~ [eb5,g5] ~@2 [eb5,g5] ~@3",
  D: "~@2 [ab5,db6] ~@2 [ab5,db6] ~@2", E: "~@3 [eb5,ab5,c6]@2 ~@3", F: "eb4@7 bb4", G: "[c5@4 f4 eb4 d4 c4@9]/2",
  H: "d4", I: "f3", J: "f4 e4", K: "c5", L: "eb4", M: "bb4 a4", N: "c4", O: "bb3", P: "ab3", Q: "g3",
  R: "[~@2 e5!3 c5 e5 f5@13 ~ eb4 bb4 ab4@6 eb4 bb4 bb4@5 a4@4]/5", S: "ab4", T: "ab3 g3", U: "f4@2 bb4 bb4@2 c5@2 eb5",
  V: "f5 eb5 f5@14", W: "g5 f5", X: "d5@4 d5 eb5 ~ f5 d5@8", Y: "e5@2 d5 g4@5", Z: "e5 d5 e5@2 g5 g4@3",
  AA: "bb5@4 c6@6 bb5 ab5 g5@2 f5@2", AB: "f5 g5 ~ f5@3 ~@2", AC: "e5@2 d5 d5@3 bb4 ~", AD: "bb5@2 a5 a5@3 f5 ~",
  AE: "f5@6 eb5 db5 c5@2 ab4@2 bb4@2 c5@2", AF: "~ bb4@15", AG: "c6@6 bb5 ab5 g5@2 f5@2 eb5@2 g5@2", AH: "f5",
  AI: "[~@2 e5!3 c5 e5 f5@13 ~ eb4 bb4 ab4@16 bb4]/5",
  AJ: "[c5@2 f5@22 ~@2 eb4@2 bb4@2 ab4@19 ~@2 c5@2 ~ bb4@2 ab4@2 f4@3 eb4@3]/4", AK: "[c4@2 eb4@3 [f3,c4,f4]@24 ~@3]/2",
})).s("gm_overdriven_guitar").gain(0.1).pan(0.4)

// bass · electric bass finger · "Basse"
const bass = note(`<
  ~@8 A B A B A B C D A B E B A F G H@2 I J@2 E K L M N O P Q O R@2 S T U V W V X V F C D Y W Z L Y F G H@2 I J@2 E K L
  M N O P Q O AA AB AC AD AE AF AG AH AI AJ AK AL AM AN AO A B A B A B C D A B E B A F G H@2 I J@2 E K L M N O P Q O
  AP@2 S T S T S AQ@2 AR@2
>`.pickRestart({
  A: "bb2@2 ~ bb2 bb2@2 ~@2", B: "ab2@2 ~ ab2 ab2@2 ~@2", C: "eb3@2 ~ eb3 eb3@2 ~ eb3",
  D: "eb3!2 db3 c3 bb2 c3 bb2 ab2", E: "bb2@2 ~ bb2 bb2@2 bb2@2", F: "ab2@2 ~ ab2!2 c3 db3 d3",
  G: "eb3@2 ~ eb3!2 d3 eb3 e3", H: "[f3@2 ~ f3!2 eb3 d3 c3@4 g2 c3@2 c3@2]/2", I: "g2@2 ~ g2 g2@2 g2@2",
  J: "f2@2 ~ f2 f2@2 f2@2", K: "d3@2 ~ d3 d3@2 d3@2", L: "ab2@2 ~ ab2 ab2@2 ab2@2", M: "ab2@2 ~ ab2 ab2@2 g3@2",
  N: "c3@3 c3@3 c3!2", O: "bb2@3 bb2@3 bb2!2", P: "ab2@3 ab2@3 ab2!2", Q: "g2@3 g2@3 g2!2",
  R: "[bb2 ~ bb2!3 ab2 g2 f2@3 ~ f2 g2@2 g2 ~]/2", S: "ab2@2 ~ ab2 g2@2 ~ g2", T: "f2@2 ~ f2 g2@2 ~ g2",
  U: "f2@2 ~ f2 f2@2 ~ f2", V: "bb2@2 ~ bb2 bb2@2 ~ bb2", W: "ab2@2 ~ ab2 ab2@2 ~ ab2", X: "ab2@2 ~ ab2!2 eb3 ab3 ab2",
  Y: "bb2@2 ~ bb2 bb2@2 bb2 a2", Z: "bb2@2 ~ bb2 bb2@2 bb2!2", AA: "ab2 g2", AB: "f2@3 f2@3 f2!2", AC: "f2@3 f2!5",
  AD: "bb2!7 bb3", AE: "b2!7 b3", AF: "c3!8", AG: "b2!5 g2 c3 bb2", AH: "ab2!7 ab3", AI: "a2!7 a3", AJ: "bb2!8",
  AK: "a2!5 f2 bb2 ab2", AL: "gb2!7 gb3", AM: "g2!7 g3", AN: "ab2!8", AO: "f2!4 f2@2 f3@2",
  AP: "[bb2 ~ bb2!3 ab2 g2 f2@3 ~ f2 g2@2 ~ g2]/2", AQ: "[f2@4 ~@2 f2@2 g2@4 ~@3 g2@2 ab2@5 ~@2 ab2@2 g2@5 ~]/2",
  AR: "[g2@5 f2@24 ~@3]/2",
})).s("gm_electric_bass_finger").gain(0.41).pan(0.6)

// drums · rim
const rim = s("rim").struct("<~@8 A@15 B C A@7 D@5 E A@19 B C A@7 D@7 F A@27 B C A@7 D@5 E C A@6 G ~@2>".pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x ~@2 x!2 ~@2 x", C: "~@3 x!2 ~@3", D: "x ~@2 x ~@3 x", E: "x!5 ~@2 x", F: "x ~@2 x!5",
  G: "~ x ~@6 x ~ x ~@5",
})).gain(0.4)

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

// drums · hihat
const hihat = s("hh").struct(`<
  ~@8 A B@6 C B@16 A B@2 D E F B@3 C B@7 C B@16 A B@2 D@4 G H ~@11 A B@6 C B@16 A B@2 D E F B@4 I B J K L ~
>`.pickRestart({
  A: "x ~ x!6", B: "x!8", C: "x!7 ~", D: "x!2 ~ x!5", E: "x!5 ~@3", F: "~@7 x", G: "x!3 ~@5", H: "x", I: "~ x!7",
  J: "~@2 x ~ x ~ x ~ x ~ x ~ x ~@2 x", K: "~ x ~ x ~@2 x ~ x ~ x ~@2 x ~@2", L: "x!2 ~@6",
})).gain(0.4)

// drums · mid tom
const mid_tom = s("mt").struct("<~@36 A B ~@35 C ~@40 A B ~@10>".pickRestart({
  A: "~@6 x!2", B: "x!5 ~@3", C: "~@3 x!5",
})).gain(0.4)

// drums · open hat
const open_hat = s("oh").struct("<~@7 A ~@7 B ~@25 B ~@7 B ~@35 B ~@7 B ~@32>".pickRestart({
  A: "~@3 x", B: "~@7 x",
})).gain(0.4)

// drums · high tom
const high_tom = s("ht").struct("<~@36 [~@7 x] [x!5 ~@3] ~@76 [~@7 x] [x!5 ~@3] ~@10>").gain(0.4)

// drums · crash
const crash = s("cr").struct("<~@120 x ~ x ~ [~@5 x ~@10] ~>").gain(0.4)

// drums · ride
const ride = s("rd").struct("<~@74 [~@2 x!6] [x!8]!10 [x!7 ~] ~@40>").gain(0.4)

// drums · tambourine
const tambourine = s("tb").struct("<~@4 A ~ A ~ B@16 C@8 ~@6 B@20 C@8 ~@8 C@12 B@16 C@8 ~@6 C@7 D E ~>".pickRestart({
  A: "~ x", B: "~ x ~@2", C: "~ x ~ x", D: "~@3 x ~@4", E: "x",
})).gain(0.4)

stack(
  pad_choir, acoustic_guitar_nylon, overdriven_guitar, bass, rim, snare, hihat, mid_tom, open_hat, high_tom, crash,
  ride, tambourine
)