// Natural Blues — Moby
// 108 bpm, 4/4, key A# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 112 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(108/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 · synth strings 1
const synth_strings_1 = note(`<
  ~@48 A@6 B@2 C@2 D@2 E@2 F@2 C@2 D@2 E@2 F@2 ~@16 G@2 H@2 I@2 J@2 G@2 H@2 I@2 J@2 ~@8
>`.pickRestart({
  A: "[bb3,bb4]/6", B: "[[ab3,ab4]@7 ~]/2", C: "[db4,db6]/2", D: "[f4,f6]/2", E: "[[gb4,gb6]@15 [f4,f6]]/2",
  F: "[[gb4,gb6]@3 [ab4,ab6]]/2", G: "[bb6 ~@15 bb6@16, [db5,f6]]/2", H: "[[c5,db5,ab6], [ab5,db6]@29 ~@3]/2",
  I: "[db6,ab6]/2", J: "[eb6,gb6,bb6]/2",
})).s("gm_synth_strings_1").gain(0.22).pan(0.3)

// bass · electric bass finger
const bass = note(`<
  ~@14 A B C D E@2 F@2 G@2 H D H D I@2 E@2 C D E@2 F@2 G@2 C D E@2 F@2 G@2 H D H D I@2 E ~ D@2 F@2 G@2 J@2 D@2 F@2 G@2 J
  K ~@15 L C D E@2 F@2 G@2 C D E@2 F@2 G@2 ~@8
>`.pickRestart({
  A: "~@12 eb3@3 ~", B: "eb3@3 ~ eb3@2 ~@2 eb3@3 ~ eb3@4", C: "bb1@4 ~ bb1 ~@2 bb1@2 ~ bb1!2 ~ bb1@2",
  D: "bb1@2 bb1@2 ~ bb1 ~@2 bb1@2 ~ bb1!2 ~ bb1@2", E: "ab1@2 ab1@2 ~ ab1 ~@2 ab1@2 ~ ab1!2 ~ ab1@2",
  F: "db2@2 db2@2 ~ db2 ~@2 db2@2 ~ db2!2 ~ db2@2", G: "eb2@2 eb2@2 ~ eb2 ~@2 eb2@2 ~ eb2!2 ~ eb2@2",
  H: "bb1@2 bb1@2 ~ bb1 ~@2 bb1@2 ~ bb1!2 ~ ab1@2", I: "gb1@2 gb1@2 ~ gb1 ~@2 gb1@2 ~ gb1!2 ~ gb1@2",
  J: "gb2@2 gb2@2 ~ gb2 ~@2 gb2@2 ~ gb2!2 ~ gb2@2", K: "gb2@2 gb2@2 ~ gb2 ~@2 gb2@2 ~ gb2!2 ~ gb2 ~", L: "eb3!4",
})).s("gm_electric_bass_finger").gain(0.61)

// chords · ocarina
const ocarina = note(`<
  A@2 B@2 C@2 D@2 A@2 B@2 C@2 D@2 A@2 B@2 C@2 D@2 E@4 F@2 G@2 A@2 B@2 C@2 D@2 A@2 B@2 C@2 D@2 E@4 F@2 H@2 I@2 J@2 K@2
  L@2 I@2 J@2 K@2 L@2 ~@16 M@2 B@2 C@2 D@2 M@2 B@2 C@2 D@2 A@2 B@2 C@2 N@2
>`.pickRestart({
  A: "[bb3,db4,f4]/2", B: "[ab3,c4,eb4]/2", C: "[ab3,db4]/2", D: "[bb3,eb4,gb4]/2", E: "[bb3,f4,bb4]/4",
  F: "[bb3,db4,gb4]/2", G: "[[ab3,eb4,ab4]@31 ~]/2", H: "[[ab3,eb4,ab4]@9 ~@7]/2", I: "[db6@3 eb6]/2",
  J: "[~@3 eb5, f6@15 ~]/2", K: "[gb5@29 ~ f5@2]/2", L: "[gb5@3 ab5]/2", M: "[db4,f4]/2", N: "[[bb3,eb4,gb4]@15 ~]/2",
})).s("gm_ocarina").gain(0.3).pan(0.6)

// other · piano
const piano = note(`<
  ~@16 A@2 B@2 C D E F G@4 H@2 I@2 A@2 B@2 C D E F A@2 B@2 C D E F A@4 J K L ~ A@2 M N O P Q@2 A@2 M N O P Q@2 R@2 S@2 T
  U V W R@2 S@2 T U V W A@2 B@2 C D E F A@2 B@2 C D E F ~@8
>`.pickRestart({
  A: "bb1@2 bb2 ~ bb2 ~ bb1 bb2 ~ bb1 bb2 ~ bb1@2 bb2@2", B: "ab1@2 ab2 ~ ab2 ~ ab1 ab2 ~ ab1 ab2 ~ ab1@2 ab2@2",
  C: "db3@2 ab3 ~ ab3 ~ db3 ab3 ~ db3 ab3@2 db3@2 ab3@2", D: "db3@2 ab3 ~ ab3 ~ db3 ab3 ~ db3 ab3 ~ db3@2 ab3@2",
  E: "eb3@2 bb3 ~ bb3 ~ eb3 bb3 ~ eb3 bb3 ~ eb3 bb3 ~ eb3", F: "bb3 ~ eb3 bb3 ~ eb3 bb3 ~ eb3 bb3 ~ eb3 bb3@2 eb3 bb3",
  G: "[[bb2,f3,bb3]@31 ~]/2", H: "[[gb3,bb3,db4]@31 ~]/2", I: "[[ab2,eb3,ab3]@31 ~]/2",
  J: "gb2@2 [gb3,db4] ~ [gb3,db4]@2 gb2 [gb3,db4] ~ gb2 [gb3,db4]@3 gb2 [gb3,db4]@2", // Gb5
  K: "gb2@2 [gb3,db4] ~ [gb3,db4] ~ gb2 [gb3,db4] ~ gb2 [gb3,db4]@3 gb2 [gb3,db4] ~", // Gb5
  L: "~@2 [ab3,db4] ~ [ab3,db4]@2 ab2 [ab3,db4] ~ ab2 [ab3,db4]@2 ab2 [ab3,db4] ~@2, ab2 ~@3", // Db5
  M: "~@2 [ab3,db4] ~ [ab3,db4]@2 db3 [ab3,db4] ~ db3 [ab3,db4]@2 db3@2 [ab3,db4] ~, db3 ~@3", // Db5
  N: "db3@2 [ab3,db4] ~ [ab3,db4] ~ db3 [ab3,db4] ~ db3 [ab3,db4]@2 db3@2 [ab3,db4] ~", // Db5
  O: "~@2 [bb3,eb4] ~ [bb3,eb4]@2 eb3 [bb3,eb4] ~ eb3 [bb3,eb4]@2 eb3@2 [bb3,eb4] ~, eb3 ~@3", // Eb5
  P: "eb3@2 [bb3,eb4] ~ [bb3,eb4] ~ eb3 [bb3,eb4] ~ eb3 [bb3,eb4]@2 eb3@2 [bb3,eb4] ~", // Eb5
  Q: "[~@2 [gb3,db4] ~ db4@2 gb2 [gb3,db4] ~ [gb3,db4] [gb3,db4]@2 [gb3,db4]@2 gb2 [gb3,db4]@2 gb2 [gb3,db4] ~ gb2 [gb3,db4] ~ gb2 db4@2 [gb3,db4] ~ [gb3,db4] ~ [gb3,db4] ~, gb2@4 gb3 ~@19 gb3 ~@7]/2", // Gb5
  R: "[bb2,db4]@15 ~", S: "[ab2,eb4]", T: "[db3,ab3,db4]@15 ~", U: "[db3,ab3,db4]", V: "[gb3,bb3,eb4]@15 ~",
  W: "~@3 gb4, [gb3,bb3,eb4]@15 ~", // Ebm
})).s("gm_piano").gain(0.56).pan(0.6)

// drums · kick
const kick = s("bd").struct(`<
  ~@16 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 B A B A ~ A B A B A B A B A B A B A B A B
  ~@8 C@7 ~ A B A B A B A B A B A B A B A B ~@8
>`.pickRestart({
  A: "x ~@2 x ~@2 x ~ x ~@7", B: "x ~@2 x ~@2 x ~ x ~@2 x ~@4", C: "x ~@2 x ~@4 x ~@2 x ~@4",
})).gain(0.72)

// drums · snare
const snare = s("sd").struct(`<
  ~@16 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 B A B C ~ A B A B A B A B A B A B A B A D
  ~@8 E@7 ~ A B A B A B A B A B A B A B A B ~@8
>`.pickRestart({
  A: "~ x!2 ~ x ~@2 x ~ x!2 ~ x ~@2 x", B: "~@2 x ~ x ~@2 x ~ x!2 ~ x ~@2 x", C: "~ x!2 ~ x ~@2 x ~ x!2 ~ x!2 ~@2",
  D: "~@2 x ~ x ~@2 x ~ x!2 ~ x ~@3", E: "~ x ~ x",
})).gain(0.32)

// drums · hihat
const hihat = s("hh").struct("<~@16 A@16 B@22 C ~ B@16 ~@8 A@6 D ~ B@16 ~@8>".pickRestart({
  A: "x!8", B: "x ~ x!3 ~ x!2", C: "x ~ x!3 ~ x ~", D: "x ~ x ~ x ~ x ~ x ~ x ~ x ~ x!2",
})).gain(0.48)

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

// drums · tambourine
const tambourine = s("tb").struct("<~@8 A@47 ~ A@15 B ~@8 C@7 ~ A@16 ~@8>".pickRestart({
  A: "x!16", B: "x!15 ~", C: "x!4",
})).gain(0.32)

// drums · bongos
const bongos = s("bongo:18").struct("<~@80 [~ x!2 ~]!7 ~@25>").gain(1.26)

// drums · congas
const congas = s("conga:13").struct("<~@8 A@46 B ~ A@16 ~@8 C@7 ~ A@16 ~@8>".pickRestart({
  A: "x!4 ~ x!2 ~@2 x!3 ~ x!3", B: "x!4 ~ x!2 ~@2 x!3 ~ x ~@2", C: "~@7 x ~ x ~@4 x ~",
})).gain(1.28)

// drums · congas
const congas_2 = s("conga:18").struct("<~@8 A@47 ~ A@16 ~@8 B@7 ~ A@16 ~@8>".pickRestart({
  A: "~@4 x ~@2 x ~@4 x ~@3", B: "~@3 x ~@8 x ~@3",
})).gain(1.28)

// drums · congas
const congas_3 = s("conga:33").struct("<~@80 [~@10 x!2 ~@4]!7 ~@25>").gain(1.28)

// drums · claves
const claves = s("clave:2").struct("<~@16 A@8 ~@8 A@16 ~@8 A@16 ~@16 A@16 ~@8>".pickRestart({
  A: "~ x ~@3 x ~@2",
})).gain(1.96)

stack(
  synth_strings_1, bass, ocarina, piano, kick, snare, hihat, open_hat, tambourine, bongos, congas, congas_2, congas_3,
  claves
)